号称价值百万，狼王牛股王源码分享给大家使用！
) o7 T0 a* q- U& L( q更多精彩指标点击：http://www.chnmoney.com/tongdaxingongshi/5 Y7 o# A; p9 N" o& Z! F1 B; |
{狼王牛股王}, h2 S i$ u8 L% J- V/ m5 U r
DRAWTEXT_FIX(ISLASTBAR,0.1058,0,1,DYBLOCK),COLORWHITE;' I) H- a. u: M5 _, }1 E
DRAWTEXT_FIX(ISLASTBAR,0.1158,0,0,HYBLOCK),COLORYELLOW;
; k8 E( ^0 M2 D/ Y; D" TDRAWTEXT_FIX(ISLASTBAR,0.1958,0,0,GNBLOCK),COLORYELLOW;
0 Q+ l; v( D2 K8 U$ BDRAWTEXT_FIX(C>O,0.01,1.2,0,' ------------------------------------------------------------------------------【 狼王投资 】 ★ 龙头战法，涨停战法，主升浪战法！ '),COLORYELLOW;( x, z$ w6 y, L1 `& k
{======================================================}
! l* ]( _9 x; T4 v6 K- x高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
0 s3 A+ f* B& ^7 x低点位:=REFDATE(LLV(L,总涨幅周期),DATE);4 ~6 q2 r3 }: y* o9 C
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW;' `% A$ J4 O) p5 b6 K0 K4 Z/ J
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
9 e) Z! T2 P8 E曾最大涨幅:=(高位价-低位价)/低位价*100;( x/ M. p8 V3 S* x n
当前涨幅:=(C-低位价)/低位价*100;
8 D* d6 T3 Z, y) i ?* f( J, f AZFA:=CON2STR(CONST(曾最大涨幅),2);9 K& I; r. \* S3 l1 p" [, h, _. _
ZFB:=CON2STR(CONST(当前涨幅),2);4 \6 X" [: {1 n2 s& |& P# G$ |
ZFC:=STRCAT('【曾最大涨幅】：',ZFA);
0 D A8 Y( F' R5 O5 ^ r) T2 XZFD:=STRCAT(ZFC,'﹪');( g' R' E: r+ M
ZFE:=STRCAT(ZFD,'【当前总涨幅】：');6 v5 d( f, F/ Q. n5 z% Y
ZFF:=STRCAT(ZFE,ZFB);
1 s d& g. F, E4 h+ @ZFG:=STRCAT(ZFF,'﹪');& j* l. P; n H9 z' ~
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;- l+ }5 B) G, Q" U" k. a5 d; m
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
0 K9 _( ?3 M, b* {' e
: e1 Z5 t5 Q3 L6 D7 g# F/ b0 O8 c* o' h x s
& E/ a( T' x# d% L& c8 V! u
$ k N1 y/ S$ `. }4 z; }MA1:=MA(CLOSE,49),LINETHICK1,COLORGRAY;
# V/ e( W, V* f; @; ~, H7 WKS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));
+ M5 ]) }& l( d* T' e' R- L趋势线1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);
7 T2 p2 O# B3 z# A& b9 m: |$ FAA:= - 100 * (趋势线1 - CLOSE) / 趋势线1;% p8 F( }9 p+ b2 r5 u9 \0 N$ I9 j
AC:=(EMA(AA,5) );2 n* C% m7 h& c) s- Y" k
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,CLOSE,3,1),COLORD38784;
& {* }) D! t1 V5 k, ]STICKLINE((((OPEN > CLOSE)) AND (AA < 0)),CLOSE,OPEN,3,0),COLORD38784;& F+ m! M( i* X" I6 H$ U
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),CLOSE,HIGH,0,1),COLORD38784;7 W/ C9 m4 W' b) s) l
STICKLINE((((CLOSE >= OPEN) ) AND (AA < 0)),OPEN,LOW,0,1),COLORD38784;
5 H4 V( h" D4 N/ N! USTICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),CLOSE,LOW,0,0),COLORD38784;: X# J8 U* M2 T0 N! m
STICKLINE((((OPEN > CLOSE) ) AND (AA < 0)),OPEN,HIGH,0,0),COLORD38784;
% {2 G% M( }& D5 y3 p. |, ` HAG:=SUM((VOL / FINANCE(7)),1);2 S9 g1 ^9 J5 |6 L2 v U$ ?% ]
STICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORRED;, A$ E+ K" h6 F
STICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORRED;
, k% O: r+ ]8 GSTICKLINE(((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORRED;
& [) S4 A4 [2 l& o) n% P j3 s9 qSTICKLINE(((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 8)) AND (AG < 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORRED;
, R$ b! s7 A, n, f; N, X! fSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),OPEN,(OPEN * 1.008),5,0),COLORFFFFFF;
# d6 H3 D4 o1 i2 z. O3 C1 QSTICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA >= 0)),(OPEN * 1.008),OPEN,5,0),COLORFFFFFF;
+ T* {8 z& C7 p7 C# b; jSTICKLINE((((((CLOSE >= OPEN) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),OPEN,(OPEN * 0.998),5,0),COLORFFFFFF;
9 \' D4 H4 o4 n" x) ?6 S* }STICKLINE((((((OPEN > CLOSE) AND (PERIOD < 7)) ) AND (AG >= 15)) AND (AA < 0)),(OPEN * 0.998),OPEN,5,0),COLORFFFFFF;! l5 u+ \# s) l
SSL:=EMA(CLOSE,5);4 m! d- E \( r2 p/ p
MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);
/ p# K! @* l$ m2 w9 V* i. ]. 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))))) );# i: g. O% @7 }1 d- ?% E7 M
SA:=(MM * 0.985);
, _1 K+ A/ J% u9 H8 c# lSS:=(MA(CLOSE,5));* n. W8 ]& z3 b D1 \
DD:=(MA(CLOSE,13));# B9 s" j- @; j5 w0 C6 T
GG:=(MA(CLOSE,21));
Z- T4 J$ r( O( A常用指标:=IF(((SSL > MM)),SSL,SA),LINETHICK1,COLORRED;; H* J5 a& `1 z+ r: r( ~# d/ O
NHSH__:=IF(((SSL > MM) ),MM,SA),LINETHICK1,COLORFFFFFF;: y% p" Q6 ^0 {/ E2 M' I' X" h
QLZHM:=IF(((SSL > MM)),MM,SA),LINETHICK2,COLORFF00FF;
% m" ?* S w7 [: TVAR2Y:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);8 E6 f& W' R( @6 l9 b) p4 h" ^
VAR3Y:=(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);* p: X, T3 u% y' f! ^
VAR4Y:=REF(CLOSE,1);
; X2 s& p5 |* S/ x4 u: eVAR5Y:=((SMA(MAX((CLOSE - VAR4Y),0),6,1) / SMA(ABS((CLOSE - VAR4Y)),6,1)) * 100);. i4 c4 Z3 j+ B0 H: N& u: r
VAR6Y:=((SMA(MAX((CLOSE - VAR4Y),0),12,1) / SMA(ABS((CLOSE - VAR4Y)),12,1)) * 100);$ n8 R6 N) V0 a4 ], H- C t# @ [: d
VAR7Y:=((SMA(MAX((CLOSE - VAR4Y),0),24,1) / SMA(ABS((CLOSE - VAR4Y)),24,1)) * 100);
/ x( T4 N' \' g2 c# CVAR8Y:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) * 100);) k4 u: v8 r2 Y5 o
VAR9Y:=SMA(VAR8Y,3,1);
$ V3 V! ]0 [2 M! T) P3 ~7 yVARAY:=SMA(VAR9Y,3,1);7 F/ }, M! x/ W; D0 S c! J
VARBY:=((3 * VAR9Y) - (2 * VARAY));) I* o- ^) t# O; A1 M4 t3 N$ |
VARCY:=(CROSS(VAR5Y,10) AND (VAR3Y < (0 - (28 * 20))));) `. d: {# X* g, y* V' V# Z+ ~
VARDY:=((100 - CROSS(76,VAR5Y)) AND (VAR3Y > (5 * 20)));
3 R6 i: n0 E( T9 h5 F1 \) u) s- |1 iVAREY:=((((CROSS(VAR9Y,VARAY) AND (VARAY < 10)) AND (VAR3Y < (0 - 30))) AND (VAR2Y > 3)) * 30);( L" B% l7 k( i6 J; Y7 P$ O
VARFY:= - ((((VARAY < 11) AND (VAR5Y < 15)) AND (VAR3Y < (0 - 26))) * 10);
2 Q' f/ X( `3 ^( Z. @. g能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) * 4))); A; H# Y. W' A a$ `. a
VAR3C:=EMA(能量线,1);8 v& L) [) V/ Y
VAR4C:=REF(能量线,1);
* F9 b7 i. b5 g% vX:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
: u$ E5 _5 H# J6 U9 O1 x& ] zY:=EMA(CLOSE,10);
, e) ~1 Z: A3 C7 [/ Q- cLL:=REF(CLOSE,2);$ G% Y. `2 }' `+ @3 V& @
MM2:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
5 w0 Z2 l! O9 w2 r9 [DB:=IF(((MM2< REF(MM2,1)) AND (MM2 > 79)),MM2,0);
+ Q# a! y/ H- Y$ pVAR1:=LLV(LOW,21);
6 G6 N# V; d1 W5 M% ]1 b8 AVAR2:=HHV(HIGH,21);6 y# c9 H! Y* W. _ H3 o% Q
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
2 O+ i1 j% J2 M, Y5 UAK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
P; H( z" [; m' {DD2:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
! h( N) D! G/ d% K3 jVAR3:=LLV(LOW,55);9 I5 `( t! W+ e. E' k o: ^
VAR4:=HHV(HIGH,34);
0 F1 P( W, | d, {VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);! v# H5 J; A' r: l
VAR6:=((AK + VAR5) / 2);
% X! c2 k8 ]4 [, qVAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);5 n3 F: N3 V' C$ Q+ Q0 g2 f
VAR8:=EMA(VAR6,5);
5 R! S3 s# h2 a9 _. bBB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
, D4 x1 Z) L& h$ V" |+ lAB:=CROSS(AK1,AK);: g2 ?( M4 g1 T1 p9 `& d% v
BB1:=(CROSS(AK1,BB) AND (BB < 30));9 P2 L; `! L) s( K3 u( H
CD:=(BB1 * 0.6);- m# w& z0 J8 f) K( A
C1:=(CLOSE+LOW+HIGH)/3;
) w- L) h' [( w; ]7 A8 t/ L* }' @C2:=EMA(C1,6);" q8 T0 X. M' @$ N, J
C3:=EMA(C2,5);, ~/ u" r( o# \# X' p
C4:=CROSS(C2,C3);
5 D. U# K. i/ d2 fRSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
+ l) ^" O6 m* M, y9 jK:=SMA(RSV,3,1); ) E7 M2 S& R& A, Z/ |1 U& W6 M4 }
D:=SMA(K,3,1);
) _; G: C; N. w$ S% h7 VJ:=3*K-2*D; " f5 Y5 y; X, s7 ]2 W6 g/ n$ a4 o
RSV24:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;3 ]' F) p$ F% ~. ~/ V% _
K24:=SMA(RSV24,3,1); $ E% ~/ w; t7 r1 E" r
D24:=SMA(K24,3,1); 8 \9 ]6 b. j2 E' g
J24:=3*K24-2*D24; ! l3 }, f. a, b( _
& k$ F& D* j1 ~: p
. j/ o- n' l! v" I, A- N7 p# r( Y E" O0 f1 r2 \( N& S8 k
# N# A' \% L/ R2 N7 o
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);9 |3 H8 @$ k) e' Y$ W
STICKLINE(涨停,O,C,2,0),COLORRED;7 `, B3 h5 h8 E }# P9 C% f& J* u/ c6 z
ZDF:=(C-REF(C,1))/REF(C,1)*100;
$ H; x3 W* h' v6 c! a7 M) bSTICKLINE(ZDF<-9.9,O,C,1,0),COLORGREEN;
[( F4 ]2 K B* S
+ ^/ g4 p! l8 k5 C8 s5 e
( e" V7 y; ]1 F( a5 d3 u涨停2:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
6 T, I! A/ E; V2 V' R4 cSTICKLINE(涨停2,O,C,1,0),COLORYELLOW;
7 \# J) x- }5 z9 c
6 e' B/ J: u5 V9 U& b# _9 d" s" F K% |) h* A
6 e' H* I- l: _' q4 z- Q- }
: r. G8 c: A/ X+ F1 N主力做多:EMA(C,12),COLORWHITE;
Y8 q! m, l4 n8 z, y% g8 l4 m; q( ?6 p2 Y
! M1 Q" k* D: F6 P- g# o
6 F1 c0 u3 J! U; p; ?% S5 m3 e9 n5 z+ m3 J4 u1 T$ m/ R8 e b: Y
分水岭:MA(CLOSE,26),COLORYELLOW,LINETHICK1;# A" [6 F+ V* }4 o, C) X- W
压力:分水岭+2*STD(CLOSE,26),COLORGREEN,LINETHICK1;6 E+ G6 L9 z1 U0 p& z c! `
支撑:分水岭-2*STD(CLOSE,26)COLORMAGENTA,LINETHICK1;
& X- P1 n0 L, V7 A+ J3 S0 d4 l/ p, k0 W
/ [! _/ `$ x' j3 n1 q3 @
& q) [. k8 }" ^! E6 ` DAA01:=EMA(C,18),LINETHICK0;( b* y/ R3 w0 \: j5 ?2 k( Q$ p" ^0 L5 W
AA05:=EMA(C,5),LINETHICK0,COLOR0099CC;' B5 m& Z6 `& k) o4 H
五日乖离率:=(C-AA05)/AA05*100;$ R. _& {* g6 ~% v7 |1 c
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;$ d' }+ i7 ?7 v6 t0 G+ r9 u# k5 q
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
) p" Q' _& X) H& z/ F加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;4 D( K; P. [4 Z0 H I0 G$ B' b$ V
AA10:=EMA(C,10),LINETHICK0;
5 H) v6 r: D( lAA20:=EMA(C,20),LINETHICK0;
5 |1 O* h9 i& W. jBB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
- w$ x. K7 }7 nAA30:=EMA(C,30),LINETHICK0;
. J) _; u3 s2 x: g9 b6 ?三拾日乖离率:=(C-AA30)/AA30*100,NODRAW;
9 ?, r/ \+ J* [VAR111:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
% p8 o* t# _3 G- l$ z# sVAR12:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
. q% j! @2 M5 p# |4 B5 N9 O9 `BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
0 O% I+ U5 h1 f8 q起爆点:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
5 |* k( c- k& S; Q6 A! l P加仓:=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) ;( s6 _9 Z3 i, R9 Z
清仓:=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 G( Q: _+ K( y! Q3 P# a
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;+ a6 i7 k( g" {# p8 G
减仓:=FILTER(JC,10);
a$ |5 A; y8 U( H" e9 l. ]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;3 Y. e. n4 o0 ~: X' ~7 h$ e2 R. ^
抄底:=FILTER(MR,10);( ~/ C0 F, T: T4 b
DRAWTEXT(抄底,LOW*0.99,'B '),COLORWHITE;5 C6 o; k( I- |
DRAWTEXT(加仓,LOW*0.97,'B '),COLORYELLOW;
3 h1 y! }- z" s' L{DRAWTEXT(减仓,HIGH*1.02,'S '),COLORCYAN;( v3 K( E# ~' B! g
DRAWTEXT(清仓,HIGH*1.01,'S '),COLORGREEN;}5 x' f4 i3 H7 ^: _# L6 j
DRAWTEXT(起爆点,LOW*0.95,'★ '),COLORYELLOW;
9 Y. j" v1 A' ^5 h
0 w) y: P; f# h- j( c8 X- A/ K' p; C' Z( ~3 J6 K) b/ l3 d
5 j5 s5 n L: E m" K% H
# T5 U: `/ r' R c& J# [+ d3 H
AAAA:=CONST(HHV(H,90));; ?$ v1 T* C1 z
R1:=MA(CLOSE,1);2 n8 O9 W, D0 Q* `! J+ G
R2:=MA(CLOSE,3);
- J$ b- T3 ?- K4 mR3:=(MA(R2,1)*1);
) T6 o5 R) A7 `+ B9 ]& \" a MR4:=(MA(R2,3)*1);
8 D; p8 k; B' k" yX11:=(C+L+H)/3;. R: h) V' o5 n1 R; h/ V6 ~; n, t9 E
DDD:=TOTALCAPITAL;
# z& I) j% O: L/ ISSS:=FINANCE(7);8 q7 u4 ]/ w4 L% s! ]7 C6 N
GGG:=FINANCE(33);
0 A% J/ j5 X0 Z5 [TH:=DYNAINFO(39);
8 M- V4 Z! u' L: |- m) }5 Y: X0 Z+ A# ^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);. h- @; t, ?% e9 }4 \
LC:=REF(CLOSE,1);8 |8 X- Z( T$ x
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);- R( Y8 i+ K! J" U4 [) Z
FF:=EMA(CLOSE,3);/ i) n) e: j1 L2 k9 {: }
MA15:=EMA(CLOSE,21);: e6 v4 r% V" s' ~/ F, ]) V8 c; U
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2021-5-7 09:03:22
