奇狐社區論壇 - 好玩的 MACD变色公式 (多週期)

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- 好玩的 MACD变色公式 (多週期) (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1792)

由 fugoal 在 2004-10-16 22:31 發表:

好玩的 MACD变色公式 (多週期)

好玩的 MACD变色公式 (多週期)

由 lotus777 在 2005-01-25 01:37 發表:

可能是過期了
可否再貼一次
感恩

__________________
lotus777

由 fugoal 在 2005-01-25 06:16 發表:

MACD溫度

引用:
最初由 lotus777 發表
可能是過期了
可否再貼一次
感恩

無加密無日期限制

MACD溫度

S=12 L=26 M=9

K15:"MACD.DIFF#MIN15" COLORRED LINETHICK0;
D15:="MACD.DEA#MIN15" COLORWHITE LINETHICK0;
K30:"MACD.DIFF#MIN30" COLORYELLOW LINETHICK0;
D30:="MACD.DEA#MIN30" COLORWHITE LINETHICK0;
K60:"MACD.DIFF#MIN60" COLORWHITE LINETHICK0;
D60:="MACD.DEA#MIN60" COLORWHITE LINETHICK0;
日K:"MACD.DIFF#DAY" COLORMAGENTA LINETHICK0;
日D:="MACD.DEA#DAY" COLORWHITE LINETHICK0;
周K:"MACD.DIFF#WEEK" COLOR0088CC LINETHICK0;
周D:="MACD.DEA#WEEK" COLORWHITE LINETHICK0;
月K:"MACD.DIFF#MONTH" COLOR0088FF LINETHICK0;
月D:="MACD.DEA#MONTH" COLORWHITE LINETHICK0;

X:="MACD.DIFF";

STICKLINE( K15>=D15 ,0.8*X,0.6*X,10,0);
STICKLINE( K15<D15 ,0.8*X,0.6*X,10,0)COLORGREEN ;
STICKLINE( K30>=D30 ,0.6*X,0.4*X,10,0);
STICKLINE( K30<D30 ,0.6*X,0.4*X,10,0)COLORGREEN ;
STICKLINE( K60>=D60 ,0.4*X,0*X,10,0);
STICKLINE( K60<D60 ,0.4*X,0*X,10,0) COLORGREEN;
STICKLINE( 日K>=日D ,0*X,-0.4*X,10,0);
STICKLINE( 日K<日D ,0*X,-0.4*X,10,0) COLOR009933;
STICKLINE( 周K>=周D ,-0.4*X,-0.6*X,10,0);
STICKLINE( 周K<周D ,-0.4*X,-0.6*X,10,0) COLOR009933;
STICKLINE( 月K>=月D ,-0.6*X,-0.8*X,10,0) COLOR0088DD;
STICKLINE( 月K<月D ,-0.6*X,-0.8*X,10,0) COLOR009933;

DIFF:REF(EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),1) COLORRED LINETHICK2;
DEA:EMA(DIFF,M) LINETHICK2 COLORBLUE;
MACD:=2*(DIFF-DEA),COLORSTICK;

由 joanne115244 在 2005-01-25 11:33 發表:

響應 fugoal兄的熱情分享
也提供一組簡單的 [RSI-KD-MACD] 的組合指標供大家參考

Rsi6:SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
MACD:300*"MACD.MACD#DAY"(20,5,10)/EMA(C,30) colorred pointdot;
日K:"SKD.K#DAY"(9,2,2,3) pointdot COLORyellow;
日D:"SKD.D#DAY"(9,2,2,3) pointdot COLORff9999;
周K:"SKD.K#WEEK"(4,2,2,3) pointdot COLORmagenta;
周D:"SKD.D#WEEK"(4,2,2,3) pointdot COLORcyan;
STICKLINE(日K>=日D,日D,日K,10,0) COLORyellow;
STICKLINE(日K<日D,日D,日K,10,0) COLORff9999;
STICKLINE(周K>=周D,周D,周K,10,0) COLORmagenta;
STICKLINE(周K<周D,周K,周D,10,0) COLORcyan;
STICKLINE(MACD>=0,0,MACD,10,0) COLORred;
STICKLINE(MACD<=0,0,MACD,10,0) COLORgreen;

-------------------------------------------------------------------------------------------------------------------
再增加一組自己改編的[KD組合趨勢圖]

Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
K5:=sMA(var5,3,1), colorwhite;
D5:=sMA(K5,3,1), colorwhite,linethick0;
W1:=K5>80 AND D5>80;
J1:=K5<20;
Var34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:=sMA(var34,3,1) ,colorcyan;
D34:=sMA(K34,3,1) ,colorcyan,linethick0;
W2:=K34>80 AND D34>80;
J2:=K34<20;
Var89:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
K89:=sMA(var89,3,1) ,colorred;
D89:=sMA(K89,3,1), colorred,linethick0;
W3:=K89>80 AND D89>80;
J3:=K89<20;
Var275:=(CLOSE-LLV(LOW,275))/(HHV(HIGH,275)-LLV(LOW,275))*100;
K275:=sMA(var275,3,1), colorBLUE;
D275:=sMA(K275,3,1), colorBLUE,linethick0;
W4:=K275>80 AND D275>80;
J4:=K275<20;
20,colorwhite,pointdot,linethick2;
50,colorwhite,pointdot,linethick2;
80,colorwhite,pointdot,linethick2;
WT:=W1+W2+W3+W4;
JT:=J1+J3+J3+J4;

AK:(K5+K34+K89+K275)/4,COLORRED;
SK1:EMA(AK,3);
AD:(D5+D34+D89+D275)/4,COLORGREEN;
SD1:EMA(AD,3);
STICKLINE(WT>=3 AND AK<AD,50+5*WT,50,8,0),COLORCYAN;
STICKLINE(JT>=3 AND AK>AD,50,50-5*JT,8,0);
IF(K34<10 AND K89<10 AND AK>AD,60,50),COLORRED;
IF(K34>90 AND K89>90 AND AK<AD,40,50),COLORGREEN;
-------------------------------------------------------------------------------------------------------------

由 fugoal 在 2005-01-25 15:11 發表:

好公式謝謝分享

好公式謝謝分享

由 joanne115244 在 2005-01-25 17:26 發表:

引用:
最初由 joanne115244 發表
響應 fugoal兄的熱情分享
也提供一組簡單的 [RSI-KD-MACD] 的組合指標供大家參考

Rsi6:SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
MACD:300*"MACD.MACD#DAY"(20,5,10)/EMA(C,30) colorred pointdot;
日K:"SKD.K#DAY"(9,2,2,3) pointdot COLORyellow;
日D:"SKD.D#DAY"(9,2,2,3) pointdot COLORff9999;
周K:"SKD.K#WEEK"(4,2,2,3) pointdot COLORmagenta;
周D:"SKD.D#WEEK"(4,2,2,3) pointdot COLORcyan;
STICKLINE(日K>=日D,日D,日K,10,0) COLORyellow;
STICKLINE(日K<日D,日D,日K,10,0) COLORff9999;
STICKLINE(周K>=周D,周D,周K,10,0) COLORmagenta;
STICKLINE(周K<周D,周K,周D,10,0) COLORcyan;
STICKLINE(MACD>=0,0,MACD,10,0) COLORred;
STICKLINE(MACD<=0,0,MACD,10,0) COLORgreen;

-------------------------------------------------------------------------------------------------------------------
再增加一組自己改編的[KD組合趨勢圖]

Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
K5:=sMA(var5,3,1), colorwhite;
D5:=sMA(K5,3,1), colorwhite,linethick0;
W1:=K5>80 AND D5>80;
J1:=K5<20;
Var34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:=sMA(var34,3,1) ,colorcyan;
D34:=sMA(K34,3,1) ,colorcyan,linethick0;
W2:=K34>80 AND D34>80;
J2:=K34<20;
Var89:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
K89:=sMA(var89,3,1) ,colorred;
D89:=sMA(K89,3,1), colorred,linethick0;
W3:=K89>80 AND D89>80;
J3:=K89<20;
Var275:=(CLOSE-LLV(LOW,275))/(HHV(HIGH,275)-LLV(LOW,275))*100;
K275:=sMA(var275,3,1), colorBLUE;
D275:=sMA(K275,3,1), colorBLUE,linethick0;
W4:=K275>80 AND D275>80;
J4:=K275<20;
20,colorwhite,pointdot,linethick2;
50,colorwhite,pointdot,linethick2;
80,colorwhite,pointdot,linethick2;
WT:=W1+W2+W3+W4;
JT:=J1+J3+J3+J4;

AK:(K5+K34+K89+K275)/4,COLORRED;
SK1:EMA(AK,3);
AD:(D5+D34+D89+D275)/4,COLORGREEN;
SD1:EMA(AD,3);
STICKLINE(WT>=3 AND AK<AD,50+5*WT,50,8,0),COLORCYAN;
STICKLINE(JT>=3 AND AK>AD,50,50-5*JT,8,0);
IF(K34<10 AND K89<10 AND AK>AD,60,50),COLORRED;
IF(K34>90 AND K89>90 AND AK<AD,40,50),COLORGREEN;
-------------------------------------------------------------------------------------------------------------

眼尖的人應該會發現公式中的公式
把一些等號去掉就會有不同風貌

如下: (變成多周期KD)
Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
K5:sMA(var5,3,1), colorwhite;
D5:sMA(K5,3,1), colorwhite,linethick0;
partline(K5>D5,K5),linethick3;
Var34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K34:sMA(var34,3,1) ,colorcyan;
D34:sMA(K34,3,1) ,colorcyan,linethick0;
partline(K34>D34,K34),linethick2;
Var89:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
K89:sMA(var89,3,1) ,colorred;
D89:sMA(K89,3,1), colorred,linethick0;
partline(K89>D89,K89),linethick2;
Var275:=(CLOSE-LLV(LOW,275))/(HHV(HIGH,275)-LLV(LOW,275))*100;
K275:sMA(var275,3,1), colorBLUE;
D275:sMA(K275,3,1), colorBLUE,linethick0;
partline(K275>D275,K275),linethick2;
20,colorwhite,pointdot,linethick2;
50,colorwhite,pointdot,linethick2;
80,colorwhite,pointdot,linethick2;
DIBU:= K5<20 AND D5<20 AND K34<20 AND D34<20 AND K89<20 AND D89<20 AND K275<20 AND D275<20;
STICKLINE(DIBU=1,80,60,6,1),COLORRED;
TOBU:= K5>80 AND D5>80 AND K34>80 AND D34>80 AND K89>80 AND D89>80 AND K275>80 AND D275>80;
STICKLINE(TOBU=1,40,20,6,1),COLORFFCC66;

由 PZ0234 在 2005-01-26 15:23 發表:

謝謝諸位前輩的提供

謝謝諸位前輩的提供, 感謝!!

由 pingu 在 2005-01-26 23:52 發表:

感謝 joanne115244 大大的無私

由 yuan797 在 2005-01-27 08:48 發表:

感謝各位大大的分享!

由 falon 在 2005-04-17 08:32 發表:

RSI-KD-MACD 有未來函數喔！

由 lotus777 在 2005-04-19 15:07 發表:

請問
我匯入後
出現 -- 所引用的公式在系統中不存在
( 可是我有MACD的公式啊 )
請賜教
謝謝

__________________
lotus777

由 fugoal 在 2005-04-20 06:38 發表:

MACD溫度

引用:
最初由 lotus777 發表
請問
我匯入後
出現 -- 所引用的公式在系統中不存在
( 可是我有MACD的公式啊 )
請賜教
謝謝

再傳一次

指標只是好玩不可當真!!!

qqq

全部時間均為台灣時間, 現在時間為15:06

在這個頁面顯示本主題全部的 12 個文章