月K:"KDJ.K"(89,3,3),NODRAW,COLORCYAN;
月D:"KDJ.D"(89,3,3),COLORCYAN,LINETHICK1;
周K:"KDJ.K"(27,3,3),NODRAW,COLORRED;
周D:"KDJ.D"(27,3,3),COLORRED,LINETHICK1;
日K:"KD.K"(5,3,3),NODRAW,COLORYELLOW;
日D:"KD.D"(5,3,3),COLORYELLOW,LINETHICK1;
日金叉:=CROSS(日K,日D);
周金叉:=CROSS(周K,周D);
月金叉:=CROSS(月K,月D);
X1:=日D>REF(日D,1);
DRAWICON(X1,日D*0.98,36);
X2:=日DREF(周D,1);
DRAWICON(X3,周D*0.98,36);
X4:=周DREF(月D,1);
DRAWICON(X5,月D*0.98,36);
X6:=月D=30));
JMTJ:=28*("KDJ.D"(5,3,3)<30 AND COUNT(JMCOUNT=1,21)=1);
DRAWTEXT (JMTJ,70,'①'),COLORWHITE;
JMTJ2:=28*("KDJ.D"(5,3,3)<30 AND COUNT(JMCOUNT=2,21)=1);
DRAWTEXT (JMTJ2,70,'②'),COLORYELLOW;
JMTJ3:=28*("KDJ.D"(5,3,3)<30 AND COUNT(JMCOUNT=3,21)=1);
DRAWTEXT (JMTJ3,70,'③'),COLORYELLOW;
JMTJ4:=28*("KDJ.D"(5,3,3)<30 AND COUNT(JMCOUNT=4,21)=1);
DRAWTEXT (JMTJ4,70,'④'),COLORYELLOW;
JMTJ5:=28*("KDJ.D"(5,3,3)<30 AND COUNT(JMCOUNT=5,21)=1);
DRAWTEXT (JMTJ5,70,'⑤'),COLORYELLOW;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)0,5),-20,-10,3,0),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)0,5),-20,-10,3,0),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)0,5),-20,-10,3,0),COLORWHITE;
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)DIFF AND CROSS(DEA,DIFF);
MACD顶背离:STICKLINE(FILTER(D1>0,5),-10,0,3,1),COLOR0066FF;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)K AND CROSS(D,K);
KDJ顶背离:STICKLINE(FILTER(D2>0,5),-10,0,3,1),COLORRED;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)RSI1 AND CROSS(RSI2,RSI1);
RSI顶背离:STICKLINE(FILTER(D3>0,5),-10,0,3,1),COLORFF00FF;
DRAWTEXT(FILTER(D3>0,5),0,'--R顶背离'),COLORFF00FF;
DRAWTEXT(FILTER(D2>0,5),-10,'--K顶背离'),COLORRED;
DRAWTEXT(FILTER(D1>0,5),-5,'--M顶背离'),COLOR0066FF;
DRAWTEXT(FILTER(B3>0,5),-10,'--R底背离'),COLORWHITE;
DRAWTEXT(FILTER(B2>0,5),-20,'--K底背离'),COLORYELLOW;
DRAWTEXT(FILTER(B1>0,5),-15,'--M底背离'),COLORGREEN;
