主题：[原创]板块涨幅排名

runmode:0;

bkname:='连续合约';
stks:=stkcount(bkname);

variable:zf[stks]=0;

for i=1 to stks do begin
 code:=stkfromblk(bkname,i);
 code:=strremove(code,0,2);
 
 zf[i]:=(callstock(code,vtclose,6,0)-callstock(code,vtopen,6,0))/callstock(code,vtopen,6,0)*100;
 
 if valid(zf[i])=0 then
  zf[i]:=0;
end

myzf:=(close-open)/open*100;

排名:hod2(zf,stks,myzf),linethick0;

此主题相关图片如下：ccc.png