号称价值百万，狼王牛股王源码分享给大家使用！, Z. C; L) a8 D
更多精彩指标点击：http://www.chnmoney.com/tongdaxingongshi/2 B, a$ b2 {% p& ~
{狼王牛股王}
. i0 T! y/ ^/ H" R+ KDRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;0 J" I7 l- C8 r, F- ~( V
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;0 W, \! v1 p$ X3 ^9 c. ], i
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;* e0 g! W( ~3 f! t% X
DRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】 ★ 龙头战法，涨停战法，主升浪战法！ '),COLORYELLOW;2 K4 |4 }7 N' M. V+ [/ b
{======================================================}! V8 I% f4 z, i7 M k
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
" N8 I$ }9 n0 _低点位:=REFDATE(LLV(L,总涨幅周期),DATE);! B) ~2 t8 n; F6 R" L
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;
, H) m6 }) d) A4 B) F高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
5 ?1 [' S% x2 j! b8 i曾最大涨幅:=(高位价-低位价)/低位价*100;1 B. i, Y K, L5 O8 x; R* f Y
当前涨幅:=(C-低位价)/低位价*100;3 _8 V8 j& u: T. q& \# J
ZFA:=CON2STR(CONST(曾最大涨幅),2);; K3 A. k# A' R! p4 V x/ l
ZFB:=CON2STR(CONST(当前涨幅),2);
8 D% N/ U+ f7 s5 d6 Q" mZFC:=STRCAT('【曾最大涨幅】：',ZFA);
9 E, b: O0 s/ `8 VZFD:=STRCAT(ZFC,'﹪');: b7 m) ^: K7 A; S
ZFE:=STRCAT(ZFD,'【当前总涨幅】：');1 Z4 T K: }: S* \& t
ZFF:=STRCAT(ZFE,ZFB);, o* ^; G8 T/ u0 Z4 b8 e; N
ZFG:=STRCAT(ZFF,'﹪');
/ `# [: \; J) ~' n" i. O3 eDRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
$ ~9 |& F( w0 E4 b" f" dDRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
6 p0 k1 L/ ~- d) S
4 ?$ M' t& i8 [( |3 Q! U! Z O+ e" \; f1 P
$ x- B' s0 w9 A9 B8 F7 o9 |
, L2 Y/ \' H |- ^MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
2 k) h: S i& xKS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
( c& W7 s( p* l0 l2 f趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
' v, F4 i q" I# d" }# lAA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;9 z( h, K" }6 X6 l& V& }
AC:=(EMA(AA,5) );( w2 b5 I B6 Y& a) g
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
4 L/ |; Z- N6 dSTICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;
0 T. y6 p, }5 x* a1 X- O; Z. NSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;
6 ], U B( h) o7 rSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;
) Z* J! U6 v) xSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;' j- e& e: X+ g- W3 \: c I
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
& I6 E6 O$ b8 T/ ^AG:=SUM((VOL / FINANCE(7)),1);
, `; l: c6 o! h6 zSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
* l2 h, ?& z" q1 s+ G% p JSTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
5 t# w" p6 [* A& ySTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;, u6 g( M" _5 h* x7 {7 m# q
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;( }- X' f# @9 z! k! e& N
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
6 h; B1 A5 {/ [: o; _9 o" _STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;
+ q E$ f" e' Y# i6 k. pSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;; C. O m* @& F" o& l4 h
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;, Z9 O/ a- n( b8 u0 Y [
SSL:=EMA(CLOSE,5);6 N/ d+ K! ?7 ~ ] [" ]+ f6 E2 f
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
3 N- R) i! ]# i8 E% Y! H+ [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))))) );) Q3 _5 J3 m$ H
SA:=(MM * 0.985);
% Y. A- [$ o/ [) S8 \& @SS:=(MA(CLOSE,5));
$ c+ V I; X ~2 O1 fDD:=(MA(CLOSE,13));
+ t; `. X% x7 a& TGG:=(MA(CLOSE,21));2 }2 z' O7 Y+ H7 E: C
常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;
% ^8 B+ m: B! ?. d! rNHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;/ e- q# U4 ]* H/ p, n
QLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;# _( l) d- B; o$ s8 a# n: s' E
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
8 V; T* C3 @5 z, x# w+ {0 TVAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);2 Z% v4 P1 |6 H0 B
VAR4Y:=REF(CLOSE,1);: F: j8 f5 q6 x4 h2 ~2 Y' v Q7 q4 W
VAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);+ ^% p$ ?$ g# H; B& O ?$ L
VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);' m/ {3 o; i S; a _ b2 R; `
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
. k/ K3 q9 t! G+ W% K/ l7 ?VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);
/ ]% }4 L) P7 O4 w9 g2 j6 _. bVAR9Y:=SMA(VAR8Y,3,1);
# B! {9 x* @; m! rVARAY:=SMA(VAR9Y,3,1);
5 v# p9 t- O8 q- LVARBY:=((3 * VAR9Y) - (2 * VARAY));3 W6 A" w# f/ ^( b7 {4 u
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));
3 O W( O- N; M2 c. DVARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
# n$ H+ ^6 s( N' u' |; `VAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);
7 C1 m4 J( X+ J3 m" e6 \; PVARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);
) f* ^" O1 ?1 d1 O' u' _! M能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));/ W7 P+ }/ e# b- Z9 ^
VAR3C:=EMA(能量线,1);1 O6 \5 z/ d5 j6 H# n
VAR4C:=REF(能量线,1);
& N* O6 G. Q# l" ?" m. |3 LX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
$ l4 I% j3 M9 w( Y* u0 Y2 BY:=EMA(CLOSE,10);! N% w" R' {5 K K: U# j
LL:=REF(CLOSE,2);) h1 Q. V( N7 [, H5 E
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
q8 o: G2 c: IDB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);
& P/ o# w; Y8 a1 S2 f7 dVAR1:=LLV(LOW,21);
) g6 n* n, K( pVAR2:=HHV(HIGH,21);% y! n( q( Q7 `9 b# e
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
6 w& l; z# D7 W1 qAK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
1 h" ^& O. @0 t- d2 JDD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);3 V0 O8 v5 |# L( b% [ G6 [* F
VAR3:=LLV(LOW,55);
3 | O' g* ]* UVAR4:=HHV(HIGH,34);
) A* p/ E; ~% V5 q, e+ ]7 y' gVAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);& C- A6 z$ x2 H4 X
VAR6:=((AK + VAR5) / 2);
6 d4 n- [% d. j9 h5 X) ?: Y3 x2 XVAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);+ x5 \5 P( V9 q% h1 V, {
VAR8:=EMA(VAR6,5);
+ c2 T5 e f3 n+ r3 [BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
5 ?" `% P& x4 XAB:=CROSS(AK1,AK);0 [* B* y8 c* a, k- C' A! X3 p O
BB1:=(CROSS(AK1,BB) AND (BB < 30));. N5 l9 P! `6 T+ Q8 C% n
CD:=(BB1 * 0.6);4 @! D l- z% K+ s/ Y7 O+ C
C1:=(CLOSE+LOW+HIGH)/3;
8 e8 E0 h |, C8 }, TC2:=EMA(C1,6);
7 q. R i+ M A1 K* g5 c+ jC3:=EMA(C2,5);
5 [1 {$ O8 r# _1 P( i) I, sC4:=CROSS(C2,C3);
" l. r$ \1 N5 BRSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
$ l$ E, f! q lK:=SMA(RSV,3,1); 5 Y; X" a: i5 a# ?8 c1 p
D:=SMA(K,3,1);
1 u" }$ [ l, l0 ~; [J:=3*K-2*D;
) E( a6 K' Q6 s& KRSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;% W+ C7 v! v8 r6 `, J
K24:=SMA(RSV24,3,1);
; @5 L0 C0 O) A F+ q, I5 CD24:=SMA(K24,3,1);
. x* v5 Q3 D0 a7 aJ24:=3*K24-2*D24;
3 {0 X1 d- \) N2 w* d- y3 c5 W
4 S+ t3 t- Y( I; h- e: h
: {8 Y" c# s% x: X9 h' m! ?1 D: [% j8 g6 E
5 e* d) Z' O% O6 {6 `6 G
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);- d8 U7 Q( E0 l' f8 u. K
STICKLINE(涨停,O,C,2,0),COLORRED;
% l3 H' J9 _4 F4 i7 F# JZDF:=(C-REF(C,1))/REF(C,1)*100;
z X" D3 j3 T, s4 cSTICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;$ D) U) ~' @& R" B- ~* {
- d7 q+ S" W5 B) y% I. j
; I3 [# t! s; \2 g1 f& K2 D涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);4 o. V7 }5 ~" {7 S6 U
STICKLINE(涨停2,O,C,1,0),COLORYELLOW;- q9 o. [+ F" l0 w7 f
4 x/ N7 b# U; z( H1 X
0 X. z+ g7 ]3 Y% h# R4 d" ?5 O ] c5 i j; d9 t5 a
9 y+ Y" o! T1 ^主力做多:EMA(C,12),COLORWHITE;
6 \4 h W: Y1 ~% k3 c4 T; y8 S5 k j+ y7 A4 _9 q j4 N. {
1 M& \, P# l' m- m: E' m
) a5 [6 d* q! ?6 s, H& O4 W) E; i+ H* p G/ g- |4 |
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;
4 r A5 i! T W7 W% b3 ]2 J8 Y压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;
3 ~) K8 f' p3 O( j) {* Q& N支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;: i/ K ], T) l( ?/ l @7 s; z
* }( G. `4 u/ H4 K, y. k0 `
9 ?3 c- y+ P& s- S: s8 U. Q( F: l* [3 r4 M D4 W4 M
AA01:=EMA(C,18),LINETHICK0;
+ A0 Q/ a1 g! b* K! bAA05:=EMA(C,5),LINETHICK0,COLOR0099CC;2 a8 `- G1 Y$ n5 T
五日乖离率:=(C-AA05)/AA05*100;
: _3 q+ c, K: Q' [- u( aBB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
1 d% h; U: O0 }( A$ V9 e: b3 ?速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);. n! j, C, r( l- |1 c6 G
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
% o" z$ c( m) X8 KAA10:=EMA(C,10),LINETHICK0; [5 e6 e, e c- t4 z0 a3 m7 P
AA20:=EMA(C,20),LINETHICK0;# G l# ^& G( F5 j a
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;/ J( z. A6 \* X- c8 t
AA30:=EMA(C,30),LINETHICK0;
. F/ [5 x- Y/ G! \1 _$ w. q三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
H; k+ Y, f6 A+ XVAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);1 K4 V, i7 k' q, m1 i r9 o q$ O7 [
VAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
3 v& x1 E% q! l; ^BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
( t9 ]' C. N! q+ I" {4 [3 i* w起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
/ d- P- ~9 O5 @3 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) ;
3 l) `- _5 L5 X. E/ D清仓:=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);, [8 e2 |; ?5 ~0 I+ E# R6 t
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;7 ~7 v% I9 Z( @' A- g
减仓:=FILTER(JC,10);% p! z- b* i% Z. n5 T
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;8 r6 H, F+ n8 Q% Z) I- V1 V9 A
抄底:=FILTER(MR,10);
) s. `" x2 m5 }" L qDRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;
! a$ {: ]+ c4 T" _8 ~: BDRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;9 R' i* k( C. m' x7 }' \9 o
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;
- G. Q' B0 y* [0 v# zDRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}6 ]# _8 e. l/ ?9 v
DRAWTEXT(起爆点,LOW*0.95,'★ '),COLORYELLOW;
P- H0 k( c* r* z$ e
) _. l% w6 H/ o; S% ~5 p/ F) R2 ]+ ~, X* h
; h1 ^% w2 F; @, [
y' o% ]! x4 d' a, X! SAAAA:=CONST(HHV(H,90));; j1 X/ s! |& c j% |* K4 L
R1:=MA(CLOSE,1);
- \/ Z- x& O" A- `R2:=MA(CLOSE,3);/ |! U: t$ e6 f w! H' v0 g) D
R3:=(MA(R2,1)*1);& J: m, V' F0 }: J
R4:=(MA(R2,3)*1);% {' y. X6 Z- q! S( C# ~1 @9 Z0 B
X11:=(C+L+H)/3;- t* E/ P# E' _5 J0 g+ w# g; `: n
DDD:=TOTALCAPITAL;8 O% Q2 M V! ~/ y6 D/ n8 z& t
SSS:=FINANCE(7);. @1 U1 Y K5 ~ D
GGG:=FINANCE(33);3 ^8 P5 p0 B+ ?" `( B2 z! L/ U
TH:=DYNAINFO(39);. r. w; D$ P8 a+ d/ ?/ f' r
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);
1 N: [4 h, z4 bLC:=REF(CLOSE,1);$ v8 ^5 l0 c1 e7 T
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);$ {5 k/ p2 J! h' r5 I$ H
FF:=EMA(CLOSE,3);
/ x- c' Z. ]- ]0 d" m6 DMA15:=EMA(CLOSE,21);
" C2 `' s- I7 W3 m' ]DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2021-5-7 09:03:22
