|
k:"kdj.k",linethick,COLORWHITE;
) I2 x, O& W, T1 e: z- Q" H7 Fd:"kdj.d",linethick0,COLORYELLOW;) B* q* j- b% T; Q% |- J
r1:"rsi.rsi1",linethick0,ColorC080FF;
$ `: r" f3 E" y8 |; Xr2:"rsi.rsi2",linethick0,ColorFF8080;
3 D, H) w' J, Yr3:"rsi.rsi3",linethick0,Color87F8F4;; f2 ^+ n* w/ q3 I; K( Q( {( D6 A* N6 A
f:"macd.diff",linethick0,Color72C072;
2 t* b( N/ A* U1 G6 c4 fa:"macd.dea",linethick0,ColorE98210;
. K+ T1 S" `5 S5 Fm:"macd.macd",linethick0,COLORWHITE;
2 u. `( Z# X$ W: Y5 B" |* J- j' \6 U+ b{以下界说叠加区间(在这里是可见K线的范围)}) H* N- |: m1 _4 U! Q
q:=SYSPARAM(3)-SYSPARAM(2);
; u' M9 r6 C; q1 w& K6 wp:=SYSPARAM(3);/ Z- q. [! Y3 F3 {& C
{以下盘算叠加比和叠加平移量}
0 m( H8 I1 r) r3 Z4 A0 z{1、叠加字段高度}" l3 m4 @% A9 o
kh:=hhv(h,q);
. u0 ?: E8 t$ `% OkL:=LLv(L,q);
& m- P" T6 g4 d' E: {1 Cdh:=hhv(max(k,d),q);
* Y! r; v& S, A/ F3 u' rdL:=LLv(min(k,d),q); C. P" W3 u. `
mh:=hhv(max(f,a),q);! w3 N9 F/ b5 B
mL:=LLv(max(f,a),q);1 o. b; |% f }
rh:=hhv(max(max(r1,r2),r3),q);
4 m. T: g" ?6 y! irL:=LLv(min(min(r1,r2),r3),q);
9 G3 z$ X) q' i" p$ z{2、叠加比}
4 q. g9 M0 Z8 o+ Z( o; abd:=(kh-kL)/(dh-dL)/3;
/ ~" S9 a$ r+ P. e9 n% qbm:=(kh-kL)/(mh-mL)/3;# D) C2 t+ ]0 s; K1 _2 r0 e
br:=(kh-kL)/(rh-rL)/3;( b, K+ Q/ h; e& s" \6 M5 N1 j+ T
{3、叠加平移量}* y! `5 B. c' a9 q# R
wk:=(kh-kL)/3;
# H' ]6 @: T0 P9 {wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
7 z, x7 s* Z- n% I8 F+ g3 t0 [$ twm:=(kh+kL-(mh+mL)*bm)/2;
* c" H4 j6 r( Iwr:=(kh+kL-(rh+rL)*br)/2+wk[p];
! o [9 F5 U8 ] W{以下画叠加线}+ |, v* R$ e3 C& N) @# m
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
& R: O8 t# i1 RPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;" K% V6 T4 Q+ C- B6 q2 z$ E+ F
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;, D- a7 f D# B0 F) @6 h2 S
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;2 z8 ~9 P* C- `
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;2 o, ? A s7 b
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;6 d$ o+ B& X! H9 w- ^; g- y
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
( M% Q* }& g- }( j4 F& i6 E0 ESTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;7 G0 @& M" y$ ~/ [+ ^
STICKLINE(m |