通达信超乖离主图源码

 通达信超乖离主图源码

{牛牛指标网提供：www.tdx001.com}

复制内容到剪贴板

1. STICKLINE(CONST(MA(CLOSE,10)) >CONST(MA(CLOSE,5)) AND DYNAINFO(7)<CONST(MA(CLOSE,10))  ,LLV(L,20),HHV(H,20),800,0),COLOR000044;   
2. 黑:=0;   
3. 提示:=1;   
4. 五:MA(CLOSE,5),LINETHICK0,COLORMAGENTA,NODRAW;   
5. 十:MA(CLOSE,10),LINETHICK0,COLORMAGENTA,NODRAW;   
6. MA4:MA(CLOSE,20),LINETHICK1,COLORFF00FF;   
7. {DRAWBAND(MA(CLOSE,5),RGB(55,55,55),MA(CLOSE,8),RGB(55,55,55));}   
8. DRAWBAND(MA(CLOSE,5),RGB(66,11,11),MA(CLOSE,10),RGB(00,66,66));   
9. DRAWKLINE(H,O,L,C);   
10. 离A:MA(CLOSE,7)*1.05,COLOR555555;   
11. 离C:MA(CLOSE,7)*0.955,COLOR555555;   
12. β0:=(H-L)/2+L;   
13. α:=β0,LINETHICK0;   
14. β:=REF(β0,1),LINETHICK0,COLORGREEN;   
15. γ:=REF(β0,2),LINETHICK0,COLORMAGENTA;   
16. 高:=PLOYLINE(1,CONST(HHV(H,20))),COLOR880088,LINETHICK1;   
17. 低:=PLOYLINE(1,CONST(LLV(L,20))),COLOR888800,LINETHICK1;   
18. 止:=PLOYLINE(1,CONST(HHV(H,20)*0.95)),COLOR888888,LINETHICK1;   
19. IF(CONST(α>β) AND DYNAINFO(7)>0,DYNAINFO(7),DRAWNULL),COLOR0000AA,LINETHICK1;   
20. IF(CONST(α<=β)AND DYNAINFO(7)>0 ,DYNAINFO(7),DRAWNULL),COLOR00AA00,LINETHICK1;   
21. AA:=CLOSE/REF(C,1)>=1.09;   
22. BA:=CLOSE/REF(C,1)>=1.09;   
23. STICKLINE(AA,O,C,2.5,1),COLORYELLOW;   
24. MA1:MA(CLOSE,5),COLORWHITE;   
25. MA2:MA(CLOSE,10),COLORYELLOW;   
26. MA3:=MA(CLOSE,22),COLORWHITE;   
27. {MA5:MA(CLOSE,120),COLORGREEN;}   
28. {MA6:MA(CLOSE,250),COLOR990000;}   
29. {IF(MA2>REF(MA2,2) ,MA2,DRAWNULL),COLORRED,LINETHICK1;}   
30. SARH:=CLOSE>SAR(4,2,20);   
31. N1:=12;   
32. N2:=26;   
33. N3:=9;   
34. DIFF:=(EMA(CLOSE,N1) - EMA(CLOSE,N2));   
35. DEA:=EMA(DIFF,N3);   
36. MACD:=(2 * (DIFF - DEA));   
37. MACD2:=MACD;   
38. TYP:=(HIGH+LOW+CLOSE)/3;   
39. CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));   
40. {STICKLINE(C<MA2 ,H,L,0,0),COLOR555555;   
41. STICKLINE(C<MA2 ,O,C,2.5,1),COLOR555555;}   
42. STICKLINE(BA AND C<MA3,O,C,2.7,1),COLORWHITE;   
43. 头上边:=MAX(O,C),NODRAW;   
44. 头下边:=MIN(O,C),NODRAW;   
45. 垂头:=ABS(O-C),NODRAW;{垂头}   
46. 长针:=(头下边-L),NODRAW;{长针}   
47. 垂:=长针/垂头>2 AND (H-头上边)<=长针 AND L<REF(L,1) AND O<REF(C,1),NODRAW;   
48. DRAWTEXT(垂 AND L<=LLV(L,3),L/1.01,'地针'),COLORGREEN,LINETHICK4;   
49. {////MACD反身向上////}   
50. MACD红缩:=REF(MACD,1)>MACD AND MACD>0;   
51. {DRAWTEXT(REF(EVERY(MACD红缩,3),1)   
52. AND MACD>REF(MACD,1) ,L,'启动'),COLORWHITE;}   
53. {////MACD反身向上2////}   
54. {MACD红缩2:=REF(MACD,1)>MACD AND MACD>0;   
55. DRAWTEXT(REF(EVERY(MACD红缩2,2),1)   
56. AND MACD>REF(MACD,1) AND C>MA(C,22) AND EVERY(DIFF>0,3) ,L/1.02,'起动'),COLORWHITE;}   
57. DRAWTEXT(H>MA(CLOSE,5)*1.07  AND 提示,H*1.01,'高!'),COLORGREEN,LINETHICK2;   
58. DRAWTEXT(L<MA(CLOSE,5)*1.005 AND L>MA(CLOSE,5) AND 提示 AND H<MA(CLOSE,5)*1.07 AND ISLASTBAR,L/1.02,'低吸'),COLORGREEN,LINETHICK2;   
59. SC1:=MACD<0;   
60. SC2:=CROSS(MA2,MA1);   
61. SC3:=MA(V,5)<MA(V,10);   
62. SC:=SC1 AND SC2 ;   
63. DRAWTEXT(SC  AND CURRBARSCOUNT<20,HHV(C,10),'三死叉'),COLORYELLOW;   
64. JC1:=MACD.MACD>0;   
65. JC2:=CROSS(MA1,MA2);   
66.   
67.   
68.   
69. JC3:=MA(V,5)>MA(V,10);   
70. JC:=JC1 AND JC2 AND JC2 ;   
71. DRAWTEXT(JC AND CURRBARSCOUNT<20 ,LLV(C,6),'后金叉'),COLORYELLOW;   
72. {DRAWTEXT(CROSS(C,离B)  AND CURRBARSCOUNT<90  ,HHV(H,3),'超乖离'),COLORYELLOW;}   
73. DRAWTEXT(CROSS(H,离A)   AND CURRBARSCOUNT<10 ,HHV(H,3),'超乖离'),COLORYELLOW;   
74. DRAWTEXT(CROSS(离C,L)   AND CURRBARSCOUNT<10  ,LLV(L,3),'负乖离'),COLORWHITE;   
75. DRAWTEXT(五<十 AND CURRBARSCOUNT<2 ,H*1.02,'空头势'),COLORRED;   
76. DRAWTEXT(五<十 AND CURRBARSCOUNT<2 ,H*1.01,'不持股'),COLORRED;   

A173928578.gif