分享：自称为“前无古人，纪念小习”的公式 源码 通达信，益盟适用

王向辉

      本指标来源于早期的益盟论坛，一直珍藏。现给本论坛的同学分享，不得外转。

补充：有人提建议和批评，说是代码不全，本人有保留。确实，这不是完整的代码，而是经调整后，可用于通达信的代码。这里说明一下：此绝非本人有意保留，而是为同学们可以使用！
      因为通达信软件为使用较多的软件，所以，这里专门针对通达信进行了修改。完整的代码在通达信中是无法使用的。为满足要求，这里就再补充只适用于益盟的原代码。
      另外，重新粘贴了一下公式代码。因操作问题，“笑脸”给开了几个玩笑。
     指标原名称为：前无古人纪念小习（操盘手副图）

声明：本公式非本人集成。
效果图：

一、通达信、益盟软件适用

1. 
   
2. DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); {选股设JC=10即可}
   
3. DEA:=EMA(DIFF,9);
   
4. MACD:=2*(DIFF-DEA);
   
5. A:=IF(CROSS(0,DEA),1,0);
   
6. A1:=IF(DIFF<0 AND CROSS(DIFF,DEA),1,0);
   
7. SS:=IF(A,SUM(A1,0),0);
   
8. SSB:=HHV(SS,0);
   
9. SSS:=SUM(A1,0);
   
10. W底选股:IF(SSS-SSB=2 AND SSS>REF(SSS,1),-22,0),LINETHICK2,COLORFFFF00;
    
11. IF(SSS-SSB=2 AND SSS>REF(SSS,1),-12,0),LINETHICK2,COLORFFFF00;
    
12. DRAWTEXT(A1,-10,'W底'),COLORYELLOW;
    
13. N:=20;
    
14. MID:=MA(C,N);
    
15. VART1:=POW((C-MID),2);
    
16. VART2:=MA(VART1,N);
    
17. VART3:=SQRT(VART2);
    
18. UPPER:=MID+2*VART3;
    
19. LOWER:=MID-2*VART3;
    
20. BOLL:=REF(MID,1);
    
21. UB:=REF(UPPER,1);
    
22. LB:=REF(LOWER,1);
    
23. LOWER1:=MID-VART3;
    
24. LB1:=REF(LOWER1,1);
    
25. 股价线:(C-LB1)/(UB-LB)*100,COLORGREEN, LINETHICK1;
    
26. 趋势线:MA(股价线,6),COLORRED, LINETHICK3;
    
27. 90,COLORGREEN, LINETHICK1;
    
28. 50,COLORWHITE, LINETHICK1;
    
29. 0,COLORWHITE, LINETHICK1;
    
30. VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
    
31. 准备建仓:EMA(IF(L<= LLV(L,30),VARC,0),3),COLORFF00FF,LINETHICK2;
    
32. VARO5:=LLV(LOW,27);
    
33. VARO6:=HHV(HIGH,34);
    
34. VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
    
35. 建仓区: IF((VARO7<10),80,100) ,COLORFFFF00,LINETHICK3;
    
36. IF((VARO7<10),85,100) ,COLORBLACK,LINETHICK2;
    
37. 下单: IF(CROSS(3*SMA((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100,5,1),3,1),10),38,0),STICK ,COLORYELLOW, LINETHICK4;
    
38. DRAWTEXT(下单,40,'下单'),COLORGREEN;
    
39. BIAS1:=(C-MA(C,6))/MA(C,6)*100;
    
40. BIAS2:=(C-MA(C,12))/MA(C,12)*100;
    
41. BIAS3:=(C-MA(C,24))/MA(C,24)*100;
    
42. BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
    
43. 乖离1:=MA(BIAS,3);
    
44. 低买:IF(CROSS(BIAS,乖离1) AND 乖离1<-9,28,0),COLORRED,LINETHICK2;
    
45. IF(CROSS(BIAS,乖离1) AND 乖离1<-9,18,0),COLORRED,LINETHICK2;
    
46. STICKLINE(CROSS(BIAS,乖离1) AND 乖离1<-9,-12,0,8,0),COLORYELLOW;
    
47. DRAWTEXT(低买,33,'低买'),COLORRED;
    
48. TTR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),5);
    
49. HD:=(HIGH - REF(HIGH,1));
    
50. LD:=(REF(LOW,1) - LOW);
    
51. DMP:=(SUM(IF(((HD > 0) AND (HD > LD)),HD,0),5) );
    
52. DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
    
53. 神偷线:=(((DMP ) * 100) / TR);
    
54. 辅助线:=((DMM * 100) / TTR);
    
55. 动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),3));
    
56. ADXR:=((动向趋势线 + REF(动向趋势线,3)) / 2);
    
57. VAR3:=MA(CLOSE,2);
    
58. VAR7:=REF(VAR3,1);
    
59. 【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
    
60. 准备:( IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),68,0)),LINETHICK1,COLORFF00FF;
    
61. ( IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),48,0)),LINETHICK1,COLORFF00FF;
    
62. DRAWTEXT(准备,60,'准备'),COLORFF00FF;
    
63. TYP := (HIGH + LOW + CLOSE)/3;
    
64. CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
    
65. RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*500-250;
    
66. K:=SMA(RSV,3,1);
    
67. LC := REF(CLOSE,1);
    
68. RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*500-250;
    
69. X:CROSS(CCI,-100)  AND K<-100 ;
    
70. X改成:CROSS(CCI,-100)  AND K<-100 AND CROSS(RSI1,-90);
    
71. MA2:=EMA(C,2);MA5:=EMA(C,5);
    
72. MA13:=EMA(C,13);
    
73. MA34:=EMA(C,34);
    
74. MA55:=EMA(C,55);
    
75. YCX:=MA5>=REF(MA5,1);
    
76. H1:=MAX(MAX(MA5,MA13),MA34);
    
77. L1:=MIN(MIN(MA5,MA13),MA34);
    
78. 一阳穿三线:= H1<C AND O<L1 AND YCX AND MA2>REF(MA2,1);
    
79. 满仓选股:IF(一阳穿三线,88,0),COLORFFFF00,LINETHICK2;
    
80. IF(一阳穿三线,58,0),COLORFFFF00,LINETHICK2;
    
81. DRAWTEXT(一阳穿三线,88,'满仓'),COLORYELLOW;
    
82. VAR2:=0.0001*AMOUNT,;
    
83. MA1:=0.0001*MA(AMOUNT,5);
    
84. M2:=0.0001*MA(AMOUNT,10);
    
85. 百日地量:LLV(VAR2,100)=VAR2,STICK,COLORRED,LINETHICK0;
    
86. DRAWTEXT(百日地量,-12,'地量'),COLORRED;
    
87. VAR1:=(CLOSE*2+HIGH+LOW)/4;
    
88. SK:= EMA(VAR1,13)-EMA(VAR1,73);
    
89. SD:= EMA(SK,2);
    
90. 买点选股:(CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03)
    
91. OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05
    
92. AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035));
    
93. IF(买点选股,28,0),COLORYELLOW,LINETHICK2;
    
94. IF(买点选股,18,0),COLORYELLOW,LINETHICK2;
    
95. DRAWTEXT(买点选股,28,'买点'),COLORYELLOW;
    
96. AA05:=MA(C,5);
    
97. 五日乖离率:=(C-AA05)/AA05*100;
    
98. BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
    
99. 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
    
100. 加速度5:=EMA((速度5-REF(速度5,1)),3);
     
101. AA10:=MA(C,10);AA20:=MA(C,20);
     
102. BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
     
103. AA30:=MA(C,30);
     
104. 三拾日乖离率:=(C-AA30)/AA30*100;
     
105. (AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
     
106. (AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
     
107. BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
     
108. 强势狙击选股:FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
     
109. 加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1)  AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1)
     
110. AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1)  ,10) ;
     
111. MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
     
112. 青云直上选股:IF(FILTER(MR,10),30,0),COLORGREEN,LINETHICK2;
     
113. IF(FILTER(MR,10),20,0),COLORGREEN,LINETHICK2;
     
114. DRAWTEXT(青云直上选股,30,'青云直上'),COLORGREEN;
     
115. QUAN:(CLOSE-DMA(CLOSE,VOL/SUM(VOL,13)))/DMA(CLOSE,VOL/SUM(VOL,13))*100<=-28 AND (CLOSE-DMA(CLOSE,VOL/SUM(VOL,34)))/DMA(CLOSE,VOL/SUM(VOL,34))*100<=-19
     
116. AND C/REF(C,25)<=1.1 AND IF((((HIGH > (LOW * 1.051)) AND (COUNT((HIGH > (LOW * 1.051)),5) > 1)) AND ((((CLOSE / MA(CLOSE,40)) * 100) < 78) OR
     
117. (((CLOSE / MA(CLOSE,60)) * 100) < 74))),2,0) AND
     
118. (SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100)<15 AND IF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)>REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)
     
119. AND REF(SMA((CLOSE-LLV(LOW,8))/
     
120. (HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)<REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),2)
     
121. AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)<23 ,1.5,0) AND FILTER((C/MA(C,48))<0.75 AND (C/MA(C,70))<0.70 AND
     
122. ((C-L)/C>0.02 OR C>REF(C,1)*1.01) AND V<REF(V,1)*2.8 AND (COUNT(C<O*0.93,2)=2 OR COUNT(H/L>1.1,5)>3),3)  ;
     
123. DRAWTEXT(QUAN,88,'弱市百发百中'),COLORFFFF00;
     
124. IF(QUAN,88,0),COLORFFFF00,LINETHICK2;
     
125. IF(QUAN,60,0),COLORFFFF00,LINETHICK2;
     
126. AA:=1;
     
127. BB:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
     
128. CC:=IF(AMOUNT/C/HHV(AMOUNT,9)/HHV(C,9)*100>100,100,AMOUNT/C/HHV(AMOUNT,9)/HHV(C,9)*100);
     
129. DD:=CC/BB;
     
130. 量异动:IF(AA,DD/REF(DD,1),0);
     
131. STICKLINE(量异动>=0,0,量异动,8,0);
     
132. STICKLINE(量异动>=0,0,量异动,4,0);
     
133. 选股:DD/REF(DD,1);
     
134. CROSS(-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),-45)
     
135. AND CLOSE>SMA(CLOSE,60,5) AND SMA(CLOSE,23,5)>REF(SMA(CLOSE,23,5),1)
     
136. AND SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1)>REF(SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1),1);
     
137. RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
     
138. 逃顶:CROSS(80,RSI)*88,LINETHICK2 ,COLORGREEN;
     
139. CROSS(80,RSI)*58,LINETHICK2 ,COLORGREEN;
     
140. DRAWTEXT(CROSS(80,RSI),88,'逃顶 '),COLORGREEN;
     
141. CROSS(-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),-45)
     
142. AND CLOSE>SMA(CLOSE,60,5) AND SMA(CLOSE,23,5)>REF(SMA(CLOSE,23,5),1)
     
143. AND SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1)>REF(SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1),1)COLORBLUE,LINETHICK2;
     
144. {W1:=C=HHV(C,20);
     
145. W2:=BARSLAST(W1);
     
146. W3:=IF(W2>0,REF(C,W2),REF(C,W2));
     
147. W4:=CROSS(C,REF(W3,1));
     
148. W4 AND COUNT(W4,5)=1; };
     
149. 
     

复制代码

二、仅益盟软件适用

1. 
   
2. Q1:=C<O;
   
3. Q2:=VOL>1.5*MA(VOL,5);
   
4. Q3:=BIGORDER(1,2)+BIGORDER(1,3)>BIGORDER(2,2)+BIGORDER(2,3);
   
5. xgx:Q1 AND Q2 AND Q3;
   
6. DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); {选股设JC=10即可}
   
7. DEA:=EMA(DIFF,9);
   
8. MACD:=2*(DIFF-DEA);
   
9. A:=IF(CROSS(0,DEA),1,0);
   
10. A1:=IF(DIFF<0 AND CROSS(DIFF,DEA),1,0);
    
11. SS:=IF(A,SUM(A1,0),0);
    
12. SSB:=HHV(SS,0);
    
13. SSS:=SUM(A1,0);
    
14. W底选股:IF(SSS-SSB=2 AND SSS>REF(SSS,1),-22,0),LINETHICK2,COLORffff00;
    
15. IF(SSS-SSB=2 AND SSS>REF(SSS,1),-12,0),LINETHICK2,COLORffff00;
    
16. DRAWTEXT(A1,-10,'W底'),COLORyellow;
    
17. N:=20;
    
18. MID:=MA(C,N);
    
19. VART1:=POW((C-MID),2);
    
20. VART2:=MA(VART1,N);
    
21. VART3:=SQRT(VART2);
    
22. UPPER:=MID+2*VART3;
    
23. LOWER:=MID-2*VART3;
    
24. BOLL:=REF(MID,1);
    
25. UB:=REF(UPPER,1);
    
26. LB:=REF(LOWER,1);
    
27. LOWER1:=MID-VART3;
    
28. LB1:=REF(LOWER1,1);
    
29. 股价线:(C-LB1)/(UB-LB)*100,COLORgreen, LINETHICK1;
    
30. 趋势线:MA(股价线,6),COLORred, LINETHICK3;
    
31. 90,COLORGREEN, LINETHICK1;
    
32. 50,COLORwhite, LINETHICK1;
    
33. 0,COLORwhite, LINETHICK1;
    
34. VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
    
35. 准备建仓:EMA(IF(L<= LLV(L,30),VARC,0),3),COLORff00ff,LINETHICK2;
    
36. VARO5:=LLV(LOW,27);
    
37. VARO6:=HHV(HIGH,34);
    
38. VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
    
39. 建仓区: IF((VARO7<10),80,100) ,COLORffff00,LINETHICK3;
    
40. IF((VARO7<10),85,100) ,COLORblack,LINETHICK2;
    
41. 下单: IF(CROSS(3*SMA((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100,5,1),3,1),10),38,0),STICK ,COLORyellow, LINETHICK4;
    
42. DRAWTEXT(下单,40,'下单'),COLORGREEN;
    
43. BIAS1:=(C-MA(C,6))/MA(C,6)*100;
    
44. BIAS2:=(C-MA(C,12))/MA(C,12)*100;
    
45. BIAS3:=(C-MA(C,24))/MA(C,24)*100;
    
46. BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
    
47. 乖离1:=MA(BIAS,3);
    
48. 低买:IF(CROSS(BIAS,乖离1) AND 乖离1<-9,28,0),COLORRED,LINETHICK2;
    
49. IF(CROSS(BIAS,乖离1) AND 乖离1<-9,18,0),COLORRED,LINETHICK2;
    
50. STICKLINE(CROSS(BIAS,乖离1) AND 乖离1<-9,-12,0,8,0),COLORyellow;
    
51. DRAWTEXT(低买,33,'低买'),COLORred;
    
52. TR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),5);
    
53. HD:=(HIGH - REF(HIGH,1));
    
54. LD:=(REF(LOW,1) - LOW);
    
55. DMP:=(SUM(IF(((HD > 0) AND (HD > LD)),HD,0),5) );
    
56. DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
    
57. 神偷线:=(((DMP ) * 100) / TR);
    
58. 辅助线:=((DMM * 100) / TR);
    
59. 动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),3));
    
60. ADXR:=((动向趋势线 + REF(动向趋势线,3)) / 2);
    
61. VAR3:=MA(CLOSE,2);
    
62. VAR7:=REF(VAR3,1);
    
63. 【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
    
64. 准备:( IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),68,0)),LINETHICK1,COLORFF00FF;
    
65. ( IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),48,0)),LINETHICK1,COLORFF00FF;
    
66. DRAWTEXT(准备,60,'准备'),COLORff00ff;
    
67. TYP := (HIGH + LOW + CLOSE)/3;
    
68. cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
    
69. RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*500-250;
    
70. K:=SMA(RSV,3,1);
    
71. LC := REF(CLOSE,1);
    
72. RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*500-250;
    
73. x:cross(cci,-100)  and k<-100 ;
    
74. x改成:cross(cci,-100)  and k<-100 and cross(rsi1,-90);
    
75. MA2:=EMA(C,2);MA5:=EMA(C,5);MA13:=EMA(C,13);MA34:=EMA(C,34);MA55:=EMA(C,55);YCX:=MA5>=REF(MA5,1);H1:=MAX(MAX(MA5,MA13),MA34);L1:=MIN(MIN(MA5,MA13),MA34);一阳穿三线:= H1<C AND O<L1 AND YCX AND MA2>REF(MA2,1);满仓选股:IF(一阳穿三线,88,0),COLORFFFF00,LINETHICK2;
    
76. IF(一阳穿三线,58,0),COLORFFFF00,LINETHICK2;
    
77. DRAWTEXT(一阳穿三线,88,'满仓'),COLORyellow;
    
78. VAR2:=0.0001*AMOUNT,;
    
79. MA1:=0.0001*MA(AMOUNT,5);
    
80. M2:=0.0001*MA(AMOUNT,10);
    
81. 百日地量:LLV(VAR2,100)=VAR2,STICK,COLORRED,LINETHICK0;
    
82. DRAWTEXT(百日地量,-12,'地量'),COLORRED;
    
83. Var1:=(CLOSE*2+HIGH+LOW)/4;
    
84. SK:= EMA(Var1,13)-EMA(Var1,73);
    
85. SD:= EMA(SK,2);
    
86. 买点选股:(cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03)
    
87. or (cross(sk,sd) and sk<=-0.14 ) or (cross(sk,sd) and sk<=0.05
    
88. and (v/ma(v,5)>2 or c/ref(c,1)>0.035));
    
89. IF(买点选股,28,0),COLORyellow,LINETHICK2;
    
90. IF(买点选股,18,0),COLORyellow,LINETHICK2;
    
91. DRAWTEXT(买点选股,28,'买点'),COLORyellow;
    
92. AA05:=MA(C,5);
    
93. 五日乖离率:=(c-AA05)/AA05*100;
    
94. BB05:=atan((aa05/ref(aa05,1)-1)*100)*180/3.1416;
    
95. 速度5:=sma(ema((AA05-ref(AA05,1))/ref(AA05,1),3)*100,3,1);
    
96. 加速度5:=ema((速度5-ref(速度5,1)),3);
    
97. AA10:=MA(C,10);AA20:=MA(c,20);
    
98. BB10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
    
99. AA30:=MA(C,30);
    
100. 三拾日乖离率:=(c-AA30)/AA30*100;
     
101. (AA20-AA30)>ref((AA20-AA30),1) and AA20>ref(aa20,1) and AA30>ref(AA30,1);
     
102. (AA30-AA20)<ref((AA30-AA20),1) and AA20<ref(aa20,1) and AA30<ref(AA30,1);
     
103. BB30:=atan((aa30/ref(aa30,1)-1)*100)*180/3.1416;
     
104. 强势狙击选股:filter(BB30>30 and BB10>45 and cross(BB05,60),10);
     
105. 加仓:=filter(count(cross(BB05,30),5)>=1 and AA05>ref(aa05,1)  and 三拾日乖离率>ref(三拾日乖离率,1) and AA10>ref(AA10,1)
     
106. and 加速度5>ref(加速度5,1) and 速度5>ref(速度5,1)  ,10) ;
     
107. MR:=count(cross(五日乖离率,0),3)>=1 and 三拾日乖离率>ref(三拾日乖离率,1) and AA05>ref(AA05,1) and (c/ref(c,1)-1)*100>5 and ref(c,1)<AA30;
     
108. 青云直上选股:if(filter(MR,10),30,0),COLORGREEN,LINETHICK2;
     
109. if(filter(MR,10),20,0),COLORGREEN,LINETHICK2;
     
110. DRAWTEXT(青云直上选股,30,'青云直上'),COLORGREEN;
     
111. QUAN:(CLOSE-DMA(CLOSE,VOL/SUM(VOL,13)))/DMA(CLOSE,VOL/SUM(VOL,13))*100<=-28 AND (CLOSE-DMA(CLOSE,VOL/SUM(VOL,34)))/DMA(CLOSE,VOL/SUM(VOL,34))*100<=-19
     
112. AND C/REF(C,25)<=1.1 AND IF((((HIGH > (LOW * 1.051)) AND (COUNT((HIGH > (LOW * 1.051)),5) > 1)) AND ((((CLOSE / MA(CLOSE,40)) * 100) < 78) OR
     
113. (((CLOSE / MA(CLOSE,60)) * 100) < 74))),2,0) AND
     
114. (SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100)<15 AND IF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)>REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)
     
115. AND REF(SMA((CLOSE-LLV(LOW,8))/
     
116. (HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)<REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),2)
     
117. AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)<23 ,1.5,0) AND FILTER((C/MA(C,48))<0.75 AND (C/MA(C,70))<0.70 AND
     
118. ((C-L)/C>0.02 OR C>REF(C,1)*1.01) AND V<REF(V,1)*2.8 AND (COUNT(C<O*0.93,2)=2 OR COUNT(H/L>1.1,5)>3),3)  ;
     
119. DRAWTEXT(QUAN,88,'弱市百发百中'),COLORffff00;
     
120. IF(QUAN,88,0),COLORffff00,LINETHICK2;
     
121. IF(QUAN,60,0),COLORffff00,LINETHICK2;
     
122. aa:=1;;
     
123. bb:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
     
124. cc:=if(amount/c/hhv(amount,9)/hhv(c,9)*100>100,100,amount/c/hhv(amount,9)/hhv(c,9)*100);
     
125. dd:=cc/bb;
     
126. 量异动:if(aa,dd/ref(dd,1),0),linethick0,colorffff;
     
127. stickline(量异动>=0,0,量异动,8,0),colorffff;
     
128. stickline(量异动>=0,0,量异动,4,0),colorred;
     
129. 选股:dd/ref(dd,1);
     
130. CROSS(-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),-45)
     
131. AND CLOSE>SMA(CLOSE,60,5) AND SMA(CLOSE,23,5)>REF(SMA(CLOSE,23,5),1)
     
132. AND SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1)>REF(SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1),1);
     
133. RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
     
134. 逃顶:CROSS(80,RSI)*88,LINETHICK2 ,colorgreen;
     
135. CROSS(80,RSI)*58,LINETHICK2 ,colorgreen;
     
136. DRAWTEXT(CROSS(80,RSI),88,'逃顶 '),colorgreen;
     
137. CROSS(-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55)),-45)
     
138. AND CLOSE>SMA(CLOSE,60,5) AND SMA(CLOSE,23,5)>REF(SMA(CLOSE,23,5),1)
     
139. AND SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1)>REF(SMA(SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,13,1),23,1),1)COLORBLUE,LINETHICK2;
     
140. W1:=C=HHV(C,20);
     
141. W2:=BARSLAST(W1);
     
142. W3:=IF(W2>0,REF(C,W2),REF(C,W2));
     
143. W4:=CROSS(C,REF(W3,1));
     
144. W4 AND COUNT(W4,5)=1,LINETHICK2,COLOR9370DB;
     

复制代码

罗长春

好好学习天天向上

z503406708

谢谢提供。

浪子冰心

学习了         

雪域之光

学习了………

于强华

向你学习望多多帮助谢谢

净化

{:soso_e181:}

莱德曼

dddddddddddddd

黄佩恩

谢谢提供。

冷枫

ddddddddddddddddddddddddddddd

普金

dddddddddd

啊苗

向高手学习

南湖居士

学习，学习。

啊苗

向高手学习

为了下一代

:victory:

绿叶红花

谢谢分享