|
k:"kdj.k",linethick,COLORWHITE;- p& M$ P9 J& g: | K
d:"kdj.d",linethick0,COLORYELLOW;
q3 n! T; A% v6 m8 y# |+ A, Nr1:"rsi.rsi1",linethick0,ColorC080FF;
7 c# L _/ P9 xr2:"rsi.rsi2",linethick0,ColorFF8080;
: h5 t! ]. n( ^3 I$ qr3:"rsi.rsi3",linethick0,Color87F8F4;: y4 b8 X. ~# t+ ?3 ]( ?3 l
f:"macd.diff",linethick0,Color72C072;# ^3 [& }. @: c o. q
a:"macd.dea",linethick0,ColorE98210;+ O" p* H" o1 F% J
m:"macd.macd",linethick0,COLORWHITE;
9 S- w" Y1 v" P* u. h4 X{以下界说叠加区间(在这里是可见K线的范围)}; K: L* z! _& j3 I( e! e; c. ~3 f
q:=SYSPARAM(3)-SYSPARAM(2);
% U5 R; @; p7 K6 x4 Bp:=SYSPARAM(3);
2 k, r) d% y8 N3 Y0 z0 K{以下盘算叠加比和叠加平移量}
/ H& a$ W6 N& t) ^& z( c# E{1、叠加字段高度}
" }$ K* t) h5 w, Y( y, j- mkh:=hhv(h,q);, x3 @ |, `) K! j* g( n
kL:=LLv(L,q);
* k8 R' \" Z! k0 A1 M' i J% g; Kdh:=hhv(max(k,d),q);6 j4 t! t5 Q3 s: C
dL:=LLv(min(k,d),q);
. j1 |# d" g% t. Tmh:=hhv(max(f,a),q);/ _& b: L7 `* s( d8 l# G0 `
mL:=LLv(max(f,a),q);% X+ ?$ B) Y" ?9 i) w! K
rh:=hhv(max(max(r1,r2),r3),q);" O7 \* k2 G9 u% p w/ [# M
rL:=LLv(min(min(r1,r2),r3),q);
; M9 H& N; I6 D; k, S! L- f) _{2、叠加比}: ~ L0 @3 f. |
bd:=(kh-kL)/(dh-dL)/3;( V: ^6 ~9 C6 l
bm:=(kh-kL)/(mh-mL)/3;8 q( H; [# j1 j; Z5 w
br:=(kh-kL)/(rh-rL)/3;
* w( M$ o2 `$ B. J{3、叠加平移量}
" x7 s4 w. U2 _+ T- G$ X- m* gwk:=(kh-kL)/3; y6 Q8 h$ D8 P5 Y E
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];1 U9 L* e% c2 i3 T; @! a* N" h% |
wm:=(kh+kL-(mh+mL)*bm)/2;' p, e9 ~5 Z0 j" [- p- x
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
+ V2 j1 h- N+ p{以下画叠加线}/ R0 z1 \% z, Y: R( J
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
1 r5 f! J# W3 _0 z) [9 S+ P) _PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
: x* r# l$ D" U: F, [PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;( N T1 R5 s p4 x7 k
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;2 B! n8 d1 [" d& d/ z
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;) Q4 R: k _' _# ~
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
8 q9 e) v4 u3 VPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;' P4 v% Q7 k' P# a0 H, e. U
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
7 @/ U' n. {- M# GSTICKLINE(m |