--
//上升循环
if THOLDING2>=0 and extgbdata(\'A\')=0 and open>extgbdata(\'kaikong\') then begin
for n=2 to 20 do begin
if high>extgbdata(\'kaikong\') then begin
kgprice:=extgbdata(\'kaikong\')+(n-1)*间距;
if high>=kgprice and tsellholding(0)<0 then begin
tsellshort(1,1,lmt,kgprice),ORDERQUEUE;
end
kdprice:=extgbdata(\'kaiduo\')+(n)*间距;
if high>=kdprice and tbuyholding(0)>0 then begin
tsell(1,1,lmt,kdprice),ORDERQUEUE;
end
extgbdataset(\'A\',1);
end
else//转为下跌
if TISREMAIN(0)=1 and TSUBMIT(0)>=50 and extgbdata(\'A\')=1 then begin
kdprice:=extgbdata(\'kaiduo\')-(n-1)*间距;
if low<=kdprice and tbuyholding(0)>0 then begin
tsell(1,1,lmt,kdprice),ORDERQUEUE;
end
kgprice:=extgbdata(\'kaikong\')-(n)*间距;
if low<=kgprice and tsellholding(0)<0 then begin
tsellshort(1,1,lmt,kgprice),ORDERQUEUE;
end
extgbdataset(\'A\',0);
end
end
end