|
k:"kdj.k",linethick,COLORWHITE;
8 W& l1 L( g0 P* t: fd:"kdj.d",linethick0,COLORYELLOW;
0 v# [+ V, E5 E: Sr1:"rsi.rsi1",linethick0,ColorC080FF;# }0 G8 w# \2 f. @4 h
r2:"rsi.rsi2",linethick0,ColorFF8080;8 }4 z8 A8 z( [ b; N
r3:"rsi.rsi3",linethick0,Color87F8F4;+ y1 B, B2 @8 H# J C7 A- p8 a2 Z/ ~
f:"macd.diff",linethick0,Color72C072;
: A" w$ `0 o( X S+ \9 C' g2 G& Ca:"macd.dea",linethick0,ColorE98210;
) Y. \( E4 Z6 c$ Nm:"macd.macd",linethick0,COLORWHITE;
2 Y6 x# ]: X$ [6 k; w+ F) t{以下界说叠加区间(在这里是可见K线的范围)}
* J( {$ t! m. a. K6 X- hq:=SYSPARAM(3)-SYSPARAM(2);
& V& M: Y: l3 _% Y# qp:=SYSPARAM(3);8 ]9 A: f, p: l
{以下盘算叠加比和叠加平移量}
1 |7 B9 f: s2 P, o1 ]{1、叠加字段高度}
- o# G4 r. _* Z) X( S* G& R) qkh:=hhv(h,q);) l3 `/ @1 ?2 o7 X$ r8 z
kL:=LLv(L,q);
: d: u5 @0 {( Z% O1 hdh:=hhv(max(k,d),q);$ y) R. D2 ?7 t
dL:=LLv(min(k,d),q);
, O7 d. R/ ]; Fmh:=hhv(max(f,a),q);! U0 R! m$ l# k) z5 \
mL:=LLv(max(f,a),q);
3 L" d3 j* [; i. Z3 ~. ^7 x% Brh:=hhv(max(max(r1,r2),r3),q);
1 W7 Y3 f' ]- g& t6 ?rL:=LLv(min(min(r1,r2),r3),q);
- c7 _5 K( o0 [$ B* K3 F: x# g{2、叠加比}
; G. v' f+ X. ~: l$ V1 a7 G- ibd:=(kh-kL)/(dh-dL)/3;
: ^1 s% G: R0 i8 k3 @bm:=(kh-kL)/(mh-mL)/3;7 h8 j" b6 F2 N2 B
br:=(kh-kL)/(rh-rL)/3;
7 W: h, ^3 o* }{3、叠加平移量}3 Y, L- A$ U! [5 i; V8 y% ~3 U
wk:=(kh-kL)/3; [! T7 q* m' b3 |) A4 H0 v# Z
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
5 R, ?, [6 `2 P1 I9 ~wm:=(kh+kL-(mh+mL)*bm)/2;
3 Q* P% \. p6 `3 B0 ewr:=(kh+kL-(rh+rL)*br)/2+wk[p];
6 ]1 C! H0 F1 y- b7 v{以下画叠加线}
6 R4 O& `- k/ P! x8 D+ ?, [PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
" l9 H# l- A( J% OPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
6 V9 K7 @6 x+ n2 K) IPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
3 r {" i0 O; e V$ v% j4 q3 VPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
2 D# Y6 S! @; h4 r! M, O8 @3 z, dPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;( D0 T" J4 u* }
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
, S$ w0 f/ {4 f( ?PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
( v; E/ h: Y T' V% z2 ?& o w. e; SSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
; A2 s# u+ T9 e* uSTICKLINE(m |