按成交价求平均资金流

variable:n=0;

variable:kk=0;

k:=stkindi('','kdj.k',0,1);

if h>=2669 and l<=2669 then begin

    kk:=k+kk;

    n:=n+1;

end

avg_k:=kk/n;

if time=closetime(0) then begin

   kk:=0;

   n:=0;

end

用全局变量来记录k值的总和并且除以次数n

最后在收盘时重置变量kk和n

2669是常量，每分钟的k线收盘价都不一样，我需要将光标任意挪到那个周期就能显示那个周期的k值和平均k值。