相關標簽:
模型策略源碼:// Dual Thrust //這個系統(tǒng)是 Michael Chalek 在80 年代開發(fā)的 Dual Thrust。 //1. 在今天的收盤,計算兩個值: 最高價-收盤價, 和 收盤價-最低價。然后取這兩個值較大的那個,乘以k值0.7。把結果稱為 觸發(fā)值。 //2. 在明天的開盤,記錄開盤價,然后在價格超過(開盤+觸發(fā)值)時馬上買入,或者價格低于(開盤-觸發(fā)值)時馬上賣空。 input:K1(0.5,0,2,0.1);//多頭突破波動比例 input:K2(0.5,0,2,0.1);//多頭突破波動比例 input:Mday(1,0,9,1);//M日期最大價差 input:Nday(1,0,9,1);//N日前最大價差 input:LOTS(1,0,9,1);// m.kzuj.com.cn HighD:=callstock(stklabel,vthigh,6,-1); LowD:=callstock(stklabel,vtlow,6,-1); CloseD:=callstock(stklabel,vtclose,6,-1); CYC:=barslast(date<>ref(date,1))+1; OpenD:=valuewhen(cyc=1,open); HH:= HHV(HighD,Mday); HC:= HHV(CloseD,Mday); LL:= LLV(LowD,Mday); LC:= LLV(CloseD,Mday); SellRange:=Max(HH - LC,HC - LL); HH:=HHV(HighD,Nday); HC:=HHV(CloseD,Nday); LL:=LLV(LowD,Nday); LC:=LLV(CloseD,Nday); BuyRange:=Max(HH - LC,HC - LL); UpperBand: OpenD + K1*BuyRange; LowerBand: OpenD - K2*SellRange; If (HOLDING=0) THEN BEGIN If (High>=UpperBand) THEN Buy(HOLDING=0,lots,LIMITR,Max(Open,UpperBand)); If (Low<=LowerBand) THEN BuyShort(HOLDING=0,lots,LIMITR,Min(Open,LowerBand)); END //m.kzuj.com.cn If (HOLDING<0) THEN BEGIN If (High>=UpperBand) THEN BEGIN SELLSHORT(HOLDING<0,lots,LIMITR,Max(Open,UpperBand)); Buy(HOLDING=0,lots,LIMITR,Max(Open,UpperBand)); END END If (HOLDING>0) THEN BEGIN If (Low<=LowerBand) THEN BEGIN Sell(holding>0,lots,limitr,Min(Open,LowerBand)); BuyShort(holding=0,lots,limitr,Min(Open,LowerBand)); END END 持倉:holding,noaxis ,linethick0 ; 盈虧:asset-1000000,noaxis,coloryellow,linethick2; 點擊復制上述代碼粘貼到到公式管理器
{別忘了將本網(wǎng)告訴您身邊的朋友,向朋友傳達有用資料,也是一種人情,你朋友會感謝你的。}