主题：后台程序化撤单追单怎么写？

 GLOBALVARIABLE:ct:=0;

//有平多未成交单，且5秒未成交，则撤单
if TISREMAIN(1)=1 and TSUBMIT(1)>5 then begin
 TCANCEL(1,1);//撤单完成后进行追单
 ct:=CURRENTTIME;
end


if CURRENTTIME-ct>=2 and ct<>0  then
begin
tbuy(1,1,MKT);
ct:=0;