k:"kdj.k",linethick,COLORWHITE;7 z( j3 c% \% y$ e; i7 R3 }8 g! J
d:"kdj.d",linethick0,COLORYELLOW;
0 L$ r+ B1 _' e. xr1:"rsi.rsi1",linethick0,ColorC080FF;# F2 o* a/ }4 P7 ^
r2:"rsi.rsi2",linethick0,ColorFF8080;; h0 }, A h4 ]1 u: `/ U2 T
r3:"rsi.rsi3",linethick0,Color87F8F4;8 V* ]6 y. r$ S p
f:"macd.diff",linethick0,Color72C072;. b" k" t/ S9 c) [: t8 T2 P2 d7 o
a:"macd.dea",linethick0,ColorE98210;. r, }6 p& t6 |2 k, d: g9 p
m:"macd.macd",linethick0,COLORWHITE;) u- A" N! \' s2 Q
{以下界说叠加区间(在这里是可见K线的范围)}
* P1 O% B' G4 d, v4 }5 h0 u3 t2 e9 d. [q:=SYSPARAM(3)-SYSPARAM(2);+ c7 K/ f* e, L
p:=SYSPARAM(3);
( \4 I) s3 c5 r* c{以下盘算叠加比和叠加平移量}; ?- Z1 H- c* h# J6 b3 N
{1、叠加字段高度}
6 v v6 k" o; T) G1 f* k: zkh:=hhv(h,q);6 ]. b2 M4 L ^3 C$ t
kL:=LLv(L,q);
( M: G2 r' j% j% g8 a3 R3 z: Ldh:=hhv(max(k,d),q);
* {! [& z% d( q3 M0 ]. VdL:=LLv(min(k,d),q);! t+ @* g% ?0 h
mh:=hhv(max(f,a),q);3 w) W! ~& ^3 t! \
mL:=LLv(max(f,a),q);
s7 H9 T. O! d* Trh:=hhv(max(max(r1,r2),r3),q);
$ F; v/ y8 H/ c$ o" J$ \rL:=LLv(min(min(r1,r2),r3),q);, L; S. u( b+ b/ P. W
{2、叠加比}
: W, U6 }) s: Wbd:=(kh-kL)/(dh-dL)/3;
6 Q2 P9 |% i8 @ A$ o q6 ?bm:=(kh-kL)/(mh-mL)/3;( C2 j1 A. A5 C: b- z
br:=(kh-kL)/(rh-rL)/3;
: h3 X& ?5 I- O5 M{3、叠加平移量}2 N$ }- ]4 y F( h2 y
wk:=(kh-kL)/3;
4 r L* z$ }6 w) Y7 J! L1 m; jwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
+ @. M% W3 ^9 Fwm:=(kh+kL-(mh+mL)*bm)/2;* ^. u, \' n: _2 }( T9 L* X
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
( d1 h. d- M: U- R/ i{以下画叠加线}
; Y: `; `& g- u+ y, k% U7 t+ Y6 |PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;) q! B( P- F2 u' ?) h
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;6 s: z$ L1 ^4 b/ u& e; ^- H7 L) M" k
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
8 I5 M3 g6 D/ M" x/ \( y {$ aPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
* \$ D- G: a- N" s9 c8 E/ zPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
, m" f: U) x4 X* v- |; s$ uPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
5 \* ^0 ~" ] ]% t$ S/ A9 oPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
6 e8 @, |6 W# PSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
8 I4 x6 M# @( |2 hSTICKLINE(m |