[通达信指标/源码] [转载]MACD+KDJ+RSI背离指标

1. DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
   
2. DEA:EMA(DIF,9);
   
3. MACD:(DIF-DEA)*2,COLORSTICK;
   
4. 低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1;
   
5. STICKLINE(低位金叉,0,-0.18,1,0),COLORYELLOW;
   
6. DRAWTEXT(低位金叉,-0.15,' 低位金叉'),COLORRED;
   
7. JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
   
8. 二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
   
9. STICKLINE(二次金叉,0,-0.18,1,0),COLORFF00FF;
   
10. DRAWTEXT(二次金叉,-0.3,' 二次金叉'),COLORFF00FF;
    
11. A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
    
12. 底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
    
13. STICKLINE(底背离,0,0.13,1,0),COLOR00FF00;
    
14. DRAWTEXT(底背离,0.18,' 底背离'),COLOR00FF00;
    
15. A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
    
16. 顶背离:=REF(CLOSE,A2+1)DIF AND CROSS(DEA,DIF);
    
17. DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.51,'三全项'),COLORYELLOW,LINETHICK2;
    
18. DRAWTEXT(低位金叉 AND 底背离,0.31,'两全项'),COLORLIBLUE,LINETHICK2;
    
19. 上翘:IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2;
    
20. 下拐:IF(DIF
    
21. A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
    
22. B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
    
23. DRAWTEXT(B3>0,-0.3,'RSI底离'),COLORCYAN;{RSI底背离};
    
24. C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
    
25. D3:=REF(C,C3+1)"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
    
26. DRAWTEXT(D3>0,0.8,'RSI顶离'),COLORGREEN;{RSI顶背离};

复制代码

下载 (38.52 KB)

2018-10-20 09:11