MACD-KDJ金死叉公式

DIFF:=(EMA(CLOSE,12)-EMA(CLOSE,26));
DEA:=EMA(DIFF,9);
MACD:2*(DIFF-DEA),COLORSTICK;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,8,0),COLOR00AAFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,6.6,0),COLOR00BBFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4.4,0),COLOR00CCFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3.3,0),COLOR00DDFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0),COLOR00EEFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.1,0),COLOR00FFFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,8,0),COLOR0000AA;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,6.6,0),COLOR0011BB;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4.4,0),COLOR0022CC;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3,0),COLOR0033DD;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0),COLOR0044EE;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1,0),COLOR0055FF;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,8,0),COLORAA00BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,6.6,0),COLORBB11BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4.4,0),COLORCC22BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3.3,0),COLORDD33BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0),COLOREE44BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0),COLORFF55BB;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,8,0),COLORFFAA00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,6.6,0),COLORFFBB11;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4.4,0),COLORFFCC22;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3.3,0),COLORFFDD33;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0),COLORFFEE44;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.1,0),COLORFFFF55;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:3*K-2*D,LINETHICK0;
周K:=MA("KDJ.K#WEEK"(9,3,3),5);
周D:=MA("KDJ.D#WEEK"(9,3,3),5);
周J:=MA("KDJ.J#WEEK"(9,3,3),5);
DRAWICON(K<20 AND CROSS(K,D),MACD,8),LINETHICK1,ALIGN2,COLORBROWN;

日金▲: DRAWTEXT(CROSS("KDJ.K#DAY"(9,3,3),"KDJ.D#DAY"(9,3,3)),MACD,'▲'),ALIGN2,COLORGRAY;

日死▼: DRAWTEXT(CROSS("KDJ.D#DAY"(9,3,3),"KDJ.K#DAY"(9,3,3)),MACD*1.5,'▼'),ALIGN2,COLORWHITE;
周金▲: DRAWTEXT(CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)),MACD,'▲'),ALIGN2,COLORRED;
周死▼: DRAWTEXT(CROSS("KDJ.D#WEEK"(9,3,3),"KDJ.K#WEEK"(9,3,3)),MACD*1.5,'▼'),,ALIGN2,COLORGREEN;
月金▲: DRAWTEXT(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)),MACD,'▲'),ALIGN2,COLORMAGENTA;
月死▼: DRAWTEXT(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)),MACD*1.5,'▼'),ALIGN2,COLORYELLOW;
DIFF: (EMA(CLOSE,12)-EMA(CLOSE,26)),COLORWHITE;
DEA:EMA(DIFF,9),COLORWHITE;
PARTLINE(C>MA(C,15) AND DIFF>=DEA,DEA),COLORMAGENTA,LINETHICK2;
PARTLINE(C>MA(C,15) AND DIFF>=DEA,DIFF),COLORRED,LINETHICK2;
PARTLINE(C<MA(C,15),DEA),COLORGREEN,LINETHICK2;
PARTLINE(C<MA(C,15),DIFF),COLORGREEN,LINETHICK2;
VERTLINE(DIFF<70 AND CROSS(DIFF,DEA)),COLORRED;
VERTLINE(CROSS(DEA,DIFF)),COLORWHITE;