|
k:"kdj.k",linethick,COLORWHITE;& }$ T1 C, t8 l3 E% W v
d:"kdj.d",linethick0,COLORYELLOW;2 f( ?1 \: y6 L
r1:"rsi.rsi1",linethick0,ColorC080FF;1 [8 @3 o5 A3 X
r2:"rsi.rsi2",linethick0,ColorFF8080;
( ]. O- t0 N6 a- Z- h/ |1 Dr3:"rsi.rsi3",linethick0,Color87F8F4;
) X" Q( o9 ~) Cf:"macd.diff",linethick0,Color72C072;
" z) M. p8 j) G6 t$ ^' u1 @( ma:"macd.dea",linethick0,ColorE98210;
& h* I6 X% c4 q- x+ hm:"macd.macd",linethick0,COLORWHITE;
5 c: O7 K6 N2 `2 q{以下界说叠加区间(在这里是可见K线的范围)}
4 f) }& w% e$ d! H5 z( @% ~q:=SYSPARAM(3)-SYSPARAM(2);, D. ^& c/ L; d% l# W
p:=SYSPARAM(3);
* x& G! y$ R6 Y: j: g{以下盘算叠加比和叠加平移量}
1 R, ]. E1 ~1 @# o l{1、叠加字段高度}
- e5 `7 C4 O4 @" Skh:=hhv(h,q);" P! Z! n) @6 {+ H6 M @
kL:=LLv(L,q);, Y# B6 P; R3 r( ?. @4 ?6 l5 I8 P" Q
dh:=hhv(max(k,d),q);, `& v( h0 Z7 N/ a7 [
dL:=LLv(min(k,d),q);/ w5 O; |$ U( L" q k) ?
mh:=hhv(max(f,a),q);0 r4 {. ~/ Y& L. C
mL:=LLv(max(f,a),q);/ j2 S! G* h4 y& C6 f! f( V& w4 V
rh:=hhv(max(max(r1,r2),r3),q);) A* w+ O, _# l2 `4 T
rL:=LLv(min(min(r1,r2),r3),q);
5 P0 j7 o$ l" i. _4 E! G{2、叠加比}
( C4 f, I' x, V: ?8 J# R: Dbd:=(kh-kL)/(dh-dL)/3;2 O7 l5 ~3 m+ V. m! B( s; e8 k
bm:=(kh-kL)/(mh-mL)/3;
3 p& j# K1 z V+ s- V4 l( O3 A4 dbr:=(kh-kL)/(rh-rL)/3;
" L T( O& m5 }% G{3、叠加平移量}/ W3 Y' n; `( E& p4 o, K" F7 Z
wk:=(kh-kL)/3;
" x. r3 R! j. P& F+ B8 U) Iwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
" z8 z* d7 ^) ewm:=(kh+kL-(mh+mL)*bm)/2;
2 X7 H0 b- E0 d2 Ywr:=(kh+kL-(rh+rL)*br)/2+wk[p];1 e) B0 f+ Q2 V( m8 E7 C' f% Q. L5 A
{以下画叠加线}% T' D8 G7 G5 Y4 ~
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;* K" B$ C; t6 e5 l `8 v* j, N
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
+ q; O( i/ t* P4 E" k& XPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;8 B8 ~# c/ M3 L
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
( J* \, ~# h9 w) v5 x' vPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
9 I0 Z8 B* f/ h5 f) WPARTLINE(1,f*bm[p]+wm[p]),Color72C072;; k1 h* m* I7 M( r
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
+ i+ J, Q0 f$ t- \; D- FSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
5 d$ U9 T5 C B/ gSTICKLINE(m |