通達(dá)信十大股東指標(biāo)

副圖指標(biāo)，不用打開(kāi)F10也可以看到十大股東統(tǒng)計(jì)分析

指標(biāo)源碼：

{十大股東}

DRAWRECTREL(0,0,998,998,RGB(0,0,10));

DRAWRECTREL(40,0,40,998,RGB(200,200,200));

DRAWRECTREL(470,0,470,998,RGB(200,200,200));

DRAWRECTREL(555,0,555,998,RGB(200,200,200));

DRAWRECTREL(635,0,635,998,RGB(200,200,200));

DRAWRECTREL(750,0,750,998,RGB(200,200,200));

DRAWRECTREL(0,100,998,100,RGB(200,200,200));

DRAWTEXT_FIX(ISLASTBAR,0.010,0.020,0,'序號(hào)'),COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.120,0,'一'),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.207,0,'二'),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.294,0,'三'),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.381,0,'四'),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.468,0,'五'),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.555,0,'六'),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.642,0,'七'),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.729,0,'八'),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.816,0,'九'),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.015,0.903,0,'十'),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.18,0.020,0,'十大流通股東名稱'),COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.120, 0, EXTERNSTR(0,201) ),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.207, 0, EXTERNSTR(0,202) ),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.294, 0, EXTERNSTR(0,203) ),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.381, 0, EXTERNSTR(0,204) ),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.468, 0, EXTERNSTR(0,205) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.555, 0, EXTERNSTR(0,206) ),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.642, 0, EXTERNSTR(0,207) ),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.729, 0, EXTERNSTR(0,208) ),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.816, 0, EXTERNSTR(0,209) ),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.050, 0.903, 0, EXTERNSTR(0,210) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.48,0.020,0,'持股量(萬(wàn)股)'),COLOR0000FF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.120, 0, EXTERNVALUE(0,201) ),COLOR00FFFF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.207, 0, EXTERNVALUE(0,202) ),COLOR00FF00;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.294, 0, EXTERNVALUE(0,203) ),COLORFF00FF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.381, 0, EXTERNVALUE(0,204) ),COLORFFFF00;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.468, 0, EXTERNVALUE(0,205) ),COLOR4080FF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.555, 0, EXTERNVALUE(0,206) ),COLOR00FFFF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.642, 0, EXTERNVALUE(0,207) ),COLOR00FF00;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.729, 0, EXTERNVALUE(0,208) ),COLORFF00FF;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.816, 0, EXTERNVALUE(0,209) ),COLORFFFF00;

DRAWNUMBER_FIX(ISLASTBAR,0.480, 0.903, 0, EXTERNVALUE(0,210) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.56,0.020,0,'持股比例 %'),COLOR0000FF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.120, 0, EXTERNVALUE(0,211) ),COLOR00FFFF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.207, 0, EXTERNVALUE(0,212) ),COLOR00FF00;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.294, 0, EXTERNVALUE(0,213) ),COLORFF00FF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.381, 0, EXTERNVALUE(0,214) ),COLORFFFF00;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.468, 0, EXTERNVALUE(0,215) ),COLOR4080FF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.555, 0, EXTERNVALUE(0,216) ),COLOR00FFFF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.642, 0, EXTERNVALUE(0,217) ),COLOR00FF00;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.729, 0, EXTERNVALUE(0,218) ),COLORFF00FF;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.816, 0, EXTERNVALUE(0,219) ),COLORFFFF00;

DRAWNUMBER_FIX(ISLASTBAR,0.575, 0.903, 0, EXTERNVALUE(0,220) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.655,0.020,0,'增減 萬(wàn)股 比例'),COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.120, 0, EXTERNSTR(0,211) ),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.207, 0, EXTERNSTR(0,212) ),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.294, 0, EXTERNSTR(0,213) ),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.381, 0, EXTERNSTR(0,214) ),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.468, 0, EXTERNSTR(0,215) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.555, 0, EXTERNSTR(0,216) ),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.642, 0, EXTERNSTR(0,217) ),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.729, 0, EXTERNSTR(0,218) ),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.816, 0, EXTERNSTR(0,219) ),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.645, 0.903, 0, EXTERNSTR(0,220) ),COLOR4080FF;

DRAWTEXT_FIX(ISLASTBAR,0.85,0.020,0,'統(tǒng)計(jì)分析'),COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR,0.755,0.120,0,'1、前十大股東持股合計(jì)'),COLOR0000FF;

{分析家公式網(wǎng) WWW.70822.COM}

QSDGDCGBL:=EXTERNVALUE(0,211)+EXTERNVALUE(0,212)+EXTERNVALUE(0,213)+EXTERNVALUE(0,214)+EXTERNVALUE(0,215)

          +EXTERNVALUE(0,216)+EXTERNVALUE(0,217)+EXTERNVALUE(0,218)+EXTERNVALUE(0,219)+EXTERNVALUE(0,220);

QSDGDCGSL:=EXTERNVALUE(0,201)+EXTERNVALUE(0,202)+EXTERNVALUE(0,203)+EXTERNVALUE(0,204)+EXTERNVALUE(0,205)

          +EXTERNVALUE(0,206)+EXTERNVALUE(0,207)+EXTERNVALUE(0,208)+EXTERNVALUE(0,209)+EXTERNVALUE(0,210);

環(huán)比增減1:=(FINONE(245,0,0)-FINONE(245,0,1))/FINONE(245,0,1)*100;

HG111:=IF(環(huán)比增減1>0,VARCAT(VARCAT( '增加  ' ,VAR2STR( 環(huán)比增減1,2)),'  %　'),IF(環(huán)比增減1<0,VARCAT(VARCAT( '減少  ' ,VAR2STR(-環(huán)比增減1,2)),'  %　'),' '));

HGH111:=STRCAT(STRCAT('占總股本 ',STRCAT(CON2STR(FINVALUE(245)/FINVALUE(238)*100,2),' %　')),STRCAT('占流通盤 ',STRCAT(CON2STR(FINVALUE(245)/FINVALUE(239)*100,2),' %　')));

SDGDCGLXFX:=IF(FINONE(245,0,0)<FINONE(245,0,1) AND FINONE(245,0,1)<FINONE(245,0,2)  AND FINONE(245,0,2)<FINONE(245,0,3),'連續(xù)三季度減少',IF(FINVALUE(245)>FINONE(245,0,1) AND FINONE(245,0,1)>FINONE(245,0,2)  AND FINONE(245,0,2)>FINONE(245,0,3),'連續(xù)三季度增加',''));

DRAWTEXT_FIX(ISLASTBAR,0.760,0.207,0,STRCAT(STRCAT('持股比 ',STRCAT(CON2STR(QSDGDCGBL,2),' %　')),STRCAT('持股數(shù) ',STRCAT(CON2STR(QSDGDCGSL,2),' 萬(wàn)股')))),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.760,0.294,0,HGH111),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.760,0.381,0,STRCAT('較上期  ',STRCAT(HG111,SDGDCGLXFX))),COLOR00FFFF;

GDRSLXZJFX:=IF(FINONE(242,0,0)<FINONE(242,0,1) AND FINONE(242,0,1)<FINONE(242,0,2)  AND FINONE(242,0,2)<FINONE(242,0,3),'連續(xù)三季度減少',IF(FINVALUE(242)>FINONE(242,0,1) AND FINONE(242,0,1)>FINONE(242,0,2)  AND FINONE(242,0,2)>FINONE(242,0,3),'連續(xù)三季度增加',''));

DRAWTEXT_FIX(ISLASTBAR AND ((FINVALUE(242)-FINONE(242,0,1))/FINONE(242,0,1))<=0,0.755,0.468,0,STRCAT('2、本期股東較上期 ',STRCAT(CON2STR((FINVALUE(242)-FINONE(242,0,1))/FINONE(242,0,1)*100,2),STRCAT(' %，',GDRSLXZJFX)))),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR AND ((FINVALUE(242)-FINONE(242,0,1))/FINONE(242,0,1))> 0,0.755,0.468,0,STRCAT('2、本期股東較上期 ',STRCAT(CON2STR((FINVALUE(242)-FINONE(242,0,1))/FINONE(242,0,1)*100,2),STRCAT(' %，',GDRSLXZJFX)))),COLOR0000FF;

HGH222:=STRCAT(STRCAT('占總股本 ',STRCAT(CON2STR(FINVALUE(247)/FINVALUE(238)*100,2),' %　')),STRCAT('占流通盤 ',STRCAT(CON2STR(FINVALUE(247)/FINVALUE(239)*100,2),' %　')));

JGCGLXZJFX:=IF(FINONE(247,0,0)<FINONE(247,0,1) AND FINONE(247,0,1)<FINONE(247,0,2)  AND FINONE(247,0,2)<FINONE(247,0,3),'連續(xù)三季度減少',IF(FINVALUE(247)>FINONE(247,0,1) AND FINONE(247,0,1)>FINONE(247,0,2)  AND FINONE(247,0,2)>FINONE(247,0,3),'連續(xù)三季度增加',''));

DRAWTEXT_FIX(ISLASTBAR,0.755,0.555,0,STRCAT('3、共  ',STRCAT(CON2STR(FINVALUE(246),0),STRCAT('  家機(jī)構(gòu)，共持有  ',STRCAT(CON2STR(FINVALUE(247)/10000,2),'  萬(wàn)股'))))),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.760,0.642,0,HGH222),COLORFF00FF;

DRAWTEXT_FIX(ISLASTBAR,0.760,0.729,0,STRCAT('增幅 ',STRCAT(CON2STR((FINONE(247,0,0)-FINONE(247,0,1))/FINONE(247,0,1)*100,2),STRCAT(' % ',JGCGLXZJFX)))),COLORFF00FF;

環(huán)比增減3:=(FINONE(284,0,0)-FINONE(284,0,1))/FINONE(284,0,1)*100;

HG333:=IF(環(huán)比增減3>0,VARCAT(VARCAT( '增加  ' ,VAR2STR( 環(huán)比增減3,2)),'  %　'),IF(環(huán)比增減3<0,VARCAT(VARCAT( '減少  ' ,VAR2STR(-環(huán)比增減3,2)),'  %　'),' '));

GJDCGLXFX:=IF(FINONE(284,0,0)<FINONE(284,0,1) AND FINONE(284,0,1)<FINONE(284,0,2)  AND FINONE(284,0,2)<FINONE(284,0,3),'連續(xù)三季度減少',IF(FINVALUE(284)>FINONE(284,0,1) AND FINONE(284,0,1)>FINONE(284,0,2)  AND FINONE(284,0,2)>FINONE(284,0,3),'連續(xù)三季度增加',''));

DRAWTEXT_FIX(ISLASTBAR,0.755,0.816,0,STRCAT('4、國(guó)家隊(duì)持 ',STRCAT(CON2STR(FINVALUE(284),2),STRCAT('  萬(wàn)股，占總股本 ',STRCAT(CON2STR(FINVALUE(284)*10000/FINVALUE(238)*100,2),'  %　'))))),COLORFFFF00;

DRAWTEXT_FIX(ISLASTBAR,0.760,0.903,0,STRCAT('較上期  ',STRCAT(HG333,GJDCGLXFX))),COLORFFFF00;