INPUT:X1(500,100,1000),Y(80,10,100),M(0); 股东1:=PFSTR(4001,M); 股东2:=PFSTR(4011,M); 股东3:=PFSTR(4021,M); 股东4:=PFSTR(4031,M); 股东5:=PFSTR(4041,M); 股东6:=PFSTR(4051,M); 股东7:=PFSTR(4061,M); 股东8:=PFSTR(4071,M); 股东9:=PFSTR(4081,M); 股东10:=PFSTR(4091,M); y1:=150; DRAWTEXTREL(20,20,'股票名称:'+'【'+STKLABEL+' '+STKNAME+'】'),COLOR00FFFF;DRAWTEXTREL(X1*0.97,40,'增减情况'),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,40,'持股数(万股)'),Color8080FF;DRAWTEXTREL(X1*0.97+250,40,'持股比例(%)'),ColorBFBFFF; DRAWTEXTREL(20,y1,'1.'+股东1),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1,PFSTR(4004,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1,STR(PFFIN(4002,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1,STR(PFFIN(4003,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*1,'2.'+股东2),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*1,PFSTR(4014,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*1,STR(PFFIN(4012,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*1,STR(PFFIN(4013,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*2,'3.'+股东3),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*2,PFSTR(4024,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*2,STR(PFFIN(4022,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*2,STR(PFFIN(4023,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*3,'4.'+股东4),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*3,PFSTR(4034,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*3,STR(PFFIN(4032,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*3,STR(PFFIN(4033,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*4,'5.'+股东5),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*4,PFSTR(4044,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*4,STR(PFFIN(4042,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*4,STR(PFFIN(4043,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*5,'6.'+股东6),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*5,PFSTR(4054,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*5,STR(PFFIN(4052,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*5,STR(PFFIN(4053,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*6,'7.'+股东7),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*6,PFSTR(4064,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*6,STR(PFFIN(4062,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*6,STR(PFFIN(4063,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*7,'8.'+股东8),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*7,PFSTR(4074,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*7,STR(PFFIN(4072,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*7,STR(PFFIN(4073,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*8,'9.'+股东9),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*8,PFSTR(4084,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*8,STR(PFFIN(4082,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*8,STR(PFFIN(4083,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*9,'10.'+股东10),COLOR00FF00;DRAWTEXTREL(X1*0.97,y1+y*9,PFSTR(4094,M)),COLORFF00FF;DRAWTEXTREL(X1*0.97+100,y1+y*9,STR(PFFIN(4092,M)/10000)),Color8080FF;DRAWTEXTREL(X1*0.97+250,y1+y*9,STR(PFFIN(4093,M))),ColorBFBFFF; DRAWTEXTREL(20,y1+y*10,'流通股东人数: '+STR(PFFIN(4253,M))+' 与上期相比增减:'+STR(PFFIN(4253,M)-PFFIN(4253,M+1))+' 人均持流通股: '+STR(PFFIN(4254,M))+' 与上期相比人均持股增减: '+STR(PFFIN(4254,M)-PFFIN(4254,M+1))),COLOR00AAFF; |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!