大智慧股东进出副图源码 主力增减尽收眼底

大智慧股东进出副图源码 主力增减尽收眼底

一张副图省去你来回翻F10的烦劳，直观、简洁让主力增减尽收眼底，只看不顶的不要
《股东进出》
INPUT:M(0);
动态股东人数:extradata('散户线'),COLOR00C0C0,PRECIS0,LINETHICK0;
季报:PFFINTERM( M),PRECIS0,LINETHICK0;
DRAWRECTREL(0,920,1100,1100,0),COLOR0000C0,LAYER1;
DRAWRECTREL(0,0,1100,1100,0),COLOR0000C0,LAYER1;
DRAWRECTREL(0,0,1100,120,0),COLOR0000C0,LAYER1;
流通盘万股:=CAPITAL/10000;
aa:=(PFFIN(4002,0)/10000+PFFIN(4012,0)/10000+PFFIN(4022,0)/10000
+PFFIN(4032,0)/10000+PFFIN(4042,0)/10000+PFFIN(4052,0)/10000+PFFIN(4062,0)/10000
+PFFIN(4072,0)/10000+PFFIN(4082,0)/10000+PFFIN(4092,0)/10000)/流通盘万股;
bb:=(PFFIN(4002,1)/10000+PFFIN(4012,1)/10000+PFFIN(4022,1)/10000+PFFIN(4032,1)/10000+PFFIN(4042,1)/10000+PFFIN(4052,1)/10000
+PFFIN(4062,1)/10000+PFFIN(4072,1)/10000+PFFIN(4082,1)/10000+PFFIN(4092,1)/10000)/流通盘万股;
DRAWRECTREL(0,0,40,925,0),COLOR0000C0,LAYER1;DRAWRECTREL(470,0,390,925,0),COLOR0000C0,LAYER1;DRAWRECTREL(620,0,540,925,0),COLOR0000C0,LAYER1;
DRAWTEXTREL(5,35,'名次'),COLOR00FFFF;DRAWTEXTREL(120,35,'本 期 十 大 股 东 名 称'),COLOR00FFFF;DRAWTEXTREL(405,35,'增减情况'),COLORFF00FF;DRAWTEXTREL(480,35,'持股比例'),Color8080FF;DRAWTEXTREL(555,35,'前期比例'),colorwhite;DRAWTEXTREL(690,35, '前 期 十 大 股 东 名 称'),COLOR00FFFF;
DRAWTEXTREL(20,135,'1'),COLOR00FFFF; DRAWTEXTREL(45,135,PFSTR(4001,M)),COLOR00FF00;DRAWTEXTREL(410,135,PFSTR(4004,M)),COLORFF00FF;DRAWTEXTREL(485,135,STR(PFFIN(4003,M))),Color8080FF;DRAWTEXTREL(560,135,STR(PFFIN(4003,1))),colorwhite;DRAWTEXTREL(630,135,PFSTR(4001,1)),COLOR00FF00;
DRAWTEXTREL(20,215,'2'),COLOR00FFFF; DRAWTEXTREL(45,215,PFSTR(4011,M)),COLOR00FF00;DRAWTEXTREL(410,215,PFSTR(4014,M)),COLORFF00FF;DRAWTEXTREL(485,215,STR(PFFIN(4013,M))),Color8080FF;DRAWTEXTREL(560,215,STR(PFFIN(4013,1))),colorwhite;DRAWTEXTREL(630,215,PFSTR(4011,1)),COLOR00FF00;
DRAWTEXTREL(20,295,'3'),COLOR00FFFF; DRAWTEXTREL(45,295,PFSTR(4021,M)),COLOR00FF00;DRAWTEXTREL(410,295,PFSTR(4024,M)),COLORFF00FF;DRAWTEXTREL(485,295,STR(PFFIN(4023,M))),Color8080FF;DRAWTEXTREL(560,295,STR(PFFIN(4023,1))),colorwhite;DRAWTEXTREL(630,295,PFSTR(4021,1)),COLOR00FF00;
DRAWTEXTREL(20,375,'4'),COLOR00FFFF; DRAWTEXTREL(45,375,PFSTR(4031,M)),COLOR00FF00;DRAWTEXTREL(410,375,PFSTR(4034,M)),COLORFF00FF;DRAWTEXTREL(485,375,STR(PFFIN(4033,M))),Color8080FF;DRAWTE