?

?

?來源:程序化久久網（ www.kzuj.com.cn ）

?

?

IF STKLABEL<>'600030'and STKLABEL<>000002 then EXIT;
aa:VALUEWHEN(TODAYBAR=1,REF(close,1));
?
if TBUYHOLDINGex('','',0)>0 and (open-aa)/aa>0.03 then BEGIN
?tsell(1,TBUYHOLDINGex('','',0),MARKET);
end

if TBUYHOLDINGex('','',0)>0 and (close-aa)/aa>0.02 then BEGIN
?tsell(1,TBUYHOLDINGex('','',0),MARKET);
end

if TBUYHOLDINGex('','',0)>0 and (close-aa)/aa>0.06 and time>=143600 and? time<=150000? then BEGIN
?tsell(1,TBUYHOLDINGex('','',0),MARKET);
end

?

?

第六點請參考上面方式自行實現。該代碼必須應用于后臺程序化，并且使用動態加載，監控賬戶欄。