DIF:(EMA(CLOSE,12)-EMA(CLOSE,26))*100,color0000ff,LINETHICK3;
DEA:EMA(DIF,9),Colorffffff,LINETHICK3;
MACD:(DIF-DEA)*2,COLORSTICK;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORYELLOW;
D:SMA(K,3,1),COLORffff00;
J:3*K-2*D,COLORMAGENTA;
{partline(j,j>=ref(j,1),rgb(255,0,0),j<ref(j,1),rgb(0,255,0)),linethick1;}

M周金叉:IF(CROSS("macd.diff#WEEK","macd.dea#WEEK"),-50,0),color0000ff,LINETHICK2;
DRAWTEXT(M周金叉,-45,' MACD周金叉'),color0000ff;
M周死叉:IF(CROSS("macd.dea#WEEK","macd.diff#WEEK"),-50,0),color00ff00,LINETHICK2;
DRAWTEXT(M周死叉,-45,' MACD周死叉'),color00ff00;
M月金叉:IF(CROSS("macd.diff#MONTH","macd.dea#MONTH"),-60,0),Color00ffff,LINETHICK2;
DRAWTEXT(M月金叉,-55,' MACD月金叉'),color00ffff;
M月死叉:IF(CROSS("macd.dea#MONTH","macd.diff#MONTH"),-60,0),Colorff6600,LINETHICK2;
DRAWTEXT(M月死叉,-55,' MACD月死叉'),colorff6600;

K周金叉:IF(CROSS("KDJ.K#week","KDJ.D#week"),50,0),color0000ff,LINETHICK2;
DRAWTEXT(K周金叉,50,' KDJ周金叉'),color0000ff;
K周死叉:IF(CROSS("KDJ.D#week","KDJ.K#week"),50,0),color00ff00,LINETHICK2;
DRAWTEXT(K周死叉,50,' KDJ周死叉'),color00ff00;
K月金叉:IF(CROSS("KDJ.K#MONTH","KDJ.D#MONTH"),60,0),Color00ffff,LINETHICK2;
DRAWTEXT(K月金叉,60,' KDJ月金叉'),color00ffff;
K月死叉:IF(CROSS("KDJ.D#MONTH","KDJ.K#MONTH"),60,0),Colorff6600,LINETHICK2;
DRAWTEXT(K月死叉,60,' KDJ月死叉'),colorff6600;

[ 本帖最后由 守护神15888 于 2011-3-26 15:40 编辑 ]

如果互助答疑不能解决需求，可以到《威客任务》发布有偿悬赏。

相关标签： 金叉

版权声明：该帖版权归原文作者所有，仅代表该作者观点，如有侵权，请点击此处查看处理方式。