KD:=REF(high>=REF(high,1),1) ;　　

KK:=REF(high<REF(high,1),1);　　

?

?

//開多止盈5　　

IF H-ENTERPRICE>=5*MINDIFF and holding>0 THEN BEGIN　　

SELL(1,0,MARKET),orderQueue; 　　

END　　

?

//開空止盈5　　

IF ENTERPRICE-low>=5*MINDIFF and holding<0 THEN BEGIN　　

sellshort(1,0,MARKET),orderQueue; 　　

END　　

?

//開多止損20　　

IF ENTERPRICE-low>=20*MINDIFF and holding>0 THEN BEGIN　　

SELL(1,0,MARKET),orderQueue; 　　

END　　

?

//開空止損20　　

IF HIGH-ENTERPRICE>=20*MINDIFF and holding<0 THEN BEGIN　　

sellshort(1,0,MARKET),orderQueue; 　　

END　　

?

//------------------開多　　

if (KD AND HOLDING=0) then 　　

begin　　

BUY(1 ,手數,marketr),orderQueue;　　

end　　

//-----------------開空　　

if (KK AND HOLDING=0) then 　　

begin　　

BUYSHORT(1,手數,marketr),orderQueue; 　　

end　　

?

//-----------------------------k走完提前2秒平倉　　

abb:=(time0-timetot0(dynainfo(207))<=2) or not(islastbar); //tq是設定的提前下單的秒數　　

if abb then begin　　

sell(1,0,MARKET),orderQueue;　　

sellshort(1,0,MARKET),orderQueue;?????????????????????????? 　　

END　　

?

?

?來源:程序化久久網（ m.weiqiv.net.cn ）

?

?