請問，若股價突破40日均線後進場[enterlong:=c>MA(c,40)]
，每持股一天，均線參數即扣一日，跌破此MA就出場。
例，9月1日股價突破40ma後進場，2日要跌破39日ma才出場，
3日則要跌破38日才出場....以此類推，但最小不得小於10日ma。
請問exitlong:=要怎麼寫，謝謝。

引用:

---

最初由 genec 發表
請問，若股價突破40日均線後進場[enterlong:=c>MA(c,40)]
，每持股一天，均線參數即扣一日，跌破此MA就出場。
例，9月1日股價突破40ma後進場，2日要跌破39日ma才出場，
3日則要跌破38日才出場....以此類推，但最小不得小於10日ma。
請問exitlong:=要怎麼寫，謝謝。

---

抱歉未說清楚，這是從英文書得到的思路。
這是一通道系統，中間是40ma，上軌是40ma+40日atr，
下軌是40ma-40日atr，進場時機如下;
ENTERLONG:=C>上軌 AND MA40> REF(MA40,1);
出場方式就如我前文所述。

進場後，股價可能會多次回測上軌，甚至跌破上軌，但不用管它。
均線參數就每日減一日(最低到10日ma)，直到收盤跌破均線出場為止。
出場後，再依原方式尋求進場機會。
謝謝總版主。

引用:

---

最初由 genec 發表
抱歉未說清楚，這是從英文書得到的思路。
這是一通道系統，中間是40ma，上軌是40ma+40日atr，
下軌是40ma-40日atr，進場時機如下;
ENTERLONG:=C>上軌 AND MA40> REF(MA40,1);
出場方式就如我前文所述。

進場後，股價可能會多次回測上軌，甚至跌破上軌，但不用管它。
均線參數就每日減一日(最低到10日ma)，直到收盤跌破均線出場為止。
出場後，再依原方式尋求進場機會。
謝謝總版主。

---

原碼:


//判斷是否符合進的條件

BB:=c>MA(c,40); 



//決定進訊&出訊

NN:=40; BSP:=NN; 

CC:=C; BS:=C*0; CkBD:=0; 

StLb:=MAX(lbound(BB),NN);

for i=StLb to datacount do begin

  if BB[i]=1 and CkBD=0 then begin

    CkBD:=1; BS[i]:=1; BSP:=NN;

  end else if CkBD=1 then begin

    MANN:=0;

    for j=i downto i-BSP+1 do begin

      MANN:=MANN+CC[j];

    end;

    MANN:=MANN/BSP;

    if CC[i]<MANN then begin

      CkBD:=0; BS[i]:=-1;

    end;

  end;

  if BSP>10 then BSP:=BSP-1;

end;

VERTLINE(BS=1) linedot colorred;

VERTLINE(BS=-1) linedot colorgreen;