现有大盘指数1a0001，如何编个指标，能在查看任何个股时在副图显示 大盘指数的 cy...
mid:=(open+Close)/2; {均价}hsl:=if(capital=0,VOL/sum(VOL,100),VOL/capital);{换手率}
if capital=0 then begin
hsl:=VOL/sum(VOL,100);
a:=setlbound(hsl,1);
for i=1 to min(100-1,datacount) do hsl:=0;
end;
ljhs3:=hsl;
cyc3:=mid;
dd:=mid*(barpos<100);
for i=lbound(hsl)+1 to datacount do begin
ljhs3:=ljhs3*(1-hsl)*(34-1)/34+hsl;
cyc3:(mid*hsl+cyc3*ljhs3*(1-hsl)*(34-1)/34)/ljhs3+dd;
end;
上述为源码，现有大盘指数1a0001，如何编个指标，能在查看任何个股时在副图显示大盘指数的 cyc值？
正确答案:
这样或许好些
mid:=(o+C)/2; {均价}
t:=if(BARPOS<100,BARPOS,100);
hsl:=if(capital=0,V/sum(V,t),V/capital);{换手率}
if capital=0 then begin
hsl:=V/sum(V,t);
for i=1 to min(100-1,SYSPARAM(3)) do hsl:=0;
end;
ljhs3:=hsl;
cyc3:=mid;
dd:=mid*(barpos<2);
for i=2 to datacount do begin
ljhs3:=ljhs3*(1-hsl)*(34-1)/34+hsl;
cyc3:(mid*hsl+cyc3*ljhs3*(1-hsl)*(34-1)/34)/ljhs3+dd;
end;
另建公式
STKINDI('1A0001','cyc.cyc3',0,6);
页:
[1]