k:"kdj.k",linethick,COLORWHITE;( D( A( W, I' W! n4 L
d:"kdj.d",linethick0,COLORYELLOW;
% o+ ~/ W- d# O+ f/ _- g# H' zr1:"rsi.rsi1",linethick0,ColorC080FF;- i& o* a; ~; s9 ^# j
r2:"rsi.rsi2",linethick0,ColorFF8080;" x4 S' p6 O5 z1 S# r- d
r3:"rsi.rsi3",linethick0,Color87F8F4;
( `# u/ K! G; K3 v$ ^, vf:"macd.diff",linethick0,Color72C072;
. m0 L1 A! f1 I& F8 wa:"macd.dea",linethick0,ColorE98210;' a4 H q% X, I* k# c* a+ w; i
m:"macd.macd",linethick0,COLORWHITE;( v& `/ g' p- @# L3 ~" O5 F$ P
{以下界说叠加区间(在这里是可见K线的范围)}2 Q8 Z2 j! ?9 S9 H, s% b! r! M) X
q:=SYSPARAM(3)-SYSPARAM(2);
! b7 D) I; W# ^8 J. [" ~7 j) K/ ?p:=SYSPARAM(3);. I+ d1 j+ t9 Y5 G9 n- ?( z% @
{以下盘算叠加比和叠加平移量}% [9 w5 g# y+ _* q/ m
{1、叠加字段高度}2 D" R$ L) l8 {1 V
kh:=hhv(h,q);
g0 D0 ~. I. b* CkL:=LLv(L,q);$ G- A7 ~( n# f; V! L! P
dh:=hhv(max(k,d),q);) I( p) G1 x& D' g4 a
dL:=LLv(min(k,d),q);$ ]! \, t. @" O( h" X
mh:=hhv(max(f,a),q);
& Y. a& G0 r8 u, B: [mL:=LLv(max(f,a),q);
3 l7 \: | e! a6 ]rh:=hhv(max(max(r1,r2),r3),q);: i& s4 m+ X0 ?
rL:=LLv(min(min(r1,r2),r3),q);9 F. _* N2 M2 ]7 f ?# u
{2、叠加比}$ ?, @. O4 T+ X3 _8 r
bd:=(kh-kL)/(dh-dL)/3; ` T5 L8 V2 D' k
bm:=(kh-kL)/(mh-mL)/3;
7 U3 R1 X/ ~# @: N- H) J7 y7 bbr:=(kh-kL)/(rh-rL)/3;. s4 g* C% N. C" ^, j3 O& [
{3、叠加平移量}% o& R9 S5 ^' v; n. b' \& R
wk:=(kh-kL)/3;+ |( H0 B, \2 e- Z s- s
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];0 T9 K# j! x- u. B
wm:=(kh+kL-(mh+mL)*bm)/2;
( A& P p" V! Z. A- ~- `" Twr:=(kh+kL-(rh+rL)*br)/2+wk[p];7 Y( {$ x: h7 [! W2 u
{以下画叠加线}2 I- L0 x5 |" v9 W: `
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;4 l, A }* H1 l# \5 s' j4 \7 a9 g
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
) U5 l; b# d2 T* CPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
J4 k7 ~( L# w3 E& nPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;& [( F2 M0 \ R) p: k
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
4 j: x# x( Z& r2 [/ n" jPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
1 c7 k! v4 [7 l% ~, ?PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
2 L j+ p3 i7 f* O6 B* x& ]STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;& S+ e5 ]2 @- n7 F. c/ R" \
STICKLINE(m |