在图表交易系统中－－波段交易如何写程序　[金字塔]

h1:callstock(stklabel,vthigh,6,-1);

l1:callstock(stklabel,vtlow,6,-1);

if h>(h1-l1) then begin

   sellshort(1,0,market);

   buy(holding=0,1,market);

end

if l<(h1-l1) then begin

    sell(1,0,market);

    buyshort(holding=0,1,market);

end

if (currenttime>=145930 and islastbar) or(time=closetime(0) and not(islastbar)) then begin

    sell(1,0,market);

    sellshort(1,0,market);

end