四目观天下

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

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

[复制链接]
发表于 2021-5-7 09:03:22 | 显示全部楼层 |阅读模式
号称价值百万,狼王牛股王源码分享给大家使用!
" j- L5 T; m- R- s% L5 ~更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/8 v/ |8 c# ~' j2 b
{狼王牛股王}
5 p* j  Z6 I5 x. Q/ G* PDRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;
. N5 r8 y& T3 S) TDRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;. O' p, }$ J0 U! f* l( t6 a
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;
+ \8 z3 d: r7 M/ c4 @# xDRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】  ★  龙头战法,涨停战法,主升浪战法!  '),COLORYELLOW;# Q$ G& Y# \) g8 E, v
{======================================================}' E4 _, _; v: k$ @  d6 h
高点位:=REFDATE(HHV(H,总涨幅周期),DATE); 9 h3 q7 Q: `0 S% u
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);. }" L) \3 I4 j0 B; `
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
( f- P- l# ~9 }/ c* A4 a7 H高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
+ E2 a9 D) d  d& r+ E曾最大涨幅:=(高位价-低位价)/低位价*100;) ?  ^: l, h/ ^4 h$ a1 J7 @
当前涨幅:=(C-低位价)/低位价*100;! Z* N& S% f  i! f
ZFA:=CON2STR(CONST(曾最大涨幅),2);5 P% d& s7 L' e* n& M
ZFB:=CON2STR(CONST(当前涨幅),2);0 W& f/ ]8 @0 s& g* m4 A2 s2 S* M
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);% S- Q! j2 w! q  E
ZFD:=STRCAT(ZFC,'﹪');
# L# b* k' c; Q( p2 c/ TZFE:=STRCAT(ZFD,'【当前总涨幅】:');
9 l5 q. y" i( T: F7 g9 M5 s/ CZFF:=STRCAT(ZFE,ZFB);, @6 Z5 O8 ^8 [9 E1 [( C% B: s
ZFG:=STRCAT(ZFF,'﹪');
. g3 i; x9 E3 N5 n! s  pDRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;7 z/ a+ e8 f, _- f) g( V9 Q
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
1 l) W/ q+ t/ A5 j
. `) L4 I! ~- ?8 J+ \8 m" |" i" k# h, T# P6 Y  q
" s4 @5 A; G, k4 R5 E) R

2 O  j7 c4 W$ H* A; |* ^6 mMA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;. y( ?5 |  s: o  u+ k
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
# P, p* v  I. i5 r) ~& U( G趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);/ ?" Y! j+ _8 P, z; I6 \$ i: c' i
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;7 ?  b+ N: n$ P6 E/ s1 j
AC:=(EMA(AA,5) );
6 g/ x0 Y. b8 P/ t/ a8 }STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;' g/ H) }/ i( ], a9 `# h
STICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;
  t, D! Y) s. Z. ?% H* RSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;
' e5 }. @5 u2 }STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;# A2 R0 e3 o* h$ R8 m) A
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;
. d( P$ j/ l$ X/ sSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
0 w5 G. a+ Q9 _$ P! Q+ PAG:=SUM((VOL / FINANCE(7)),1);* D  e8 \3 q4 V4 c: F3 p. |
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;/ Z6 u0 e! m1 l% g4 F0 p
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
, H, n  {  W2 a/ ^$ I0 sSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;  F8 i3 b& l6 [
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
$ d+ g+ L( c/ J+ fSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
' B2 G' U$ ]: x, z- FSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;& e* i* ~3 O) Y7 X# S4 S& ]  M, d3 ]
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;
0 V1 X- s0 V+ c2 C) b3 xSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;$ W6 g' {$ N" a0 s$ Z4 w2 _6 e! s# x
SSL:=EMA(CLOSE,5);
; ?  l" ]; F' J7 Y) P' E7 @0 W& ?MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);' f: b, Q. c7 g6 B. q4 X
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))))) );
( f9 l9 E% s& U' O8 p: y: ?/ ^, iSA:=(MM * 0.985);/ Y* Y8 C+ |4 Q; C- E
SS:=(MA(CLOSE,5));4 ]% T0 o8 P/ y: B7 d
DD:=(MA(CLOSE,13));- U- K% a1 v: k( j2 Q, b
GG:=(MA(CLOSE,21));, l& ]: n6 U- U6 R
常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;3 t0 _& `9 s$ o4 C! ^: P% M
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;
' B' p5 q8 {- ]4 P6 P7 ?; w1 S1 jQLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;9 S# a8 |2 [  I- k$ g. s
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
. I; L. A) F& C, j( zVAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
6 h$ G7 c- z7 ^. V& J' DVAR4Y:=REF(CLOSE,1);% Z# T5 x, D/ C/ `, c( d
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
  n! K; A9 i  O9 \  ]VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);8 `. B3 p- s- q2 x: _# j3 Y
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
& V2 T* @% d* ~6 D# Z8 e( @VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);7 Q  ?0 e! J/ N
VAR9Y:=SMA(VAR8Y,3,1);
/ ^% U; H$ b& }4 @6 B- OVARAY:=SMA(VAR9Y,3,1);
6 ]4 |  r9 n4 L; f( vVARBY:=((3 * VAR9Y) - (2 * VARAY));% X& \' ~+ U2 x- ?' g
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));; h. g4 u7 Y/ P0 r( s$ j
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
' {3 w# T: F0 p8 g4 Q  NVAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);
$ B! X6 c( `6 b& A# f4 QVARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);% F4 l- t* @6 q) d6 ?  S$ S+ @- l
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));
8 n" E, p. M# X" KVAR3C:=EMA(能量线,1);
4 U2 J: @; d& a" W+ OVAR4C:=REF(能量线,1);) w& y6 h( N) Y, F
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
4 E% U9 i/ m2 OY:=EMA(CLOSE,10);2 ?" T8 G1 }/ P" z
LL:=REF(CLOSE,2);& n, ?4 `' z) ~+ O  l) F+ L, x: C
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);4 G$ H. U. K1 p/ E2 ~+ n
DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);/ F2 ~" p( u# J9 N* \
VAR1:=LLV(LOW,21);9 _8 i7 I! o9 a' l0 W, D# ~
VAR2:=HHV(HIGH,21);
/ O: L$ [2 m' _5 k$ c2 D/ IAK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
! U5 H' f6 P' k+ gAK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
9 R) u: E! Z: C# S2 l6 FDD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);2 d5 @  }8 z% J$ |1 I9 N
VAR3:=LLV(LOW,55);
, B6 F6 F0 x( hVAR4:=HHV(HIGH,34);
# V: K. b# }  c8 X  k* ?) l4 BVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);: g9 {, ^$ Y6 a& y" F
VAR6:=((AK + VAR5) / 2);
% ]' h* R) L& ^VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
6 e# c8 X. C- U1 ~; s( `VAR8:=EMA(VAR6,5);
9 ~$ U8 [4 x) x, j& aBB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);" r( M- P; I8 v/ e
AB:=CROSS(AK1,AK);% }, _! R# Z' z
BB1:=(CROSS(AK1,BB) AND (BB < 30));
7 v: y: z" b! Y3 `CD:=(BB1 * 0.6);- Q) @* O' k+ D9 j
C1:=(CLOSE+LOW+HIGH)/3;
' ]. |' i( ]# e) @3 p2 SC2:=EMA(C1,6);
& C3 o) v, I1 g/ Q3 T6 {C3:=EMA(C2,5);
7 Q# c% T7 Y) C' t" [C4:=CROSS(C2,C3);0 f7 @) U4 ?" s8 Z
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;1 f$ J3 t' w2 K
K:=SMA(RSV,3,1); % v$ q& S5 s8 B/ X7 Q
D:=SMA(K,3,1); 6 t: q+ v, W0 H! u3 V
J:=3*K-2*D; . K( M% @' ^" t2 n& Y
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
+ w# ^# D+ \- B8 Q5 wK24:=SMA(RSV24,3,1);
# `+ r) f% q" y  S2 }D24:=SMA(K24,3,1);
5 z# F: w( @/ y* L6 OJ24:=3*K24-2*D24;
( N9 R+ `' H7 {  i1 e/ U2 ]& }* U2 K" Y( |5 @
- x& ^$ U3 o+ i3 D: _

0 j6 a  N0 [( [9 {% h( y! Q, b5 O1 a0 _9 c
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
3 a5 o2 ]6 X, z; I0 o% x1 YSTICKLINE(涨停,O,C,2,0),COLORRED;7 U8 j! P4 D+ y' `) q! ]
ZDF:=(C-REF(C,1))/REF(C,1)*100;3 P! v3 v$ H; g/ n
STICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;
) m4 Z* @+ c. D7 _! \0 I: C( s1 K: D& n) W+ E/ I
# I5 p& _4 a/ \' N9 K
涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
7 K/ V* h# s. M9 C$ V/ I! RSTICKLINE(涨停2,O,C,1,0),COLORYELLOW;
+ ?# r' B, X6 K7 W- p) q
- s$ Z- j( {  y( Y: G6 U# m. P/ z, s! V$ S

1 U6 M- M3 \$ b% c, |% q
/ U1 M5 ?5 ~; J' z" Z主力做多:EMA(C,12),COLORWHITE;/ j3 g% b; U3 _& M" s2 @7 N; I1 n9 ?
+ v+ p1 N0 s0 K

% V( F) z0 F6 D; j$ Q( \
+ X6 `  A: c9 Q9 {& k: t1 }+ F$ x3 D. d7 J) _: d- C
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;
5 F/ O/ a/ y0 e7 i压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;* {7 K6 ^. j& ~# w/ P, r8 l% n
支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;1 w/ A2 [. f  g3 \
$ U; u" [' C) u% P

- O' r# H- c& H7 v9 C2 {% P6 n* f5 O0 }/ X/ w. i
AA01:=EMA(C,18),LINETHICK0;
- ~1 e( @# Z5 G! A: I1 J7 }0 v% IAA05:=EMA(C,5),LINETHICK0,COLOR0099CC;
% s! B3 a! j2 U& d五日乖离率:=(C-AA05)/AA05*100;
% P; [* \, [: C' L" M$ E/ {4 NBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;' ^' K" g  `# _- i3 s  n. Q. Y
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);6 z1 k! [7 f  K
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;7 n/ x9 C7 }5 q: t
AA10:=EMA(C,10),LINETHICK0;) G% c# a& i7 ?5 ?( d0 [) w
AA20:=EMA(C,20),LINETHICK0;
  S9 }' {! Q! E8 ^, r; N/ u. g. j) ABB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;" R& v* B, o5 z, {
AA30:=EMA(C,30),LINETHICK0;
& n% `+ d, Z4 M  a三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
/ d# e- g' W+ M1 ^+ k' D  sVAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
0 g% ]' [$ s9 _VAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);1 b" P: H# Y, n7 c0 {8 m  D+ O1 a$ h5 C
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
4 g' h" N1 x( ]8 {6 H5 \起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
1 D/ C' u9 E; o" x4 R加仓:=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) ;
+ i& w, k3 X% s8 M8 J  N! @5 M清仓:=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 B  n6 l* x9 u2 k2 }' e8 x! B
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
' _9 p& M  i: P1 a5 j" h9 t7 j减仓:=FILTER(JC,10);0 j/ k$ c' ?* d% ]
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;. E6 g, D* x' ]# o" L& Q3 ^- _
抄底:=FILTER(MR,10);; E1 C: ^. Y* a% u& G, N
DRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;9 G, k+ Q# n, _9 ?1 k* C2 D, H
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;: d. }! _4 C, ?+ d; r; J9 C7 [; q
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;! K: a5 E% Y; I. x8 B1 K' z
DRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}
, l( t! f% Q! K( G' C& M" c& \" m9 m3 qDRAWTEXT(起爆点,LOW*0.95,'★  '),COLORYELLOW;) e6 S8 J3 g& ~: U
, S& w( F) n! }" b$ d9 q- B! o$ Y
  o5 d3 ]; {7 L+ u

8 {7 l* x2 X5 ?+ }2 K1 {
  a4 u( Z" k- s% X# P' l# V2 h' JAAAA:=CONST(HHV(H,90));/ s, D0 l: S: f4 ^+ A: W) G4 g
R1:=MA(CLOSE,1);6 V2 h  @% K5 ~5 l5 e& ^0 u( a
R2:=MA(CLOSE,3);
7 G  w) x7 f5 e8 k3 t: `5 MR3:=(MA(R2,1)*1);
  m6 @3 Y% m" ^! xR4:=(MA(R2,3)*1);5 o) J/ J, @3 m
X11:=(C+L+H)/3;
5 h) y7 I, R9 P, A/ J/ DDDD:=TOTALCAPITAL;- F8 g" X; T# L$ O- O' H! w! r
SSS:=FINANCE(7);
& |3 e0 b! T; ZGGG:=FINANCE(33);# y. t( @( T1 z
TH:=DYNAINFO(39);
6 D/ ~1 E' c7 F$ J7 o+ hA51:=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);
* X) G/ {8 `% G$ ^* l; w  bLC:=REF(CLOSE,1);! }# Q, M) L, e2 {  a! l
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
9 Q7 q; ^3 O3 b. N4 bFF:=EMA(CLOSE,3);
& r2 p, U" ^, qMA15:=EMA(CLOSE,21);
0 ]5 N: K* c7 A  U& GDRAWTEXT(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-7-12 02:37 , Processed in 1.259688 second(s), 33 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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