四目观天下

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

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

[复制链接]
发表于 2021-5-7 09:03:22 | 显示全部楼层 |阅读模式
号称价值百万,狼王牛股王源码分享给大家使用!
) j$ }) Y5 B, v2 I  w; j0 E0 p更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/
. N0 Q& i3 t# h  Z6 ~* x0 O" ?{狼王牛股王}- [  b) Z+ S4 E. X; q- x, s
DRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;# k. g6 i  ?- x- k
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;+ }+ |  p1 \' [: `3 r$ r
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;  ?6 _# O! z- K  E% l
DRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】  ★  龙头战法,涨停战法,主升浪战法!  '),COLORYELLOW;' I/ K0 \* J% `3 ?/ r) e2 B
{======================================================}
+ d% z% {  h& v  g/ g0 F& d高点位:=REFDATE(HHV(H,总涨幅周期),DATE); 7 A9 e# K5 `) m" z+ X; e
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);
/ x. T! u' _' Z5 y6 ^% p% w2 v  G- O低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
$ b% D( t% J+ i1 `( h% W/ S7 I高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
! m+ U8 r) e+ D' |/ u5 y曾最大涨幅:=(高位价-低位价)/低位价*100;* f' U: D8 T1 Q: i
当前涨幅:=(C-低位价)/低位价*100;- F1 ?2 O( c; z9 d# O
ZFA:=CON2STR(CONST(曾最大涨幅),2);
, V  }( a1 l; n5 j- JZFB:=CON2STR(CONST(当前涨幅),2);
" p6 ?! l5 A2 o. x' rZFC:=STRCAT('【曾最大涨幅】:',ZFA);  B) B7 `5 N3 ^1 U* c9 v
ZFD:=STRCAT(ZFC,'﹪');) z* m9 g+ p. K* I6 I: l
ZFE:=STRCAT(ZFD,'【当前总涨幅】:');! ?; q! W  G, L! V
ZFF:=STRCAT(ZFE,ZFB);
; b9 _5 H( X" o/ aZFG:=STRCAT(ZFF,'﹪');) d, y5 t  d* _; U* L: Z0 y
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;9 G1 I7 ~) \* B7 a- \3 n: k
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;% d! v7 a# @: O
+ Z0 ?9 W1 c" ~- U: s! i$ |* k+ f8 z
* i1 }" j2 {+ X7 f) N: _
7 Q1 p7 I  L: X8 u
% @& M2 a3 {3 z! W$ e4 U
MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
( r9 U2 ~  V6 D& x& e" l: ^KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
; @2 @7 Q9 H9 f' \! s: g趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);7 e( a# M( V2 b1 y# e
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;: d/ }3 y- p) h% M
AC:=(EMA(AA,5) );; y6 g9 s4 e+ E5 K; M2 H7 ~
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
2 U# I; _: }7 X. VSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;
4 O! z( e) k' c' ~  \: b$ `STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;" P5 C5 F! S) I7 [7 d; H! R0 Z; K
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;
9 K4 j6 h2 G; A, e# S; K; Q2 hSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;
  x  U7 j2 X  g* f3 R2 PSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
1 Q% T3 \  w0 j+ H( w  F/ n( @AG:=SUM((VOL / FINANCE(7)),1);
8 ?- b4 ~  l8 _/ LSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
; w1 r/ A" p7 X7 J4 j# o* o! cSTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;! I- x% H# r8 {0 p
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;
0 S- V7 h+ Z, c. z3 i- o1 ^STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
( c) [) u: t6 A; }: T" F* @STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;+ X0 H, ]! g1 a% l% P
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;0 k. E2 p) x& I3 ~6 C! J% ]; M
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;
7 A$ J, K0 t1 Y8 u) BSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;4 Q3 S( {+ Z3 H
SSL:=EMA(CLOSE,5);4 Y1 ]' ~4 _1 s/ G8 t! c
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
$ H" |$ |: i( l0 ]7 C8 U, LMM:=(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))))) );
! C) C  S- }0 r9 V, @4 k2 ?SA:=(MM * 0.985);  V5 Q# B9 y% P  s7 w( n
SS:=(MA(CLOSE,5));9 `3 _  u; k3 P$ @
DD:=(MA(CLOSE,13));
+ _3 G3 L: r9 x% ~; }9 I/ YGG:=(MA(CLOSE,21));
9 q) D! W/ {- s常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;* Y, d; ^% M  Y1 I
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;& Y# i/ v* a2 @4 K, `
QLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;6 B5 G+ B; D/ K* r* k
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
9 O0 O" h1 l  ^VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);1 m7 g/ v; I9 _1 g& D$ l/ \9 v7 F
VAR4Y:=REF(CLOSE,1);
! @. n3 F& g3 K7 w0 z$ G1 h6 s' PVAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
- }) x) g- T, m! f" O2 m4 l7 y! AVAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);7 [. w1 R% |; `. R$ K
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
$ L: a* G9 h' zVAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);8 Z) |/ Z$ j: R- E5 P
VAR9Y:=SMA(VAR8Y,3,1);( W5 Q; ~: U4 N. t; I- b# b
VARAY:=SMA(VAR9Y,3,1);
/ r( `7 X6 ?( i# lVARBY:=((3 * VAR9Y) - (2 * VARAY));" q) f" ]& {3 \5 d* w
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));4 c  ~" M/ r" o: T0 G
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));8 r- y7 D$ S1 Q; m( Z
VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);) P" d- s0 Z; {% N5 C; h9 C
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);# {3 Q$ U4 P  b, k
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));( f$ M- P8 y( ]6 g/ w
VAR3C:=EMA(能量线,1);7 K3 K" [, V1 d( O8 l6 ?
VAR4C:=REF(能量线,1);
/ S6 x- U. y( g5 N/ s" F. O2 UX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);* U! O  c3 s. L* h
Y:=EMA(CLOSE,10);
" k, H' E" m! x) @! _LL:=REF(CLOSE,2);
/ i) ?8 g8 [  f% u+ c2 r1 QMM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
, G/ F9 w1 \: P$ _- uDB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);
7 o/ Z( R/ g+ f9 ], R# r' UVAR1:=LLV(LOW,21);, d" ^- o1 F; o/ R) Y) y. X
VAR2:=HHV(HIGH,21);5 s; b) ]3 I" k% o; ?5 {, d5 k6 P
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
% V5 z2 Y( F3 X4 G) w9 W5 `AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);: g4 `; P: |: E2 h3 X8 T- _
DD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);" Z% ]/ Y8 j8 S0 b! {/ q
VAR3:=LLV(LOW,55);/ T  a: U; \" L) {8 F6 _) _
VAR4:=HHV(HIGH,34);
4 W6 G# I. k6 g# G: [$ DVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);( G, \" h3 ^- z. C; x* Q  Q
VAR6:=((AK + VAR5) / 2);
3 F* A* ^# W: D$ e$ p; C3 C3 q' ?VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);& ]2 a/ ?; V' A" L
VAR8:=EMA(VAR6,5);
7 Y; |9 N1 ~: n# d1 A( |BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);7 |* y( C) x) k! @
AB:=CROSS(AK1,AK);
% i/ `, v% f1 ^+ A8 |. R( uBB1:=(CROSS(AK1,BB) AND (BB < 30));, C+ T/ N. G- t: R9 x
CD:=(BB1 * 0.6);
0 j+ C9 f4 j0 p$ F" m: F( rC1:=(CLOSE+LOW+HIGH)/3;
$ y% p* J9 j  J5 Q2 A$ T* C5 p5 dC2:=EMA(C1,6);
3 U6 ^. C6 ]0 U( Q& H0 gC3:=EMA(C2,5);
6 P6 b2 J& H; [2 J) s# XC4:=CROSS(C2,C3);. L9 Z/ v7 K2 ~7 m
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
- \5 e; E- J; D: \6 y& v, }$ xK:=SMA(RSV,3,1); ) v$ X; N4 Z. X# @7 x  ^( C4 F0 }
D:=SMA(K,3,1); ; f2 I, v0 q5 @- m4 u6 U
J:=3*K-2*D; - q- \' `3 @. m' y
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
' B7 l4 w; g- m/ i3 OK24:=SMA(RSV24,3,1); 4 |, u: E) ]: j$ a
D24:=SMA(K24,3,1);
# c; @" \- k) V4 x4 O2 m! @J24:=3*K24-2*D24; 6 G+ Z9 u- e% }) h
# X% v' G  A8 i& r) ]

1 N/ V! y, _: U& X0 j; j# Y% Y9 i5 y# N; d% q. k
$ H+ _. N- ?' r9 A+ F
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
5 K5 C- B- Q) ~$ c, qSTICKLINE(涨停,O,C,2,0),COLORRED;, f- s* k8 S  {; v" L& x. N
ZDF:=(C-REF(C,1))/REF(C,1)*100;, }8 L& S# L8 l2 S+ G$ q0 p
STICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;
( J6 d# _2 @1 a! f/ Y& c( k
! H7 m$ {& _$ V/ c
! N( }7 V/ y8 x/ V  j" K涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
3 C; {0 F7 X  MSTICKLINE(涨停2,O,C,1,0),COLORYELLOW;3 x7 A3 I% m& b1 P7 Q' s5 {; D! }

; d( K& ^( o+ G! ]- r6 }
7 F( n3 V( U. }3 X& x
7 @- n0 [$ n# a8 D
" u" _+ u4 j7 G' s6 \6 p9 c主力做多:EMA(C,12),COLORWHITE;9 d% N; V" x- l9 Y& T
+ i; c0 Y& ]0 Q3 ?' N- }" G! D( Z

+ H; U( {1 a+ q, ^8 q3 X5 z+ U: Z3 N0 ^1 Y

) I, f- z' A$ ?( D/ M+ L8 _分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;3 y3 D6 C) g2 h+ A3 Z
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;
. N+ Q2 X% n4 z3 ^& m5 C: G" M支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;
; c* ^5 B% m; T" F
- Y/ k) D' F/ r4 u( s' G$ ?) K6 t5 V8 o

% r# ?7 J4 W9 P: o/ ^AA01:=EMA(C,18),LINETHICK0;
: Q5 C1 s4 ]3 a3 ~AA05:=EMA(C,5),LINETHICK0,COLOR0099CC;' h/ f$ O# c# y- m. K- X" W, b- b
五日乖离率:=(C-AA05)/AA05*100;
5 w; K- i( [) x* MBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;1 p7 K2 y9 r+ X$ V2 ]( p6 w- n9 h8 ?
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
4 b8 ~/ Y+ U% [% n! N" J加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
3 o. c' o/ i- \$ B( O+ DAA10:=EMA(C,10),LINETHICK0;
. `! H2 o! |0 O7 NAA20:=EMA(C,20),LINETHICK0;7 E7 P1 {; u5 \; f: B7 U2 r2 `9 ?  @
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;  U0 Z) G0 U2 p7 c6 Z
AA30:=EMA(C,30),LINETHICK0; 8 E# P3 @1 {6 f1 S6 }) L2 _6 h. F# R
三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
0 E! ], n# k& B, G! p- RVAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
  ]' j  D9 E- S4 b7 F, MVAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
0 U3 A( v, V0 o$ ~" }8 YBB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
; M. J+ z2 e1 {5 k' a, T起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
3 u. y# r& a$ u' `6 s加仓:=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) ;, v) O, g; Q# S  X$ k+ d2 m/ y
清仓:=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 b6 E2 a! r9 Y  m" J1 _
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
0 Z4 |% L$ m7 a( b* w减仓:=FILTER(JC,10);7 J3 Y1 w$ e: i
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;' s+ b9 m( k/ k4 |0 r, T* v0 K  H) H
抄底:=FILTER(MR,10);0 U9 w, a$ {$ M) W% Q8 p' C0 l
DRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;  D" |1 C, g% q" P+ V8 ]
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;% Z$ |$ @! a0 ?; O, I5 l
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;9 N6 B0 f0 m# |2 n& S5 N& V; v
DRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}8 r+ F- t2 l" W  }5 j
DRAWTEXT(起爆点,LOW*0.95,'★  '),COLORYELLOW;( Z0 w# w/ |$ l5 b3 k! ^: g& z$ j

7 T# E  p2 h' G/ y' n1 G# Z$ x- Y6 ]4 \, x. S

2 \- H$ M; [) K4 o( K$ K, \. {+ w, r, F5 D% E8 V" z
AAAA:=CONST(HHV(H,90));
/ G) C5 c3 f6 Z/ b, jR1:=MA(CLOSE,1);
) y) X6 k: h2 |4 dR2:=MA(CLOSE,3);) d/ B# X5 B) C7 c; _) ^
R3:=(MA(R2,1)*1);7 Y+ b" }& U: [, O5 v! h7 p
R4:=(MA(R2,3)*1);8 A9 l/ h* f5 M5 c; `8 D; i
X11:=(C+L+H)/3;
& M$ N4 J5 l4 g0 g5 cDDD:=TOTALCAPITAL;  o1 S; s# F0 W, \
SSS:=FINANCE(7);' l9 i* V4 I# F0 C6 z
GGG:=FINANCE(33);# e6 q' K4 t3 E* \/ w$ k8 R0 A: B2 w( o
TH:=DYNAINFO(39);- M, T1 E, E9 o9 |( b# U
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);4 o" x. e2 V% c! w7 v# P
LC:=REF(CLOSE,1);, ^% Y5 {9 D  k7 o- |; G
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
7 n1 k* y: V4 z% j2 x: Y. dFF:=EMA(CLOSE,3);
- h' ?7 M4 L% Z  w2 t* Z+ f( bMA15:=EMA(CLOSE,21);/ G  Y& E$ m% i% D
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-9-8 07:46 , Processed in 0.440640 second(s), 33 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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