|
k:"kdj.k",linethick,COLORWHITE;2 w# T' y. J1 x
d:"kdj.d",linethick0,COLORYELLOW;
4 M1 e( ^) Z! \* K: r3 lr1:"rsi.rsi1",linethick0,ColorC080FF;
0 G6 u" E n2 W$ Q; M( Dr2:"rsi.rsi2",linethick0,ColorFF8080;
6 p7 {5 `# O1 N; L5 Yr3:"rsi.rsi3",linethick0,Color87F8F4;, _" @: `6 B4 m, B$ M, O
f:"macd.diff",linethick0,Color72C072;5 W, } M6 w: U, r. \5 ^
a:"macd.dea",linethick0,ColorE98210;4 L7 L+ ^5 Y( {) g9 k3 ?
m:"macd.macd",linethick0,COLORWHITE;. Z1 L% v# {' |! p& S* o9 d7 i
{以下界说叠加区间(在这里是可见K线的范围)}
l# w- p" c; q$ i, e# Z4 Vq:=SYSPARAM(3)-SYSPARAM(2);
% F4 p# S! l# J: A7 Vp:=SYSPARAM(3);+ N' Y* T3 v0 \# W }, M5 B& ?
{以下盘算叠加比和叠加平移量}
) @2 k$ G; S+ T! ?* c{1、叠加字段高度}
4 d) |. e3 N. x' [: @6 K1 K6 bkh:=hhv(h,q);
! Q# {* O9 L% {2 o' n" NkL:=LLv(L,q);, D/ ~/ R! B" x C( M7 ~4 R5 ~) Z
dh:=hhv(max(k,d),q);# i! C* R% r* {: j
dL:=LLv(min(k,d),q);' L& O6 _" _2 x# [ R
mh:=hhv(max(f,a),q);
9 H! q& ?& p4 |9 z5 {2 A/ n! |) X' {mL:=LLv(max(f,a),q);
. B' g1 g+ _; X4 F3 w Mrh:=hhv(max(max(r1,r2),r3),q);
4 ^3 G: A' d: h0 \) ErL:=LLv(min(min(r1,r2),r3),q);: b1 \* x+ a9 s" |; j4 a0 w
{2、叠加比}5 \: y( b! L( u+ I
bd:=(kh-kL)/(dh-dL)/3;
% b% W2 U `( J' mbm:=(kh-kL)/(mh-mL)/3;6 z' H/ S4 U6 k S
br:=(kh-kL)/(rh-rL)/3;" U. U/ S+ r' U8 n
{3、叠加平移量}
* o5 h, D) h0 Hwk:=(kh-kL)/3;6 s$ M. {" c0 e$ v7 O [
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
% ~6 |0 M: i U8 `# c: S0 Y+ Nwm:=(kh+kL-(mh+mL)*bm)/2;
% L* u- A! g' }4 nwr:=(kh+kL-(rh+rL)*br)/2+wk[p];& V5 I, D6 e& `7 U
{以下画叠加线}$ f6 |9 p* x: m: s7 \
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;6 n* Q/ L: i% K7 O; z
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;6 @; O0 E7 S% _- y; u
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
% I" C' [: ?- {% Z5 T- JPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
! G! j8 X! J- N: f1 z% dPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
* [0 o- n) @7 }& z% d" vPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
, B$ [2 D# x2 S. ^ oPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;, p1 H) u5 N' v
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
$ y) o N x$ q" ?1 A8 J0 YSTICKLINE(m |