|
k:"kdj.k",linethick,COLORWHITE;
/ l% o V" H7 |0 Nd:"kdj.d",linethick0,COLORYELLOW;' a2 v( |5 B- v$ b2 `' g: w. Z1 n
r1:"rsi.rsi1",linethick0,ColorC080FF;
8 ?; c7 |: ~" Er2:"rsi.rsi2",linethick0,ColorFF8080;2 S( U* O- x% q6 S; \
r3:"rsi.rsi3",linethick0,Color87F8F4;
* u& b4 ?4 F6 f0 f, M: D1 ?: Gf:"macd.diff",linethick0,Color72C072; o# l& D6 n! Y: H* p
a:"macd.dea",linethick0,ColorE98210;
0 k7 ^3 ?/ }9 a, Y& zm:"macd.macd",linethick0,COLORWHITE;& e0 F3 j } ~5 y" J
{以下界说叠加区间(在这里是可见K线的范围)}
- H" r1 p4 y- F1 dq:=SYSPARAM(3)-SYSPARAM(2);
# J) }% A" X( z& j+ H$ J3 `/ ~p:=SYSPARAM(3);
8 X$ I+ P6 K, X9 i{以下盘算叠加比和叠加平移量}
' ~% `6 p1 W1 k# V0 y{1、叠加字段高度}2 K! |# ^+ [& Z0 \& J
kh:=hhv(h,q);" N9 {1 f; G" k* h6 ~* ?
kL:=LLv(L,q);! T' _' U8 ?! T$ u( `) {' S' P
dh:=hhv(max(k,d),q);+ o C( Y$ n. d X o+ e/ u
dL:=LLv(min(k,d),q);* K6 d8 f7 N7 M
mh:=hhv(max(f,a),q);) p0 P0 I# M& G, I
mL:=LLv(max(f,a),q);
) ]% s; }0 R5 Z$ Z3 }2 m4 crh:=hhv(max(max(r1,r2),r3),q);$ |) v0 p( N( E7 C8 t) W
rL:=LLv(min(min(r1,r2),r3),q);' k% `6 I$ x: K) h- d; |
{2、叠加比}
) D8 t, f' t& M+ \bd:=(kh-kL)/(dh-dL)/3;
4 u' y0 }) u4 W1 K. ]+ y8 @6 Ubm:=(kh-kL)/(mh-mL)/3;1 ~9 u3 S1 _( a! N9 c3 G
br:=(kh-kL)/(rh-rL)/3;
! \' a& r- u0 ^6 o( f& c+ \, ]{3、叠加平移量}
$ T/ H2 j- a B/ M+ z, Z6 h, S! Y1 Dwk:=(kh-kL)/3;
1 d6 R& `. `' n$ l! c) L9 x& hwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
2 a2 G b9 z5 xwm:=(kh+kL-(mh+mL)*bm)/2;5 n* C7 z0 H+ Z/ B+ h( V6 d
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
e9 X3 f) D, m* h3 d1 U2 v3 }{以下画叠加线}
; M% j* S6 M9 I$ |1 o6 E qPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;! z* N$ v1 e n% [- M
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;4 v1 c! r6 V! V7 ?4 G
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;4 s$ q, \7 @: t' k! T$ \0 L
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
$ }- w r' _( N' E' ?" t8 P- PPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;8 R: _2 e: h% z1 P4 N1 \0 T/ G
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
\# ?0 U7 _: ~# y5 W5 MPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;1 Q$ b |: `4 s& d
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
+ s0 l, z4 L1 S1 U6 b' z l& B, NSTICKLINE(m |