通达信重心压力支撑-源码

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

 通达信重心压力支撑-源码

{牛牛指标网提供:www.tdx001.com}复制内容到剪贴板
  1. PT   := REF(HIGH,1)-REF(LOW,1);   
  2. 重心:(HIGH + LOW + CLOSE)/3,NODRAW;   
  3. 压力Ⅰ: 2*重心-LOW,NODRAW;   
  4. 压力Ⅱ:重心 + PT,NODRAW;   
  5. 支撑Ⅰ:2*重心-HIGH,NODRAW;   
  6. 支撑Ⅱ: 重心 - PT,NODRAW;   
  7. MA5:MA(C,5),COLOR888899;   
  8. MA20:MA(C,20),COLOR0099FF;   
  9. MA30:MA(C,30),COLORYELLOW;   
  10. MA60:MA(C,60),COLOR00FF00;   
  11. MA250:MA(C,250),COLOR0099FF;   
  12. AAA:=CONST(HHV(H,90));   
  13. R1:=MA(CLOSE,1);   
  14. R2:=MA(CLOSE,3);   
  15. R3:=(MA(R2,1)*1);   
  16. R4:=(MA(R2,3)*1);   
  17. DRAWTEXT(CROSS(R3,R4),(LOW-0.1),'B'),COLORBDB76B;   
  18. X1:=(C+L+H)/3;   
  19. DD:=TOTALCAPITAL;   
  20. SS:=FINANCE(7);   
  21. GG:=FINANCE(33);   
  22. TH:=DYNAINFO(39);   
  23. A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);   
  24. LC:=REF(CLOSE,1);   
  25. RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);   
  26. FF:=EMA(CLOSE,3);   
  27. MA15:=EMA(CLOSE,21);   
  28. DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN;   
  29. 双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00;   
  30. 单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,COLOR0000FF;   
  31. VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;   
  32. VAR12:=(HIGH+LOW+CLOSE)/3;   
  33. VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));   
  34. VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));   
  35. VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);   
  36. VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);   
  37. VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;   
  38. VAR18:=100-ABS(VAR17);   
  39. VAR19:=IF(VAR18<90,VAR18,100);   
  40. VAR1A:=IF(VARE>0,VARE,0);   
  41. VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;   
  42. VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;   
  43. DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66;   
  44. AA1:=AMOUNT/V;   
  45. BB1:=L<AA1*0.9;   
  46. CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;   
  47. DD1:=L<MA(C,5)*0.921;   
  48. EE1:=V<MA(V,5)*1.5;   
  49. 老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;   
  50. DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;   
  51. A74:=MA(CLOSE,20);   
  52. A75:=(CLOSE > MA(CLOSE,5));   
  53. A76:=(MA(CLOSE,5) > MA(CLOSE,10));   
  54. A77:=(CLOSE > MA(CLOSE,10));   
  55. A78:=(MA(CLOSE,5) > MA(CLOSE,20));   
  56. A79:=(CLOSE > MA(CLOSE,20));   
  57. A710:=REF(A74,1);   
  58. A711:=(A74 > A710);   
  59. AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))   
  60. + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));   
  61. DSLX:=(CLOSE / INDEXC);   
  62. DSLX1:=MA(DSLX,5);   
  63. DSLX2:=MA(DSLX,10);   
  64. V1:=MA(VOL,5);   
  65. V2:=MA(VOL,10);   
  66. T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));    
  67. T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));   
  68. T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));    
  69. T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));   
  70. T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));   
  71. T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));   
  72. T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));    
  73. T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));   
  74. T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));    
  75. T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));    
  76. T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));    
  77. T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));    
  78. T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));    
  79. T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));   
  80. T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));    
  81. T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));   
  82. T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));    
  83. T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));    
  84. T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));   
  85. T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));   
  86. T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));    
  87. T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));   
  88. T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));   
  89. T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));   
  90. T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));   
  91. DRAWTEXT(T1=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  92. ,'量能理想,明显走强,中线参与,仓位在2/3左右'),COLORFF00FF   ;   
  93. DRAWTEXT(T2=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  94. ,'走势趋强,还显不足,短线进场,仓位在1/2左右'),COLORFF00FF   ;   
  95. DRAWTEXT(T3=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  96. ,'量价良好,没有明显走强,短线进场,仓位1/2左右'),COLORFF00FF   ;   
  97. DRAWTEXT(T4=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  98. ,'形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右'),COLORFF00FF   ;   
  99. DRAWTEXT(T5=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  100. ,'形态变坏,重仓者减持大半,清仓者观望'),COLORFF00FF   ;   
  101. DRAWTEXT(T6=1 AND CURRBARSCOUNT=60,AAA*0.98   
  102. ,'随大盘一起下跌,明显缩量走势,考虑到风险,减持或清仓'),COLORFF00FF   ;   
  103. DRAWTEXT(T7=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  104. ,'该股放量下跌,走势明显偏弱,离场观望'),COLORFF00FF   ;   
  105. DRAWTEXT(T8=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  106. ,'该股缩量下跌,走势偏弱,离场观望。'),COLORFF00FF   ;   
  107. DRAWTEXT(T9=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  108. ,'该股形态良好,强势明显,量能充足,可以继续持有'),COLORFF00FF   ;   
  109. DRAWTEXT(T10=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  110. ,'上行趋势不变,强势依然,量能开始转弱,注意风险'),COLORFF00FF   ;   
  111. DRAWTEXT(T11=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  112. ,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓'),COLORFF00FF   ;   
  113. DRAWTEXT(T12=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  114. ,'该股走势趋弱,量能不足,减持大部分筹码'),COLORFF00FF   ;   
  115. DRAWTEXT(T13=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  116. ,'该股形态不佳,注意成交量的变化,目前不适合参与'),COLORFF00FF   ;   
  117. DRAWTEXT(T14=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  118. ,'趋势不明,股价偏弱,注意量能变化,目前不宜参与'),COLORFF00FF   ;   
  119. DRAWTEXT(T15=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  120. ,'有走强迹象,但量能不足,趋势不明,不适合操作'),COLORFF00FF   ;   
  121. DRAWTEXT(T16=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  122. ,'该股走势太弱,没有参与价值。'),COLORFF00FF   ;   
  123. DRAWTEXT(T17=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  124. ,'大盘理想,有明显走强迹象,中线参与,仓位在2/3左右'),COLORFF00FF   ;   
  125. DRAWTEXT(T18=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  126. ,'如前期经过一轮下跌,最佳买点,前期有过一段涨幅需谨慎'),COLORFF00FF   ;   
  127. DRAWTEXT(T19=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  128. ,'考虑短线进场,仓位在1/2左右,一旦量能放大,加仓买入'),COLORFF00FF   ;   
  129. DRAWTEXT(T20=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  130. ,'大盘形态走坏,重仓者可以减去大部分仓位。'),COLORFF0000   ;   
  131. DRAWTEXT(T21=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  132. ,'大盘缩量调整,注意风险,短线清仓观望。'),COLORFF0000   ;   
  133. DRAWTEXT(T22=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  134. ,'大盘走势良好,量能理想,可以继续持有强势股。'),COLORFF0000   ;   
  135. DRAWTEXT(T23=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  136. ,'大盘形态良好,但量能稍显不足,随时准备减仓。'),COLORFF0000   ;   
  137. DRAWTEXT(T24=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  138. ,'大盘趋势不明,注意成交量变化,目前不适宜进场。'),COLORFF0000   ;   
  139. DRAWTEXT(T25=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)   
  140. ,'大盘趋势向下,量能萎缩,不适合进场。'),COLORFF0000   ;   
  141.    

7488045.jpg

7488045.jpg

回复

使用道具 举报

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

本版积分规则