|
k:"kdj.k",linethick,COLORWHITE;
) ~4 y- I1 x! J! c& h% [- ^$ Bd:"kdj.d",linethick0,COLORYELLOW;( A6 w( A1 E) D! [1 e+ n
r1:"rsi.rsi1",linethick0,ColorC080FF; d6 e/ J# _' `7 k
r2:"rsi.rsi2",linethick0,ColorFF8080;& _( a& y/ Y8 a1 ~. G0 }
r3:"rsi.rsi3",linethick0,Color87F8F4;9 @" Q* v4 V% `5 w
f:"macd.diff",linethick0,Color72C072;) f# g) y: Z1 R
a:"macd.dea",linethick0,ColorE98210;
8 b1 e ~+ `' R9 Vm:"macd.macd",linethick0,COLORWHITE;
; E4 Z9 H8 y. K, K- D4 W{以下界说叠加区间(在这里是可见K线的范围)}
2 z& f5 S! O. q# Y6 k2 Hq:=SYSPARAM(3)-SYSPARAM(2);
# Z, i$ N9 O' l" _; wp:=SYSPARAM(3);
9 _' D0 h2 o G e1 k" `9 Q{以下盘算叠加比和叠加平移量}: a- J+ q) v: ]) ]/ a5 y
{1、叠加字段高度}
9 z+ A- N4 L- |4 I" m6 O' s0 j' Rkh:=hhv(h,q);% n7 s. s0 U3 Y7 [: Z" R3 B! J
kL:=LLv(L,q);
$ [. P- y- ?0 U6 e/ W5 k- bdh:=hhv(max(k,d),q);- `& ^5 D6 E& H: E6 p
dL:=LLv(min(k,d),q);7 X3 T% o8 h5 N- N/ r! d( J
mh:=hhv(max(f,a),q);$ Q. {+ c8 [5 @. l5 u5 c* X
mL:=LLv(max(f,a),q);# r/ Z5 g1 c$ a* @2 |' I
rh:=hhv(max(max(r1,r2),r3),q);
& m" J x; W- `; J8 a7 z4 X% X& {rL:=LLv(min(min(r1,r2),r3),q);
9 q- M \3 |/ j# ~{2、叠加比}
: p9 C) x3 w+ f; U) Cbd:=(kh-kL)/(dh-dL)/3;
& _, Y( T1 B/ Q. M+ M5 X/ mbm:=(kh-kL)/(mh-mL)/3;
8 z' R! c% _, p' j, T$ d7 C E* E$ i4 Zbr:=(kh-kL)/(rh-rL)/3;5 X3 c/ v u6 s* n# ]: j; E: s9 W
{3、叠加平移量}
3 z8 m+ e2 M" kwk:=(kh-kL)/3;
2 P; S7 q0 `4 {" t+ ?) `) x# mwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];7 q% H0 T! C _& I3 H. j3 O
wm:=(kh+kL-(mh+mL)*bm)/2;& x) _2 R2 w+ ]
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];" n6 E9 j) v' r2 L) J
{以下画叠加线}- B$ ]$ s' O9 ?# l% ]3 h
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;. a& {/ z% K. o. J X
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;& {& a* i. f: b9 j3 `9 [1 ]
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
' b" Z/ w+ M! H) J+ T7 \PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;; y+ J1 V# i- t. P' W' F$ \
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
9 _5 y) ^5 @# Q# z+ G0 aPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
. y6 Z+ `5 ~- S YPARTLINE(1,a*bm[p]+wm[p]),ColorE98210; v: \5 w9 G# O
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
& j* w6 p8 l, x! U7 a. A7 `- e2 N1 fSTICKLINE(m |