引用:

---

最初由 kaiserlai 發表
版主
我發現控損價的值會根據當跟K線變動
所以控損價的邏輯應該是根據前一跟K線的CLOSE來減去ATR才對
請問一下要怎麼改?

另外不好意思一直麻煩您
請問有甚麼書或網站有在解說這個迴圈語法嗎?
PS:我本身會VBA，但是奇狐寫法我還不太會

---

引用:

---

最初由 cgjj 發表
方式2:
隨行情變化, 採用當前這根的ATR 值(曲線)
註: ATR 請自行帶入公式之中

原碼:


CC:=C;

MA5:MA(C,5);

MA20:MA(C,20);

強出:=time>=134000;

限進:=time<=085000;

多進:=cross(MA5,MA20) and 強出=0 and 限進=0 or barpos=0;

空進:=cross(MA20,MA5) and 強出=0 and 限進=0 or barpos=0;

進出:C*0 NOAXIS;

多空:=0; 進價:=0; 盈虧:c*0 linethick;

for i = 1 to datacount do begin

  if 多空=0 then begin

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

    if 多空<>0 then 進價:=CC[i];

  end else if 多空<>0 then begin

    盈虧[i]:=(CC[i]-進價)*多空;    

    if 盈虧[i]>ATR[i]*3 then begin

      控損:=ATR[i];

    end else begin

      控損:=ATR[i]*3;

    end;

    if 強出[i] then begin

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

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

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

      進價:=CC[i];

    end else if 盈虧[i]<=-控損 then begin

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

    end;

  end;

end;

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

---

引用:

---

最初由 soromance 發表
版主您好：

請問一下，在停損例子中，有用到：

進出:C*0 NOAXIS;
多空:=0; 進價:=0; 盈虧:c*0 linethick;

為何要 進出:C*0 以及 盈虧: C*0 這樣的寫法呢?
不是很瞭解..

謝謝您的解答.. ^^

---

引用:

---

最初由 cgjj 發表
創造一個與K棒同等長度的零值數列
100根K棒, 數列就有100個元素

---

引用:

---

最初由 soromance 發表
嗯，算是宣告陣列的意思嗎？
如果是如此的話，我們在程式中仍有看到

多進[i]、空進[i]、CC[i]、以及ATR[i]等，
為什麼這些參數就不需要創造與K棒等長度的零值數列呢？

不好意思，不是學程式出身的，問比較基本的問題。

Soro

---