号称价值百万,狼王牛股王源码分享给大家使用!- \7 C* C! z4 G2 i+ D( b9 u
更多精彩指标点击:http://www.chnmoney.com/tongdaxingongshi/
. _ M6 [, V4 p' c{狼王牛股王}6 P1 _# e1 g* [/ ?. N
DRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;. j' I/ p" E& [: p G
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;. _$ O+ Q( @. K! X2 v
DRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;
# z9 s- e+ m4 U. _4 ^4 rDRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】 ★ 龙头战法,涨停战法,主升浪战法! '),COLORYELLOW;" X% ?# f+ P. ~) S& t/ t. h: {6 j
{======================================================}
2 c- V: H' T' G* q+ { M2 M+ f3 i0 {高点位:=REFDATE(HHV(H,总涨幅周期),DATE); 9 ^# u3 R7 i, d& H8 T9 P
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);" z0 b9 e% g3 w+ n9 Y( Z8 f! {1 u
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;$ s. e" n& }, | o
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
+ [8 O/ f$ }* f曾最大涨幅:=(高位价-低位价)/低位价*100;
! D$ ?$ Q/ l3 b6 ?; d9 e当前涨幅:=(C-低位价)/低位价*100;
- w: o) U8 c- hZFA:=CON2STR(CONST(曾最大涨幅),2);$ s2 Q: h- K/ ^/ ]8 V- ^
ZFB:=CON2STR(CONST(当前涨幅),2);: h, e" o5 N( a& a, ?' `9 j
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);
" p; n# S/ t5 ^. s( jZFD:=STRCAT(ZFC,'﹪');
: F/ K9 t8 B; d- B4 H5 EZFE:=STRCAT(ZFD,'【当前总涨幅】:');# i; a- C O& l; s, m( ?, p4 z [
ZFF:=STRCAT(ZFE,ZFB);8 ?/ E9 t F* q' C0 }
ZFG:=STRCAT(ZFF,'﹪');9 z/ H. l0 d8 D6 O# D
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
9 p' P% N- O, s1 k; vDRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;* V# l# U' H9 C% \
3 K1 d" Z ]% C
7 s$ x/ m0 C1 l# ^) u/ `$ ^
' }- v. d% [; u' h( F
; u8 X! [1 ?1 U m: q
MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
2 _! N+ j8 F! f m* HKS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));1 B, G2 a- X/ N$ ~/ S/ S5 s. ?( {
趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);6 B8 |/ r4 j# \) s( s
AA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;
3 G" p2 T# U6 }$ cAC:=(EMA(AA,5) );
]9 h5 |6 a* n& r' p* S& bSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
$ e5 x/ s2 v1 }* Q5 E1 R$ `STICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;
- `( Z- B! i% |0 C- |. fSTICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;% k% S3 @! R* W% @7 A
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;
1 @' T- O; r! U2 s8 f" n! P |8 ESTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;
. j! z- ? _5 M/ mSTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;7 J. V3 i+ p+ t4 h
AG:=SUM((VOL / FINANCE(7)),1);, u. [ n9 o+ [$ ^0 B7 |
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;
2 W7 z8 ~& R, z/ f ^STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
# L9 Z0 ~9 n" u) f% LSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;" r, {. u$ r* X" d
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;+ S4 K6 h5 {$ l% o
STICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
/ j$ a% q3 U2 E( { pSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;
m1 w8 `) }% V: W( U' d( R* L2 QSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;2 |' g: q' M \# L) H, {2 X+ l' a
STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;
. ^& B6 o8 m, w* nSSL:=EMA(CLOSE,5);& X4 C- a. h( N
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
* l* Q6 {) n, h8 xMM:=(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 i J- h4 m$ F$ V
SA:=(MM * 0.985);1 |& m# t3 B: U1 {5 R0 Z
SS:=(MA(CLOSE,5));3 ]0 Y! u1 @3 ~; L
DD:=(MA(CLOSE,13));
m8 \! ]8 U& H* Z$ _GG:=(MA(CLOSE,21));
$ _* q2 A% ]% c( K) q常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;
, Y) X$ A6 z9 N# g1 ^: i8 JNHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;
! C' k0 M0 ?; o, jQLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;( Q- R6 O9 f0 d8 c- X' j. \; I
VAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);, S& o7 y* t S) y* y: Z
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
, o2 v/ v1 Y& y( `7 z/ N7 kVAR4Y:=REF(CLOSE,1);
' F( N) ^0 I1 g# s! u! f5 OVAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);
: i0 }" X& ^. |) D5 z) i! TVAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);
8 w- H+ _. x% F/ z0 LVAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);" V9 z5 ?* R6 {2 n
VAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);
Z' j1 H* A, G9 cVAR9Y:=SMA(VAR8Y,3,1);
8 T4 k. u' c% i- j0 T/ a9 ^VARAY:=SMA(VAR9Y,3,1);) R5 \" U/ ^0 J, j3 U- u
VARBY:=((3 * VAR9Y) - (2 * VARAY));" j) a) y& D( ^
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));
2 p/ e) C6 j2 _VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
5 _+ X" L. q" R$ p; gVAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);2 {% @8 k3 d7 e, l( @. Z6 y
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);
* l! l" t" ~" f _( m( }3 K8 b. Z能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4)));# q6 E8 `8 U1 n g
VAR3C:=EMA(能量线,1);
- C4 C7 p# l8 ^$ P% AVAR4C:=REF(能量线,1);+ ]9 i: p3 x8 L0 w Y$ G
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
8 _$ @! w* E$ V3 cY:=EMA(CLOSE,10);9 P% k! C: m& I1 U- R
LL:=REF(CLOSE,2);% v, U4 M& a b( F& ?% H. L
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
9 H O+ F% X K& Z! DDB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);
! y4 F7 j# K7 L3 t9 s' WVAR1:=LLV(LOW,21);5 Z5 `, V( K3 K% u8 e
VAR2:=HHV(HIGH,21);) S; z) a2 F0 Y- y; S# d
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);7 S5 ]! }6 v* l- G# W# n
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
" z. r) E: n6 W! gDD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
" `3 N. [' V% j8 tVAR3:=LLV(LOW,55);
5 ^% r; |& N) j: h) C5 N3 OVAR4:=HHV(HIGH,34);2 N% Z% Y# F5 G3 a( k
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
# M" E6 {$ x8 x3 W& WVAR6:=((AK + VAR5) / 2);; }5 L6 q! w/ O5 K. e9 O; W0 G
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);! X# T) i9 i) o& F; w3 E( j
VAR8:=EMA(VAR6,5);6 w0 W+ N$ c8 U; D( o0 q& A1 W6 R
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
* r! z) c% \$ K; d( l0 J/ TAB:=CROSS(AK1,AK);7 x8 [9 j0 w3 u* |6 ], _/ [
BB1:=(CROSS(AK1,BB) AND (BB < 30));" `& f, e4 ?3 T
CD:=(BB1 * 0.6);
$ |7 w8 ^) Q; y: K1 n" HC1:=(CLOSE+LOW+HIGH)/3;, o# n# C& G8 \ E$ ]
C2:=EMA(C1,6);6 h3 o' l. F+ v8 h# G1 |) z
C3:=EMA(C2,5);2 E% K* u+ f6 w8 |, |2 ]' E, [
C4:=CROSS(C2,C3);% ^' I. [5 J+ y) Q6 M& U8 k
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100; }6 ?" l0 \6 o) A" [/ K+ ?1 `4 d: X
K:=SMA(RSV,3,1);
% L9 N1 ]# \/ ^. ?( sD:=SMA(K,3,1);
$ q; A- N. ^6 ^, g' j3 xJ:=3*K-2*D;
1 U8 |( i5 `) H# JRSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;; y8 Q3 o' k$ _# s
K24:=SMA(RSV24,3,1);
& {$ p" M& V" v% g: ]" t: x8 BD24:=SMA(K24,3,1); " W; X' M5 i$ z, d
J24:=3*K24-2*D24;
8 L! L f9 I$ u" {( T
9 V5 z9 K9 N4 i, V$ q' f! l R- \9 b7 r) ~" {2 p% l+ |# S" q
- O8 A# l; b; M4 {$ b) Q
7 A0 s5 K8 B. r# O, [涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);0 i4 r3 G7 E# }1 Q
STICKLINE(涨停,O,C,2,0),COLORRED;
0 _) P. c4 d. M3 yZDF:=(C-REF(C,1))/REF(C,1)*100;
+ l; w0 ~$ }7 V' ~: @# w5 qSTICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;* w& n1 U* H& G. p* o/ m) g
% ~7 |# D( t/ U. s
: G1 s0 I0 W* M4 G
涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
0 { E( i7 \: ySTICKLINE(涨停2,O,C,1,0),COLORYELLOW;1 x) z" Y% i0 G" X+ F# {5 e
" _7 ^. e( i& d6 b/ l. N5 a9 K6 w: F* w* r4 h4 g! |1 H' M" Q: V3 m
6 a* w- s; t1 B3 l' v7 G9 G" T" @ C; B8 ^
主力做多:EMA(C,12),COLORWHITE;* x/ l% w" `0 Z
1 ?+ d: c) W9 F5 {; I# s5 z) d+ I
. {4 s* u' u' H6 X$ Y) J2 U" l$ D1 d* X
4 Q% q% X. K/ L8 a6 v3 K! v3 N9 n0 e* S
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;
( \7 n" T* @* H压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;0 g9 t1 F2 X5 \' \7 u
支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;: b0 G5 u2 ^# P; m) V( Y4 f% |
' W4 [+ ^, x/ @2 o
0 p1 N. B$ r$ K1 p3 F' \6 e2 @
, P) [5 N' b6 J1 R+ sAA01:=EMA(C,18),LINETHICK0;
6 C# L; B' H+ t- q. O) hAA05:=EMA(C,5),LINETHICK0,COLOR0099CC;0 B. W4 Q$ F! }, N
五日乖离率:=(C-AA05)/AA05*100;
) Z& F1 ~1 s% O. |BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
/ J b4 W2 {. D% i速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);3 _2 \( T' z5 ~# {: E: J' n$ B
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
' P+ t* n9 s. fAA10:=EMA(C,10),LINETHICK0;1 \6 [* G/ q. V; `8 S/ i7 l* A
AA20:=EMA(C,20),LINETHICK0;/ l7 K' ~# q6 ~- ~ D1 q1 e
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
4 m* S& ?! e6 u* o& X& pAA30:=EMA(C,30),LINETHICK0; & `# V; r+ F$ u& n1 R7 i% l8 ?
三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;* L5 `& t( \1 |2 s; e8 I/ r
VAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
9 W0 a6 X) {. q% b6 zVAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
; p5 }+ V2 {; kBB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
2 n/ {: J7 a3 i% x9 b) V' B起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
* `8 R/ C2 b+ t! g. U8 Q5 F6 Z+ k加仓:=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) ;8 i* a1 @3 d I
清仓:=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);
1 b' {3 l# h& i. f; z: W3 ^JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;6 V) n4 [1 x' Z, i( N4 k
减仓:=FILTER(JC,10);" m6 @. ]7 h1 x; K
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;& V7 K* a# G& Y ~
抄底:=FILTER(MR,10);6 `; B' R8 c8 J7 R W. H% R
DRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;3 \# z5 K( D$ ? F$ B0 N5 B& t6 L
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;3 c( A0 S( e9 b3 ?0 \
{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;
1 c! x. t! O& bDRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}: Y+ R3 M* A5 S+ u% m3 I, q& n
DRAWTEXT(起爆点,LOW*0.95,'★ '),COLORYELLOW;
: L: \: h; W/ M' Z# D4 B& ?! H# Q4 ?- u* x" j4 ~ D/ Z! a
. P% c! `5 s9 ]
+ ]. E4 `6 j- W" D. M- ]* }( o0 h$ A1 }. ?4 P
AAAA:=CONST(HHV(H,90));% I- ^5 g3 F) K6 S9 D1 o! m
R1:=MA(CLOSE,1);! K3 T; N1 l& g- [9 `$ e
R2:=MA(CLOSE,3);
' u) p s* n& yR3:=(MA(R2,1)*1);
% `0 A8 U5 z6 k8 ? f; W# ]R4:=(MA(R2,3)*1);9 ?, i$ f' s; J- ~) A* j6 ^
X11:=(C+L+H)/3;
6 a+ }0 _; T6 H9 r6 n* i. FDDD:=TOTALCAPITAL;
1 F) A* }* {) i" S: b6 H2 ASSS:=FINANCE(7);* J# n! k; M! s F: v
GGG:=FINANCE(33);/ e( o! U' l2 }
TH:=DYNAINFO(39);
" S0 t3 f: @) _8 w. G. W aA51:=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);
! M- T: s5 F. aLC:=REF(CLOSE,1);( M1 @5 e3 n5 O
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);2 `& P0 N8 A }/ v/ L
FF:=EMA(CLOSE,3);7 L/ ~( P! X) }6 q S( D- W- m% {. H
MA15:=EMA(CLOSE,21);7 y7 b3 Z9 ^9 ~7 Y& r
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN; |