|
k:"kdj.k",linethick,COLORWHITE;% o7 C2 _) B8 d+ l k6 V
d:"kdj.d",linethick0,COLORYELLOW;
" @$ T5 p, o/ s. ^9 Q* ]r1:"rsi.rsi1",linethick0,ColorC080FF;" k5 t9 ^2 }0 p3 c" d; T0 d9 M- ]
r2:"rsi.rsi2",linethick0,ColorFF8080;
; h9 u1 J( Y: n5 }* vr3:"rsi.rsi3",linethick0,Color87F8F4;
: C4 A% x% a3 Q, Vf:"macd.diff",linethick0,Color72C072;
- }/ V5 ~' J7 Z+ M D- Ia:"macd.dea",linethick0,ColorE98210;/ Q- f: Z) T- A* d
m:"macd.macd",linethick0,COLORWHITE;
6 k6 `# b9 T0 n4 v+ i4 `5 Z{以下界说叠加区间(在这里是可见K线的范围)}3 Z; T4 G {/ Q# U# g: t/ d! L
q:=SYSPARAM(3)-SYSPARAM(2);
, \# U6 N6 u$ u8 W, h/ Q, v5 ~$ L# up:=SYSPARAM(3);
0 a# ~+ _5 \. Y% b4 N{以下盘算叠加比和叠加平移量}
5 n6 }$ A# H+ g5 q{1、叠加字段高度}( P( U' L7 G* Q2 s6 t2 U0 X
kh:=hhv(h,q);! [8 @- T( Y0 n% a3 P4 \
kL:=LLv(L,q);
# P# F- n# s9 l- j: G" P" _2 ?dh:=hhv(max(k,d),q);
5 s0 c9 p+ x! q" k9 o: MdL:=LLv(min(k,d),q);
! ~" Q, F/ n& E: Q* a8 @) Bmh:=hhv(max(f,a),q);
, ^. X: I; V1 K, Z3 i3 \1 t1 XmL:=LLv(max(f,a),q);
' l! U2 S ~0 Hrh:=hhv(max(max(r1,r2),r3),q);
8 p- U( Y7 a/ u. z: k# t: wrL:=LLv(min(min(r1,r2),r3),q);
( G; o$ k3 S/ J' w* \0 p* C{2、叠加比}
1 j" F I7 x8 x2 u7 Y( X& Ybd:=(kh-kL)/(dh-dL)/3;5 X2 i# P4 i4 T j7 {
bm:=(kh-kL)/(mh-mL)/3;
* ^% h0 k g/ I& ]" _br:=(kh-kL)/(rh-rL)/3;
8 y" Q) W: Q8 U$ H j5 g{3、叠加平移量}
( I9 F0 o4 N/ X/ c% I" ~wk:=(kh-kL)/3;
1 H& X' ?( ^) B6 `4 [wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
. X9 e2 ~/ Y' z4 @7 ywm:=(kh+kL-(mh+mL)*bm)/2;+ E6 z: l; {; b8 S3 D4 Z B
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];( q; f/ M: i$ g; x
{以下画叠加线}0 j% K5 ~6 e1 n3 S/ O
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
- V+ F- N- J. o" L: U8 l$ zPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;+ A7 z) M( A; u7 C
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
/ G4 ^8 p1 _. g- N8 M) QPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;7 c: N8 x2 R) t8 R% A" f
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;: L5 ]. |* T* E$ j
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
& Z2 g" i: u) S4 sPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;$ a( B. j. h2 }8 S" G/ i
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;, p* F5 y6 W R$ ?
STICKLINE(m |