[通达信指标/源码] 【精品奉上】{立体MACD}公式源码[通达信公式源码]

下载 (133.28 KB)

2018-10-9 15:17

【精品奉上】MACD.....................很有参考价值【送给有缘人】

1. {立体MACD}
   
2. A1:=100*(EMA(C,12)-EMA(C,26))/EMA(C,26);
   
3. A2:=EMA(A1,9);
   
4. MACD:(A1-A2)*2,NODRAW;
   
5. STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLOR0000AA;{红色}
   
6. STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLOR0000CC;
   
7. STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLOR0000EE;
   
8. STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLOR5555FF;
   
9. STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLOR8080FF;
   
10. STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,3,0),COLOR770077;{紫色}
    
11. STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,2,0),COLOR990099;
    
12. STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,1,0),COLORBB00BB;
    
13. STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,0,0),COLORDD00DD;
    
14. STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,0.1,0),COLORFF00FF;
    
15. STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLORFF0000;{蓝色}
    
16. STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORFF5500;
    
17. STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORFF9900;
    
18. STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLORFFFF00;
    
19. STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,3,0),COLOR155500;{绿色}
    
20. STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),COLOR208000;
    
21. STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,1,0),COLOR2BAA00;
    
22. STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.1,0),COLOR35D500;
    
23. STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0,0),COLOR40FF00;
    
24. DIF:A1,COLORWHITE;DEA:A2,COLORYELLOW;
    
25. DD:=EMA(EMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,3),3);
    
26. 关注:IF(DD<30 AND MACD<0 AND MACD>=REF(MACD,1),MACD*0.5,DRAWNULL)CIRCLEDOT,COLORMAGENTA;
    
27. A3:=BARSLAST(REF(CROSS(DIF,DEA),1));
    
28. DRAWTEXT(REF(CLOSE,A3+1)>CLOSE AND DIF>REF(DIF,A3+1) AND CROSS(DIF,DEA),-3,'DB');
    
29. RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
    
30. K:SMA(RSV,3,1)NODRAW,COLORYELLOW;
    
31. D:=SMA(K,3,1);
    
32. J:3*K-2*D,NODRAW,COLORYELLOW;

复制代码

好的，谢谢楼主