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

         
用日線測試不能用.為什么呢,用在別的時期就能用.