主题：ref(c,n)>t; 其中t是根据当前价格计算出来的值，现在想倒推出n的值，请问该如何编写？

runmode:0;
cc:c;
for i=1 to barpos-1 do begin
 if cc[barpos-i]>c then begin
   ii:=i;
   goto ab;
 end
end
ab@ iii:ii;

iii为所求值

在之前的基础上添加下面代码试一下看看

if iii=1 then
iii:=barpos;

runmode:0;
cc:c;

for i=1 to barpos-1 do begin
 if cc[barpos-i]>c  then begin
   ii:=i;
   goto ab;
 end
 else
 ii:=0;
end
ab@ iii:ii;