金字塔代碼修改 [金字塔]
- 咨詢內(nèi)容： AvgTR := ref(MA(TR,ATRLen),1) ;
//建立多頭進場條件
Long := h > T20Hi ;
//多頭進場
if Long then begin
myEntryPrice := IF(Open>T20Hi+MINDIFF ,Open ,T20Hi+MINDIFF ) ;
buy( _DEBUG,PosNum,limitr,myEntryPrice);
Position := 1 ;
TurtleUnits := 1 ;
N := AvgTR ;BuyOrderThisBar := 1;
//多頭加倉條件
While (High>myEntryPrice+0.5*N) and TurtleUnits<4 Do Begin
myEntryPrice := IF(Open>myEntryPrice+0.5*N ,Open ,myEntryPrice+0.5*N ) ;
myEntryPrice := Ceiling(myEntryPrice/MINDIFF)*MINDIFF ;
buy( _DEBUG, PosNum, limitr, myEntryPrice);
TurtleUnits := TurtleUnits+1 ;
BuyOrderThisBar := 1;
End //While 上面的ATR計算了4次，第一段開倉有1次，記為第一次，后面一段加倉有3次，分別記為第二，第三，第四次，我希望第二第三第四次依然用第一次的ATR，而不要刷新k線后重新計算。 本人不擅長編程，所以希望版上老師幫我寫一下，能夠給我完整的修改好的代碼。不要只提供一個思路，思路我也懂，就是第一次下單記錄最初的值。 不勝感激。 [此貼子已經(jīng)被作者于2012-9-25 19:39:39編輯過] - 金字塔客服：
您好，正在處理該問題，預計在今天收盤前解決
- 用戶回復：
variable:N=0;
AvgTR := ref(MA(TR,ATRLen),1) ;
//建立多頭進場條件
Long := h > T20Hi ;
//多頭進場
if Long and a=0 then begin
myEntryPrice := IF(Open>T20Hi+MINDIFF ,Open ,T20Hi+MINDIFF ) ;
buy( _DEBUG,PosNum,limitr,myEntryPrice);
Position := 1 ;
TurtleUnits := 1 ;
N:= AvgTR ;
BuyOrderThisBar := 1;a:=1;
end
//多頭加倉條件
if long and a=1 then begin
myEntryPrice := IF(Open>T20Hi+MINDIFF ,Open ,T20Hi+MINDIFF ) ;
buy( _DEBUG,PosNum,limitr,myEntryPrice);
Position := 1 ;
TurtleUnits := 1 ;
BuyOrderThisBar := 1;
While (High>myEntryPrice+0.5*N) and TurtleUnits<4 Do Begin
myEntryPrice := IF(Open>myEntryPrice+0.5*N ,Open ,myEntryPrice+0.5*N ) ;
myEntryPrice := Ceiling(myEntryPrice/MINDIFF)*MINDIFF ;
buy( _DEBUG, PosNum, limitr, myEntryPrice);
TurtleUnits := TurtleUnits+1 ;
BuyOrderThisBar := 1;
End //While - 網(wǎng)友回復： 多頭進場第一句就不理解，if Long and a=0。。。這個a哪里來的啊？
- 網(wǎng)友回復：
//多頭加倉條件
if long and a=1 then begin
myEntryPrice := IF(Open>T20Hi+MINDIFF ,Open ,T20Hi+MINDIFF ) ;
buy( _DEBUG,PosNum,limitr,myEntryPrice);
Position := 1 ;
TurtleUnits := 1 ;
BuyOrderThisBar := 1;為什么加倉的時候有這樣一段代碼？這不是開倉嗎？加倉應該用while語句啊
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯(lián)系技術人員 QQ: 262069696 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內(nèi)容
會員登錄/注冊