通达信股指佛手箱 通用原码

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

 通达信股指佛手箱 通用原码

复制内容到剪贴板
  1. 【H】:HHV(HIGH,14),LINETHICK3,COLORWHITE;   
  2. 【L】:LLV(LOW,14),LINETHICK3,COLORWHITE;   
  3. T:(【H】+【L】)/2 ,LINETHICK1,COLORWHITE;   
  4.   
  5. STICKLINE(C>=COST(50)AND C<=COST(58)AND C>O,O,C,2,0),COLORRED;   
  6. STICKLINE(C>=COST(97)AND C<=COST(100)AND C>O,O,C,2,0),COLORWHITE;   
  7. DRAWTEXT(C>=COST(97)AND C<=COST(100) AND C>O,C,'--获利大于97%'),COLORRED;   
  8. DRAWTEXT(C>=COST(50)AND C<=COST(58) AND C>O,C,'--获利50%'),COLORYELLOW;   
  9. JJ:=(H+L+3*C)/5;   
  10. VAR21:=EMA(JJ,5);VAR22:=EMA(JJ,13);VAR23:=EMA(JJ,21);VAR24:=EMA(JJ,34);H1A:=(VAR21+VAR22+VAR23+VAR24)/4;   
  11. 成本和谐:MA(H1A,5),COLORRED,LINETHICK0;   
  12. LL:=LLV(C,100);   
  13. TJ:=IF((C-REF(C,1))/REF(C,1)>0.025,1,0);   
  14. STICKLINE(C>REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),10,0),COLORGREEN,LINETHICK1;   
  15. 黄昏之星:=((((((REF(CLOSE,2) / REF(OPEN,2)) > 1.03) AND (REF(OPEN,1) >    
  16. REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) /    
  17. REF(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <REF(CLOSE,2)));   
  18. 射击之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *    
  19. (MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));   
  20. 锤头:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -    
  21. MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));   
  22. 吊颈:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -    
  23. MIN(OPEN,CLOSE))))));   
  24. 穿头破脚:=((((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)    
  25. < 0.96)) AND (CLOSE < REF(OPEN,1))) AND (OPEN > REF(CLOSE,1))) OR    
  26. (((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >    
  27. 1.04)) AND (CLOSE > REF(OPEN,1))) AND (OPEN < REF(CLOSE,1))));   
  28. 身怀六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04)    
  29. AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <    
  30. MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));   
  31. 乌云盖顶:=(((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <    
  32. 0.97)) AND (OPEN > REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1)));   
  33. 曙光初现:=(((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >    
  34. 1.03)) AND (OPEN < REF(CLOSE,1))) AND (CLOSE > REF(CLOSE,1)));   
  35. 倾盆雨:=(((((REF(CLOSE,1) / REF(OPEN,1)) >= 1.03)   AND (OPEN <    
  36. REF(CLOSE,1))) AND (OPEN > REF(OPEN,1))) AND (CLOSE < REF(OPEN,1)));   
  37. DRAWTEXT(倾盆雨,H*1.03,'倾盆大雨'),COLORCYAN;   
  38. DRAWTEXT(黄昏之星,H*1.02,'黄昏之星'),COLORCYAN;   
  39. DRAWTEXT(射击之星,H*1.03,'射击之星高位见顶'),COLORCYAN;   
  40. DRAWTEXT(锤头,L-L*0.02,'锤头低位见底'),COLORGREEN;   
  41. DRAWTEXT(吊颈,H*1.03,'吊颈高位见顶'),COLORCYAN;   
  42. DRAWTEXT(穿头破脚,H*1.05,'穿头破脚'),COLORCYAN;   
  43. DRAWTEXT(乌云盖顶,H*1.03,'乌云盖顶'),COLORCYAN;   
  44. DRAWTEXT(曙光初现,L-L*0.02,'曙光初现(放量见涨)'),COLORGREEN;   
  45. DRAWTEXT(身怀六甲,L-L*0.02,'身怀六甲,底升顶落'),COLORGREEN;   
  46. 阳长下影线:=(O-L)/O>0.06 AND C>O;   
  47. 阴长下影线:=(C-L)/C>0.06 AND C<O;   
  48. 阳长上影线:=(H-C)/C>0.06 AND C>O;   
  49. 阴长上影线:=(H-O)/O>0.06 AND C<O;   
  50. 光头阳长下影线:=C=H AND (O-L)/O>0.06 AND C>O;   
  51. 光脚阴长上影线:=C=L AND (H-O)/O>0.06 AND C<O;   
  52. 白色十字星:=C=O AND H>C AND C>L;   
  53. DRAWTEXT(阳长下影线,H*1.01,'阳长下影线'),COLORCYAN;   
  54. DRAWTEXT(阴长下影线,H*1.04,'阴长下影线'),COLORWHITE;   
  55. DRAWTEXT(阳长上影线,H*1.06,'阳长上影线'),COLORRED;   
  56. DRAWTEXT(光头阳长下影线,H*1.07,'光头阳长下影线'),COLORCYAN;   
  57. DRAWTEXT(光脚阴长上影线,H*1.08,'光脚阴长上影线'),COLORYELLOW;   
  58. DRAWTEXT(白色十字星,H*1.02,'白色十字星'),COLORWHITE;   
  59. S下:=HHV(MA(HIGH,2),2),COLORGREEN,LINETHICK0;   
  60. S上:=LLV(MA(HIGH,2),1),COLORRED,LINETHICK0;   
  61. SPPP:=-(S上-S下)/REF(C,1)*100;   
  62. SPTEM1:=(MIN(O,C)-L)/(H-L)*100;   
  63. SPTEM2:=(H-MAX(O,C))/(H-L)*100;   
  64. SPTEM3:=(C-O)/(H-L)*100;   
  65. SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;   
  66. SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);   
  67. SKJ3:=(SPTEM3<=20 AND SPTEM3>-20 AND SPTEM1>1.2*SPTEM2);   
  68. SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);   
  69. SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (SPPP>2 OR REF(SPPP,1)>2 );   
  70. 短买:=IF(SUM(SPPP>0,5)=5 AND SUM(SKJ>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*SKJ),COLORRED;   
  71. DRAWTEXT(短买,L,'短买'),COLORWHITE;   
  72. X1:=(C+L+H)/3;   
  73. BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;   
  74. EMA8:=EMA(C,8);   
  75. DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),   
  76. EMA8,'∠45'),COLORWHITE;   
  77. RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;   
  78. K:=SMA(RSV,5,1);   
  79. D:=SMA(K,5,1);   
  80. J:=3*K-2*D;   
  81. X:=REF(J,1)<10 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1);   
  82. STICKLINE(X,L ,L,2,0),COLOR008888;   
  83. STICKLINE(X,L ,H,0,0),COLORFF00FF;   
  84. STICKLINE(X,C ,O,2,0),COLORFF00FF;   
  85. 天量:=VOL=HHV(VOL,0);   
  86. DRAWTEXT(天量,C,'-------高位天量卖'),COLORYELLOW;   
  87. BIAS1:=(C-MA(C,6))/MA(C,6)*100;   
  88. BIAS2:=(C-MA(C,12))/MA(C,12)*100;   
  89. BIAS3:=(C-MA(C,24))/MA(C,24)*100;   
  90. BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;   
  91. 乖离:=MA(BIAS,3);   
  92. DRAWTEXT(CROSS(BIAS,乖离)  AND 乖离<-9,C,'---------二次BIAS乖离底买'),COLORGREEN;   
  93. COST(50),COLORGREEN,CIRCLEDOT;   
  94. TY:=C;   
  95. HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);   
  96. LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);    
  97. A:=REF(C,BARSLAST(HD));   
  98. B:=REF(C,BARSLAST(LD));   
  99. T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;   
  100. T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);   
  101. 波浪顶:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK1;   
  102. STICKLINE(T1,A,A,9,0),COLORFF00FF;   
  103. 波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK1;  

8F72756587.gif

8F72756587.gif

回复

使用道具 举报

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

本版积分规则