相關標簽:

?

Macd + Kdj + Rsi 頂底背離
{程序化交易 www.kzuj.com.cn }


DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9),colorFF;
MACD:2*(DIFF-DEA),COLORSTICK;
D1:=EMA(CLOSE,3)-EMA(CLOSE,8);
D2:=EMA(OPEN,3)-EMA(OPEN,8);
D3:=EMA(HIGH,3)-EMA(HIGH,8);
D4:=EMA(LOW,3)-EMA(LOW,8);
DRAWICON(CROSS(D1,DIFF) AND DIFF<-0.05,D4-0.1,1);
DRAWICON(CROSS(DIFF,D1) AND DIFF>0.1,D3+0.1,2);
STICKLINE(D1>=D2,D1,D2,7,0),colorFF00FF;
STICKLINE(D1<=D2,D1,D2,7,0),colorFF00;
A1:=BARSLAST(REF(CROSS("MACD.DIFF"(12,26,9),"MACD.DEA"(12,26,9)),1));
B1:=REF(CLOSE,A1+1)>CLOSE AND REF("MACD.DIFF"(12,26,9),A1+1)<"MACD.DIFF"(12,26,9) AND CROSS("MACD.DIFF"(12,26,9),"MACD.DEA"(12,26,9));
MACD底背離:=FILTER(B1>0,5);
STICKLINE(MACD底背離,0,0.75,3,0),colorFF00;
DRAWTEXT(MACD底背離,0.57,'MACD底背離'),colorFF00;
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));
B2:=REF(CLOSE,A2+1)>CLOSE AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));
KDJ底背離:=FILTER(B2>0,5);
STICKLINE(KDJ底背離,0,1,3,0),colorFFFF;
DRAWTEXT(KDJ底背離,0.8,'KDJ底背離'),colorFFFF;
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=REF(CLOSE,A3+1)>CLOSE AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
RSI底背離:=FILTER(B3>0,5);
STICKLINE(RSI底背離,0,0.5,3,0),colorFFCC66;
DRAWTEXT(RSI底背離,0.25,'RSI底背離'),colorFFCC66;
2,colorFF;
C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIFF"(12,26,9)),1));
D1:=REF(CLOSE,C1+1)<CLOSE AND REF("MACD.DIFF"(12,26,9),C1+1)>"MACD.DIFF"(12,26,9) AND CROSS("MACD.DEA"(12,26,9),"MACD.DIFF"(12,26,9));
MACD頂背離:=FILTER(D1>0,5);
STICKLINE(MACD頂背離,2,1.25,3,0),color66FF;
DRAWTEXT(MACD頂背離,1.47,'MACD頂背離'),color66FF;
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));
D2:=REF(CLOSE,C2+1)<CLOSE AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));
KDJ頂背離:=FILTER(D2>0,5);
STICKLINE(KDJ頂背離,2,1,3,0),colorFF;
DRAWTEXT(KDJ頂背離,1.2,'KDJ頂背離'),colorFF;
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));
D3:=REF(CLOSE,C3+1)<CLOSE AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));
RSI頂背離:=FILTER(D3>0,5);
STICKLINE(RSI頂背離,2,1.5,3,0),colorFF00FF;
DRAWTEXT(RSI頂背離,1.75,'RSI頂背離'),colorFF00FF;
底背離:MACD底背離 OR KDJ底背離 OR RSI底背離;
頂背離:MACD頂背離 OR KDJ頂背離 OR RSI頂背離;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?