指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：
授权方式：共享版
公式大小：0 Bytes
更新时间：2012-01-03 10:10:00
公式简介:

红心MJ----------引用MACD，KDJ月，周，日不同周期，用小黑板的形式，直观而客观的反映股票走势的金叉、死叉！
同样，仍以此公式献给初入股市，用经典指标去研究走势的同学们！

初入股市的同学，有没有这样的体会？
网上找了很多精品公式，却发现往往两个公式间买入、卖出信号是矛盾的，时准时不准。原因在于制作公式的人操作思路不同，应用周期也不同。实战编写而成，适合作者本人，未必适合所有人。我个人有个对于网上指标公式浅显的看法是：别人的公式无论再好，在不了解公式原理之前，一律不用。更多的时候趋向于依照传统指标作个人判断。而MACD，KDJ即是我们多用到的经典指标。

MACD，KDJ指标日线不同周期显示。相信大家,很多人都有类似的指标。我作的也就是去掉自以为多余的趋势线条，更一目了然的将各周期的金叉死叉信号显示出来。如果说精品指标是曲高和寡的阳春白雪，那么，这个小小的指标就是通俗易懂的下里巴人！

看图说话：
 

 

小结：1，无论KDJ还是MACD，金叉死叉都要依照月、周、日的顺序，这样才能识别主力的欺骗行为。
2，注意各周期的金死叉是出现在相对的高价还是低位，同样不要被假象欺骗了！

 

 

副图公式如下：引用:
input:n(9),m1(3),m2(3),LONG(26),SHORT(12),MID(9);
refline:-40,0,40;
DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIFF,MID);
MACD:=(DIFF-DEA)*2;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,m1,1);
D:=SMA(K,m2,1);
J:=3*K-2*D;
KDJ月金:CROSS("KDJ.K#MONTH"(N,M1,M2),"KDJ.D#MONTH"(N,M1,M2)),linethick0,colorred;
MACD月金:CROSS("MACD.DIFF#MONTH"(LONG,SHORT,MID) ,"MACD.DEA#MONTH"(LONG,SHORT,MID)),linethick0,colorred;
KDJ周金:CROSS("KDJ.K#WEEK"(N,M1,M2),"KDJ.D#WEEK"(N,M1,M2)),linethick0,colorMAGENTA;
MACD周金:CROSS("MACD.DIFF#WEEK"(LONG,SHORT,MID) ,"MACD.DEA#WEEK"(LONG,SHORT,MID)),linethick0,colorMAGENTA;
drawtextrel(5,10,'J月金'),linethick2,COLORred;{KDJ月金}
drawtext(CROSS("KDJ.K#MONTH"(N,M1,M2),"KDJ.D#MONTH"(N,M1,M2)),39.5,'(√)'),linethick2,COLORred,ALIGN1;
drawtextrel(5,90,'M月金'),linethick2,COLORred;{MACD月金}
DRAWTEXT(CROSS("MACD.DIFF#MONTH"(LONG,SHORT,MID) ,"MACD.DEA#MONTH"(LONG,SHORT,MID)),33,'(√)'),COLOrred,ALIGN1;
drawtextrel(5,170,'J周金'),linethick2,colorMAGENTA;{KDJ周金}
drawtext(CROSS("KDJ.K#WEEK"(N,M1,M2),"KDJ.D#WEEK"(N,M1,M2)),26.5,'(√)'),linethick2,colorMAGENTA,ALIGN1;
drawtextrel(5,250,'M周金'),linethick2,colorMAGENTA;{MACD周金}
DRAWTEXT(CROSS("MACD.DIFF#WEEK"(LONG,SHORT,MID) ,"MACD.DEA#WEEK"(LONG,SHORT,MID)),20,'(√)'),COLORMAGENTA,ALIGN1;
drawtextrel(5,330,'J日金'),linethick2,coloryellow;{KDJ日金}
drawtext(cross(K,D),13.5,'(√)'),linethick2,coloryellow,ALIGN1;
drawtextrel(5,410,'M日金'),linethick2,coloryellow;{MACD日金}
DRAWTEXT(CROSS(DIFF,DEA),7,'(√)'),coloryellow,ALIGN1;

drawtextrel(5,500,'M日死'),linethick2,colorwhite;{MACD日死}
DRAWTEXT(CROSS(DEA,DIFF),0,'(×)'),colorwhite,ALIGN1;
drawtextrel(5,580,'J日死'),linethick2,colorwhite;{KDJ日死}
drawtext(cross(D,K),-6.5,'(×)'),linethick2,colorwhite,ALIGN1;
drawtextrel(5,660,'M周死'),linethick2,colorblue;{MACD周死}
DRAWTEXT(CROSS("MACD.DEA#WEEK"(LONG,SHORT,MID) ,"MACD.DIFF#WEEK"(LONG,SHORT,MID)),-13,'(×)'),colorblue,ALIGN1;
drawtextrel(5,740,'J周死'),linethick2,colorblue;{KDJ周死}
drawtext(CROSS("KDJ.D#WEEK"(N,M1,M2),"KDJ.K#WEEK"(N,M1,M2)),-19.5,'(×)'),linethick2,colorblue,ALIGN1;
drawtextrel(5,820,'M月死'),linethick2,colorgreen;{MACD月死}
DRAWTEXT(CROSS("MACD.DEA#MONTH"(LONG,SHORT,MID) ,"MACD.DIFF#MONTH"(LONG,SHORT,MID)),-26,'(×)'),colorgreen,ALIGN1;
drawtextrel(5,900,'J月死'),linethick2,colorgreen;{KDJ月死}
drawtext(CROSS("KDJ.D#MONTH"(N,M1,M2),"KDJ.K#MONTH"(N,M1,M2)),-32.5,'(×)'),linethick2,colorgreen,ALIGN1; 说明：1，因引用到了“月，周”周期。所以，操作时，画面会显得反应慢或卡。
2，副图上主因空间问题，只显示了“月金叉和周金叉”，金叉时，相应的会显示为数值1。
3，因通达信没有副图中左边显示的drawtextrel绘图函数，且又因第二点空间的问题，所以不能提供通达信版本，望大家见谅！
 

 

月金叉选股公式如下：引用:
input:n(9),m1(3),m2(3),LONG(26),SHORT(12),MID(9);
DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIFF,MID);
MACD:=(DIFF-DEA)*2;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,m1,1);
D:=SMA(K,m2,1);
J:=3*K-2*D;
tjY:=CROSS("KDJ.K#MONTH"(N,M1,M2),"KDJ.D#MONTH"(N,M1,M2)) or CROSS("MACD.DIFF#MONTH"(LONG,SHORT,MID) ,"MACD.DEA#MONTH"(LONG,SHORT,MID));
tjZ:=CROSS("KDJ.K#WEEK"(N,M1,M2),"KDJ.D#WEEK"(N,M1,M2)) or CROSS("MACD.DIFF#WEEK"(LONG,SHORT,MID) ,"MACD.DEA#WEEK"(LONG,SHORT,MID));
XG:tjy{or tjz}; 说明：1，引用了“月、周”周期，选股特别慢，没耐心者慎用，怕你砸了电脑！有耐心者也可用“XG:tjy or tjz;”替换公式最后一句，即变为"月金或周金"选股.
2，选股虽慢，测试结果显示，成功率不低。以下是“月金叉选股”，我的历史时间是09年至今，有图有真相：



 

[url=http://www.goodgupiao.com/gupiaogongshi/17208.html][B]红心黑板(二)：红心MJ----MACD，KDJ不同周期金死叉[/B][/url]