TAG:指标

 网友求助:

指标用了理321老师的源码,谢谢老师,我们知道财务数据公布时是滞后的,我想把它的显示与时间同步,就是数据显示把它移至上一个季度,现在的部分可以为空白,这样看画面时比较真实,不知可不可以实现,请老师帮忙。源码如下:
INPUT:M(0),X1(14);
y:=15;y1:=15; x2:=x1+370;
股东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);
gg:=PFFIN(4002,M)/10000; gg1:=PFFIN(4012,M)/10000;gg2:=PFFIN(4022,M)/10000;
gg3:=PFFIN(4032,M)/10000;gg4:=PFFIN(4042,M)/10000;gg5:=PFFIN(4052,M)/10000;
gg6:=PFFIN(4062,M)/10000;gg7:=PFFIN(4072,M)/10000;gg8:=PFFIN(4082,M)/10000;
gg9:=PFFIN(4092,M)/10000;
十大股东合计:gg+gg1+gg2+gg3+gg4+gg5+gg6+gg7+gg8+gg9,LINETHICK0;
bn:=BARSLAST(PFFINTERM(4)<>ref(PFFINTERM(4),1));
大股东变动%:(ref(十大股东合计,bn)/ref(十大股东合计,bn+1)-1)*100;
日期:ref(date,bn),LINETHICK0,PRECIS0;
均价:ma(c,bn+1),LINETHICK0;
 

 

解答如下:

INPUT:M(0),X1(14);
y:=15;y1:=15; x2:=x1+370;
股东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);
gg:=PFFIN(4002,M)/10000; gg1:=PFFIN(4012,M)/10000;gg2:=PFFIN(4022,M)/10000;
gg3:=PFFIN(4032,M)/10000;gg4:=PFFIN(4042,M)/10000;gg5:=PFFIN(4052,M)/10000;
gg6:=PFFIN(4062,M)/10000;gg7:=PFFIN(4072,M)/10000;gg8:=PFFIN(4082,M)/10000;
gg9:=PFFIN(4092,M)/10000;
十大股东合计:gg+gg1+gg2+gg3+gg4+gg5+gg6+gg7+gg8+gg9,LINETHICK0;
bn:=BARSLAST(PFFINTERM(4)<>ref(PFFINTERM(4),1));
大股东变动%1:=(ref(十大股东合计,bn)/ref(十大股东合计,bn+1)-1)*100;
大股东变动%:"REFX@REFX"(大股东变动%1,59),COLOR00FFFF;
日期:ref(date,bn),LINETHICK0,PRECIS0;
均价:ma(c,bn+1),LINETHICK0;