|
k:"kdj.k",linethick,COLORWHITE;
0 U+ c+ v5 _: p4 jd:"kdj.d",linethick0,COLORYELLOW;" s$ R6 i: }7 O6 F' P/ w
r1:"rsi.rsi1",linethick0,ColorC080FF;8 i% ~8 G. s5 e1 W6 b& B: p+ `: h
r2:"rsi.rsi2",linethick0,ColorFF8080;
5 Y3 d( ^5 }7 _; W0 Fr3:"rsi.rsi3",linethick0,Color87F8F4;% B8 M1 X: G. {
f:"macd.diff",linethick0,Color72C072;, w* R% m# o' ?
a:"macd.dea",linethick0,ColorE98210;
" J) C5 b- [9 Q7 X! y+ i% pm:"macd.macd",linethick0,COLORWHITE;
" N" w& Y% Y$ a# i L1 E{以下界说叠加区间(在这里是可见K线的范围)}
* \/ F4 I* |1 `* g4 f L# h4 ~q:=SYSPARAM(3)-SYSPARAM(2);
- a# O0 s4 ]5 Qp:=SYSPARAM(3);8 R5 ?$ o! H' G4 {$ r# J9 ~% s6 A9 _
{以下盘算叠加比和叠加平移量}7 y- z0 ~2 x6 ?! ~/ f1 `
{1、叠加字段高度}2 {1 D/ E' A) M! E- h+ f/ `
kh:=hhv(h,q);" P$ a/ Y0 z8 Q; h3 C3 J6 O
kL:=LLv(L,q);) n7 c( O3 N' m
dh:=hhv(max(k,d),q);% ? r/ f. J9 N) Z# o# {
dL:=LLv(min(k,d),q);! x, W$ m! [9 @0 p
mh:=hhv(max(f,a),q);9 B* q: L2 @! ?$ w: z, v% G
mL:=LLv(max(f,a),q);* c+ }/ x! t; Q" ~+ [% u: A0 t8 b
rh:=hhv(max(max(r1,r2),r3),q);
; Y k, G0 J# m: q( d/ }rL:=LLv(min(min(r1,r2),r3),q);
" G: h* p7 ?0 L: ^{2、叠加比}, H3 `, J8 D7 K/ {) a) @/ l! H1 Z
bd:=(kh-kL)/(dh-dL)/3;9 C% H c% m! y3 s N7 D
bm:=(kh-kL)/(mh-mL)/3;" v( B2 N- a+ J6 t3 d
br:=(kh-kL)/(rh-rL)/3;: |, F R8 o4 X: n
{3、叠加平移量}
p# L: K' G3 e8 M9 }wk:=(kh-kL)/3;
8 n6 w5 W' p7 U2 Y. c8 T2 Swd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
" n) q2 r: |4 U; u. T, ~- z5 I/ xwm:=(kh+kL-(mh+mL)*bm)/2;
$ e' f0 m4 V+ N4 r: Z/ q: l! ?wr:=(kh+kL-(rh+rL)*br)/2+wk[p];, V4 M" Z: b+ W# F
{以下画叠加线}$ l5 @! D$ N5 q8 A) e' L D+ k' n+ h; s
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
# d4 |4 d3 f* i3 F5 @* X( w$ [PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;* p4 S8 Z- E. L7 D5 K( n! X8 f
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
9 t* F1 x+ {6 m2 C' U( b3 g) CPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
: {7 l6 n, a9 M+ FPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
- }( I# B0 h" f/ ZPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
& _" C% D$ ~5 xPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
- g/ X& S1 B0 P1 b& o ~STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
: v% s1 f+ p! ]* P, Z: \0 N CSTICKLINE(m |