通达信天一神鞭公式主图 显超乖离

[复制链接]
查看388 | 回复0 | 2022-7-24 09:03:30 | 显示全部楼层 |阅读模式

 通达信天一神鞭公式主图

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

复制内容到剪贴板
  1. 动态止损度:=5;   
  2. 黑:=0;{下跌通道黑色K线开关}   
  3. 离L:=0;{乖离提示开关}   
  4. 提示:=0;{买卖文字提示开关}   
  5. 布林M:=0;{开关}   
  6. MMA:=0;   
  7. 五:MA(CLOSE,5),COLORWHITE;   
  8. 十:MA(CLOSE,10),COLOR00FFFF;   
  9. M18:=MA(CLOSE,18),COLORRED;   
  10. 离基:=五;   
  11. 离O:=离基*1.20,COLOR555555;   
  12. 离A:离基*1.15,COLOR555555;   
  13. 离B:离基*1.10,COLOR555555;   
  14. 离C:离基*0.90,COLOR555555;   
  15. 离D:=离基*0.85,COLOR333333;   
  16. EXP50:=EXPMA(CLOSE,50),COLORGREEN;   
  17. MA30:MA(CLOSE,30),LINETHICK1,COLORRED;   
  18. MA60:MA(CLOSE,60),COLORGREEN;   
  19.   
  20. β0:=(H-L)/2+L,LINETHICK0;   
  21. α:=β0,LINETHICK0;   
  22. β:=REF(β0,1),LINETHICK0,COLORGREEN;   
  23. γ:=REF(β0,2),LINETHICK0,COLORMAGENTA;   
  24. {涨:PLOYLINE(C>REF(C,1),CONST(C)),COLOR0000AA,LINETHICK1;   
  25. 跌:PLOYLINE(C<REF(C,1),CONST(C)),COLOR00AA00,LINETHICK1;}   
  26. 高:PLOYLINE(1,CONST(HHV(H,50))),COLOR770077,LINETHICK1;   
  27. 低:=PLOYLINE(1,CONST(LLV(L,50))),COLOR777700,LINETHICK1;   
  28. 中:=PLOYLINE(1,(高-低)/2+低),COLOR005555,LINETHICK4;   
  29. 止损价:=CONST(HHV(C,5)*(100-动态止损度)/100);   
  30. 止:PLOYLINE(CONST(C)<=止损价,止损价),COLOR888800,LINETHICK4;   
  31. DRAWTEXT(DYNAINFO(7)<=止损价 AND ISLASTBAR,止损价*1.05,'止损');   
  32.   
  33. AA:=CLOSE/REF(C,1)>=1.09;   
  34. BA:=CLOSE/REF(C,1)>=1.09;   
  35. DRAWKLINE(H,O,L,C);   
  36. STICKLINE(AA,O,C,2.5,1),COLORYELLOW;   
  37. MA1:=MA(CLOSE,5),COLORRED;   
  38. MA2:=MA(CLOSE,10),COLORYELLOW;   
  39. MA3:=MA(CLOSE,20),COLOR770077;   
  40. E50:=EXPMA(CLOSE,50),LINETHICK1,POINTDOT,COLORLIGREEN;   
  41. E100:=EXPMA(CLOSE,100),POINTDOT,COLORGRAY;   
  42. MA181:MA(C,181),COLORGRAY;   
  43. {MA60:=MA(C,60),COLOR007700;}   
  44. {周:IF( MMA=1 ,MA2,DRAWNULL),COLORYELLOW,LINETHICK1;   
  45. 月:IF( MMA=1 ,MA3,DRAWNULL),COLORWHITE,LINETHICK1;   
  46. 季:IF( MMA=1 ,MA4,DRAWNULL),COLORGREEN,LINETHICK1;}   
  47. {IF(C>E50 ,E50,DRAWNULL),COLOR00FF00,LINETHICK1;}   
  48. IF(CONST(α>β) AND DYNAINFO(7)>0,DYNAINFO(7),DRAWNULL),COLOR000088,LINETHICK1;   
  49. IF(CONST(α<=β)AND DYNAINFO(7)>0 ,DYNAINFO(7),DRAWNULL),COLOR008800,LINETHICK1;   
  50. IF(CONST(α>β) AND DYNAINFO(7)>0 AND DYNAINFO(7)>=高*0.99,DYNAINFO(7),DRAWNULL),COLOR000088,LINETHICK1;   
  51. IF(CONST(α<=β)AND DYNAINFO(7)>0 AND DYNAINFO(7)<=低*1.01 ,DYNAINFO(7),DRAWNULL),COLOR008800,LINETHICK1;   
  52.   
  53. N1:=12;   
  54. N2:=26;   
  55. N3:=9;   
  56.   
  57. DIFF:=(EMA(CLOSE,N1) - EMA(CLOSE,N2));   
  58. DEA:=EMA(DIFF,N3);   
  59. MACD:=(2 * (DIFF - DEA));   
  60. MACD2:=MACD;   
  61. SARH:=CLOSE>SAR(4,2,20);   
  62.   
  63.   
  64.   
  65.   
  66. {IF(C<MA3 ,MA1,DRAWNULL),COLOR555555,LINETHICK1;}   
  67. {IF(C<MA3 ,MA2,DRAWNULL),COLOR222222,LINETHICK1;}   
  68. {IF(五>=REF(五,1) ,离A,DRAWNULL),COLOR0000FF,LINETHICK1;   
  69. IF(五>=REF(五,1) ,离B,DRAWNULL),COLOR0000FF,LINETHICK1;   
  70. IF(五<=REF(五,1) ,离C,DRAWNULL),COLOR00FF00,LINETHICK1;   
  71. IF(五<=REF(五,1) ,离D,DRAWNULL),COLOR00FF00,LINETHICK1;}   
  72. 五V:=MA(V,5);   
  73. {IF(五V>=REF(五V,1) ,离A,DRAWNULL),COLOR0000FF,LINETHICK1;   
  74. IF(五V>=REF(五V,1) ,离B,DRAWNULL),COLOR0000FF,LINETHICK1;   
  75. IF(五V<=REF(五V,1) ,离C,DRAWNULL),COLOR00FF00,LINETHICK1;   
  76. IF(五V<=REF(五V,1) ,离D,DRAWNULL),COLOR00FF00,LINETHICK1;}   
  77.   
  78. {IF(五<REF(五,2) AND 离L=0,离A,DRAWNULL),COLOR555555,LINETHICK1;   
  79. IF(五<REF(五,2) AND 离L=0,离D,DRAWNULL),COLOR555555,LINETHICK1;}   
  80. TYP:=(HIGH+LOW+CLOSE)/3;   
  81. CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));   
  82.   
  83.   
  84.   
  85. STICKLINE(C<MA3 AND 黑=1,H,L,0,0),COLOR555555;   
  86. STICKLINE(MA1<MA3 AND 黑=1,O,C,2.5,1),COLOR555555;   
  87. STICKLINE(BA AND C<MA3,O,C,2.7,1),COLORWHITE;   
  88. {DRAWICON(MACD>REF(MACD,1) AND CROSS(C,MA3) AND 提示=0 ,L,1);}   
  89. {DRAWICON(REF(C>MA3 AND 提示,1) AND CROSS(MA(C,5),C),H,2);}   
  90. N:=14;   
  91. M:=6;   
  92. TR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);   
  93. HD :=HIGH-REF(HIGH,1);   
  94. LD :=REF(LOW,1)-LOW;   
  95. DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);   
  96. DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);   
  97. PDI:=DMP*100/TR;   
  98. MDI:=DMM*100/TR;   
  99. ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);   
  100. ADXR:=EXPMEMA(ADX,M);   
  101. DMIJX:=CROSS(PDI,MDI) AND C>O ;   
  102. {STICKLINE(DMIJX,H,L,0,1),COLORYELLOW;   
  103. STICKLINE(DMIJX,O,C,2.7,0),COLORYELLOW;}   
  104. {DRAWICON(DMIJX AND 提示=0,L,1);}   
  105.   
  106.   
  107. {DRAWTEXT(H>离A,离A/0.99,'★'),COLORYELLOW;}   
  108. 头上边:=MAX(O,C),NODRAW;   
  109. 头下边:=MIN(O,C),NODRAW;   
  110. 垂头:=ABS(O-C),NODRAW;{垂头}   
  111. 长针:=(头下边-L),NODRAW;{长针}   
  112. 垂:=长针/垂头>2 AND (H-头上边)<=长针 AND L<REF(L,1) AND O<REF(C,1),NODRAW;   
  113.   
  114. DRAWTEXT(垂 AND L<=LLV(L,3) AND L<离C AND 提示,L/1.01,'针') AND 提示,COLORGREEN,LINETHICK4;   
  115. DRAWTEXT(H>MA(CLOSE,5)*1.07 AND ISLASTBAR AND 提示,H*1.01,'离!'),COLORGREEN,LINETHICK2;   
  116. DRAWTEXT(L<MA(CLOSE,5)*1.005 AND L>MA(CLOSE,5) AND 提示=0 AND H<MA(CLOSE,5)*1.07 AND ISLASTBAR,L/1.02,'低吸'),COLORGREEN,LINETHICK2;   
  117.   
  118. {////MACD反身向上////}   
  119. {MACD红缩:=REF(MACD,1)>MACD AND MACD>0;   
  120. DRAWTEXT(REF(EVERY(MACD红缩,3),1)   
  121. AND MACD>REF(MACD,1) AND C>MA(C,22) AND 提示=0,L/1.02,'启动'),COLORWHITE;   
  122. }   
  123. {////MACD反身向上2////}   
  124. {MACD红缩2:=REF(MACD,1)>MACD AND MACD>0;   
  125. DRAWTEXT(REF(EVERY(MACD红缩2,2),1)   
  126. AND MACD>REF(MACD,1) AND C>MA(C,22) AND EVERY(DIFF>0,3) AND 提示=0,L/1.02,'起动'),COLORWHITE;   
  127. }   
  128. {突破买进(源码)}   
  129. {DRAWTEXT(DYNAINFO(7)>0 AND ISLASTBAR ,HIGH,'("DYNAINFO(7)")');}   
  130. 上5日:=REF(EVERY(C<MA1,2),1) AND CROSS(C,MA1);   
  131. STICKLINE(上5日,H,L,0,0),COLORFF00FF;   
  132. {STICKLINE(上5日,O,C,2.7,0),COLOR3366FF;}   
  133. STICKLINE(上5日,O,C,2.7,0),COLORFF00FF;   
  134. DRAWICON(上5日,L,1);   
  135. 破5日:=REF(EVERY(C>MA1,4),1) AND CROSS(MA1,C);   
  136. DRAWICON(破5日,H,2);   
  137.   
  138. DT:=REF(CLOSE/REF(C,1),1)<=0.95;   
  139. DRAWTEXT(AA AND DT AND CURRBARSCOUNT<60 ,H,'急挖坑'),COLORGREEN;   
  140. SC1:=MACD.MACD<0;   
  141. SC2:=CROSS(十,五);   
  142. SC3:=MA(V,5)<MA(V,10);   
  143. SC:=SC1 AND SC2 AND SC3 ;   
  144. DRAWTEXT(SC AND CURRBARSCOUNT<10 ,HHV(H,5),'三死叉'),COLORWHITE;   
  145. JC1:=MACD.MACD>0;   
  146. JC2:=CROSS(五,十);   
  147. JC3:=MA(V,5)>MA(V,10);   
  148. JC:=JC1 AND JC2 AND JC3 ;   
  149. DRAWTEXT(JC AND CURRBARSCOUNT<20 ,LLV(L,5),'后金叉'),COLORYELLOW;   
  150. {ZS:=CROSS(DMI.ADXR,DMI.ADX);   
  151. DRAWTEXT(ZS AND CURRBARSCOUNT<10 ,HHV(H,5),'转势'),COLORRED;}   
  152. {IF(五<REF(五,1),五,DRAWNULL),COLOR888888,LINETHICK1;};   
  153. {XQK:=H<REF(L,1) ;   
  154. DRAWTEXT(XQK AND CURRBARSCOUNT<20 ,H,'□□□□□□□□□□□□'),COLOR999999;   
  155. SQK:= L>REF(H,1);   
  156. DRAWTEXT(SQK AND  CURRBARSCOUNT<20 ,L,'□□□□□□□□□□□□'),COLORRED;};   
  157.   
  158. DRAWTEXT(CROSS(H,离B)  AND CURRBARSCOUNT<10  ,HHV(H,3),'超乖离'),COLORYELLOW;   
  159. DRAWTEXT(CROSS(H,离A)   AND CURRBARSCOUNT<10 ,HHV(H,3),'超乖离'),COLORYELLOW;   
  160. DRAWTEXT(CROSS(离C,L) AND CURRBARSCOUNT<10 ,LLV(L,3),'负乖离'),COLORWHITE;   
  161. DRAWTEXT((C<MA(C,5) OR MA(C,5)<MA(C,10)) AND CURRBARSCOUNT<2,HHV(H,5)*1.04,'MA5下'),COLORRED;   
  162. DRAWTEXT((C<MA(C,5) OR MA(C,5)<MA(C,10))  AND CURRBARSCOUNT<2 ,HHV(H,5)*1.01,'不持股'),COLORRED;  

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则