程式交易 - KDJ 指標

寫下單機寫太久了…應該回到交易這塊才對…下單機只是個工具…真正有沒有辦法獲利…還是交易程式比較重要。這個指標是最近接觸到的…不過在 TS 和 HTS 裡面都沒有這個指標的程式…所以就動手寫了出來…順便給大家參考一下囉。

KDJ 指標的圖會如下：



至於程式的寫法…這邊分為 HTS 和 TS 兩種囉，因為 TS 內連 SMA 的函式都沒有…所以還必需自己新增一個 SMA 的函式。

以下是 TS 的程式碼：
先新增一個 SMA 的函式如下：

Input : Price(Numeric), Length(Numeric);
Variables : Summation(0), Counter(0);

If CurrentBar = 1 Then begin
Summation = 0;
For Counter = 0 To Length - 1 begin
Summation = Summation + Price[Counter];
End;
SMA = Summation / Length;
End
Else begin
Summation = Summation[1] - SMA[1] + Price;
SMA = Summation / Length;
End;

接著就是指標的程式：

Input: N(13), M1(7), M2(3);
Vars:KDJRSV(0), KDJK(0), KDJD(0), KDJJ(0);

If CurrentBar = 1 or (Highest(High, N) - Lowest(Low, N)) = 0 Then begin
KDJRSV = 0;
KDJK = 0;
KDJD = 0;
KDJJ = 0;
End
Else begin
KDJRSV = (Close - Lowest(Low, N)) / (Highest(High, N) - Lowest(Low, N)) * 100;
KDJK = SMA(KDJRSV, M1);
KDJD = SMA(KDJK, M2);
KDJJ = (3 * KDJK) - (2 * KDJD);
End;

Plot1(KDJK, "K", Red, 2);
Plot2(KDJD, "D", Green, 2);
Plot3(KDJJ, "J", Blue, 1);


另外…也給大家 HTS 版的囉…HTS 就不用自己新增函式了…直接新增指標就可以了：

Parameter: N(13), M1(7), M2(3)
Vars:KDJRSV(0), KDJK(0), KDJD(0), KDJJ(0)

If CurrentBar = 1 Then
KDJRSV = 0
KDJK = 0
KDJD = 0
KDJJ = 0
Else
KDJRSV = (Close - Lowest(Low, N)) / (Highest(High, N) - Lowest(Low, N)) * 100
KDJK = SMA(KDJRSV, M1)
KDJD = SMA(KDJK, M2)
KDJJ = (3 * KDJK) - (2 * KDJD)
End if

Draw1(KDJK, "K", Red, 2)
Draw2(KDJD, "D", Green, 2)
Draw3(KDJJ, "J", Blue, 1)


至於怎麼用這個指標…那就自己玩吧。