私募网

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz

狼王牛股王,BOLL猎杀暴涨黑马(通达信公式源码)

[复制链接]
发表于 2021-5-7 09:03:22 | 显示全部楼层 |阅读模式
号称价值百万,狼王牛股王源码分享给大家使用!9 c! O/ p3 \8 o8 x" |4 o
更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/4 M% b9 B* h: W- l
{狼王牛股王}
& R$ l1 I! L4 H9 FDRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;8 y9 |* [7 y4 x
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;8 Y' a# a5 D4 t3 ~8 q' n3 Q
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;+ B9 D  f2 t2 ?, o" F
DRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】  ★  龙头战法,涨停战法,主升浪战法!  '),COLORYELLOW;
# D, m  P5 @! `( a4 A, [{======================================================}" [: z' l. s5 E: \1 j. n
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
/ S; i- ^- z$ k2 _( ?低点位:=REFDATE(LLV(L,总涨幅周期),DATE);3 h6 Q. R. l. }5 t$ x/ l- o1 d
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
* N/ A) e. \' }' r* S$ C, j" p: [, ^高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;6 q( R1 g5 t) ]& q; @
曾最大涨幅:=(高位价-低位价)/低位价*100;& U/ K' j+ m( v; `+ U- h( L
当前涨幅:=(C-低位价)/低位价*100;
- a5 \) h% j' r+ ], ?% H3 X) z) M/ OZFA:=CON2STR(CONST(曾最大涨幅),2);* V& o7 G8 f/ m+ Y7 x7 @" P7 V9 f
ZFB:=CON2STR(CONST(当前涨幅),2);# B/ V4 X5 `% o0 c! ?  C7 R
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);% o: G6 U  e: V- E, [, i; V
ZFD:=STRCAT(ZFC,'﹪');
/ W8 Q, R; h6 o% HZFE:=STRCAT(ZFD,'【当前总涨幅】:');8 f. i( V+ y' {$ V2 p( K! U' g6 e
ZFF:=STRCAT(ZFE,ZFB);
( N# L  ~) D& Q3 wZFG:=STRCAT(ZFF,'﹪');2 Z$ H9 L2 S& I7 m$ \
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
' T* H, h8 ~' v5 {& P$ S9 eDRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
; K$ U9 k% B) W- E' W( y1 ~. I! d/ q. n8 h) k! q+ _% A0 s$ y& T1 V

2 Y: r& C! ]$ R: k
7 \+ @6 J/ O4 W: z2 ~3 P
" z& u, ^9 ^  ^3 gMA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;, _+ d& M1 A7 Z7 q
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));! S4 Z# Y6 z% x8 \. k+ y$ g6 I
趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);$ q3 f% C" z, _& {6 O
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;
& K: V6 r0 h9 tAC:=(EMA(AA,5) );$ M: z. L9 j7 b
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
0 _: B7 c( f( m" h; Y; G1 CSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;3 v% F! C0 e0 ^$ E; n
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;
4 }; j+ t) w. ?' s; }/ C! hSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;! x4 @/ X6 A! V* z
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;$ Y$ Y/ a7 n* ^* Y: W6 w
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;1 R* o6 @  c- D
AG:=SUM((VOL / FINANCE(7)),1);
: o( {6 N( }9 VSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
- f" @0 V7 I5 e% tSTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
8 [9 ?/ l5 R0 x4 HSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;) F; r! D9 J* w/ x$ I: T3 r
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
  E. o6 j/ V& \0 ASTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;4 s, f4 E9 v, D" l2 p) N5 y$ T' R
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;) C0 w+ j- A" T. \. \+ ^9 z
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;; I) v2 z6 T5 I/ U5 W
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;
" l7 V. a7 o. {" O( oSSL:=EMA(CLOSE,5);! t) T. a- {9 V+ Z/ R
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);! c8 p2 _' B$ a! }$ b' J
MM:=(IF(((PERIOD > 5) AND (PERIOD < 9)),MA(MMV,1),IF((PERIOD = 5),MA(MMV,4),IF((PERIOD = 4),MA(MMV,8),IF((PERIOD = 3),MA(MMV,16),IF((PERIOD = 2),MA(MMV,32),0))))) );
) j5 W! s- c. ?: I9 [' cSA:=(MM * 0.985);0 ?9 y/ m0 D1 M/ h
SS:=(MA(CLOSE,5));
; }4 x8 a( W1 j  y! H2 N4 Z  tDD:=(MA(CLOSE,13));
/ i7 K  G# M, c8 ^' }* ZGG:=(MA(CLOSE,21));
, _. r* l5 y# }; Q( h常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;' f6 ?* ]' ^1 u! U; o0 y8 @
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;1 I. U+ B6 L5 L7 \# f* `, j' y
QLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;) U0 O2 v. C$ a. f: s
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);! {/ E6 f) T) s3 K+ U! Z0 j8 E% }
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);1 ]6 R/ T) U! z# |" c
VAR4Y:=REF(CLOSE,1);# r7 d) M+ e$ t4 f1 D
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
* W- w- a) t$ w$ l- m$ eVAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);
5 S# n, Q. W! n9 ^" {VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
& }8 X+ p5 t% ]+ B: e4 S4 v7 d) _VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);; l% d6 A- s2 J& `3 i2 A- i9 Q$ {
VAR9Y:=SMA(VAR8Y,3,1);* O5 h5 Z. k9 ?5 f" l8 k: a1 V
VARAY:=SMA(VAR9Y,3,1);
" c2 ^1 Z) w; R' KVARBY:=((3 * VAR9Y) - (2 * VARAY));
8 ~! m3 G9 ^3 e) b! j( dVARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));
- v6 E7 Q# I1 m& b& @VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
5 b2 P1 ~  {- o8 I) J9 e+ rVAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);9 I% q: P  j  n! |
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);4 R% U% O3 K' B: |' N) j, i1 s) _
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));
, I9 X  _8 u% p" g* oVAR3C:=EMA(能量线,1);& B6 g4 m5 x; s% f' m6 [
VAR4C:=REF(能量线,1);
$ j: z2 l9 s2 [1 V* z, m' xX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
: @+ d2 h% H. s) lY:=EMA(CLOSE,10);
+ s, p7 m9 F1 {7 xLL:=REF(CLOSE,2);0 t8 Y' B. {- }9 [7 `
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
* m* j1 @. l7 P. G! ~# ~DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);
0 ~0 t+ t( e% DVAR1:=LLV(LOW,21);1 ?$ [8 t+ \4 T. u5 x( k  b
VAR2:=HHV(HIGH,21);+ f2 x1 G  `. i0 N8 B- E
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);2 f) l: j( L, M0 Q) n
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
) j  ~+ @' `. k/ w( e9 ZDD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);0 u6 [, q! D* I
VAR3:=LLV(LOW,55);
& N+ ]7 T, ?" y9 Y) ~6 e' g+ l6 kVAR4:=HHV(HIGH,34);
7 |3 s) f9 A. ~0 hVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
, w8 d' y$ E, G, i2 v# u+ L: `2 gVAR6:=((AK + VAR5) / 2);0 f5 B; i1 J7 ?" D. {& j
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
  g  t. J1 m) i, ~; h8 U( VVAR8:=EMA(VAR6,5);
5 {# K- e: x7 z) tBB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);: {  y" A# s0 a! N$ w% _" r" y
AB:=CROSS(AK1,AK);$ n" Z4 j! H! O$ c3 {
BB1:=(CROSS(AK1,BB) AND (BB < 30));
4 @5 x$ T/ Q* u% D+ L/ u2 W6 {CD:=(BB1 * 0.6);. i4 }! o7 \- i' `  K+ h
C1:=(CLOSE+LOW+HIGH)/3;
- Z/ T4 @7 V8 p1 L) O0 iC2:=EMA(C1,6);7 Q2 H% [. B% S, N* g: o. T
C3:=EMA(C2,5);& L+ i. N: E  a& t/ j3 P' P
C4:=CROSS(C2,C3);/ R/ E( R1 g) y1 n; v
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;5 K+ G  m& f. e# m8 c7 w# T2 v: ^
K:=SMA(RSV,3,1); 6 B& l4 ]& M9 x2 E$ N# r1 z( J+ q$ u
D:=SMA(K,3,1); - H( |+ R1 p7 y6 S/ `  D
J:=3*K-2*D; ) H* }3 i. o; k) @
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;4 V4 [# y) U2 ]" x5 ~* R( P
K24:=SMA(RSV24,3,1); . e$ S4 v+ ?6 x7 k6 j/ m
D24:=SMA(K24,3,1); ) n+ c9 t/ f5 o& ?
J24:=3*K24-2*D24; : ~7 t' b& ^5 S0 Y

3 P& P# n! j$ R1 d8 `& s; S4 s8 ~( ]7 O, X. m- K2 `' d3 j
  j# d: ?+ l5 l- b+ l
. Y+ m8 T- v" Y' D
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
) E  Y. I8 T1 mSTICKLINE(涨停,O,C,2,0),COLORRED;
4 R3 v0 o$ D6 M/ ^5 f# }ZDF:=(C-REF(C,1))/REF(C,1)*100;
1 L( c/ j) ^9 q; w! a- H, }" J" ?STICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;; n- W# m" B6 R& ^2 A& x
, l3 o, _3 U' y, U9 h+ A0 q6 U
  e! G# }8 p% A+ r3 J
涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
. m) _! A' J& j( k) CSTICKLINE(涨停2,O,C,1,0),COLORYELLOW;* h0 T& a; P1 e( _0 a, z6 F
6 L4 Q$ D' z3 c1 K! f* i9 W

% [( X+ q! Z& c* m
3 z! E& m4 `0 l$ V
3 I  D+ H7 I6 z% P" l5 W主力做多:EMA(C,12),COLORWHITE;: G, Y7 j# K4 N6 D
( l  [: ~& v/ ?4 W- k& |* \
& d# F2 P* F9 M

3 r2 K0 E# Q' ?1 r, u2 d) j( M4 J8 x' I1 E. `5 b% g0 @( X
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;8 `2 \+ h' B5 N/ `' [9 @
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;
+ b6 V- p; g) Z: z' y( i$ U支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;
* U: N5 g+ [9 T* o  G+ h7 g4 W7 a7 v. s3 B

1 Y; o  |' y, i8 T; N0 z. |# ?# z8 F9 \4 b# [/ A
AA01:=EMA(C,18),LINETHICK0;, v; K( s& m* S4 e9 T
AA05:=EMA(C,5),LINETHICK0,COLOR0099CC;
3 N8 ^2 f/ n$ A+ G五日乖离率:=(C-AA05)/AA05*100;1 S& P, b1 g5 C8 {* S
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;+ f% x1 W' L: D: Q
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);, A* h0 j' ?# q
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;* c  t7 W+ @; {1 z2 ]6 E# T% k
AA10:=EMA(C,10),LINETHICK0;+ N% {( }/ {5 k' i. d& U
AA20:=EMA(C,20),LINETHICK0;
" Y! P. h2 t* D2 e  MBB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
. G* ]; ~- Z! v  sAA30:=EMA(C,30),LINETHICK0;
7 T* v" H1 B( b5 k5 _三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;! G) q: R: A0 ?8 F; B0 |. \
VAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);% _+ T8 L. E4 h& p  h; N1 R! C" N& L
VAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
5 h" x( f7 N3 \' O8 \( yBB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
2 N, r4 V9 g8 P' o起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
0 u1 C6 F2 |3 E( \. n# d7 Z加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1)  AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1)  ,10) ;4 Q. {3 j8 {3 q8 ]" r0 L
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1)  AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10);5 ?4 _6 a2 e$ |
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
. P) [& D- d8 \8 U( [4 Z, H5 g减仓:=FILTER(JC,10);) z5 q/ m! ~* r) R0 {4 s3 X
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;
- f( X/ w( O$ q3 ^- f抄底:=FILTER(MR,10);
7 P/ m# t+ J* d, }) A- s2 [( ZDRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;
1 Z* f, {8 l  ~DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;
& M6 a1 ~' }/ u. P1 u( r- Z{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;
. Y4 u9 K5 g0 T' p" j" S; zDRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}+ m; Q5 y6 i3 X& t3 a4 p* v
DRAWTEXT(起爆点,LOW*0.95,'★  '),COLORYELLOW;
. k8 |0 k+ J. r& G2 d! y/ B
% m+ L+ P+ Q1 ^" S4 Y) q; W2 b2 z7 d$ ?

/ j; H# |* ?* F" E. _5 M3 y7 D* k& p! u$ l, f
AAAA:=CONST(HHV(H,90));* O! h  L& g* N, s; U
R1:=MA(CLOSE,1);
9 k1 y' ]7 |% T* B" d6 jR2:=MA(CLOSE,3);
2 ?0 [8 _- P+ pR3:=(MA(R2,1)*1);
4 @7 u0 D# |- ?8 p# HR4:=(MA(R2,3)*1);) A2 c6 ]8 }9 C
X11:=(C+L+H)/3;
7 B8 b$ n) f4 K  {- f3 \6 oDDD:=TOTALCAPITAL;$ Z5 v, m. E* q
SSS:=FINANCE(7);! L: F' W$ F$ `
GGG:=FINANCE(33);
9 r% a5 e, F. B9 zTH:=DYNAINFO(39);5 K5 H+ G3 a" @6 L: L: ]
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);2 m( b) t( F  M# }% q
LC:=REF(CLOSE,1);* N2 h- Z. `* b6 g& i+ A" I  c
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);, P. v5 ~7 m' ?+ M0 N2 g
FF:=EMA(CLOSE,3);
* M' |2 `$ q4 i9 QMA15:=EMA(CLOSE,21);4 Y/ r: S& \" L6 e0 z. {7 {
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN;
http://www.simu001.cn/x236456x1x1.html
最好的私募社区 | 第一私募论坛 | http://www.simu001.cn

精彩推荐

回复

使用道具 举报

发表于 2021-5-7 09:03:57 | 显示全部楼层
号称价值百万
回复 支持 反对

使用道具 举报

发表于 2021-5-7 09:04:08 | 显示全部楼层
狼王牛股王源码分享给大家使用!
回复 支持 反对

使用道具 举报

发表于 2021-5-7 09:05:01 | 显示全部楼层
回复 支持 反对

使用道具 举报

发表于 2021-5-7 09:05:59 | 显示全部楼层
回复 支持 反对

使用道具 举报

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

本版积分规则

QQ|手机版|Archiver| ( 桂ICP备12001440号-3 )|网站地图

GMT+8, 2026-3-29 16:05 , Processed in 7.296073 second(s), 32 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表