[通达信指标/源码] [转载]通达信新改DMI指标背离明显（源码，附图）

1. N:=21;M:=6;M1:=20;  
   
2. TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);  
   
3. HD :=HIGH-REF(HIGH,1);  
   
4. LD :=REF(LOW,1)-LOW;  
   
5. DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);  
   
6. DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);  
   
7. PDI:= DMP*100/TR1;  
   
8. MDI:= DMM*100/TR1;
   
9. ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;  
   
10. ADXR:EMA(ADX,M);
    
11. ADMA:EMA(ADX,M1);  
    
12. OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK;  
    
13. DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));  
    
14. STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),COLORRED;  
    
15. STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),COLORGREEN;  
    
16. STICKLINE(OMD
    
17. STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),COLORWHITE;  
    
18. ADX1:ADX,COLORRED;  
    
19. ADXR1:ADXR,COLORGREEN;  
    
20. ADMA1:ADMA;  
    
21. 强:IF(ADX1>=ADXR1,ADX1,DRAWNULL),COLORRED,LINETHICK3;  
    
22. 买入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);  
    
23. {OMD;}  
    
24. 110;  
    
25. 0;  
    
26. DRAWICON(CROSS(ADX,ADXR),ADX+5,1);

复制代码

下载 (405.49 KB)

2018-10-19 15:41