globalvariable:mark:=0;
if 平多条件 and tbuyholdingex('','',2)>0 and tremainqty(2,'',stklabel)>0 and mark=0 then
begin
tcancelex(1,2,'',stklabel);//先撤单
mark:=1;
end
//确保完全撤单后再执行平仓
if mark and tbuyholdingex('','',1)>0 and tremainqty(2,'',stklabel)=0 then
begin
tsell(1,1,mkt);
mark:=0;
end