通達(dá)信主圖
# \ M2 R* z: z$ |6 K/ k# W3 I$ X7 {) @! K0 B* }
{霸占大牛}
" f+ Z8 l3 S) l' y3 t+ H M3:MA(CLOSE,3);
+ |. S( V' j# j( ^/ m& H M13:MA(CLOSE,13);
: ~8 l2 {" C( i8 |8 ~. z M34:MA(CLOSE,34),COLORRED,LINETHICK2;
8 s u! Q9 x4 }- D$ @& E1 B2 V/ s IF(M34<REF(M34,1),M34,DRAWNULL),COLORGREEN,LINETHICK2;% b2 ^, T2 B; q# U0 V; ?( j Q
STICKLINE(M3>=M13 AND M34>=REF(M34,1) ,H ,L ,0.4,0),COLOR0000DD;
/ h9 h( ~+ B* J9 G8 n# l0 L STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3,1),COLOR000077;$ [' A* w+ V( s$ e/ n, d
STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,2.5,1),COLOR000099;
" F9 V! D" |8 p y1 k. k. w STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,1.9,1),COLOR0000BB;
5 j6 [8 v& A0 U! r4 [, w4 x STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,1.2,1),COLOR0000DD;, p* T& G) n, W3 x9 n
STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,0.4,1),COLOR0000FF;
0 D- f3 `+ F: _' L1 J9 E4 e" H% ] STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3 ,0),COLOR000077;4 ]2 q" }' [- k- N, b+ V
STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,2.5 ,0),COLOR000099;
" k/ y' F( N" v0 x! ]3 J9 B4 | STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,1.9 ,0),COLOR0000BB;
& M) G; A0 P+ \4 u STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,1.2 ,0),COLOR0000DD;
7 O0 U Z; [) V- Q, l1 M STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,0.4 ,0),COLOR0000FF;
! f1 H! u8 ?! H" y- D8 j1 x6 ^ STICKLINE(M3<M13 AND M34>=REF(M34,1) ,H ,L ,0.4 ,0 ),COLORFFBB00;: I$ m; y9 E8 c8 M
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,3,1 ),COLORFF3300;; _2 c% Y H$ @9 ]; x
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,2.5,1 ),COLORFF5500;
2 w0 h, W8 f/ X& g4 A STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,1.9,1 ),COLORFF7700;
- j/ b. k% \+ y0 E& b% z2 E! D' N. |. w STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,1.2,1 ),COLORFF9900;) |, J* o) P# a9 b K# F. k6 {
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,0.4,1 ),COLORFFBB00;
8 I( m. ]* I! t6 @ U- ~ STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,3,0 ),COLORFF1100;
: S4 B3 f8 S& L STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,2.5,0 ),COLORFF3300;
% z1 Q: |7 g+ |& Z- ~ STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,1.9,0 ),COLORFF5500;: ]; h* K1 k) m* P# q7 @5 `3 t
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,1.2,0 ),COLORFF7700;0 c$ N ?( g6 U( x" c5 Y
STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,0.4,0 ),COLORFF9900;- ?, q, T8 \ u9 `% ]: A
STICKLINE(M3<M13 AND M34<REF(M34,1) ,H ,L ,0.4 ,0 ),COLOR00FF00;
: z/ |% G: O; `1 f# u! d" k& D STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3,0 ),COLOR007700;2 H7 ^$ u% `* r4 b" l) C
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,2.5,0 ),COLOR009900;5 C- b5 H5 o3 m" h! G- L3 ~4 V
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,1.9 ,0 ),COLOR00BB00;" J' d3 w Z/ P' r$ e& S
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,1.2 ,0 ),COLOR00DD00;0 z! R2 b- R' F! {4 ]
STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,0.4 ,0 ),COLOR00FF00;
9 ^" ^% | R4 E; }2 ~ STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3,1 ),COLOR006600;
) c: G( E. \, {; y1 m STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,2.4,1 ),COLOR009900;
$ t) {$ z+ A1 c0 s6 Y& [ STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,1.8,1 ),COLOR00BB00;
. J: Q% h6 o& F, t# a STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,1.2 ,1 ),COLOR00DD00;
8 A, F3 ]) X2 G8 v: b- }3 H STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,0.4 ,1 ),COLOR00FF00;
A$ g! O; k; W* B0 Z. w- V4 l STICKLINE(M3>=M13 AND M34<REF(M34,1) ,H ,L ,0.4 ,0 ),COLORFF66FF;2 v3 a' y- q* T+ y
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,3 ,1 ),COLOR0000BB;6 b0 r$ p+ \5 w+ ^
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,2.4 ,1 ),COLOR0000DD;
D- r+ f* L% M% Q STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,1.8 ,1 ),COLORCC11FF;
8 h4 F$ H' K. d STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,1.2 ,1 ),COLORCC44FF;9 v1 ^& x4 R+ }
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,0.4 ,1 ),COLORCC66FF;* f8 J; X- l9 S) G$ _
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,3 ,0 ),COLOR9900FF;
, G/ ?, S7 T' N6 s! k6 C8 P STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,2.4 ,0 ),COLORFF22FF;
! |& P( ^5 c) J/ ^- `0 } m STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,1.8 ,0 ),COLORFF66FF;
, c! ?- `- O9 ^% M# G& y STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,1.2 ,0 ),COLORFF99FF;2 `* {& Q% P) J3 `
STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,0.4 ,0 ),COLORFFCCFF;" J9 K) S. P I3 d G: x
X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));
' G! L6 \2 I6 \( _! T X$ P DRAWTEXT(X,MA(C,120)-0.13,'牛股');# X2 u) J* Q; F7 w
, t9 Q. Q5 y e# q9 o
5 k5 o& p* I8 C0 f( y: o
, \2 a3 L1 h; @* I8 h& m! h( d
{黃金主圖}
5 W/ |" W0 Y4 R# P. Q2 Y0 V) b% g' z STICKLINE(C>REF(C,1),H,L,0,0),COLOR0000FF;
! x- s3 n! c" |5 p% k+ j4 P) l& d# U STICKLINE(C>REF(C,1),O,C,3.1,0),COLOR000033;* i* W5 a0 n2 I2 B+ f; G
STICKLINE(C>REF(C,1),O,C,2.7,0),COLOR000066;7 S2 m# C6 u7 f; K0 ]) v
STICKLINE(C>REF(C,1),O,C,2.1,0),COLOR000099;- p" V9 _; |0 }& N
STICKLINE(C>REF(C,1),O,C,1.5,0),COLOR0000CC;, J# t9 I" S4 k; R2 Y5 A' B; E
STICKLINE(C>REF(C,1),O,C,0.9,0),COLOR0000FF;7 e( ~* s/ L& A0 B4 {
STICKLINE(C>REF(C,1),O,C,0.3,0),COLORCC66FF;
- X2 w, t, q/ m. ~9 ?, Y' h STICKLINE(C<REF(C,1),H,L,0,0),COLORFF0000;! H4 s) |7 |. r) _ G% V! g
STICKLINE(C<REF(C,1),O,C,3.1,0),COLOR990000;8 y0 q6 u9 J6 S5 P( \: w3 c
STICKLINE(C<REF(C,1),O,C,2.7,0),COLORCC0000;
- `. ^( l! I) Q$ [; X* X- b% { STICKLINE(C<REF(C,1),O,C,2.1,0),COLORFF4400;0 _9 c% B+ [& L3 Q. N. Z
STICKLINE(C<REF(C,1),O,C,1.5,0),COLORFF8800;) F* ]) ` U. @: O$ u# m
STICKLINE(C<REF(C,1),O,C,0.9,0),COLORFFCC00;2 `2 Y% O* u! |
STICKLINE(C<REF(C,1),O,C,0.3,0),COLORFFFF00;
" |: _' U6 N$ a3 o, i; A7 ] STICKLINE(C=REF(C,1),H,L,0,0),COLORFFFFFF;" M* B. @! C: ?! [6 s
STICKLINE(C=REF(C,1),O,C,3.1,0),COLOR555555;
5 `2 S7 J6 r( K STICKLINE(C=REF(C,1),O,C,2.7,0),COLOR777777;
) z5 U( z x) [1 B STICKLINE(C=REF(C,1),O,C,2.1,0),COLOR999999;
8 ]' t3 U7 ]4 M5 a STICKLINE(C=REF(C,1),O,C,1.5,0),COLORBBBBBB;0 x) v) M$ m$ o9 k3 e8 v) m
STICKLINE(C=REF(C,1),O,C,0.9,0),COLORDDDDDD;# R+ q, X0 r' E0 k
STICKLINE(C=REF(C,1),O,C,0.3,0),COLORFFFFFF;: C+ }: f% @8 I
JJ:=(CLOSE+HIGH+LOW)/3; A:=EMA(JJ,10);B:=REF(A,1);M1:EMA(CLOSE,3);) V' x. r7 w6 n+ ?7 W% r
M2:EMA(CLOSE,8); M3:EMA(M2,13);M4:EMA(M2,55);0 @: N+ B* d( G3 k0 F
STICKLINE(A>B,A,B,2.1,0),COLOR00AAFF;
; c" {9 q# _6 E STICKLINE(A>B,A,B,1.5,0),COLOR00DDFF;( n) ]% h+ Q8 V9 P8 X3 H8 [
STICKLINE(A>B,A,B,0.9,0),COLOR66FFFF;5 [6 M. O) F+ D! f! L, {
STICKLINE(A>B,A,B,0.3,0),COLORFFFFFF;2 b& U) |8 {: O* i- [; w/ h8 \
STICKLINE(A<B,A,B,2.1,0),COLOR006600;
# A9 L- A2 e6 y; l. }, o STICKLINE(A<B,A,B,1.5,0),COLOR009900;( h+ R# {5 c6 b1 \1 R* }
STICKLINE(A<B,A,B,0.9,0),COLOR00CC00;& ^: X4 z l) ?8 y
STICKLINE(A<B,A,B,0.3,0),COLOR00FF00;
# p; _ [" B8 p$ a ^3 Z1 \2 k! U$ z7 M d$ k5 V
' j Q: o9 S2 c3 Z M
* S0 Z8 P" G( N) N; B% j {空倉洗盤}
+ C. _# s# q7 e' L MA3:MA(C,3),COLORWHITE;' {: @8 {" i; @( L% }
MA5:MA(C,5),COLORGREEN;1 b. V$ @. C& x, |' v z
MA10:MA(C,10),COLORRED;1 F M( r2 S% `! j! W" t
MA20:MA(C,20),COLORBLUE;
2 A: [- Q$ A8 Q! P4 R- L3 d: f MA30:MA(C,30),COLORYELLOW;1 x5 O& X" W/ Y9 O5 {
VAR1:=EMA(C,3);
) G2 I/ O) G' M7 ^! X. k VAR2:=EMA(C,5);& G! x# I: v! C; ~! g; Q, V
VAR3:=EMA(C,10);
, x$ w( \9 c5 A o VAR4:=EMA(C,20);* U% Y9 U9 W7 j+ j
VAR5:=EMA(C,30);
& h% w- p& n3 }2 a$ r1 } VAR6:=(VAR2+VAR3+VAR4+VAR5)/4;
" i8 Q. G: r) C, {4 p, @; V VAR7:=(VAR6-REF(VAR6,15))/REF(VAR6,15)*100;
: S I* K9 }! M+ P4 ~ VAR8:=(VAR6-REF(VAR6,15))/REF(VAR6, 15)*100;
; ~( ^" g6 L9 |6 @- H& ? VAR9:=EMA(VAR7,8);* [# U( G4 f$ S0 w! w3 T2 ?
STICKLINE(VAR7<1*REF(VAR7,1),H,L,0.5,0),COLORBLUE;STICKLINE(VAR7<1*REF(VAR7,1),O,C,8, 8 Y: n+ f+ N) e* K1 N# K, s7 M
0),COLORBLUE;
, d; ` A( R, l T. D8 H3 Z7 ^ STICKLINE(VAR7>1*REF(VAR7,1),H,L,0.5,0),COLORRED;STICKLINE(VAR7>1*REF(VAR7,1),O,C,8,
4 ^7 v! T4 z1 z9 N# X) Y 0),COLORRED;' \# V2 g8 t7 Y2 S+ g7 N
STICKLINE(VAR7<1*REF(VAR7,1) AND * R! J* u3 k. { X' g! m! g# c, Q
VAR9>1*REF(VAR9,1),H,L,0.5,0),COLORGREEN;STICKLINE(VAR7<1*REF(VAR7,1) AND
; W% _! q' X* e6 w$ N, P9 J1 Y6 e VAR9>1*REF(VAR9,1),O,C,8, 0),COLORGREEN;& S1 V0 C) ?1 `: Z* r* J: }
買進(jìn)價:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;* _$ Z4 w4 O: V' S O
買進(jìn)條件:=CROSS(C,買進(jìn)價) AND 買進(jìn)價>REF(買進(jìn)價,1);
1 X* {& b0 I5 t6 \& K$ b STICKLINE(買進(jìn)條件,H,L,0.5,1),COLORWHITE,LINETHICK2;STICKLINE(買進(jìn)條件,O,C,8,0),COLORWHITE,LINETHICK2;1 H$ H4 ?# i9 s" `, N. W) j" m# T' g/ Q
加碼價:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004;
( m9 o! u4 O, H 加碼條件:=CROSS(C,加碼價) AND 加碼價>REF(加碼價,1);2 b* \# G) L. S
STICKLINE(加碼條件,H,L,0.5,1),COLORYELLOW,LINETHICK2;STICKLINE(加碼條件,O,C,8,0),COLORYELLOW,LINETHICK2;0 Y2 A) _+ s/ ^! _/ D
# K) j; p, y0 y% y/ o. d( K* {
3 K$ k! S- ~' m. b: s9 ~( p& L0 @) A
6 ?; v b/ J' ^5 |7 E% s% ~9 A8 Z, J+ l* n1 S A
通達(dá)信輔圖) ^3 d; | e% M9 A1 o: ?8 Q L
( h2 |: X8 ~9 k. a) [- W6 t {TDX成交量}! P; T( I) A) e
萬手:VOL/10000,LINETHICK0;
% h0 A& N) y+ R2 i/ }0 Y AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);
0 g L) t! g2 s 預(yù)測:AA/10000; a3 H- t: ]! ?( x2 g0 D7 y
BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));3 P0 p: ~0 J7 T7 Q- h
主動買:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));/ F: D# Y" K6 _4 i; @7 I
主買:主動買/10000,COLORRED;
0 ^1 X. K' A; M! i) i 主動賣:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));3 r; X0 K& [: I; x7 O
主賣:-主動賣/10000,COLORGREEN;
, \- R, s7 C. S7 j 差額:(主動買+主動賣)/10000;6 ?: Z+ m& A. |+ a& A
STICKLINE(CLOSE=REF(CLOSE,1),0,VOL,3.5,0),COLORWHITE;8 I! j( z' w% e; c& j: `) m5 ^4 ?
STICKLINE(CLOSE>REF(CLOSE,1),0,VOL,3.5,0),COLORRED;
' |0 w+ p- z% w5 S: s STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,3.5,0),COLORGREEN;
+ Y5 y- M1 t7 \& K, i2 p1 ] STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.5 , 0 ) , COLORYELLOW ;
5 |" A' _5 T4 }0 _1 j8 F: O STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.2 , 0 ) , COLOR0088FF ;6 E# o" W" @ ]( U
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.7 , 0 ) , COLOR00AAFF ;" D3 {2 x& W3 d
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.1 , 0 ) , COLOR00CCFF ;
/ H o. M5 @# j Y( j. Q4 O STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 1.5 , 0 ) , COLOR22FFFF ;% N5 X2 ~$ p% M) c5 R P
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.9 , 0 ) , COLOR66FFFF ;
$ Y% W0 V9 j8 P1 }: B STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.3 , 0 ) , COLOR99FFFF ;2 W3 k6 P) n; K; [& Y/ {1 R
STICKLINE(主動買>0,0,主動買,3.2,0),COLOR000033;
3 ]/ C" X6 S. n) {3 Y+ E STICKLINE(主動買>0,0,主動買,2.7,0),COLOR000066;
7 j s+ ~, C8 K" K1 b# f) j! S STICKLINE(主動買>0,0,主動買,2.1,0),COLOR000099;
0 z2 u" v0 {" d: ` STICKLINE(主動買>0,0,主動買,1.5,0),COLOR0000CC;. C# m$ F+ N4 M# @ A9 L+ Y& x. H
STICKLINE(主動買>0,0,主動買,0.9,0),COLOR0000FF;# Y2 T2 Q9 m5 O5 E5 @
STICKLINE(主動買>0,0,主動買,0.3,0),COLORCC66FF;5 Z( g3 o# O% }$ r$ S9 }
STICKLINE(主動賣<0,VOL,主動買,3.2,0),COLOR990000;
6 Q0 k4 S( O+ s" ]1 }+ l- S* p7 e STICKLINE(主動賣<0,VOL,主動買,2.7,0),COLORCC0000;3 b" w* L* \. B) j, e" V2 s
STICKLINE(主動賣<0,VOL,主動買,2.1,0),COLORFF4400;
2 `( e d9 c7 T0 b STICKLINE(主動賣<0,VOL,主動買,1.5,0),COLORFF8800;: z/ M1 K) l6 b1 }2 I
STICKLINE(主動賣<0,VOL,主動買,0.9,0),COLORFFCC00;
) Q' m& f8 k* R8 G# x N- @ STICKLINE(主動賣<0,VOL,主動買,0.3,0),COLORCYAN;
~' h. B6 \& ?' h Z1 F) J 持幣:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;7 o0 k) M: L" L( G% c: [0 M1 `
持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLOR000099;
: G0 N7 R* Q5 s* T8 A7 v% h1 b 五日: MA(V,5) COLORWHITE;
1 I% M. L9 E0 F7 k1 |3 b 十日: MA(V,10) COLORYELLOW;2 Z+ [; X& W$ W1 a& \% \
9 _ M0 u7 z" ~! d7 G/ \! B) e
1 o$ z) w: r& S' F! E
6 S1 \3 e2 \/ `! ?# Y
{盤中買賣}
2 ]4 x* I' C) p+ W+ H8 k" A VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;1 ]+ Q: o- k {) a# J
VAR2:=2*ABS(VAR1);
" ?% l, \8 y$ Y' v VAR3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);( \) E! u, ^# d( R/ }
VAR4:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);, F9 c/ p! v: t) ?0 n9 @# Y( r
VAR5:=(HIGH+LOW+CLOSE)/3;: B& |" N, g- M: V7 G: o" `
VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14));
1 ^; O |9 r3 E( M+ s/ c VAR7:=(VAR5-MA(VAR5,70))/(0.015*AVEDEV(VAR5,70));6 J1 K. L2 N. I
VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);( k* p: }, M8 t9 ?4 a
VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);/ e9 o, c) }+ q, n5 M. X$ D( Y
VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
7 j1 C0 d+ \" ]; W" q VARB:=100-ABS(VARA);. D+ E9 E% r7 X
VARC:=3*SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);: N; o, a" P; Y4 y; x
VARD:=3*SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);
/ s) n1 L G$ a1 Q* Z9 f7 ? VARE:=REF(LOW,1)*0.9;$ w: }) r& M1 Q3 ^% V
VARF:=LOW*0.9;
" t `3 ` p. B9 I8 t. [& l' | VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;5 \. J) c* E2 j! h, [+ u7 u# P
VAR11:=EMA(VAR10,30);
( a7 m, ^( O; o VAR12:=VAR11-CLOSE;
+ d8 X- [. W$ A1 ]: h: l VAR13:=REF(CLOSE,1);6 r }. B' C* C6 E. ?7 ~, z ~
VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100;2 y( i! q2 g9 x4 e
VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100;
) ?' P8 o: N0 j+ P VAR16:=BARSCOUNT(CLOSE);
2 q0 U# H% ^0 E# ^ k" X" m4 p6 Z VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;' W w1 L% }+ ?5 \
VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2; k F2 }( n* A
VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
. _) D5 y5 X+ v$ M: e) f, ` VAR1A:=(SMA(VAR19,4,1)-50)*2;5 ?- m. n' J$ W* _
VAR1B:=SMA(VAR1A,3,1);: m; [1 y, [' x. X2 c a
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;' `7 c: X6 [* i2 B+ A
VAR1D:=SMA(VAR1C,4,1);
# r2 ~' J+ V/ l- |9 |+ [ VAR1E:=SMA(VAR1D,3,1);
3 g3 `+ ?1 I5 X7 L3 z: l VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
; _+ w& \- c3 U k VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30
' e$ R, ^: b# `: `: p! t9 Q6 n6 @ AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0);
4 p$ y) u& |+ y/ _6 Q0 M+ x, } 情報: VAR3;
+ p3 p( J1 y1 I+ ~6 g/ X 天線: IF(VARB<90,VARB,100); H1 g9 e' t8 t" Z
紅軍: IF(VAR1>0,VAR1,0),COLORRED, LINESTICK;
; [- B% N* `3 w1 u9 N$ { 綠軍: IF(VAR1<0,VAR2,0),COLORGREEN,LINESTICK;
# ^6 ^& t2 r* V5 a 導(dǎo)彈: VAR20;
5 Y. n+ N; ]6 I) n; B7 U 預(yù)警系統(tǒng): IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND
4 ]2 L2 W6 c* v VAR6<=-150,-15,VAR9))+60;
- j( R- k% o5 ?4 l: [ STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,0);8 x/ b: A6 p- o+ M0 y' l
STICKLINE(VAR3<REF(VAR4,1),VAR3,VAR4,8,0);
8 M3 [& v5 r! Y VAR21:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
; K3 w( E3 p- ]) l VAR22:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);5 `: b1 O' ]9 D0 \7 a+ e4 U3 d( f
VAR23:=紅軍>50 AND 預(yù)警系統(tǒng)>60 AND 天線=100;
+ x; {) M _/ L2 ~- ?3 v6 [8 L VAR24:=紅軍>48 AND 預(yù)警系統(tǒng)>60 AND 天線<100;
7 n3 e: y1 l" ^" j5 R VAR25:=綠軍>38 AND 預(yù)警系統(tǒng)<55; B; ]. V B: ]9 _
VAR26:=導(dǎo)彈>50 AND 天線<90;
' B# V' V4 }. I3 I; @+ y R5 P1 ^# J VAR27:=VAR3<REF(VAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);6 L& k2 W% q* p
VAR28:=VAR3>=REF(VAR4,1) AND CLOSE<REF(CLOSE,1) AND 預(yù)警系統(tǒng)=60 AND 導(dǎo)彈=0 AND 7 U* l, a N& V, Q
綠軍>=REF(綠軍,1) AND VARC<REF(VARD,1);
! T8 q; c3 x% r( @" h DRAWTEXT(VAR21 AND COUNT(VAR21,30)=1,100,'上升通道，持股待長或高拋低吸！');
+ k# o. `2 ?2 c( A. q DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,90,'下降通道，小心無量陰跌！ ');
$ v) I' D5 E/ M! l DRAWTEXT(VAR23 AND COUNT(VAR23,30)=1,70,'上漲過急，需要調(diào)整，短線先拋出！ ');4 n- F% @, r" Y8 O5 F
DRAWTEXT(VAR24 AND COUNT(VAR24,30)=1,80,'莊家出貨，大跌在即，中線拋出！ ');
/ O' f0 ~6 G$ L. v DRAWTEXT(VAR25 AND COUNT(VAR25,30)=1,50,'不必殺跌，應(yīng)有小反彈 ,跌停除外!');. Q8 S3 d. `$ ~7 t7 K& C* c6 e4 E7 P
DRAWTEXT(VAR26 AND COUNT(VAR26,30)=1,30,'堅決搶反彈，但巨量封跌停除外 ');
) U& \2 a% P) M# P6 q9 i DRAWTEXT(VAR27 AND COUNT(VAR27,30)=1,40,'有大資金進(jìn)場跡象，關(guān)注！');
7 C, @; g" v' P! H DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,20,'見頂回落');4 u+ o5 O' r5 o2 P/ Y
2 I4 k. S& e2 ~. i
0 U, u/ M* @ Y* u, q8 z& J. t6 w4 c6 u2 X; g/ `; G
{主力進(jìn)場}
/ |; P3 c2 Y$ c0 k. L VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);+ d3 a- ^* \0 R3 G, g% h0 z
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1); }7 J O4 L/ E2 m& \
VAR3:=EMA(VAR2,10);
5 L8 G& s: L" k& h2 C& V VAR4:=LLV(LOW,33);
# x8 i1 w: I; x$ V( z6 m" A VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);0 u, g' h3 Z q; {0 C( A7 R$ x. Q
主力進(jìn)場:IF(VAR5>REF(VAR5,1),VAR5,0),COLORRED,NODRAW;
5 q. C! z5 d9 ~- M% l9 T+ H: \ STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLORRED;/ G, ^ f9 L( d+ L: V' m! Q
洗盤:IF(VAR5<REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;
1 Z0 d& q+ }# `$ [3 V9 t9 D+ z; d! V STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLORGREEN; * h+ }" Q6 R$ Q. L6 `. U, H
! s$ n) H+ a$ T" W% G
( }( L' C4 ]7 n3 @* Q
& n6 n; X& W5 _ {買賣決策}+ `1 K3 x6 E# o* t$ f. }
A1:=EMA(C,12)-EMA(C,25);
5 v/ N% S6 a$ U$ ]3 R) o# ^ A2:=EMA(A1,6);. r, Q* q* D+ i3 Q2 L( b
獲利回吐:(A2>=0)*A2,COLORWHITE,LINETHICK0;
0 x7 s' H0 Y% ?; n+ c. h 空頭回補:(A2<0)*A2,COLORYELLOW,LINETHICK0;
6 ~8 A: ?6 Z7 d5 ^5 U% W: v 堅絕做空:(A1<0)*A1,COLORGREEN,LINETHICK0;
3 R" r( j! F- S7 d 買入持股:(A1>=0)*A1,COLORRED,LINETHICK0;9 ]; e# D6 b3 f W! j. z
STICKLINE(A2>=0,A2,0,3.2,0),COLOR555555;7 v, ~7 }7 Z( R0 y3 }! r
STICKLINE(A2>=0,A2,0,2.9,0),COLOR777777;9 d( \. M# g' J/ F# t
STICKLINE(A2>=0,A2,0,2.4,0),COLOR999999;/ W) l# ^! c* s. l4 u
STICKLINE(A2>=0,A2,0,1.8,0),COLORBBBBBB;2 |* a! u0 j o1 u
STICKLINE(A2>=0,A2,0,1.1,0),COLORDDDDDD;
+ b% R) L/ w' h3 c u9 U STICKLINE(A2>=0,A2,0,0.3,0),COLORFFFFFF;
/ T6 D3 D- B6 D6 D STICKLINE(A2<0,A2,0,3.2,0),COLORFF5500;/ X! Q3 v+ l; Q. b
STICKLINE(A2<0,A2,0,2.9,0),COLORFF7700;1 b0 {% k2 x8 ?$ X4 `8 O# I
STICKLINE(A2<0,A2,0,2.4,0),COLORFF9900;" t) Y1 z+ n4 A2 B% ^
STICKLINE(A2<0,A2,0,1.8,0),COLORFFBB00;
3 G( l% x& U6 ?+ z STICKLINE(A2<0,A2,0,1.1,0),COLORFFDD00;
3 t$ s, y% p+ X1 m: U STICKLINE(A2<0,A2,0,0.3,0),COLORFFFF00;
; A( o; n( A4 C, D1 l5 h$ \ STICKLINE(A1<0,A1,0,3.2,0),COLORCC0066;" V- b0 O" q' ]! t" c7 R
STICKLINE(A1<0,A1,0,2.9,0),COLOREE0066;, v' L. \5 s3 n
STICKLINE(A1<0,A1,0,2.4,0),COLORFF0066;( r! B8 o5 @1 v
STICKLINE(A1<0,A1,0,1.8,0),COLORFF2266;
$ r/ o! c, n( D# O+ E STICKLINE(A1<0,A1,0,1.1,0),COLORFF4466;! x& j9 G! C0 J1 z+ I. v/ s1 g
STICKLINE(A1<0,A1,0,0.3,0),COLORFF6666;
. [, W N4 L0 F* j STICKLINE(A1>=0,A1,0,3.2,0),COLOR000055;
3 s8 e5 b) d* z0 u2 N9 v STICKLINE(A1>=0,A1,0,2.9,0),COLOR000077;
7 U9 x- N8 ^/ @ STICKLINE(A1>=0,A1,0,2.4,0),COLOR000099;' L7 g9 {/ V4 y+ |
STICKLINE(A1>=0,A1,0,1.8,0),COLOR0000BB;# I3 B5 _, t$ X
STICKLINE(A1>=0,A1,0,1.1,0),COLOR0000DD;
. G- ?* \" I4 b% w, I7 R STICKLINE(A1>=0,A1,0,0.3,0),COLOR0000FF;
' S5 m# V" f6 D1 K6 z, v( H SAR持幣:IF(SAR(10,2,20)>=H,0,DRAWNULL),CIRCLEDOT,COLORGREEN;
! A+ x/ l3 Z3 L* A- `1 ` SAR持股:IF(SAR(10,2,20)<=L,0,DRAWNULL),CIRCLEDOT,COLOR000099;9 `; k. e1 R1 l, T
" B; t& B1 P. D
: j( J) W2 ]5 \' @, P8 ~& i1 V" O; n
% Y3 W1 s7 r/ P8 i* b( M2 t, { {多空決策}
" p! a; V3 q" H8 ^' ]# k7 L" { V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);5 Z$ s! J a* {7 L2 t a$ \! ]* o
HY1:=REF(EMA(V1,3),1);3 l, p1 @, T8 B/ T+ T
多空趨勢:=(MA((CLOSE - HY1) * 10,2))*0.1;
: b& r) \. @" X. D9 s- K* n y 操盤4:STICKLINE(多空趨勢>=0 AND 多空趨勢>=REF(多空趨勢,1),6,6+多空趨勢,1,0),COLORYELLOW;3 p* x7 ^: Z* `/ z- R( j; b. X
減倉4:STICKLINE(多空趨勢>=0 AND 多空趨勢< REF(多空趨勢,1),6,6+多空趨勢,1,0),COLORYELLOW;
# U' t! F6 E' R% v$ P3 r: p 反彈4:STICKLINE(多空趨勢<0 AND 多空趨勢>=REF(多空趨勢,1),6,6+多空趨勢,1,0),COLORGREEN;! E1 `* S# N; q2 V9 }
尋底4:STICKLINE(多空趨勢<0 AND 多空趨勢< REF(多空趨勢,1),6,6+多空趨勢,1,0),COLORGREEN;1 R( P0 s9 L$ w$ [/ b& C
DRAWTEXT(ISLASTBAR=1,IF(多空趨勢>=0,6,6.3),'多空'),COLORWHITE;
2 i+ o! H: w+ v3 K; V 換手:=V*100/CAPITAL;
1 b' J! I# p6 q; n S# s 主力:=MA(換手,4);2 A: B4 S$ E& F' U5 G, k+ w
大戶:=MA(換手,9);
7 ?! r! l0 i. F4 J( k. N- @) h 中戶:=MA(換手,17);
% ?, p% r8 ~9 N# ] 散戶:=MA(換手,34);1 a; J) y$ V+ l& r1 a" o' g
均量:=(主力+大戶+中戶+散戶)/4;
0 H# R' G9 p. I! U! [ 主力能量:(主力-均量),NODRAW;/ j& l+ U/ g. X4 z
大戶能量:(大戶-均量),NODRAW;& O6 | U1 B3 a4 i
中戶能量:(中戶-均量),NODRAW;& p D1 ?" b+ C' W( H2 ]* d
散戶能量:(散戶-均量),NODRAW;
$ G% C$ S. S, _' v% P- j 操盤:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),4.5,4.5+主力能量,1,1),COLORYELLOW;
& ?0 s. d/ n1 M' x- x g# R 減倉:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),4.5,4.5+主力能量,1,1),COLORYELLOW;1 B1 l$ u3 k7 S: ~$ \/ S9 d+ x. \, j4 ]! o
反彈:STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),4.5,4.5+主力能量,1,1),COLORGREEN;
% |3 o7 ^' |1 x0 a3 q, j9 T! U 尋底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),4.5,4.5+主力能量,1,1),COLORGREEN;; G2 H- q3 p% l {: d+ t7 z
DRAWTEXT(ISLASTBAR=1,IF(主力能量>=0,4.2,4.8),'機構(gòu)'),COLORWHITE;2 r; v4 S2 L& m
操盤1:STICKLINE(大戶能量>=0 AND 大戶能量>=REF(大戶能量,1),3,3+大戶能量,1,1),COLORYELLOW;
7 K5 @( C$ g$ S+ w2 M 減倉1:STICKLINE(大戶能量>=0 AND 大戶能量< REF(大戶能量,1),3,3+大戶能量,1,1),COLORYELLOW;
( @# s4 Z7 f1 a3 ]# C 反彈1:STICKLINE(大戶能量<0 AND 大戶能量>=REF(大戶能量,1),3,3+大戶能量,1,1),COLORGREEN;: L/ v( ^4 M7 e9 K$ C1 _! K7 W
尋底1:STICKLINE(大戶能量<0 AND 大戶能量< REF(大戶能量,1),3,3+大戶能量,1,1),COLORGREEN;
9 |: l2 X* [" e1 B, {0 j DRAWTEXT(ISLASTBAR=1,IF(大戶能量>=0,2.7,3.3),'大戶'),COLORWHITE;
+ S& y/ P! `$ W6 F3 y; }( F! ?( Z 操盤2:STICKLINE(中戶能量>=0 AND 中戶能量>=REF(中戶能量,1),1.5,1.5+中戶能量,1,1),COLORYELLOW;
" \6 ^6 ^$ i1 A) ~. V; T" f4 o9 X+ ^" g 減倉2:STICKLINE(中戶能量>=0 AND 中戶能量< REF(中戶能量,1),1.5,1.5+中戶能量,1,1),COLORYELLOW;8 q! i) a4 p3 `0 z; s: D
反彈2:STICKLINE(中戶能量<0 AND 中戶能量>=REF(中戶能量,1),1.5,1.5+中戶能量,1,1),COLORGREEN;8 E7 l& y9 Y2 d% c8 c% k7 u
尋底2:STICKLINE(中戶能量<0 AND 中戶能量< REF(中戶能量,1),1.5,1.5+中戶能量,1,1),COLORGREEN;
! V8 r- [/ ]: ~' i( c8 U. W DRAWTEXT(ISLASTBAR=1,IF(中戶能量>=0,1.2,1.8),'中戶'),COLORWHITE;
: r7 {2 X7 n$ U( K+ U 操盤3:STICKLINE(散戶能量>=0 AND 散戶能量>=REF(散戶能量,1),0,散戶能量,1,1),COLORYELLOW;' o) ?. Q/ w! |- g
減倉3:STICKLINE(散戶能量>=0 AND 散戶能量< REF(散戶能量,1),0,散戶能量,1,1),COLORYELLOW;
. B$ G# T4 \3 Q 反彈3:STICKLINE(散戶能量<0 AND 散戶能量>=REF(散戶能量,1),0,散戶能量,1,1),COLORGREEN;
, F. K- _/ d) a1 g 尋底3:STICKLINE(散戶能量<0 AND 散戶能量< REF(散戶能量,1),0,散戶能量,1,1),COLORGREEN;- z% h; k+ W1 y* M1 O0 Y8 g
DRAWTEXT(ISLASTBAR=1,IF(散戶能量>=0,-0.3,0.3),'散戶'),COLORWHITE;
$ t2 m- K N& I! i5 j) ~' W. U7 l* W& b; J& i! P! e @
b8 ^( a6 \; m0 `: u! n
1 d- o% d- R W t8 a$ t
{突破監(jiān)控}. r3 U' o3 \) K; i0 l _$ T3 }
SARL:=CLOSE<SAR(4,2,20);. Y" L! t/ ~2 d3 `, g: S i
SARH:=CLOSE>SAR(4,2,20);
8 Y; e% B8 l# D% R- R' M V_DUO:=MA(V,5)>MA(V,10);- J$ N6 A8 U1 [8 j2 r( } g) k
V_DUO2:=MA(V,5)<MA(V,10);
/ M( E, d0 N7 V* C1 i+ g C_DUO:=MA(C,3)>MA(C,10);
: l+ M0 e- M: O DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26));4 j! x% G8 `$ P; Y+ E
DEA:=EMA(DIFF,9);4 ?3 x' S; t( X( M g, \; z& L
MACD2:=(2 * (DIFF - DEA));' w, c, H6 R( f5 W0 E4 ]
{OBVM}
" T& }# e% v$ j* ?/ `8 k" m6 Y M OBVR:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,1);3 X% e' f* P% A F. Y! G
OBVE:=EMA(OBVR,3);
; G3 D; z- U1 g. N5 M DIFFR := EMA(OBVE,12) - EMA(OBVE,26),LINETHICK2,COLORCYAN;
+ l& e* r6 `, S3 s& Z `) i BBDIFF:=DIFFR-REF(DIFFR,1);
3 }! ?3 c; l" B+ E: t1 ~ DEAR := EMA(DIFFR,9),LINETHICK2,COLOR00FF33;# n1 g% t; |# q% V# U
BBDEA:=DEAR-REF(DEAR,1);1 N/ `( k: I2 u# O7 s" `2 l! B# g
MACDR := 2*(DIFFR-DEAR), COLORSTICK;
+ {/ y, m- O& L# t7 l8 H( ] {//OBVM}' S3 L( G8 E2 ?( c: U1 J0 a
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
5 q K" q. h0 [ r" x5 T( w" B OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
8 l/ v8 ~: u- Q1 r1 n x MAOBV:=MA(OBV,40);* F/ z9 x9 O4 ^8 |) b. ?4 ^' M5 J
MA100OBV:=EMA(OBV,100);; {* D7 ^( f8 G) j
MACG:=C>MA(C,3) OR C>MA(C,5);! F: R( z. Z7 A `
$ q0 L& [5 s; \) g) g1 \$ J
空倉區(qū):(MACD2<0)OR(CLOSE<SAR(4,2,20))OR(-MACG),COLORRED;" N! y% e/ Q2 O$ p8 o* Z6 U
暗黑禁區(qū):(MACD2<0)OR(CLOSE<SAR(4,2,20))OR(-MACG),COLORLIGRAY;2 i$ g5 \) D4 G' s
能量區(qū):(OBV>MA100OBV),COLORWHITE;: n1 ~7 Y$ w9 B' S3 Y
趨勢性:V_DUO AND C_DUO,COLORWHITE;1 K8 u1 q' L4 x3 o* j
- m( V- y, ]3 s; I0 D* W1 ^# f- F POWERKD1:=2.1;. m+ F7 p) a3 m$ @
POWERKD2:=2.5;
+ h7 d7 Z1 u8 g- U8 U: e
5 J; j5 {. s: T! J* z QSKD1:=0.5;
5 H7 A3 [$ {* { QSKD2:=2.0;
, ]* W9 c% U. h7 d6 m: A7 M$ E/ v) F/ [& ], F
OAMV1:=0.0;) \" }4 S8 }: E
OAMV2:=0.4;1 ^- G; G; ]0 E2 ^6 P4 p$ q+ b6 f
) W: E" F6 G) Y+ H% {
{UPSPEED1:=0;
4 ` j4 S9 K, {! N6 I UPSPEED2:=0.3;}
: w% o* p2 \1 W h STICKLINE((BBDIFF<0),POWERKD1,POWERKD2,4,0),COLORRED;
) x6 J+ y) Z5 L/ U STICKLINE((BBDIFF>0),POWERKD1,POWERKD2,4,0),COLORWHITE;/ }, d4 I4 e* f$ J* d( {
STICKLINE((BBDIFF>0) AND C>MA(C,20),POWERKD1,POWERKD2,4,0),COLORGREEN;
8 n' M b7 b4 l7 Q+ @9 _
0 j! q1 V: H. d6 w7 j5 x9 H5 X6 A STICKLINE((MACD2<0),QSKD1,QSKD2,4,0),COLORRED,LINETHICK2;
, j: M$ A9 w. i% X3 \ STICKLINE((SARL)OR(-MACG),QSKD1,QSKD2,4,0),COLORRED,LINETHICK2;/ p* W7 V9 [' A2 `. m
STICKLINE(((SARH)),QSKD1,QSKD2,4,0),COLORYELLOW,LINETHICK2;
8 m6 i/ W, D1 o b9 ~ STICKLINE(((MACD2>0)AND(MACG)AND(SARH)),QSKD1,QSKD2,4,0),COLORGREEN,LINETHICK2;
7 U. t4 T4 T5 S
5 O7 K' d% U' P3 c& U! { STICKLINE(C>0,OAMV1,OAMV2,4,0),COLORRED;$ z& L; ] F; r2 n
/ P9 e0 ~5 W1 i+ U0 X {STICKLINE(V_DUO2 AND C_DUO,OAMV1,OAMV2,4,0),COLORYELLOW;}3 l1 t4 z3 O+ S2 j
STICKLINE(C_DUO AND V_DUO,OAMV1,OAMV2,4,0),COLORWHITE;. G& h6 X2 V2 E- l
STICKLINE((MACD2<0),QSKD1,QSKD2,4,0),COLORGRAY,LINETHICK2;: y& l) U* v$ R( T
1 }4 F1 ~6 D( N- K+ L' P& A6 X* y
{OBV.MACD}6 i# w F. w9 K6 _* g
OBV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0))/25000,0),1);
: w$ i( p/ O5 h OBVE:=EMA(OBV,3);$ b! Q& f' |- o' U+ c
DIFF : EMA(OBVE,12) - EMA(OBVE,26),LINETHICK2;
6 o+ v9 x+ T! H; x BBDIFF:=DIFF-REF(DIFF,1);
) ]" P* F; p' O+ B4 H) o DEA : EMA(DIFF,9),LINETHICK2;1 U% t4 O. X5 E( J0 g
BBDEA:=DEA-REF(DEA,1);/ R, M0 |. W. f0 o/ Q3 z
MACD : 2*(DIFF-DEA), COLORSTICK;7 T, w; l* [: D" k) l
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.5,0),COLORGREEN;
" j1 \" r& M- F' @5 E0 m5 h& X1 S- \ STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,3,1),COLORFFCC33;
; |2 Z* l, q- @! z2 d: b STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3,1),COLOR0099FF; 0 X) i3 X6 _! o4 ~- f$ x: `9 j1 Z* |4 B# x
STICKLINE(MACD>REF(MACD,1)AND MACD>0,0,MACD,3,1),COLORYELLOW;
9 l7 r. g7 Y3 Z4 o, x. ^# P! C# P IF(BBDEA>0,DEA,DRAWNULL),COLOR9966CC,LINETHICK2;
; Q2 C: m3 `' g IF(BBDEA<0,DEA,DRAWNULL),COLOR00FF33,LINETHICK2;' y3 n5 V% f- j3 r$ K
IF(BBDIFF>0,DIFF,DRAWNULL),COLORRED,LINETHICK2;
8 x( _, L# V3 ` Z! O IF(BBDIFF<0,DIFF,DRAWNULL),COLORCYAN,LINETHICK2;
$ z5 g4 Y6 d1 G. j9 S" b- t( u* h$ X+ `
3 S2 `; ~' s8 E+ s" N, N2 ?% H0 b# y% O
! O# }" Y' Q# ^- N5 A {成交量公式}' C' ?# P" N2 P) C0 N- r- r
{☆精確風(fēng)險}
5 l) _6 a! d1 w7 U- O {//------【參數(shù)定義】}2 A9 l0 q q- r- N- T* H, V
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
/ R& c2 {7 l5 Y K1:=SMA(RSV,10,1);
9 y- R' s9 {& V+ Z7 R N8 o D1:=SMA(K1,5,1);
) b3 D2 B m j& |8 g- C& E KK:=INTPART(K1);) Y+ q* S$ d- n0 S5 d
DD:=INTPART(D1);" k# h3 v/ ?& x% v+ `0 _' I/ x/ G
TFXXS:=KK+DD;{//變異KD風(fēng)險系數(shù)}# s T& S% \9 h6 v# R( d
TGLD:=MOD(TFXXS,10);{//踏浪漲停概率點}% @+ V# p5 h* \, J: W! q
TGLXS:=(TFXXS-REF(TFXXS,1))*10;{//變異KD乖離系數(shù)}
1 v X1 [' M$ x0 G/ m; L+ D+ P TYCFX:=TFXXS+TGLXS;{//變異KD預(yù)測風(fēng)險}
: S l+ V- O% C/ W) [4 ` {//------【數(shù)值顯示】}4 e* w2 e$ }$ ]6 u
風(fēng)險系數(shù):TFXXS,LINETHICK0,COLORYELLOW;3 z2 S" u8 s& E/ m k
乖離系數(shù):TGLXS,LINETHICK0,COLORGREEN;
. B8 a: h1 `3 g' ~& E 預(yù)測風(fēng)險:TYCFX,LINETHICK0,COLORCYAN;
0 j- H$ H9 ~; l: A( t3 ^7 B; } {乖離系數(shù)}+ _7 P( i: o7 K
STICKLINE(TGLXS>0,100,100+TGLXS,8,0),COLOR000088;
1 r& S- ?3 z) _1 l$ k STICKLINE(TGLXS>0,100,100+TGLXS,7,0),COLOR000099;
5 U/ h* h3 U3 N7 X% y9 [4 }! o STICKLINE(TGLXS>0,100,100+TGLXS,6,0),COLOR0000AA;% {' ?# G1 A+ p' n9 z
STICKLINE(TGLXS>0,100,100+TGLXS,5,0),COLOR0000BB;
# l5 S1 q7 n: I+ W# _- | STICKLINE(TGLXS>0,100,100+TGLXS,4,0),COLOR0000CC;
) T% z4 l/ _7 s STICKLINE(TGLXS>0,100,100+TGLXS,3,0),COLOR0000DD;# U' \6 j/ a8 B1 Q
STICKLINE(TGLXS>0,100,100+TGLXS,2,0),COLOR0000EE;3 Z9 p: C' v, h1 |1 u
STICKLINE(TGLXS>0,100,100+TGLXS,1,0),COLOR0000FF;{//紅柱}. m$ W5 z- a8 T* x# C1 C& w
STICKLINE(TGLXS<0,100,100+TGLXS,8,0),COLOR008800;
1 g0 F2 u+ r w F& c+ L STICKLINE(TGLXS<0,100,100+TGLXS,7,0),COLOR009900;
1 c6 o) d$ |* m$ }0 r2 i# t STICKLINE(TGLXS<0,100,100+TGLXS,6,0),COLOR00AA00;5 |7 @+ n0 @. ^; A6 c1 d
STICKLINE(TGLXS<0,100,100+TGLXS,5,0),COLOR00BB00;
+ z& E% [% n3 e) ?% d/ b STICKLINE(TGLXS<0,100,100+TGLXS,4,0),COLOR00CC00;( k/ d( J6 m3 m
STICKLINE(TGLXS<0,100,100+TGLXS,3,0),COLOR00DD00;) s, i4 t8 U6 T5 H4 r: G
STICKLINE(TGLXS<0,100,100+TGLXS,2,0),COLOR00EE00;
% A# ?1 q* J6 l9 E8 G" ? STICKLINE(TGLXS<0,100,100+TGLXS,1,0),COLOR00FF00;{//綠柱}1 `2 g9 k7 t) X( b& I% l
STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,100,100+TGLXS,8,0),COLORRED;0 I" _# d3 C% X( j8 u, ?$ ~
STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,100,100+TGLXS,8,0),COLORGREEN;7 y" f; Q: G" A
4 Z% ^% v; y5 E1 R+ c T2 [* F
5 }/ R6 N! ?! e4 ~% V( Y4 M0 _/ W8 v4 u6 k0 _+ x% P
: V8 r$ d" H$ U* f: `9 x- C {量價角度}
J3 L, `1 R+ @# l5 _4 Z MV5:=EMA(V,5);
! `* \0 ^% y) X9 Z" @ MA5:=EMA(C,5);( u9 o6 U- Y9 f8 o
MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416;
8 R( o3 A5 H2 Q- L/ T2 J MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;3 ~# d* q4 X y% p% e# z
量角:IF(MV5角度>30,MV5角度,0),COLOR0000FF,LINETHICK0;
, Y; |4 M, _/ j" t 價角:IF(MA5角度>0,MA5角度,MA5角度),COLORFFFFFF,LINETHICK2;" [: }7 {2 S5 Q3 k4 k1 m2 N- r
IF(價角>REF(價角,1) AND 價角>=0,價角,DRAWNULL),COLORRED,LINETHICK2;1 N9 a. y- A% }+ ?) i" c
IF(價角<REF(價角,1) AND 價角>0,價角,DRAWNULL),COLOR00FF00,LINETHICK2;* K0 Y% l* a% d; ^! f E5 S8 F
QSXS:=MA5角度>REF(MA5角度,1) AND MV5角度>80;( a' t. f' }$ p9 Z
∠45↑: IF(CROSS(MA5角度,30),1,0),COLORFFFFFF,POINTDOT,LINETHICK0;
; r5 G8 B, p+ \6 m. Q; L 買強:IF(MA5角度>45 AND QSXS,10,0),COLOR00FFFF,POINTDOT,LINETHICK0;+ n7 x# a* j0 C, O
防火:IF(MA5角度>70 AND MV5角度>80,20,0),COLORFF00FF,POINTDOT,LINETHICK0;- f5 e u/ t" q0 D" I5 J! N
賣瘋:IF(MA5角度>80 AND MV5角度>80,30,0),COLOR0000FF,POINTDOT,LINETHICK0;
+ H# K O, q- S3 G; N; g WK:=MA5角度=LLV(MA5角度,3) AND MA5角度-HHV(MA5角度,4)<=0-50;
4 z( c$ ]# _: r/ b$ _) H 挖坑:IF(WK AND COUNT(買強 OR 防火,6),0-30,0),COLOR00FF00;
6 B" u3 D) j- S& a 海底:IF(MA5角度<0-75,0-50,0-75),COLORFF8800;
) C2 @% o# d2 y* I2 G: D {以下設(shè)置副圖顯示方式}
5 J2 ^/ D t' a9 _ STICKLINE(MV5角度>30,MV5角度,30,0.1,0),COLOR0000FF;
# X# k* T0 X& F7 I, P STICKLINE(買強,0,10,2,0),COLOR00FFFF;# B$ h) Z) i% i$ I+ _7 P
STICKLINE(防火,10,20,2,0),COLORFF00FF;
8 J% h8 n! x8 J+ ` STICKLINE(賣瘋,20,30,2,0),COLOR0000FF;
6 Y. i1 M2 _" I, I' N) g6 {" T7 H DRAWTEXT(∠45↑,30, '↑'),COLORFFFFFF;
O. U6 t5 [3 t3 N4 C9 ~ STICKLINE(∠45↑,0-90,30,0.1,0),COLOR00FFFF;
* F0 a1 W q: g 30,COLORFFFFFF;
+ J3 a- c- K. K4 I" m {以下設(shè)置短線強弱提示}
4 m' l+ t3 ]# t$ R/ c. {* S5 D M3:=MA(C,3);
% s3 o; D, H4 \" A6 J* n( G4 a M5:=MA(C,5);
: C$ B F2 M* N N1:=BARSLAST(CROSS(M3,M5));# a4 w1 b+ m* j- o8 O$ Q& K+ E
N2:=BARSLAST(CROSS(M5,M3));, v5 M9 b! R. E, l, i
N:=IF(N1<N2,N1+1,0-N2-1);
# v# J" h5 T# \: @& G; D4 |& ?- W STICKLINE(N>0,0-75,0-75+N*2,2,0),COLOR0000FF;6 E9 n3 l/ s4 {9 p9 N
STICKLINE(N<0,0-75,0-75+N*2,2,0),COLORFFFF00;
$ `9 j+ s) e# ?. M- I7 L' T, A( E' _
X" j9 n+ n5 A3 W7 r2 V% [# Z4 f3 [ K
& {: v3 q; j9 z3 I' g {能量飽和度}% q$ W6 M2 K/ n$ Y# H
N:=25;
( e3 O7 n% H% Z5 A6 ]- Z P:=196;9 u+ c/ B9 ~$ R4 O7 H! S/ e
A:=EMA(AMOUNT/C/1000000,7);
7 V- Z1 [* q2 E( p5 S& [ MID :=EMA(A,N);/ @, \& ~5 U: V; L" S" n' C; `1 O
UPPER:=MID + P/100*STD(A,N);
" z v; ?: K3 ?% P2 t$ Z+ ` LOWER:=MID - P/100*STD(A,N);8 s) B N% d! ^, D1 e: k+ F
SAT:IF((A-LOWER)/(UPPER-LOWER)>1,1,(A-LOWER)/(UPPER-LOWER)),COLORWHITE;
2 r1 G4 Z$ Q2 {' n% v! r STICKLINE(((CLOSE > 0) AND ISLASTBAR ),0,1,3,1),COLORFFFFFF;" J/ ~( C0 }; e0 E
STICKLINE(((CLOSE > 0) AND ISLASTBAR ),0.01,0.99,2.5,1),COLORFFFF00;
' o2 I" Q" G% ~! s8 X1 C STICKLINE(((SAT <=0.05) AND ISLASTBAR ),0.02,(0.20 + ) S' E* A9 U" H* Y9 \: ?
SAT),2.3,0),COLOR00FFFF;
# p$ r* |" V9 |, r STICKLINE((((SAT >0.05) AND (SAT <= 0.2)) AND ISLASTBAR & e$ A0 c1 o* ]0 h/ U
),0.02,SAT,1.9,0),COLORCCFF88;/ U$ x# ^/ c* R
STICKLINE((((SAT > 0.2) AND (SAT <= 0.4)) AND ISLASTBAR ),0.02,
, Y# m5 b* d5 i D- o SAT,1.9,0),COLORFF00FF;
$ H4 P; s" r8 G7 ^ STICKLINE(((SAT >0.4) AND ISLASTBAR ),0.02,SAT,1.9,0),COLOR0000FF;
S- x# |* @/ ?' X6 u: S! _' I' G
( M# C/ |, Z% J
/ @/ E4 l- g% P& f0 S/ Q+ ?! Y6 r; I# L& z# n) j+ o
{一招絕}* W5 L+ H/ _1 N; \% G& k. `! o u2 S
V1:=(C*2+H+L)/4*10;% ]* M0 C9 O, v+ W0 O
V2:=EMA(V1,13)-EMA(V1,34);( V K0 |; S' X$ A. I
V3:=EMA(V2,5);& i: M5 i2 ?& N2 t
V4:=2*(V2-V3)*5.5;
1 o# L% |# ]$ b* C 主力撤: IF(V4<=0,V4,0),COLORGREEN;) {7 `4 o7 F4 Y# d; e* d9 f
主力進(jìn): IF(V4>=0,V4,0);
+ d% H7 h, x( n+ V% i8 C V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;2 J, A8 r) G' v7 a4 g" `: T
V6:=EMA(3*V5-2*SMA(V5,18,1),5);) K( p5 n1 \% p2 M, R! `' s
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
9 X O5 w0 ]( n2 R$ D- H V8:=(INDEXC*2+INDEXH+INDEXL)/4;3 j9 @2 I4 S# L- e& d$ J+ ]
V9:=EMA(V8,13)-EMA(V8,34);9 Z4 [+ u) n6 b- T5 d% G7 B" I/ t8 ?
VA:=EMA(V9,3);
& s0 U! g! Q q" Y0 b VB:=(V9-VA)/2;$ m# j: J0 Z* M* B# R
大盤資金進(jìn)場: IF(VB>=0,VB,0),COLORYELLOW;
9 n- a) P3 i$ B+ r 大盤資金撤走: IF(VB<=0,VB,0),COLORBLUE;0 T8 _# C2 p: ^. F
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);$ A8 U. T) v2 p' C; t$ r
趨勢線: EMA(V11,3);! e$ q; t/ ?1 v- l/ E7 o
V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100;
2 a5 ? F$ B2 {2 a 準(zhǔn)備現(xiàn)金: STICKLINE(趨勢線<=13,0,20,5,0),COLORCC9900;9 p9 P, z0 S2 O D, p" E" v
AA:=(趨勢線<=13) AND FILTER((趨勢線<=13),15);
0 k0 k w x4 |/ d DRAWTEXT (AA,30,'準(zhǔn)備現(xiàn)金'),COLORCC9900;7 f* Z) ^9 S: X3 y1 \: |
買入股票: STICKLINE(趨勢線<=13 AND V12>13,0,50,5,0),COLOR0099FF;4 w$ n/ m: z* F% H9 Z: w1 C. x
BB:= (趨勢線<=13 AND V12>13) AND FILTER((趨勢線<=13 AND V12>13),10) ;' {# L, ]4 n8 D
DRAWTEXT (BB,60,'買入股票'),COLOR0099FF;
# @2 s! }1 X3 Y 見頂清倉: STICKLINE(趨勢線>=90 AND V12,0,30,5,0),COLORGRAY;/ \/ m" r( D: k( N8 M4 o: }! j7 g4 @
CC:=(趨勢線>=90 AND V12) AND FILTER((趨勢線>=90 AND V12),10);7 N4 V+ C, V+ a8 |" e
DRAWTEXT (CC,40,'見頂清倉'),COLORGRAY;
# x c+ u- l5 N, M/ ]
5 j( ~* W4 R' H$ N* N' m, T8 }$ q! J) C5 c& r4 F
. A" d1 A2 q4 O) m8 r
5 }5 w+ t* |: _7 | {無出其右}
( v h- F8 V, ~/ e/ g A:=CURRBARSCOUNT;
- P' {8 `# i$ M A1:=DAY!=REF(DAY,1);- ?. R, F T, {( x8 A
A2:=BARSLAST(A1)+1;8 L. L. b. N8 T7 A. q+ c O4 m
A3:=MA(C,A2);
6 i$ y1 n" P& z; \) D& t) b% Z A4:=SUM(AMO,A2)/SUM(VOL,A2)/100;
' \6 r; z) E. V! V3 D6 C A5:=IF(CAPITAL>0,A4,A3);. u$ h& r8 d% M; T( f4 m1 s
均價線:=IF(A<=CONST(A2),A5,DRAWNULL);
w+ Y" x" s3 q0 \5 y# Y8 i 分鐘有效周期:=IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,DRAWNULL))));
- \: L+ v" R! u0 P# _7 a 分時價:=TFILT(CLOSE,CURRBARSCOUNT,00,CURRBARSCOUNT,00);6 w) N C, |% ]% W+ o$ w, X& V0 B7 g
分時判斷:=IF(分時價=DRAWNULL,1,IF(分鐘有效周期=DRAWNULL,DRAWNULL,1));9 z. K. M# G& ~% c' n
{-----------------------------由MACD定位頂?shù)?------------------------------}
- m- P u5 \0 v& t' {2 \( ?$ w DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
- \+ K* b: l/ G0 b) g% L DEA:=EMA(DIFF,9);: H: ]& l# Q4 f7 C# U, L: x
MACD:=2*(DIFF-DEA);
- w3 j+ { i/ z$ ^' V4 b+ \' ^7 s1 c KX:=BARSSINCE(CLOSE);{←首次開盤價距金的天數(shù)}
6 U$ a# a& c2 v HHN:=CONST(HHV(DIFF,KX));
. ~; n! O. \! a+ u1 e6 | HLN:=CONST(LLV(DEA,KX)); z& D b& G/ ^
RC1:=CONST((HHN+HLN)/2);
& @0 L! D9 L8 t4 e6 | SS:=((HHN-HLN)/200);
2 ^. I) `0 q* w& W9 K MACD底部:=(-100*SS+RC1)+-(-100*SS+RC1),COLOR669999; * u* T& R2 {5 g$ E6 B
MACD頂部:=(100*SS+RC1)+-(-100*SS+RC1),COLORFF0033;
* |5 Q2 E( y9 |& N; M- @' z MACD中軸:=0+-(-100*SS+RC1);
( ^- [9 O+ d$ p; p DIFF修正:=DIFF+-(-100*SS+RC1),COLOR008080;
" r/ ~" u" n- D- `* g( i DEA修正:=DEA+-(-100*SS+RC1),COLOR00FF00;
' J2 L( M$ \$ e! a- E* s$ V+ R MACD修正:=2*(DIFF修正-DEA修正)+MACD中軸,COLOR0000BB,NODRAW;
$ q$ R8 E* B6 W" U9 t9 D MACD超跌:=CONST(LLV(MACD修正,KX));/ h5 V* u$ b) r9 O- A' r
MACD超跌線:=IF(MACD超跌<MACD底部,MACD超跌,MACD底部);0 t$ m _" ]( l* I, S1 H4 ]3 j
{----------------------利用MACD趨勢進(jìn)行精確頂?shù)着袛?-----------------------}3 y5 C9 A) P4 R+ W' K% A f
頂部:=MACD頂部+-MACD超跌線;2 R# }4 x. r& H1 |3 ^- t( ?
天際:=頂部*0.809;' o8 @6 F6 b8 n% _8 F3 L4 y, W- q
中軸:=MACD中軸+-MACD超跌線;& h5 i: ?% W. f$ H* L
海面:=頂部*0.191;
' Y y: Z! g# u5 i 底部:=MACD底部;
: H( j/ [* w8 O8 c$ T5 F, Y1 f6 H {------------------------傳統(tǒng)KDJ指標(biāo)結(jié)合MACD優(yōu)化---------------------------}% C! D9 |" H3 p0 j- r) j
RSVA:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*頂部;{采用21日月線優(yōu)化}
+ n2 I: Z% n' } y K:SMA(RSVA,3,1),COLORFFFFFF,NODRAW;
2 _8 a$ A0 w% X D:SMA(K,3,1),COLOR00FFFF,NODRAW;8 F H- W1 ^; [) J
原J值參數(shù):=3*K-2*D;
8 @5 a" v: |- d) U3 F, n* P# y JD:=IF(原J值參數(shù)<底部,底部,原J值參數(shù));{J值底部鈍化處理}' d! _) Y, w3 L$ ~& c
J:IF(JD>頂部,頂部,JD),COLORFF00FF,NODRAW;{底部鈍化處理后再進(jìn)行頂部鈍化處理}
) e: N$ {' B7 h# V1 {0 P& p {---------------------------MACD多空量能判斷-------------------------------}; F4 R0 a3 ]* s* G
MACD多頭:DIFF修正+-MACD超跌線,COLOR339999;. a Q3 x: i" S6 ^8 \6 j9 l9 ]: G
空頭:DEA修正+-MACD超跌線,COLOR00FF00;
8 G1 r+ |4 l$ x3 c9 q 量能柱:2*(MACD多頭-空頭)+中軸,COLOR0000BB,NODRAW;, Z* d' M8 r) P6 L- z7 ~# w
超前DEA:=(EMA(MACD多頭,7));6 W! d D) _: V
超前MACD:=2*(MACD多頭-超前DEA)+中軸;
n0 A2 F; U s3 y3 f {-----------------------------------大盤動向-------------------------------}
( `, t G$ w) J VAR1大盤:=LLV(LOW,13);6 ?' J% P% z6 ]8 b
VAR2大盤:=HHV(HIGH,13);* Y2 C( M" u: `$ x0 x, \+ j) Q
VAR3大盤:=(SMA((CLOSE-VAR1大盤)/(VAR2大盤-VAR1大盤)*頂部,5,1))-頂部/2;$ i. e; q) K: W5 t: P' ], r) o
VAR4大盤:=SMA((VAR2大盤-CLOSE)/(VAR2大盤-VAR1大盤)*頂部,5,1)-頂部/2;1 |" j F: X0 D& i8 ]/ `
大盤散戶:=IF(VAR4大盤<底部,底部,VAR4大盤),COLOR408000;
) } e7 N9 Y( U: a1 D 大盤主力:=IF(VAR3大盤<底部,底部,VAR3大盤),COLOR330088;
& b) A0 v6 f1 R E {---------------------------------密集成本突破-----------------------------}! z% Y, r) c1 ]8 m% J) h" k
最高獲利參數(shù):=頂部/100;9 l; p* E* k$ R4 j9 G6 n1 {
VAR1C:=(COST(89)-COST(11))*最高獲利參數(shù);
# }; d/ V3 _6 g5 X VAR2C:=(COST(99.9)-COST(1))*最高獲利參數(shù);' [( d, @- M5 y$ ]) s
單峰:=((1-VAR1C/VAR2C))*頂部;
* I* j5 u7 l- S4 t 低密:=((COST(90)-COST(60))/VAR2C)*頂部;0 }9 Q$ F6 n2 H( D$ l
高密:=((COST(40)-COST(1))/VAR2C)*頂部;
- }/ p7 }" p$ f# E 贏利:= (SMA(WINNER(AMOUNT/VOL/99),2,1))*頂部;& J5 @' Y J7 g
活躍度:頂部-頂部/(1+EXPMA(HSL,21)),COLOR774455;{←CYF公眾追漲熱情指標(biāo)}5 X: u: n) i6 y( O4 e
７０%成本集中度:=IF(VAR1C>頂部,頂部,VAR1C),COLORFFFFFF;
1 ]( X9 b5 Y6 m9 Q ９０%成本集中度:=IF(VAR2C>頂部,頂部,VAR2C),COLORFF0000;
; e1 K1 X9 R" R0 ]+ ~3 W 套牢籌碼上升:=IF((單峰-贏利)>底部,(單峰-贏利),底部);: Z# r! ^/ N( z
個股散戶:=IF(套牢籌碼上升>頂部,頂部,套牢籌碼上升),COLOR408000;
$ N* e+ `3 w$ x+ w9 v' G 散戶:IF(個股散戶=DRAWNULL,DRAWNULL,個股散戶),COLOR408000;1 q3 `6 m4 i2 @) k
獲利籌碼上升:=IF((贏利-單峰)>底部,(贏利-單峰),底部);
! X/ U' k+ S m, l% |% d( E; o 個股主力:=IF(獲利籌碼上升>頂部,頂部,獲利籌碼上升),COLOR330088;
/ R! w' Y$ C8 w1 P1 @ 主力:IF(個股主力=DRAWNULL,DRAWNULL,個股主力),COLOR330088;6 z! `- g# I5 _3 e) S
{--------------------換手率,五日換手率輔助判斷個股活躍度-------------------}
; J0 w- b6 B% V8 y: q: `8 _ 換手:SUM(VOL,1)/CAPITAL*100,COLOR666666,NODRAW;
+ d8 N! e' b. ? ⑤日換:SUM(VOL,5)/CAPITAL*100,COLOR999999,NODRAW;
$ E& N4 X7 |& y {----------------------密集成本突破指標(biāo)籌碼峰畫線--------------------------}( f- c! V3 M& |! M( O
金色背景修邊1:STICKLINE(C>0 AND CURRBARSCOUNT>=2,頂部,底部,3.05,0),COLOR003333;% E6 u! J; i* t- i+ A+ p K8 P5 ]4 f
金色背景修邊2:STICKLINE(C>0 AND CURRBARSCOUNT>=2,頂部,中軸,3.05,0),COLOR003333;& n2 l6 \7 \5 c6 ~' e9 \9 u
金色背景補充:DRAWBAND(頂部,RGB(51,51,0),中軸,RGB(51,51,0));
* S' |- [+ a- z' |7 W 金色背景:DRAWBAND(頂部,RGB(51,51,0),底部,RGB(128,128,128));
' g+ r* z) [. H {0 H- K 追漲熱度峰紫色:DRAWBAND(活躍度,RGB(66,52,81),底部,RGB(204,0,0));1 _* ^; L4 p+ |, `) M5 _
高密峰墨藍(lán)色:=DRAWBAND(高密,RGB(0,0,51),底部,RGB(0,0,255));( ~. R; o9 C: B
低密峰純藍(lán)色:=DRAWBAND(低密,RGB(0,0,102),底部,RGB(0,0,255));& \( k8 l0 [1 J1 E* f+ _. C8 U
９０%成本峰:DRAWBAND(９０%成本集中度,RGB(0,0,153),底部,RGB(0,0,153));
6 o5 ~& L( X1 _+ F: F+ T2 I" ?8 [ ７０%成本峰:DRAWBAND(７０%成本集中度,RGB(0,128,0),底部,RGB(255,255,255));3 w0 T; b8 X, r7 t; m
散戶峰綠色:DRAWBAND(散戶,RGB(0,64,0),底部,RGB(204,0,0));
( k; o$ P: Z2 Y4 Z: w8 }& V 主力峰紅色:DRAWBAND(主力,RGB(102,26,51),底部,RGB(0,0,255));
" X" P8 o$ `1 ^ MACD多空趨勢:DRAWBAND(MACD多頭,RGB(204,51,51),空頭,RGB(0,179,0));
* ^9 A X; o: m: ]4 H# Y, v3 r/ ~+ i MACD多頭重畫:DRAWBAND(MACD多頭,RGB(153,153,51),MACD多頭,RGB(153,153,51));- x K/ {7 {* n" d+ B5 p0 S
MACD空頭重畫:DRAWBAND(空頭,RGB(0,204,0),空頭,RGB(0,204,0));+ ?# @ \: D1 V. G! L+ ~* W/ ~- ]
{--------創(chuàng)幻論壇‘131488’會員提供的通達(dá)信■新寶塔線■-----原碼-----------}$ M5 G7 m; m+ I" Q2 h
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);( s8 C0 \. s8 s. B3 G
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
4 f. {7 z/ X7 B- C VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);/ Q# `2 r- y* Y
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);. @- N7 Q- B5 Z% k8 d' E# V6 l
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
/ a/ B3 g9 _% P# b6 [+ ?2 O5 y% } VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
* j4 w/ W0 n8 U0 u; ] VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
, W( i( ~* V% D) r7 P VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);- \, g$ C1 o9 ^. b
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);8 |( n& Z$ A# A5 c' R. o/ ~4 S
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);, D3 E: b; i: _+ U8 D
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);2 X, f* B t+ `1 {
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);/ C. f D% ?" z& r! i) L9 R( M
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
1 y2 P% k" b1 q VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
g8 i- P- ?. H* t1 `, t q2 | VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
& V9 x2 ?, S. [8 }. U& q VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
. G {" q* C" t VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);: }. g Z9 k/ |
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
. {2 m/ |4 F$ Y+ J* {% m5 ^! ?1 k! w VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
4 R1 Y; v+ @9 E4 e. q VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
0 q, [* Z: n A& ?2 p+ [ VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
7 h0 ]4 W% S/ M- E( A1 u' }% i, s 三平底翻金:=(REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR " z! X- B) f6 f$ Q5 s) b
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1))
8 t& c4 {& E: m# F AND VAR1;) d& l% `# w& X9 f, N3 W4 U* _, X* x# y
主力啟動線:=MA(V,5),COLORFFFFFF;( s" o, M5 j+ v3 [* g- O
主力洗盤線:=MA(V,35),COLOR00FFFF;
% z( z6 T4 T' G0 L) Y! D! D1 U0 c 資金異動線:=MA(V,135),COLORFF0000;
1 j( ~8 K, i1 ]! X {----------------------------買賣參考--------------------------------------}/ L9 \7 k- z: ^) n
出擊:=(CROSS(主力啟動線,資金異動線) OR ((主力洗盤線 > 資金異動線) AND - Q0 d. f3 g9 s9 L; D1 A
CROSS(主力啟動線,主力洗盤線))),COLORYELLOW;
9 |& H0 T2 s* w l% d' U 啟動:=(主力啟動線>REF(主力啟動線,1) AND (CROSS(VOL,主力啟動線) AND (REF(VOL,1)<REF(資金異動線,1)
. l- j" m* Z+ B Z8 R( X& K$ U* b8 @ OR REF(VOL,2)<REF(資金異動線,2)))),COLOR45AAEE;9 a" N. z$ J* T0 d
成立:=三平底翻金 AND (出擊 OR 啟動);) b4 L7 T. ]- k* ~, A. X
買入提示:=IF(成立=1,海面*0.5,0) AND 分時判斷=1;
" Y3 A& m/ ^7 h+ b: s. h {------------------------頂部線,天際線,海面線,底部線重畫-------------------}
' a3 ?" d+ ? K3 c 頂部線:DRAWBAND(頂部,RGB(51,0,255),頂部,RGB(51,0,255));
/ T6 o! Q2 q3 P; {' j9 L; N 天際線:DRAWBAND(天際,RGB(128,64,64),天際,RGB(128,64,64));
& @* p9 n# d% j5 d' E$ E: ^0 O/ o 海面線:DRAWBAND(海面,RGB(0,153,153),海面,RGB(0,153,153));
. i8 Q! c+ Z0 ^! v q- Z- r 底部線:DRAWBAND(0,RGB(153,153,102),買入提示,RGB(153,153,102));
- Y2 v$ G+ c4 _- @5 `8 l {------------------------超前MACD多空量能柱--------------------------------}# Z; D3 l; `# }2 O7 U$ K/ K3 [
超前MACD紅柱1:STICKLINE(超前MACD>=中軸,超前MACD,中軸,1.50,0),COLOR226688;
: z& B$ V9 E) ~ C; R 超前MACD紅柱2:STICKLINE(超前MACD>=中軸,超前MACD,中軸,0.95,0),COLOR4488BB;
7 v6 a7 y8 F6 v 超前MACD紅柱3:STICKLINE(超前MACD>=中軸,超前MACD,中軸,0.31,0),COLOR55AADD;4 I3 v9 C! O# _; }/ _. X
超前MACD蘭柱1:STICKLINE(超前MACD<=中軸,超前MACD,中軸,1.50,0),COLOR006600;
. J. S' }& \0 L8 p1 Y1 q 超前MACD蘭柱2:STICKLINE(超前MACD<=中軸,超前MACD,中軸,0.95,0),COLOR007700;) s9 K3 ~7 ^+ p
超前MACD蘭柱3:STICKLINE(超前MACD<=中軸,超前MACD,中軸,0.31,0),COLOR008800;
7 n! {7 }# I5 l. ^- T6 e {--------------------------MACD多空量能柱----------------------------------}
8 b1 V# u; R' C1 l MACD紅柱1:STICKLINE(量能柱>=中軸,量能柱,中軸,1.5,0),COLOR000077;
& u8 [: X: X, N5 { MACD紅柱2:STICKLINE(量能柱>=中軸,量能柱,中軸,1.1,0),COLOR000088;
: b) w1 b" ]& W. |1 f" M& R/ R MACD紅柱3:STICKLINE(量能柱>=中軸,量能柱,中軸,0.6,0),COLOR000099;/ G* B/ g9 \6 G' N- V+ ^
MACD紅柱4:STICKLINE(量能柱>=中軸,量能柱,中軸,0.15,0),COLOR0000AA;+ K2 C- e, d3 Z2 M% F
MACD蘭柱1:STICKLINE(量能柱<=中軸,量能柱,中軸,1.5,0),COLORAA6633;
) b7 n5 m2 T8 g0 }. |0 V/ h* ] MACD蘭柱2:STICKLINE(量能柱<=中軸,量能柱,中軸,1.1,0),COLORBB7744;; u8 `1 V4 b2 I3 ~
MACD蘭柱3:STICKLINE(量能柱<=中軸,量能柱,中軸,0.6,0),COLORCC8855;
- z/ Z0 {. J% }; _ MACD蘭柱4:STICKLINE(量能柱<=中軸,量能柱,中軸,0.15,0),COLORDD9966;
- S# w6 ~7 K! ~6 W$ _' U8 ^ {---------中軸線重畫及頂部線,天際線,海面線,底部線,多空線文字說明-----------}
2 g2 f4 \, O7 j" o8 L& T& j- N G8 ~0 I 中軸線:DRAWBAND(中軸,RGB(128,128,255),中軸,RGB(128,128,255));
: H5 f: I+ p/ ?) h& g) J8 K 頂部線文字:DRAWTEXT(CURRBARSCOUNT=1,頂部*0.98,' 頂部線'),COLORFF0033;
. }' x" h. f2 g$ Z 天際線文字:DRAWTEXT(CURRBARSCOUNT=1,天際*0.98,' 天際線'),COLOR404080;
+ e/ T' H }8 s! i a. T 海面線文字:DRAWTEXT(CURRBARSCOUNT=1,海面,' 海面線'),COLOR999900;
( J) ^! } ?6 u% m. h' V 底部線文字:DRAWTEXT(CURRBARSCOUNT=1,底部,' 底部線'),COLOR669999;
* v3 _, [/ A! ~; j 中軸線文字:DRAWTEXT(CURRBARSCOUNT=1,中軸,' 多空線'),COLORFF8080;
; \0 @2 h. G. j {-------------------------------傳統(tǒng)KDJ指標(biāo)線重畫--------------------------}
+ V1 r3 I3 r/ l8 X8 r9 E7 Z8 G D線重畫:DRAWBAND(D,RGB(255,255,0),D*0.998,RGB(255,255,0));: A8 U. P% P, u% g, b
K線重畫:DRAWBAND(K,RGB(255,255,255),K,RGB(255,255,255));) c8 J& ]/ ]4 v) R
J線重畫:DRAWBAND(J,RGB(255,0,255),J,RGB(255,0,255));
$ n, E4 y, |$ e G! L
* 尊重作者勞動， 轉(zhuǎn)載請注明出自出處，謝謝（司空金融網(wǎng)
http://www.skjrw.com/)
* 詳細(xì)出處參考：
http://www.skjrw.com/thread-6330-1-1.html
