号称价值百万，狼王牛股王源码分享给大家使用！
5 j; Y; l0 n# K8 a更多精彩指标点击：http://www.chnmoney.com/tongdaxingongshi/
0 ?9 {3 L7 }1 t" Q3 ]{狼王牛股王}7 t( ~- [& P8 _" b2 C
DRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;- `2 g$ ^4 F) ]) t
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;
# s% \9 E7 u3 h! H: ^DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;0 L Y3 Z7 r* f |7 X4 M
DRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】 ★ 龙头战法，涨停战法，主升浪战法！ '),COLORYELLOW;2 P' p8 d+ T% F) K5 u7 f& u7 S+ p
{======================================================}
; u, E4 p, W1 w7 G* v' A高点位:=REFDATE(HHV(H,总涨幅周期),DATE); * M& b! N* h' u4 o) W- }$ l
低点位:=REFDATE(LLV(L,总涨幅周期),DATE); n: t2 z/ y3 l: f) X( N$ n# X1 ?
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
# f4 w ^% x1 h5 [: n- O高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
3 k9 S5 e& [; c5 A2 D' j8 j5 B) @曾最大涨幅:=(高位价-低位价)/低位价*100;, c9 l/ n' t+ O4 C% l
当前涨幅:=(C-低位价)/低位价*100;
. J+ Y" g0 _$ {- u3 `* IZFA:=CON2STR(CONST(曾最大涨幅),2);. A. z5 ~* i' @( \% a: E q
ZFB:=CON2STR(CONST(当前涨幅),2);
# t# T. [7 X9 {7 Q2 n" d4 W6 |ZFC:=STRCAT('【曾最大涨幅】：',ZFA);
1 _! ]1 I: q& ]3 SZFD:=STRCAT(ZFC,'﹪');0 D6 G! k G) f/ `3 O9 d/ E4 c
ZFE:=STRCAT(ZFD,'【当前总涨幅】：');
- X& i1 T9 O/ `* x [3 g) Q- {" cZFF:=STRCAT(ZFE,ZFB);
* Q, n( L8 N7 r- G! bZFG:=STRCAT(ZFF,'﹪');
$ Z ^5 p" Q J q2 ~" Y+ T9 tDRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;8 A- k- W7 e. i: B9 [! m
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;$ t; T+ w# |3 z9 L, v. F
! ~! [; Q% W8 |/ f) J5 _! ^
5 j6 U/ w7 \5 l5 O3 q6 v* k! t& i! C% ?
! D5 A/ ^4 i4 p
MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
) [, Q1 O" ^- _, K3 \, D+ Y+ s6 IKS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
0 n% w1 n& L) z. q趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);* ?0 U1 e' A7 [
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;
9 x# w- _ K T5 P; yAC:=(EMA(AA,5) );( K$ F( X; u" C+ ~- ]$ i8 Q
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
+ Q k8 g4 J0 H" a+ Y- j+ FSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;$ [- Z% R3 m6 h8 y' |7 P6 n, V& O
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;+ S( J; V2 I! h
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;
$ b l# e0 F5 i6 c; [6 CSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;8 K8 |, n* g0 m; A: O
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
* ?( h2 f4 ^0 HAG:=SUM((VOL / FINANCE(7)),1);, S. z5 g7 I* T' C% h" _
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
. T: \9 T$ s% ?- K" p. [* `STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
; ~7 g8 \1 X' e2 J- kSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;
+ v7 N2 T& V3 a5 I9 |+ n% }3 ISTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
0 V' e4 c0 p2 e: R+ v) ~STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;/ [9 k1 ~% ?/ V1 r( j
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;
) G5 c7 X; ]' Q4 V, m8 ?STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;
* E" P2 [# I0 F8 C. a8 l9 U/ wSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;
- H9 G& P9 A4 V/ ]! @SSL:=EMA(CLOSE,5);
* b; F; n; k: D% X3 @ M# R. K+ vMMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
4 l, z9 E+ x: h3 ^5 aMM:=(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))))) );6 K! K8 O/ c2 s3 o" }! |9 E1 M
SA:=(MM * 0.985);' t8 S& o5 \- ~6 u+ G& k
SS:=(MA(CLOSE,5));, r3 m+ @' X# V/ _
DD:=(MA(CLOSE,13));
5 h3 _( k' Y: U; q$ s6 [* G0 u' KGG:=(MA(CLOSE,21));
2 c, E. u$ L# P3 X ]8 v' Z$ ?$ z常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;$ K% E/ l6 J( p: ` B
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;
$ k ^! H& B8 U) c& v" sQLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;; Z1 B3 W$ q" |: Y4 R+ M: E Z
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);' f: \ |+ p# E% e2 M. M0 R3 l) ], V
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
; X" |+ ]0 w) L! x4 X6 tVAR4Y:=REF(CLOSE,1);1 _6 a. ?3 h+ q- `2 J! G+ P3 q; ]
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);$ \7 U$ S/ L8 V4 O/ r
VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);6 \. \4 b1 t/ k8 n! ~/ W
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
: S) v( X# T* }2 v; aVAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);* }9 i0 R3 ~- S! D
VAR9Y:=SMA(VAR8Y,3,1);
4 n5 p( [" x& v1 q3 u+ w" T0 BVARAY:=SMA(VAR9Y,3,1);
! e# C) b& b4 N) P) }VARBY:=((3 * VAR9Y) - (2 * VARAY));
& u- V! h! H, |& X) Y& o6 YVARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));
, D2 I2 x5 q# O8 R# h9 DVARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));3 \& E' L4 Q& V6 o- S* I7 X
VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);
; I9 ~* b" J+ ?VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);
1 U, {* m, M1 Y. W4 z- S, e) H能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4))); x0 ~+ |7 C8 Q: x0 t7 J% M
VAR3C:=EMA(能量线,1);
+ r% _- \5 y' p: c/ f4 g# z ZVAR4C:=REF(能量线,1);
' l+ ] q2 h' E1 g* {9 [9 PX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);0 U/ k9 q3 Q6 r4 f# q
Y:=EMA(CLOSE,10);: {% W. f( C- a( P
LL:=REF(CLOSE,2);( [, y& r+ m; l x' m% k
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);( y' }) {) w; b9 d- ?9 Z7 Z2 X
DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);- F7 z! |8 A4 g, K m* U8 q! T
VAR1:=LLV(LOW,21);
1 j7 k6 u4 n2 E7 |VAR2:=HHV(HIGH,21);+ z4 \$ {& A% ~7 {4 e/ {6 h
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
# S# U* y3 \- AAK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
" N; u7 k) s5 U n2 MDD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);0 Z+ T. A' m3 _
VAR3:=LLV(LOW,55);! G$ t0 J+ D: V3 L
VAR4:=HHV(HIGH,34);) I* z" O( W+ ~
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);& ^( S& m7 A& z" i$ {
VAR6:=((AK + VAR5) / 2);
" m' A- A L2 uVAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
1 S! d" ]6 X9 Y; Z2 tVAR8:=EMA(VAR6,5);. Z( |. w, [+ t( a. D( Z
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
* \9 j+ K. ~6 D+ R" ~AB:=CROSS(AK1,AK);" ]6 }# J" d, b2 G1 N; J
BB1:=(CROSS(AK1,BB) AND (BB < 30));
% G8 m! A* E+ r) m- C& r' c" LCD:=(BB1 * 0.6);1 W. t8 E& Z/ l; u
C1:=(CLOSE+LOW+HIGH)/3;+ h% B3 l. W. R+ ?5 e
C2:=EMA(C1,6);
) k9 `5 ^4 x) y' PC3:=EMA(C2,5);, S. S1 ` @+ h9 M! U! u
C4:=CROSS(C2,C3);9 G6 D# v$ f. ]* s, ?
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;. X. j. D d. h, @
K:=SMA(RSV,3,1);
$ i+ ]4 W$ N* y4 ? zD:=SMA(K,3,1);
3 M, q. C6 B" _" R, z& ^1 }& N- ^J:=3*K-2*D; 9 f) A# |2 I8 t$ ]1 `
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
0 l+ ~5 u! X' W2 b$ G' r' J: }K24:=SMA(RSV24,3,1); ( Y1 V- h2 h# |6 s# e& U
D24:=SMA(K24,3,1); 0 Y+ N1 o) [! X; E% h
J24:=3*K24-2*D24;
' ^4 t" ~7 V, j+ V# S( n9 X, `
5 {: _2 T; I0 X8 w( Z( q, p
8 a( Z j" x ^: H& y8 |
) x1 ~2 ]1 ? Y; s涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
" y: j) M: Q6 P4 y7 O) Q! [STICKLINE(涨停,O,C,2,0),COLORRED;0 q, k& f. }" N1 f. ]
ZDF:=(C-REF(C,1))/REF(C,1)*100;8 z3 W: q# M) g' [
STICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;: n S. r6 X( W- {6 `' v$ b
% G- Z o& Y$ j/ H; p3 T- h& y3 \9 ]; x3 f# ?& X
涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
1 G i: W3 R: l2 f& C+ f; nSTICKLINE(涨停2,O,C,1,0),COLORYELLOW;
: p9 _5 |: B: k/ a7 k; L. ~ r) o, ^7 r- B2 V9 O' C
+ q R' F& k1 n8 z% W* W) \
6 d4 D# {% Z. E+ s- N+ r# _7 k" ?. r f1 D
主力做多:EMA(C,12),COLORWHITE;
& o( Q. ^2 N% R9 O1 m0 n- O* T; q8 C( Z" h7 O# ~
H6 m3 H1 E& d+ F8 `) q" b& k' k
5 B) f; w. j! M# {0 f3 F8 I9 ?" K* z, K/ L) ^8 R* Y+ N; S
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;5 T6 ?( ]; e9 p! O8 W/ W
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1; {& p% [' h: @: z
支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;, F. p, w ^+ b( x: u1 d" z
8 B) \; J) K1 b9 K6 ^+ b
6 S2 w# n* F/ `9 A
: v) E2 @6 K, p8 N0 l: @3 a* P- m/ _AA01:=EMA(C,18),LINETHICK0;3 |0 H& ^4 q) Q1 f; |4 }
AA05:=EMA(C,5),LINETHICK0,COLOR0099CC;
! u* M, V) u8 Y3 \+ r五日乖离率:=(C-AA05)/AA05*100;
! u) C+ ~* B* y6 TBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
6 d, \$ J$ g3 y+ c p' P4 V! v速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);7 F: E6 {( \' x! s d3 H/ F. {
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
; u4 j) k0 M; Q( ?+ k7 i! n, kAA10:=EMA(C,10),LINETHICK0;0 ~. n9 X+ y' W
AA20:=EMA(C,20),LINETHICK0; J* G3 v2 \' v& N; N5 B! _
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;& r( |& f: u. L% _) x
AA30:=EMA(C,30),LINETHICK0; 4 a6 h3 [: m9 k7 u( E3 u5 v
三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;5 |0 j! B$ p, {* ~0 z: R0 w# F* R
VAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
0 g$ m; b4 r* k" E( R$ J. k: W% ~VAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);' Z! p( \1 M( Z
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
" H0 P& X3 O; b起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
3 ~% g Q+ U3 Q. p$ h% ]5 [加仓:=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) ;' a* n$ s3 y+ Y$ q! Q
清仓:=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);
) v* s- N, q4 _6 m/ e& [( Y7 N2 \9 _JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
/ t6 a, y. J; b2 G1 o3 {减仓:=FILTER(JC,10);: J; Q' s. U- T% \5 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;* w' m. u0 n5 f$ B
抄底:=FILTER(MR,10);
5 Q/ c' u+ i- x7 n a k/ XDRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;& I U: Y. s# v' u$ ^
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;( ^" V9 t8 ~) @( U! @: J9 ]
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;
0 B3 {" S8 t; M5 ~; i$ c8 LDRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}+ X6 ^7 Z, O8 `8 P) B8 U, R
DRAWTEXT(起爆点,LOW*0.95,'★ '),COLORYELLOW;& i8 |6 [8 z4 Q' d9 e X6 U9 r
7 U# i. W0 t; V. y! F. X
/ x6 C6 F" o7 l9 g0 H& P4 e- L6 H1 J
, y: M1 ?) o) N3 o* XAAAA:=CONST(HHV(H,90));# o O! N0 I5 x; P4 N4 K
R1:=MA(CLOSE,1);1 O. X L1 k! q; d+ g+ U% @) {) W
R2:=MA(CLOSE,3);* S! O$ O8 G1 G, `" B* l# |
R3:=(MA(R2,1)*1);! R3 W, f; n; s8 M7 N3 y8 _0 H
R4:=(MA(R2,3)*1);0 L3 i5 F# X( i- @: y
X11:=(C+L+H)/3;% V r- i) e9 C7 l6 z7 y: N, f% s
DDD:=TOTALCAPITAL;$ N2 `" y5 \, Y9 t
SSS:=FINANCE(7);' t9 w+ b9 d3 d7 @, ~
GGG:=FINANCE(33);
: q& ?5 }1 }1 QTH:=DYNAINFO(39);/ l* P J6 ~$ k% A' K+ n( ]+ |
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);- x7 G( g6 Z8 t+ I+ ]. B: U
LC:=REF(CLOSE,1);
# U$ n2 i( }9 O' _% s$ nRSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
4 u3 M9 P8 q; Y+ H" i# XFF:=EMA(CLOSE,3);- V9 O* P6 R2 U$ c. v( I
MA15:=EMA(CLOSE,21);2 ^; S( q1 a) l& H0 N4 K2 g0 [
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2021-5-7 09:03:22
