私募

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

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

[复制链接]
发表于 2021-5-7 09:03:22 | 显示全部楼层 |阅读模式
号称价值百万,狼王牛股王源码分享给大家使用!
' x9 D7 X. D5 o7 S% X更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/& q8 O. a. M1 I, V
{狼王牛股王}
" N/ Q# Y4 L$ p6 _, T" HDRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;3 O% K' p( K! @) g8 h/ K
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;3 T8 h7 r8 ^2 P/ B& d& z0 V# e
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;
/ ?  b  o& P6 ?8 L, G' ADRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】  ★  龙头战法,涨停战法,主升浪战法!  '),COLORYELLOW;
/ V2 W4 Y" |1 @/ o{======================================================}' B' \; r3 ^& A5 y+ `) @
高点位:=REFDATE(HHV(H,总涨幅周期),DATE); - `2 n) i* q: X, z6 i4 J9 u; g; L+ P
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);
" \' `  x. v( ^2 y低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
* Y- ]4 {, ?& E/ b0 A( I4 _( L高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
/ N# D3 R$ ]- G0 [. r曾最大涨幅:=(高位价-低位价)/低位价*100;. T. n% \8 C* e$ H( h5 M
当前涨幅:=(C-低位价)/低位价*100;( ~* z: ~3 _) R2 N! B# F- }
ZFA:=CON2STR(CONST(曾最大涨幅),2);- @5 \1 X- U6 Y2 H  H8 r( ^. i( m
ZFB:=CON2STR(CONST(当前涨幅),2);
5 I; B/ [. ?' p2 G7 V) eZFC:=STRCAT('【曾最大涨幅】:',ZFA);/ b1 `. D& q# b" Q# j
ZFD:=STRCAT(ZFC,'﹪');
; s: u5 X8 o# A  N' rZFE:=STRCAT(ZFD,'【当前总涨幅】:');2 G% h, }# w2 u  Z) U7 ~" [! {
ZFF:=STRCAT(ZFE,ZFB);
) Z" D' @5 G5 X6 E  f  X! ^' |6 CZFG:=STRCAT(ZFF,'﹪');7 j) }& L% M, T& u& \
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;+ Z) {4 f  u3 F, a& g3 E
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
* E! v& m9 I/ T: g$ ]+ a5 l( k% i5 t6 W) P' K. L: G7 n) a
7 U- K1 H4 F  g0 [' G; k
" w0 L% g4 J4 F0 P

# K2 t6 i* W8 P( K1 r2 b+ ]MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
5 Q& c. Q! ?8 _KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
+ x# f+ Y0 C7 V# P! @趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
1 O6 t/ @+ b! x& B4 l1 B5 YAA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;
  T0 L! y6 W" ]9 m) zAC:=(EMA(AA,5) );
3 d, @) v' ~9 T8 S: t1 {( N3 _! PSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
+ j, T+ c' B6 U* Q0 d, J) B" W7 dSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;! M: A% @; {+ L) U+ l
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;* @$ G) y$ K4 ?4 }3 ?% T9 p
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;( E- X' m# p1 b' s9 h; E& w7 o8 S6 z
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;. w. a3 k0 V, m; }9 _8 @
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
9 ]& W, {6 o& }& k" }8 YAG:=SUM((VOL / FINANCE(7)),1);, l' f7 X& u# c( }8 w. e4 f7 F5 q
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;( V6 w# K5 h) ~- t' u, D0 E( d, T
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;& e1 W2 {: S2 ]" [! u5 o0 b
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;
, d( I" c+ Q' ^+ B" y: _STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
7 X* M* P) ~5 K7 I& S( B' LSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
7 w' H1 _0 ]8 G; L( @STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;  K" C7 k1 k  l
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;
8 U  `' @- ~: d/ }, }# OSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;
) ]' W7 p9 z" \# a+ |SSL:=EMA(CLOSE,5);
, C5 ]7 Y/ [/ x, p% _7 [; @# WMMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);& m7 ]3 L! S! O1 M; i
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))))) );
8 i9 ^1 R* u' r+ q# q' OSA:=(MM * 0.985);3 E) K; U" K1 a: ?' h/ s
SS:=(MA(CLOSE,5));
# K, v0 v( Y+ n# h6 I2 O1 v% c. cDD:=(MA(CLOSE,13));1 {4 \/ X2 K+ @( P
GG:=(MA(CLOSE,21));/ h7 C+ R/ X. C& B% [& w  r
常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;5 J8 P3 a9 y4 c+ p
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;5 F# C" V/ z2 ^/ w. g* p9 A8 W9 r
QLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;
: b! U! W: W$ l0 \! i" EVAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);( w' s% d5 Y* z% ^/ \
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
: D2 z* ?8 N" @0 H8 [' CVAR4Y:=REF(CLOSE,1);' c* p, I; n) p' d5 I4 M4 \
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);  n5 Z3 l9 a7 O, w/ `) N
VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);
- G: T& x* L9 Z! f; Q- ZVAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
5 @; h8 m, x4 J* j  v5 ~VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);
1 @+ c8 n) v5 x8 U& T( d* D" nVAR9Y:=SMA(VAR8Y,3,1);5 ]. E5 A6 m' M/ }) S
VARAY:=SMA(VAR9Y,3,1);
/ h$ m5 n8 _" A6 z8 d7 \VARBY:=((3 * VAR9Y) - (2 * VARAY));
  P7 u- G7 Q. M% D# KVARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));# M, }8 i( v5 ?% S3 Z
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
. Q  e' B0 D  u8 ]VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);: r% c( I' w) a2 A- C: l, }
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);: {- i* l4 C0 f) F
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));
% f( f$ @2 o7 R! DVAR3C:=EMA(能量线,1);
6 x5 Q, L' {& g3 J9 ~& A- E  QVAR4C:=REF(能量线,1);
, _4 I" G8 \$ h1 y! e# G9 g- gX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);0 H9 ]2 |. L9 j$ E2 g/ M
Y:=EMA(CLOSE,10);/ j9 e  x) h/ B( _" t* d% {
LL:=REF(CLOSE,2);
2 z1 ^+ h% d# O8 V7 RMM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);% S; O8 r$ z! v  x- \4 s
DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);8 j9 Y9 n& H% z) G/ ?5 j
VAR1:=LLV(LOW,21);. I) i/ h% |, b* }. ]* S# J
VAR2:=HHV(HIGH,21);
" N& g. G: x3 H7 {& f2 KAK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);7 E: |/ |( D3 x6 N! H
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);+ {8 A& T8 ]3 F- w
DD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);" E( V4 b: `2 F4 Z/ H9 m
VAR3:=LLV(LOW,55);/ W2 M0 C) V; W; ~1 O! n
VAR4:=HHV(HIGH,34);
" p; k( @. B2 BVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);9 P6 Z3 n+ r- n. m3 \  Y! ^- Y( s- I' v
VAR6:=((AK + VAR5) / 2);( D" m% m- E" X1 |
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);) j2 N% ?: t  z% y
VAR8:=EMA(VAR6,5);% l- p) C) P% T# L; Z
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);( X% H1 S0 Z" c9 x
AB:=CROSS(AK1,AK);
* n$ ~# v5 `  O6 c; fBB1:=(CROSS(AK1,BB) AND (BB < 30));
$ `. V6 @$ k% R, @; T0 oCD:=(BB1 * 0.6);
$ d' x8 ~- B8 j  t0 K( L0 m: m4 A$ @C1:=(CLOSE+LOW+HIGH)/3;
$ k, F; s$ [$ |0 W( mC2:=EMA(C1,6);
' [: ]/ d; _+ o1 S( q5 HC3:=EMA(C2,5);  y/ ~- ~. ]8 F2 X2 E" n
C4:=CROSS(C2,C3);
+ S: z1 V7 W* u9 ~% nRSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;& Y( C! J& |/ }8 a
K:=SMA(RSV,3,1); 9 u3 C3 B- h  j+ L& h
D:=SMA(K,3,1); ( _* J; O. H" F- d! W* d
J:=3*K-2*D;
, f$ e5 b) R: m# i  m5 XRSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
, a& Y& q" J7 {) P$ M$ C' ?K24:=SMA(RSV24,3,1); 8 ?2 H7 L- S7 ~$ l" ]
D24:=SMA(K24,3,1);
! ?/ d: t  m% G4 N( }9 F- t/ `J24:=3*K24-2*D24;
+ l) u' }4 b' n6 _  y2 Q9 l  Z. _% ^: p8 ~, ]

4 _( p/ x! x4 N4 H
+ y* r# y6 D% L0 C6 y
5 w% q( s+ G9 T7 L7 Y涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);- y. L3 Q) |( I6 m4 P" h8 @
STICKLINE(涨停,O,C,2,0),COLORRED;
: Y; m% Z. b) PZDF:=(C-REF(C,1))/REF(C,1)*100;
* @+ F. E( y5 E/ {8 c) _STICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;/ q' ^2 }' `5 Z& U6 E
2 Y4 n+ s$ s9 ~! w$ {- k

" C" O, n! U$ ?$ c) w6 T( r0 B( b" x涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);% ]+ a9 y) x: T9 F# [: r
STICKLINE(涨停2,O,C,1,0),COLORYELLOW;7 _9 e5 \# o5 r: H
" N# z* h- D% R  y% u
! {* E5 T# T3 M1 t$ N& [

  B5 v/ G: G) e( p
8 C& S! {& _! ]: V$ v- [' H2 E主力做多:EMA(C,12),COLORWHITE;. y. H7 f! r) J$ L: a: X, ^9 h4 G

+ _- l  I' X( X( i* C! c
$ ~: ^1 k+ E% P! T/ G! s* a0 ^
2 u2 ^7 M! y- w) O  M
' j0 f  J5 M) e5 ~3 }5 Z1 ^1 Z: G分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;2 M, }* K/ _: ~1 B1 Z  ]9 g$ ~' v
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;% g1 \% S' I' M) P& k2 O
支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;
6 n; G8 o1 o& W7 S' x4 F
4 K$ |3 x3 S: Z; N4 E$ T( j
) C: W3 L, c# W& I+ T) z/ i3 {# M$ k- L
AA01:=EMA(C,18),LINETHICK0;
$ S  R5 i$ T) ?! w0 C* e: {! IAA05:=EMA(C,5),LINETHICK0,COLOR0099CC;' X" U- v0 N( ]. z+ d
五日乖离率:=(C-AA05)/AA05*100;
, d2 o5 Z$ U/ c5 A) cBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;  P& I  R, a) T* K1 S' ?
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);/ N; W: d: A2 T* h& H
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
8 ?: g8 T' R, z. O9 iAA10:=EMA(C,10),LINETHICK0;) r! U: {7 r5 S
AA20:=EMA(C,20),LINETHICK0;( H# p$ c: o: l
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
, {; f) S2 n- M9 w  F* \AA30:=EMA(C,30),LINETHICK0;
# T5 r' z4 W. F2 c5 c三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
9 ?: y$ R5 F1 o8 r9 Q4 m# h1 DVAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);" }. P0 T4 q2 [! E2 K' p4 v
VAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
5 ]2 D  l- m4 A0 I1 i0 k( b: {BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
" N7 @$ j3 y8 ^8 g起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);1 ~$ Q6 R: Q) q8 o$ J9 v0 ~
加仓:=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) ;
, V8 V! ?7 e! Q- o; {5 c8 n清仓:=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);$ H% ~$ b1 I4 T& `& j
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;' X, ?6 s* T5 R: z" h0 a
减仓:=FILTER(JC,10);3 e) E+ p. W0 M8 {2 c
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;
  r% U' C' a1 n# [& a抄底:=FILTER(MR,10);8 [" q' X: d5 p
DRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;
5 z! ^. e+ I( T8 _) v" T' a0 kDRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;/ }" i4 o8 x& C
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;) e+ ?2 [7 J7 Z3 j6 Q/ X
DRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}' H/ J2 E% E! n/ p
DRAWTEXT(起爆点,LOW*0.95,'★  '),COLORYELLOW;# s: C$ l7 ^5 L  L2 S) }* [
  c" ~+ O! s; M. d+ n/ M

( O8 R  j2 y& v7 ?9 {% n
8 v/ D$ o2 |9 p9 e3 w
9 r; \! `3 K3 BAAAA:=CONST(HHV(H,90));3 J! S0 X& q: l, V6 ~8 D
R1:=MA(CLOSE,1);
0 h; v& P4 U8 o9 }R2:=MA(CLOSE,3);& j2 b$ {" W; ^% l# ?, M
R3:=(MA(R2,1)*1);- U$ |) N  S3 I$ D/ B, _" U" i* E
R4:=(MA(R2,3)*1);
+ U* K4 t! R4 ~! W2 L  sX11:=(C+L+H)/3;9 y. k/ o" L" b7 E" t( N* B
DDD:=TOTALCAPITAL;
" H* n# U* C( g, WSSS:=FINANCE(7);
, H) D5 U( [: E% MGGG:=FINANCE(33);
% a( J# z" j0 m6 L2 J* bTH:=DYNAINFO(39);
  I: r* v& t7 R- U7 Q# _3 Z6 H% fA51:=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);
- Q+ K, c* s9 X) ]# y$ G) C/ qLC:=REF(CLOSE,1);
9 X/ n8 |4 D8 u3 gRSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);, c) Z) C6 n7 ]! _) q
FF:=EMA(CLOSE,3);3 c+ ]! q1 v0 E! l7 u+ m: v
MA15:=EMA(CLOSE,21);( j+ t% W# d4 ?: _
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, 2025-12-23 18:12 , Processed in 2.566101 second(s), 33 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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