親愛的版主
下列的交易模組怎麼寫，請指導，拜託！拜託！

TIM0:=TIME>085001 and TIME<=134001; //進場交易時間
MX:=ma(C,24);
BS:=IF(MX>ref(MX,1),1,-1);
BB:=BS=1 and C>MX; //作多
BZ:=BS=1 and C<MX; //多制損平倉
SS:=BS=-1 and C<MX; //作空
SZ:=BS=-1 and C>MX; //作空制損平倉

引用:

---

最初由 L0123 發表
親愛的版主
下列的交易模組怎麼寫，請指導，拜託！拜託！

TIM0:=TIME>085001 and TIME<=134001; //進場交易時間
MX:=ma(C,24);
BS:=IF(MX>ref(MX,1),1,-1);
BB:=BS=1 and C>MX; //作多
BZ:=BS=1 and C<MX; //多制損平倉
SS:=BS=-1 and C<MX; //作空
SZ:=BS=-1 and C>MX; //作空制損平倉

---

引用:

---

最初由 cgjj 發表
前面看只有 "制損平倉"
1. TIME 過 134001 要強制平倉嗎?
2. 還有其他平倉條件嗎?

---

引用:

---

最初由 L0123 發表
前文說明不完整，現重新定義如下：
前文所提內容因為是用收盤價，須下一根K才能下單，現改為“H>MO”及“L<MO” 是要在當K條件成立就下單的意思。

//交易模組

TIME1:=TIME>085001; //當日沖交易開始時間。
TIME2:=TIME>134001; //不管倉位賺錢賠錢，時間到強制平倉出場，不留隔日單。
MO:ma(O,24);
KN1:=BARSLAST(DATE<>ref(DATE,1))+1;
QQ:=當日沖準備條件成立。
AA:=SUM(QQ,KN1)>0;
A1:= H>MO;
A2:= L<MO;
BS:=IF(AA,IF(MO>ref(MO,1),1,-1),0);
BB:=BS=1 and A1; //作多
BZ:=BS=1 and A2; //多制損平倉
SS:=BS=-1 and A2; //作空
SZ:=BS=-1 and A1; //作空制損平倉

---

引用:

---

最初由 cgjj 發表
請參考這的處理方式
http://www.chiefox.com.tw/bbs/showt...&threadid=12376

---

引用:

---

最初由 L0123 發表
親愛的總版主　您好
您指引連結的是以前偶向　版主請求指導的交易模組範例，真的很好用，也很好套用。在此再一次向　總版主致萬分的謝意。足多謝＋真感恩。
今日要請　總版主幫忙的是它只有制損機制，沒有停利機制。
是想要程式短一些，簡單一些。同時想學BV迴圈的寫法。
拜託！拜託！

---

原碼:


強出:=TIME2 or barpos=0;

多進:=BB and TIME1 and 強出=0 or barpos=0;

多出:=BZ or barpos=0;

空進:=SS and TIME1 and 強出=0 or barpos=0;

空出:=SZ or barpos=0;





進出:C*0; 

多空:=0; //1.多 -1.空 0.無

for i = 1 to datacount do begin

  if 多空=0 and 強出[i]=0 then begin

    多空:=多進[i]-空進[i]; 進出[i]:=多空;

  end else if 多空<>0 then begin

    if 強出[i] then begin

      進出[i]:=多空*3; 多空:=0;

    end else begin

      if 多空=多出[i] or 多空=-空出[i] then begin

        進出[i]:=多空*2; 多空:=0;

      end else if 多空=空進[i] or 多空=-多進[i] then begin

        進出[i]:=-多空*4; 多空:=-多空;

      end;

    end;

  end;

end;

引用:

---

最初由 cgjj 發表
測試看看是否ok

原碼:


強出:=TIME2 or barpos=0;

多進:=BB and TIME1 and 強出=0 or barpos=0;

多出:=BZ or barpos=0;

空進:=SS and TIME1 and 強出=0 or barpos=0;

空出:=SZ or barpos=0;





進出:C*0; 

多空:=0; //1.多 -1.空 0.無

for i = 1 to datacount do begin

  if 多空=0 and 強出[i]=0 then begin

    多空:=多進[i]-空進[i]; 進出[i]:=多空;

  end else if 多空<>0 then begin

    if 強出[i] then begin

      進出[i]:=多空*3; 多空:=0;

    end else begin

      if 多空=多出[i] or 多空=-空出[i] then begin

        進出[i]:=多空*2; 多空:=0;

      end else if 多空=空進[i] or 多空=-多進[i] then begin

        進出[i]:=-多空*4; 多空:=-多空;

      end;

    end;

  end;

end;

[進出] 這變數值代表意義如下:
1.多進, 2.多控損, 3.多強制, 4.空轉多
-1.空進, -2.空控損, -3.空強制, -4.多轉空

---