主图用法也比较简单，是对股价做了区域划分，比如有安全区，风险区域等，股价在哪个区域就做哪个区域的动作。
S/ a0 |; k7 w& K7 C8 F
5 ?' q/ }& s, y* s9 p
/ a! K( l# \. ^7 n* Q6 o
4 E6 |1 U8 M }& r指标源码：【由彩虹桥投资充电站（www.xuexi199.com)整理】
5 s: w( p6 h& e2 x% M6 X0 u
5 k$ f" A) `& m5 ]4 s& L. EN:=120;0 N$ y( }7 S9 s0 q, _( j r
3 f/ ?6 U- v1 ^( @. Q( F( K/ u' b
K:=BARSLAST(CURRBARSCOUNT=N);
1 H0 I3 f3 s: Z
4 p! W& X: F& Z, }6 p) kGD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));{高点}
( c U# C$ j U8 C2 M0 H" |1 `3 f& d% T
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));{低点}4 C0 {4 `/ Z/ J+ z: y* e
! F( d! b4 a l v0 _ rKJ:=GD-DD;$ B( ?! D* c3 g0 V
1 s" w2 n; q" Q8 G
GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL);
. v0 Q4 P5 d4 @8 @" [2 H. |
9 k( R! E' [- b1 v8 ]高区:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLORRED,LINETHICK2;
5 I5 Q. e3 o4 p& E% i. M
1 @3 j% K# P7 T$ O* ~% D. Q$ O5 q低区:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,LINETHICK2;
$ z; X! O5 v3 W( E5 c4 d' `0 }" [1 E, q6 z$ P; g8 _
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
3 Z, U# ]8 G, ^0 q7 S% _( ~9 D0 p- j% z4 z# _6 G' B# q/ _
低:IF(CURRBARSCOUNT<=N/2,DD,DRAWNULL),COLORFFFF00;! J% m ^. j J8 i3 n
3 i/ g8 Y' e- y. X8 H
高:IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL),COLOR00FFFF;
7 _+ \! V4 R ~( A' ^8 a; [3 d' _6 o, P v+ }
支撑:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;+ t9 w9 t* G8 A) A
: R& m9 ~2 |8 s# l# V强势: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
4 z, J8 {# }9 \3 x8 o0 a: i* Y* t8 R2 J, ~, l
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,DRAWNULL),COLOR0000FF;; A* M; Q |& ~% _1 I z
9 K& c* m$ B: Z+ Z5 u+ ^4 t$ B
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
0 q4 u+ S; k, p% T- y2 n2 ]# b3 O2 q) W9 z
压力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,DRAWNULL),COLOR00FF00; p7 c/ j7 _0 R. J
4 N$ i, [2 _, P3 a: X* y
低涨:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
4 E. J! P! U+ J2 Z7 \4 d' p0 `2 ^) ?# w. G' ` ~ W
天数:BARSLAST(L=DD),COLORCYAN,NODRAW;7 @: ^2 q: T$ W- `: X+ r5 H
# c& C: ~! E& ^( L4 I3 a5 s+ A顶点:IF(CURRBARSCOUNT<=N/2, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST8 e8 k+ T; u: p5 L) ^( g
/ H9 G6 u \( G4 H- A
(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,CROSSDOT;8 _9 P/ Z9 A# s2 Q1 r( F- W
- K' T0 e6 P6 {( E7 u
低点:IF(CURRBARSCOUNT<=N/2, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST
5 g4 E! _4 Z7 X g' H% z; }$ O# T& \3 F
(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,CROSSDOT;* B8 u) g( V9 W
; H) s: r. X" ]6 X* F- U) {* a6 G
STICKLINE(CCI>=200 AND H>=顶点,O,C,2,0),COLORBLUE;
5 t; a) u) A/ ?, [* Y' ~( l( |' d, d/ w5 \7 b9 n8 B$ O( ]% `1 f" u+ D; y
STICKLINE(CCI<=100 AND L<=低点,O,C,2,0),COLORYELLOW;
. k* u+ q0 m7 e" L5 V8 w9 b; J3 B2 l x+ l9 x* {+ N+ M
DRAWBAND(高区,RGB(120,20,0),平衡,RGB(0,0,0));3 f/ A5 T0 L5 [" Z5 g; }) r
1 F; F, X, s6 @7 w1 q' G
DRAWBAND(平衡,RGB(80,0,100),低区,RGB(0,0,0));' l, Q8 S; A% S3 s. H% Y# \! D% @
- \( m8 S+ s9 b7 r5 _! I8 lDRAWBAND(高,RGB(100,100,0),压力,RGB(0,0,0));% g4 [6 i: L y
0 {3 N2 D4 C4 @- a1 f' a yDRAWBAND(压力,RGB(0,80,0),警示,RGB(0,0,0));
, z: G X2 F; S$ ?6 i8 |6 |1 A6 w4 J' g: V
DRAWBAND(警示,RGB(220,120,0),突破,RGB(0,0,0));5 q' Y; L: Z$ R, M( {8 S$ ?1 ~; U
8 B" S" p% {# U( B# p( NDRAWBAND(突破,RGB(120,0,120),强势,RGB(0,0,0));
2 ?* R l7 `* J7 T2 a$ }- I; z u. Q+ q2 n5 O6 V' p' z
DRAWBAND(强势,RGB(120, 0,0),支撑,RGB(0,0,0));8 ^! a/ w& }1 k. D1 u4 W% i5 e# {
5 u; b2 K: I+ c) H8 L0 J& M. B
DRAWBAND(支撑,RGB(80,80,80),低,RGB(0,0,0));
# r4 [' G! ], T+ K7 T; x' e
7 C3 p. ]# {9 ^, R$ W) `STICKLINE(CURRBARSCOUNT=N,GD,DD,0,0),COLORGREEN;
* X9 n' |( f$ E" X& l
" F0 w0 D& |& iSTICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080;- e" t! t- e X/ k, q8 A
' E; c) C. }! o" |' zSTICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;" c7 k! z S8 i( b, X
) B+ Y$ C+ o* ?+ @STICKLINE(CURRBARSCOUNT<=N/2,支撑,支撑,2,0),COLORFF00FF;
% W' l" d1 { o& k
. }1 _; r) G$ D: s$ ?STICKLINE(CURRBARSCOUNT<=N/2,强势,强势,2,0),COLORFF00FF;6 o( p- H$ b8 S6 c7 {2 C' n
8 K' a1 j+ F; }0 B
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLORABABAB;
* b" q6 ? p( X9 F6 U3 @9 R/ @) p5 e+ ~
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR00FFFF;
+ S/ b: j: B; N4 B8 |! N! k) s# w# L0 R- @
STICKLINE(CURRBARSCOUNT<=N/2,压力,压力,2,0),COLOR00FFFF;6 I& j# T, [3 U% u3 H2 ~" ?
: h! b$ D$ P. y( r: H( p% t
DRAWTEXT(CURRBARSCOUNT=10,压力,'压力-0.809'),COLOR00FFFF;/ {. ]6 |1 d; n. q. I8 `, @, N
/ T' n6 W/ B1 DDRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF;
/ p7 p8 e4 Q5 r- s3 M( I+ \+ X& [2 R4 R' L, e2 c$ e5 i5 A$ T
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLORFFFFFF;. y5 v5 Y8 v& `5 b2 X
/ k3 r) z4 S$ S6 H) N& [) W4 P1 J# W6 EDRAWTEXT(CURRBARSCOUNT=10,强势,'强势-0.382'),COLOR00FFFF;
; M% [1 Y5 j! T1 M# @/ q' }: d& C: s' D1 S
DRAWTEXT(CURRBARSCOUNT=10,支撑,'支撑-0.191'),COLOR00FFFF;6 T% N9 k0 t/ H# T
+ J: [: H+ c! T. V3 d- qDRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【风险区】--高抛避险'),COLOR00FFFF;
. E0 |0 [' r" W2 y" F$ }4 U7 j3 f5 d R: Y# w2 }
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示区】--逢高减仓'),COLOR0000FF;
( B" J% m3 Z/ z* ?& m3 ^; _6 `* q+ Q2 ]1 w C$ ^! ~& {
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破区】--主力拉升'),COLORFFFFFF;
! T6 e P- I! k: Q3 X4 l. A. w2 n- E9 o1 N
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升区】--强势畜锐'),COLORFFFF80;5 j% g5 n2 ~4 {6 }8 T
3 {/ u# _, }# s n3 }9 w0 K8 [( |( B( CDRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【关注区】--逢低买入'),COLOR00FFFF;6 J- I: s! Q' i- q3 q- p, y1 E
/ x/ ]6 H9 N# S' M. |: [DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸区】--大胆买入'),COLOR00FF00;& W# r" l/ y0 p) P
& m3 T$ U% j$ z! J4 _. `4 b, \
DRAWTEXT(CURRBARSCOUNT=N/2+40,GD-KJ*0.25,'【拉升区】'),COLORRED;! |/ ?6 n6 r) C) R
% J0 ^# W4 B8 \) G1 v% m! Q+ BDRAWTEXT(CURRBARSCOUNT=N/2+40,DD+KJ*0.25,'【持股区】'),COLORYELLOW;
1 p) A# z9 _$ \/ }* l z9 T' Z. D* [( O1 x
第一防线:REFDATE(低,DATE),POINTDOT,COLORYELLOW,LINETHICK4;( |1 i; l& T: v r4 t! G1 H$ s
+ L' s/ S1 ]/ J# C1 W- }- g
第二防线:REFDATE(支撑,DATE),POINTDOT,COLORWHITE,LINETHICK4;3 U" v; x! i0 ?$ [
W& @: g9 \* kDRAWKLINE(H,O,L,C);
4 t( H6 G' z1 D+ h
! o' Z8 x- G2 b1 Z5 HAHC1:=CLOSE*VOL;# ?' w9 S: y! S+ K
, b1 s& {- G" PAHC22:=EMA((EXPMA(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA. v4 Y4 c3 u5 \( x) ]
5 K9 e$ i0 W: x( k% ~' h4 X7 i& O
(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34);1 W: A8 m$ A k5 k
( o4 w+ Q9 B2 g5 v6 B; m! c1 I上轨:=1.06*AHC22,COLOR40FF00,LINETHICK1;
4 k; ^/ C' h7 S
$ V8 u* U% F8 _. u下轨:=AHC22*0.94;
, w* _1 U3 c/ n0 h& s* O& _$ Z, g
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
, o( o) c3 ~0 E! |) a) G
, O2 S0 v! w$ B2 E2 B启爆:=CROSS(C,上轨) OR CROSS(C,下轨) AND ZT;, W; m% K" N: t/ s9 @1 d
- d% ]: F, x( }$ s! S0 | G. e7 s% k
DRAWTEXT(启爆,L,'启爆'),COLORCYAN;
3 o) j6 I& _5 F' _, E
8 t- X. z+ j- N1 j' I- cSTICKLINE(启爆,C,O,3,1),COLORWHITE;( S$ D# H( _: e2 [# A4 A
% a; v; f2 }, w& A4 _3 Q0 V1 lSTICKLINE(启爆,C,O,1,0),COLORGREEN;
% G/ ?1 C4 E+ w8 V: p0 W: T* v f. v3 g) M/ C/ I, w- G% {
! O F' }7 ]- R
' r" [% T- E- r" a1 @; y
3 f4 `$ j/ d! g i; m2 Y0 c8 p
|
发表于 2023-5-4 15:18:17
