|
k:"kdj.k",linethick,COLORWHITE;
) e/ c+ N7 I. k% a+ Rd:"kdj.d",linethick0,COLORYELLOW;
% X/ c7 O, l6 t. q8 vr1:"rsi.rsi1",linethick0,ColorC080FF;
+ x: y* r1 P) _" n0 Yr2:"rsi.rsi2",linethick0,ColorFF8080;
! S9 D1 Q5 v( M1 T ir3:"rsi.rsi3",linethick0,Color87F8F4;7 V0 j" {/ a% D* c6 G9 S7 ~6 g
f:"macd.diff",linethick0,Color72C072;
8 T1 v9 @! g6 c1 d) k& I- Ra:"macd.dea",linethick0,ColorE98210;" h1 m6 O* d; I7 `
m:"macd.macd",linethick0,COLORWHITE;4 \+ z3 @- Z* \
{以下界说叠加区间(在这里是可见K线的范围)}
j$ ]7 w. B- k' E; F& ~q:=SYSPARAM(3)-SYSPARAM(2);+ x. Y9 z- P$ s. I! r, u. D$ R
p:=SYSPARAM(3);+ T. L3 K6 V: ^4 f
{以下盘算叠加比和叠加平移量}( L4 j% M$ \. g; A+ o* G i3 }
{1、叠加字段高度}
$ |, H/ l5 P% t6 `kh:=hhv(h,q);
; A: x! ]2 ?' ^' g1 g1 u4 @, QkL:=LLv(L,q);
u" F. {; J9 L! _$ P2 Tdh:=hhv(max(k,d),q);
: m$ v/ R" Y( h5 V, `dL:=LLv(min(k,d),q);1 s9 F( B" l8 \; q2 ~/ ?0 I6 m
mh:=hhv(max(f,a),q);( h u1 i1 c( @2 Q& H0 N" t
mL:=LLv(max(f,a),q);
/ I2 L4 y5 ^2 y! G& frh:=hhv(max(max(r1,r2),r3),q);
2 S. K8 t+ A$ Q8 }& {rL:=LLv(min(min(r1,r2),r3),q);
& ~9 f& d; u; O$ D* @{2、叠加比}( C& [% i) W: q( Z
bd:=(kh-kL)/(dh-dL)/3;1 u+ x: a9 h% k
bm:=(kh-kL)/(mh-mL)/3;
+ i+ q8 Z1 `+ W/ N$ [1 Y! gbr:=(kh-kL)/(rh-rL)/3;' y7 b: A6 H7 g% w. d- A U
{3、叠加平移量}
+ q3 k7 G) D+ N s. R {# rwk:=(kh-kL)/3;
: P: f: k6 T' [ twd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
( _ N) [3 A U% V9 jwm:=(kh+kL-(mh+mL)*bm)/2;* c8 D# l/ R2 i6 z( W" E
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];' ~7 `! X! I' q
{以下画叠加线}
8 C: Q& ~ a/ }; _1 [PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
9 R* Z5 f) |" S% aPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
) Y3 v( Q# [3 `* \$ ^PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;& S6 i- i7 y1 z+ T' s. N. ]
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
# A0 F$ N' T7 z* h! }6 MPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
' S1 p+ v8 K- R, C- b. NPARTLINE(1,f*bm[p]+wm[p]),Color72C072;% W$ b5 u1 o _
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
# y7 b2 i, M( |' nSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
2 M! M% @9 \! W b1 e" j7 mSTICKLINE(m |