私募

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

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

[复制链接]
发表于 2021-5-7 09:03:22 | 显示全部楼层 |阅读模式
号称价值百万,狼王牛股王源码分享给大家使用!
, d' \, Y# A& E. f( d更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/
0 N% d. J2 T! Y; L, F; c{狼王牛股王}% {* w$ t# e3 w5 ^! Q+ t
DRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;  c+ I8 A( P, C/ E
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;* P2 Z% |& D4 E6 R" h% H
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;
5 D# w0 _, K6 u1 sDRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】  ★  龙头战法,涨停战法,主升浪战法!  '),COLORYELLOW;
8 S8 v- C  q4 Y" d( x/ C{======================================================}$ l2 f* G2 g9 G7 V$ Y
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
9 h9 q0 `- B8 D# s低点位:=REFDATE(LLV(L,总涨幅周期),DATE);/ M9 p- m0 k9 X
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
+ O7 X$ l2 f0 _* Z. J高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
* ]7 T" l7 L; F" f) y曾最大涨幅:=(高位价-低位价)/低位价*100;
- O- ]/ \2 e) F  F: |当前涨幅:=(C-低位价)/低位价*100;5 b; K$ W* h& K( A& m
ZFA:=CON2STR(CONST(曾最大涨幅),2);
/ ?9 \( r8 q, |4 r* M$ V4 yZFB:=CON2STR(CONST(当前涨幅),2);& v" m9 c8 M0 @3 j$ A- V
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);
7 E  {9 x3 G' r7 s( MZFD:=STRCAT(ZFC,'﹪');
% q7 y8 C; ?2 P( o+ _5 U3 H0 E! [, `ZFE:=STRCAT(ZFD,'【当前总涨幅】:');: C9 {. r2 w8 M, ?8 z8 n, d+ G
ZFF:=STRCAT(ZFE,ZFB);, D4 T# J/ e. a  h6 G) }- `7 l% b# c+ U
ZFG:=STRCAT(ZFF,'﹪');5 y  t! h) K, B  j8 }9 A8 p
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;8 }5 F" T4 C# \3 g5 p( [* `# w( t2 h
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
1 w' M4 T8 R+ G) x2 Z& W
6 f0 I  |0 i+ b
  N4 N9 E  `# r# K1 \& G1 O6 V- i' l
7 N6 l, f2 c: b3 e- i
MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;0 b7 t0 b# ~9 B4 K! U
KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));) X+ [+ Q  `$ L0 t
趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);7 p0 r1 m% `; _% s
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;) \4 P% s. m: a& p. K1 e
AC:=(EMA(AA,5) );0 E5 o7 O1 A9 }7 ?) g" Q$ l/ r, I  h
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
" J/ K, P3 a& o0 }; p1 m" uSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;1 G. [: i; W( n
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;1 u. C) K7 z: M5 q
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;0 s5 g& l; }. }; y7 O1 g
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;
& ?( j+ g, i& I6 v5 sSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;% Q# {+ `( y1 ?( a" {* y1 s
AG:=SUM((VOL / FINANCE(7)),1);
- E/ F8 }. W( Q" w$ F% aSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
$ j0 V6 H3 C3 B" H( E) ], cSTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
: k$ G$ i6 |2 E0 SSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;% r7 M/ h' }( \. ^
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
5 _7 a9 L+ `( ^2 I" S- z- iSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
& n, j" x9 q* wSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;
8 B4 W7 l$ J8 S9 n: D- h$ CSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;, @0 u. c( h6 @4 A9 f! C9 o8 R9 o. B
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;& K. Q7 s; l# X# ?
SSL:=EMA(CLOSE,5);
2 A' l# m3 z& A2 j+ Y, sMMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
3 I5 g4 G7 i% W7 F  n4 ^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))))) );/ d* K( G( [* ^  A( G2 c( z
SA:=(MM * 0.985);; r% Y: m9 y2 U9 V: |9 b( y9 b2 Y
SS:=(MA(CLOSE,5));
2 J* w, H. R0 e% y( }* E" k4 t8 d2 nDD:=(MA(CLOSE,13));
. R" R9 n4 m2 RGG:=(MA(CLOSE,21));$ [# s& y8 U' q' ^/ {  _
常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;* _0 M8 |% ^1 V+ b) R) ~
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;
# C3 Q/ v) n# HQLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;
/ d5 V4 e/ c2 @4 d/ E8 qVAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);* \$ `' c$ q9 }1 }  L% m
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
# G9 `3 I7 Y% _2 rVAR4Y:=REF(CLOSE,1);& c: ?8 s- [, l9 X! X
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
/ V' B) P2 G; gVAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);( Y2 u' Q0 z, O, C6 |
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);4 U: C9 E) b1 k; U' E* @; x5 B
VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);4 e9 H' K4 U. x' x% u  C% y9 E1 ~
VAR9Y:=SMA(VAR8Y,3,1);  e) s8 [! J. T' z+ C
VARAY:=SMA(VAR9Y,3,1);
  [0 D  v/ f. K8 C7 IVARBY:=((3 * VAR9Y) - (2 * VARAY));, k" C# z5 K* [. L. w3 I
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));6 A* M! j/ H! {, F: S
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
% M  c  _6 O! p4 ]5 V% @VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);  f4 j* s- x) d& F3 w7 o3 U
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);, B  ^# {, K1 P; f0 T" V: I
能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));" _9 n0 u" C. v3 x
VAR3C:=EMA(能量线,1);9 _7 K( K0 G- V+ Y" w1 E9 d2 d6 p2 G
VAR4C:=REF(能量线,1);
5 I; L9 X" ^3 d' A; c. L" rX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);" o4 D: V/ A: v( u" I+ z, N% m
Y:=EMA(CLOSE,10);
5 W: d0 x8 Z! f6 Z& q4 KLL:=REF(CLOSE,2);& f6 q0 e  V4 J4 ]! _0 y: t
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);2 h  ~% J. C3 e/ j3 t
DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);8 P% B8 ^6 o( ]3 _7 L
VAR1:=LLV(LOW,21);3 P" C2 n6 {4 H9 Y4 {# C) Y  l
VAR2:=HHV(HIGH,21);
% y, H7 ~# Y% t7 ?" P3 M/ F7 O# i8 T% WAK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);6 V: D: P) h/ x& o( C
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);8 q" v4 h4 f5 }
DD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);) j. D2 s# i  w, ~( f, g
VAR3:=LLV(LOW,55);1 S# Q4 \3 ~% m9 A! l5 \
VAR4:=HHV(HIGH,34);
& s6 u# e- f, e" r1 ?9 M- f5 iVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
0 k6 L' U- W6 T- F: f' OVAR6:=((AK + VAR5) / 2);
4 h! ~( _% n3 jVAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
  k1 ]& g/ v! r. h8 U. |* t2 g. I1 TVAR8:=EMA(VAR6,5);
# I! d/ }* j1 z5 D; ?; P8 yBB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);- z( N" @" G  ~! U
AB:=CROSS(AK1,AK);- a( e3 p) U$ Y- F8 h
BB1:=(CROSS(AK1,BB) AND (BB < 30));
& P1 |  @% T+ B9 B: S- OCD:=(BB1 * 0.6);
: q  a! h1 R8 K+ p0 ?C1:=(CLOSE+LOW+HIGH)/3;
# B8 R8 a+ E3 I+ mC2:=EMA(C1,6);
3 y  x% ]1 D* \. [C3:=EMA(C2,5);
$ H' X! ~0 k; g4 }' X' t) ]2 D; sC4:=CROSS(C2,C3);
5 t; C. U$ r6 G" o7 d8 j: r" f+ XRSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
; R+ X1 w6 T8 r$ S, lK:=SMA(RSV,3,1);
( ~9 G& @" a! s3 w) ID:=SMA(K,3,1);
5 ~% R; y" v$ g' VJ:=3*K-2*D; 9 ]- C& y" [* N* f, [5 g3 v
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;% m9 |) G7 U( }1 t8 ~# F# z% E
K24:=SMA(RSV24,3,1);
" k) O* ^9 b/ b- E1 vD24:=SMA(K24,3,1);
" z9 {# A3 p* w. SJ24:=3*K24-2*D24; ) |( h, B8 j+ K0 ?, [) I
; Z, g' \' q# j% q/ z0 @7 t9 p

  N' t% A( L2 l5 t& Z/ t; p7 C9 {. U3 g, Z
5 ?( D9 y1 n+ H
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
4 B) s# n" r5 R; a9 v8 {- |& TSTICKLINE(涨停,O,C,2,0),COLORRED;& X) R1 @0 p6 L
ZDF:=(C-REF(C,1))/REF(C,1)*100;
. \  U5 ~" e8 \2 eSTICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;
- F7 I0 k5 E2 R: z& u; q
" Z& `& B  F0 Y. o1 ~" E9 E  n1 ?# w
涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);/ e3 e4 o6 N1 j4 I4 M
STICKLINE(涨停2,O,C,1,0),COLORYELLOW;
: Q! [, B+ h% {6 K2 ?+ x4 V4 O$ ~0 s# N+ Q) z; I: E# [
7 f, m8 f& D% [' P

* D& {8 r- f- n: _  ^8 l8 d" O' I0 {
主力做多:EMA(C,12),COLORWHITE;
$ b  z+ o" T9 I9 |% L# j3 ?# Z' {0 Y: f9 s6 ^6 }3 y  M' t! g

% b0 }2 T! l- ~6 I+ v$ s# x
  L: t) W# ~5 c0 X+ ~' `" _9 N* B2 ], f$ T5 h, i# g
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;; z) ]; U* T% j- I
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;
) O# W  t* u4 S: }: r( s2 D支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;' D8 g& a2 ]" n5 v
. O- }3 G7 D1 q4 m3 f# i! `* q
3 h% `! f* G' l
/ n& `( B0 O6 f% T$ X5 d' N: ^
AA01:=EMA(C,18),LINETHICK0;
1 ]# z$ n' X) _, ^& a- ]AA05:=EMA(C,5),LINETHICK0,COLOR0099CC;1 ^, |. {' f$ v
五日乖离率:=(C-AA05)/AA05*100;
9 ]$ z3 F2 M* e" d  IBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;0 U# F3 h6 {6 ?8 @0 U2 g
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);+ u4 c* |- t1 R" J' @
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;9 ~! J& S8 Z4 C9 |& v5 y% w, W
AA10:=EMA(C,10),LINETHICK0;
5 W1 ~+ K# V3 B) g( o& D, ^AA20:=EMA(C,20),LINETHICK0;  @! c' w6 ~/ [+ i  X
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;% Z# U5 W  b# U8 e4 g4 ~: f$ [
AA30:=EMA(C,30),LINETHICK0; , f+ V( C6 z1 `% W
三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
! k& K2 C* C% U3 e1 K2 h. vVAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
, X0 r. U0 O6 G0 O8 c# OVAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);+ J: F) N$ s( }# ~* ?7 [0 x- e
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;0 n9 J' e% N3 f) H2 \! j
起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);! U0 ]: _7 A+ A3 E* ~9 d. L4 e1 m& X
加仓:=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) ;
( M. x, S/ c3 K; t, \5 T清仓:=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);$ u% e; z+ d+ q5 _
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
% O  u7 a' W" b1 }( ]减仓:=FILTER(JC,10);) B3 z+ l. ~" G0 v
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;
; B5 C9 i/ |' a: _5 W/ X/ H抄底:=FILTER(MR,10);
7 q4 B* n; R! l$ a" K; C: \0 eDRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;  _% N! {& F: R9 b+ ?- V. j; ~
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;
$ I- h7 r4 o, y* H7 j{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;  X$ c+ R- M) c$ O
DRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}4 i( E' S% d' D2 s# u* O, P  a
DRAWTEXT(起爆点,LOW*0.95,'★  '),COLORYELLOW;
( V6 T+ L0 y, [; A. [& |. M* T' r  W( U  w) p0 @' g0 D* M( s

: L5 r9 }, C+ z. |  r4 ]
' _& ~: G7 h! y
9 c4 W$ A3 C! z! L" k2 L- IAAAA:=CONST(HHV(H,90));
) ~0 i( Z8 l* a& u' s) W6 j- N- J; xR1:=MA(CLOSE,1);: B) G$ A' [" F7 D& d$ q6 X5 w
R2:=MA(CLOSE,3);
% ~# ^, s9 e; _8 PR3:=(MA(R2,1)*1);6 J" i. m" D! |% o+ A: R) m
R4:=(MA(R2,3)*1);
; R9 G* E& G' O  v- q6 EX11:=(C+L+H)/3;
4 J5 M% ^: ]: _4 ^& I, y( P& i' y( n5 {DDD:=TOTALCAPITAL;" X3 ]& C4 V! r) T( [
SSS:=FINANCE(7);
% S  X& I5 v/ zGGG:=FINANCE(33);% g4 n1 f; m2 a: H# X# A9 p
TH:=DYNAINFO(39);
4 S3 \& q+ Z: v, D# VA51:=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);
! @; U) l5 W% z9 DLC:=REF(CLOSE,1);
$ ]) r0 V+ J5 H6 \RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);% E9 M) U! S! v3 B/ x
FF:=EMA(CLOSE,3);
" U3 G: h& Y- }- L, i: k2 Q4 cMA15:=EMA(CLOSE,21);& y6 \: Z- t8 H8 t+ k0 R1 {# Z
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-4-25 21:20 , Processed in 0.371748 second(s), 32 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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