if strcmp(stklabel,'IH00')=0 AND HOLDINGS<>HOLDINGS1 then begin IF HOLDINGS1<0 AND HOLDINGS>0 THEN BEGIN SELLSHORT(1,-HOLDINGS1,THISCLOSE);BUY(1,HOLDINGS,THISCLOSE);END IF HOLDINGS1<0 AND HOLDINGS=0 THEN BEGIN SELLSHORT(1,-HOLDINGS1,THISCLOSE);END IF HOLDINGS1<0 AND HOLDINGS<0 AND HOLDINGS1 IF HOLDINGS1<0 AND HOLDINGS<0 AND HOLDINGS1>HOLDINGS THEN BEGIN BUYSHORT(1,HOLDINGS1-HOLDINGS,THISCLOSE);END IF HOLDINGS1=0 AND HOLDINGS>0 THEN BEGIN BUY(1,HOLDINGS,THISCLOSE);END IF HOLDINGS1=0 AND HOLDINGS<0 THEN BEGIN BUYSHORT(1,HOLDINGS1-HOLDINGS,THISCLOSE);END IF HOLDINGS1>0 AND HOLDINGS<0 THEN BEGIN SELL(1,HOLDINGS1,THISCLOSE);BUYSHORT(1,-HOLDINGS,THISCLOSE);END IF HOLDINGS1>0 AND HOLDINGS>0 AND HOLDINGS1>HOLDINGS THEN BEGIN SELL(1,HOLDINGS1-HOLDINGS,THISCLOSE);END IF HOLDINGS1>0 AND HOLDINGS>0 AND HOLDINGS1 IF HOLDINGS1>0 AND HOLDINGS=0 THEN BEGIN SELL(1,HOLDINGS1,THISCLOSE);END END
打印本文
關閉窗口