|
k:"kdj.k",linethick,COLORWHITE;4 c" L' F8 f4 K' t+ M
d:"kdj.d",linethick0,COLORYELLOW;. ~4 f r8 m- I( R m) N3 ?
r1:"rsi.rsi1",linethick0,ColorC080FF;' k, a) z, N8 f
r2:"rsi.rsi2",linethick0,ColorFF8080;, S; c# `( o1 K7 f( X- L
r3:"rsi.rsi3",linethick0,Color87F8F4;
' [! G8 s, d! J% R( d3 \f:"macd.diff",linethick0,Color72C072;
. a& k! b/ D& x( `+ \2 r: Ca:"macd.dea",linethick0,ColorE98210; s ?! ^. P8 C0 v- j3 g! T
m:"macd.macd",linethick0,COLORWHITE;
0 g3 o+ L( G3 ? K1 T{以下界说叠加区间(在这里是可见K线的范围)}
4 M: o/ U& |! X4 W$ B5 [8 Hq:=SYSPARAM(3)-SYSPARAM(2);
& B! N# R, Z8 u. @4 z" Z1 Kp:=SYSPARAM(3);$ Q6 B* L& j: W& w. @
{以下盘算叠加比和叠加平移量}- G2 u% ?1 j) G \0 ^: N/ x
{1、叠加字段高度} ?2 |# ]. }! G) y \6 z1 ?, C
kh:=hhv(h,q);9 ^% j5 @( d, P" |* u9 h5 e
kL:=LLv(L,q);$ X( j' L/ I9 _, u+ f
dh:=hhv(max(k,d),q);# y* P' O6 a) }. n+ ?: e
dL:=LLv(min(k,d),q);* U8 D% f s. w" s) ?' G
mh:=hhv(max(f,a),q);
* u5 ]% T' t6 I& c. \% z3 nmL:=LLv(max(f,a),q);1 W' H1 k/ q: G2 q1 N" \% M# W
rh:=hhv(max(max(r1,r2),r3),q);6 y- R" P* K3 w1 }/ K
rL:=LLv(min(min(r1,r2),r3),q);
3 O4 A3 F! H" @ \! L* l{2、叠加比}- Q4 i* J7 i: o
bd:=(kh-kL)/(dh-dL)/3;
4 i! I- H+ j4 Q0 bbm:=(kh-kL)/(mh-mL)/3;
6 K9 I* e, W) Y1 n$ t- O& sbr:=(kh-kL)/(rh-rL)/3;
5 Y9 s% y4 {" S{3、叠加平移量}. b2 `2 J: ?+ Z" U$ y0 I$ L6 M* J) {7 U
wk:=(kh-kL)/3;
( u2 k3 [/ B8 }wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
; l, `# B6 ^6 swm:=(kh+kL-(mh+mL)*bm)/2;
. m$ z0 y! m: D2 Fwr:=(kh+kL-(rh+rL)*br)/2+wk[p];
; ?6 t, p! @' E: Y{以下画叠加线}
: U, y% K) f9 M! BPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;" P* d |( ?9 f. j6 G9 U; W$ T0 L
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;; p0 X# ?2 X/ B5 L
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
9 a# ~; r5 o- N ?2 TPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;9 z0 o5 g# l( [: y; G
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
& A- T, g' T% l$ ]( _PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
1 o! n! Z: j. ]- GPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
3 w2 ]% D. T* B6 |% T3 C5 wSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;/ P; J! \* j1 b3 }/ J8 N& g
STICKLINE(m |