|
k:"kdj.k",linethick,COLORWHITE;
7 Z/ M; D, ]3 F; Ld:"kdj.d",linethick0,COLORYELLOW;! y6 t- j+ j% l
r1:"rsi.rsi1",linethick0,ColorC080FF;
( P, M! ~2 s: m4 A5 d4 ~0 i% Fr2:"rsi.rsi2",linethick0,ColorFF8080;0 l& }+ I7 w0 ]8 B
r3:"rsi.rsi3",linethick0,Color87F8F4;/ i$ Y) h9 ]7 W$ {
f:"macd.diff",linethick0,Color72C072;3 H6 ^$ m4 h; N2 c/ v" N
a:"macd.dea",linethick0,ColorE98210;
8 t+ ^! R6 l W. y$ t8 f- xm:"macd.macd",linethick0,COLORWHITE;
5 B2 g& F+ X' M# _- V{以下界说叠加区间(在这里是可见K线的范围)}
8 w( o' x. Z( kq:=SYSPARAM(3)-SYSPARAM(2);
+ p- d5 c% i" l; jp:=SYSPARAM(3);' ~$ Q$ Q6 \& g$ H/ z+ O S
{以下盘算叠加比和叠加平移量}
6 w, [0 Q; F, x9 I! F- ?. B6 H8 g{1、叠加字段高度}: |7 f' g" t' F r+ ^: B1 q. z
kh:=hhv(h,q);
; Y- a' q; c: O) y) YkL:=LLv(L,q);
! m; i' ^1 i; [dh:=hhv(max(k,d),q);, c: X9 v7 V4 @* s( L5 N
dL:=LLv(min(k,d),q);
! t8 H3 e! E% A$ f5 smh:=hhv(max(f,a),q);
5 V' K) l" M6 z! w, x E. x7 ^mL:=LLv(max(f,a),q);7 Y2 z2 {& v* S
rh:=hhv(max(max(r1,r2),r3),q);: Z4 d8 ^" T& V1 e$ r+ Y& n# m. z7 d
rL:=LLv(min(min(r1,r2),r3),q);- ?6 I8 v. i3 r
{2、叠加比}
) W4 J( ?* R1 cbd:=(kh-kL)/(dh-dL)/3;
& R& p) o9 |6 n1 z& bbm:=(kh-kL)/(mh-mL)/3;2 v( C* B" j8 D2 z) h4 Q
br:=(kh-kL)/(rh-rL)/3;
I+ z4 {! j3 G: J {* }{3、叠加平移量}% b+ R! R! {4 j. l% ?. w* v4 M
wk:=(kh-kL)/3;2 b9 ~0 c" Z) P8 ]5 e' m2 q, a
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
) {/ m7 u: C1 @ \; Ewm:=(kh+kL-(mh+mL)*bm)/2;/ P }0 c, ~2 U% C- q8 O% C& f9 V
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];* x* ?& e \$ `! a d) \" y: w1 t
{以下画叠加线}( u! j1 y2 E0 k1 \% ?. k
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;% H0 o: J/ r2 e. h% {0 f# t9 W' K
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
3 _& w! ?, `5 }9 u, M. l7 K: _PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
7 Q& v1 d( D( v$ X+ KPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;8 G( x0 E3 o5 Y7 y& P5 O- V4 ]; q
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
/ `, z. G/ ]# P& p7 ]/ rPARTLINE(1,f*bm[p]+wm[p]),Color72C072;& T1 [+ @& C1 `" E$ Z b
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;2 n) V0 s/ w# E
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;% x1 T' S$ w+ O. v
STICKLINE(m |