RSI KDJ MACD 日周月 底背离 金叉

 {KDJ同时金叉}

DRAWGBKLAST(CLOSE>0,STRIP(RGB(5,5,5),RGB(90,90,90),0));

月K:"KDJ.K"(89,3,3),Colorgreen,linethick0;

月D:"KDJ.D"(89,3,3),Colorgreen,linethick0;

FILLRGN(月K,月D,月K>月D),Color00DD00;

FILLRGN(月K,月D,月K<月D),Color009700;

周K:"KDJ.K"(27,3,3),Color00E4F1,linethick0;

周D:"KDJ.D"(27,3,3),coloryellow,linethick0;

FILLRGN(周K,周D,周K>周D),Color03f7fa;

FILLRGN(周K,周D,周K<周D),Color009CC3;

日K:"kd.k"(5,3,3),color0538f2,linethick0;

日D:"kd.d"(5,3,3),color052b99,linethick0;

FILLRGN(日K,日D,日K<日D),Color052b99;

FILLRGN(日K,日D,日K>日D),color0538f2;

月金叉:IF(CROSS(月K,月D),16,0),stick,linethick1,Colorgreen;

DRAWTEXT(月金叉,16,'■'),Color09DB00;

周金叉:IF(CROSS(周K,周D),12,0),stick,linethick1,coloryellow;

DRAWTEXT(周金叉,12,'■'),coloryellow;

日金叉:IF(CROSS(日K,日D),8,0),stick,linethick1,colorred;

DRAWTEXT(日金叉,8,'■'),colorred;

VERTLINE(日金叉 and 周金叉 and 月金叉,4),color5b5b5b;

{KD在30以下多次金叉}

Jm:=CROSS("kdj.k"(5,3,3),"kdj.d"(5,3,3));

JmCOUNT:=COUNT(Jm,BARSLAST("kdj.d"(5,3,3)>=30));

Jmtj:=28*("kdj.d"(5,3,3)<30 and COUNT(JmCount=1,21)=1);

DRAWICON(Jmtj,70,13);{www.88gs.com}

Jmtj2:=28*("kdj.d"(5,3,3)<30 and COUNT(JmCount=2,21)=1);

DRAWICON (Jmtj2,70,13);

DRAWICON (Jmtj2,72,13);

Jmtj3:=28*("kdj.d"(5,3,3)<30 and COUNT(JmCount=3,21)=1);

DRAWICON (Jmtj3,70,13);

DRAWICON (Jmtj3,72,13);

DRAWICON (Jmtj3,74,13);

Jmtj4:=28*("kdj.d"(5,3,3)<30 and COUNT(JmCount=4,21)=1);

DRAWICON (Jmtj4,70,13);

DRAWICON (Jmtj4,72,13);

DRAWICON (Jmtj4,74,13);

DRAWICON (Jmtj4,76,13);

Jmtj5:=28*("kdj.d"(5,3,3)<30 and COUNT(JmCount=5,21)=1);

DRAWICON (Jmtj5,70,13);

DRAWICON (Jmtj5,72,13);

DRAWICON (Jmtj5,74,13);

DRAWICON (Jmtj5,76,13);

DRAWICON (Jmtj5,78,13);

 0,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)<diff and cross(diff,dea);

MACD底背离:STICKLINE(FILTER(B1>0,5),0,0.75,3,0),COLORGREEN;

DRAWTEXT(FILTER(B1>0,5),0.57,'MACD底背离'),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)<k and cross(k,d);

KDJ底背离:STICKLINE(FILTER(B2>0,5),0,1,3,0),COLORYELLOW;

DRAWTEXT(FILTER(B2>0,5),0.80,'KDJ底背离'),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)<RSI1 and cross(RSI1,RSI2);

RSI底背离:STICKLINE(FILTER(B3>0,5),0,0.5,3,0),COLORwhite;

DRAWTEXT(FILTER(B3>0,5),0.25,'RSI底背离'),COLORwhite;

2,COLORCYAN;{www.88gs.com}

C1:=BARSLAST(ref(cross(dea,diff),1));

D1:=ref(c,C1+1)<c and ref(diff,C1+1)>diff and cross(dea,diff);

MACD顶背离:STICKLINE(FILTER(D1>0,5),2,1.25,3,0),COLOR0066FF;

DRAWTEXT(FILTER(D1>0,5),1.47,'MACD顶背离'),COLOR0066FF;

C2:=BARSLAST(ref(cross(d,k),1));

D2:=ref(c,C2+1)<c and ref(k,C2+1)>k and cross(d,k);

KDJ顶背离:STICKLINE(FILTER(D2>0,5),2,1,3,0),COLORRED;

DRAWTEXT(FILTER(D2>0,5),1.2,'KDJ顶背离'),COLORRED;

C3:=BARSLAST(ref(cross(RSI2,RSI1),1));

D3:=ref(c,C3+1)<c and ref(RSI1,C3+1)>RSI1 and cross(RSI2,RSI1);

RSI顶背离:STICKLINE(FILTER(D3>0,5),2,1.5,3,0),COLORff00ff;

DRAWTEXT(FILTER(D3>0,5),-4.75,'RSI顶背离'),COLORff00ff;

partline(0,C>0),colorffa2af;

partline(20,C>0),colorffa2af,pointdot;

partline(50,C>0),colorffa2af,pointdot;

partline(80,C>0),colorffa2af,pointdot;

partline(100,C>0),colorffa2af;