|
k:"kdj.k",linethick,COLORWHITE;. b( z+ o! x' h3 G( \9 _7 g
d:"kdj.d",linethick0,COLORYELLOW;
1 z: M3 D4 }$ w, A$ nr1:"rsi.rsi1",linethick0,ColorC080FF;
9 a" r0 V7 }' g# m" j( ar2:"rsi.rsi2",linethick0,ColorFF8080;
+ }' f4 } v3 g* K+ O3 Pr3:"rsi.rsi3",linethick0,Color87F8F4;1 f/ M4 c! w* v4 m9 E
f:"macd.diff",linethick0,Color72C072;
! s# x/ p- L* b& v, V, X2 F6 I3 x% qa:"macd.dea",linethick0,ColorE98210;
' V( f2 n! Q& Ym:"macd.macd",linethick0,COLORWHITE;
& I( b" s- Z# s" `5 h' `0 H{以下界说叠加区间(在这里是可见K线的范围)}1 @4 d0 f: C6 W K- k
q:=SYSPARAM(3)-SYSPARAM(2);' N* p' x( P- j/ H% k# `, L/ W
p:=SYSPARAM(3);
" \2 K" ]5 }$ d) t0 T8 o{以下盘算叠加比和叠加平移量}: z& f, K0 X. U% e4 b2 R
{1、叠加字段高度}* l; R9 F4 u( j: j. D* M
kh:=hhv(h,q);$ a6 X6 q! \: K7 H
kL:=LLv(L,q);6 Z4 l- y( R3 f/ b
dh:=hhv(max(k,d),q);
# [# m$ m. }( }( r# ]7 EdL:=LLv(min(k,d),q);; M& y6 t- R" V1 A0 a3 w9 t
mh:=hhv(max(f,a),q);& h9 O4 q k" f: }; Q0 A
mL:=LLv(max(f,a),q);; m2 W% n* T* ]9 L9 M8 m1 F
rh:=hhv(max(max(r1,r2),r3),q);
0 X9 J9 Y+ @( A* ErL:=LLv(min(min(r1,r2),r3),q);
! V5 `0 s P; z1 q3 v- w, B{2、叠加比}9 h9 v v# ~! A
bd:=(kh-kL)/(dh-dL)/3;
; e# H( l2 b5 L6 Q+ ` j) | D! {4 Bbm:=(kh-kL)/(mh-mL)/3;
9 o6 Q8 f3 ?$ u9 Bbr:=(kh-kL)/(rh-rL)/3;5 d L4 ]1 q7 ^9 r" [% c
{3、叠加平移量}
; k4 X$ c- C. o0 R5 d+ Xwk:=(kh-kL)/3;
1 h& E9 s; Y# ?' `wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
0 [1 e4 K3 f; Y. M' Qwm:=(kh+kL-(mh+mL)*bm)/2;5 s+ X. A$ V3 T x- H
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];8 b: |% [/ t; I- ~* V' x |0 L+ ^9 V
{以下画叠加线}' G+ P& e5 r' h. g
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;0 L1 U7 z* c9 V, L x8 @
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
/ F/ i0 h# v, B+ mPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;. R/ ? }" \+ x9 A8 L* b
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
: l9 d* \1 ^5 ?0 w/ Z0 {! sPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;7 q4 O- x/ f+ Q; z1 k
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
' k3 P2 } b! z5 d; ^' @+ G, Y9 X f6 iPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;) q+ y& X( v+ R& M$ a" f# n. M
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
) y, o3 O: z7 M0 P+ sSTICKLINE(m |