runmode:0;
buycond:=open<ref(low,1);
buyshortcond:=open>ref(high,1);

if holding=0 then begin
 if buycond then
  buy(1,1,limitr,open);
end

if holding=0 then begin
 if buyshortcond then
  buyshort(1,1,limitr,open);
end

if holding>0 then begin
 sell(1,holding,limitr,close);
end

if holding<0 then begin
 sellshort(1,holding,limitr,close);
end

         
用日线测试不能用.为什么呢,用在别的时期就能用.