|
k:"kdj.k",linethick,COLORWHITE;+ `5 ~" W8 \+ I6 t3 V
d:"kdj.d",linethick0,COLORYELLOW;
% }7 P- k7 C4 E; cr1:"rsi.rsi1",linethick0,ColorC080FF;
% e9 ~5 j; t& h- X) s: Jr2:"rsi.rsi2",linethick0,ColorFF8080;
$ p; M0 ~6 x0 Y; @r3:"rsi.rsi3",linethick0,Color87F8F4;
4 M( \+ M/ j1 N, N3 w1 X# g/ k2 hf:"macd.diff",linethick0,Color72C072;( J' {2 N; H( g
a:"macd.dea",linethick0,ColorE98210;
9 M% ^" c/ c2 H: ]2 Gm:"macd.macd",linethick0,COLORWHITE;
B6 A* I4 A" \" s{以下界说叠加区间(在这里是可见K线的范围)} [+ T6 s$ }4 l+ g' J7 c$ u
q:=SYSPARAM(3)-SYSPARAM(2);( s. c8 v5 U( S
p:=SYSPARAM(3);
) g; Y* H9 w- L/ e{以下盘算叠加比和叠加平移量}& C8 Y ^9 R" _" s, B
{1、叠加字段高度}# d' n0 z/ D) M3 C7 ]! @. m1 T/ V8 u
kh:=hhv(h,q);
8 @ `5 d6 Y8 q- PkL:=LLv(L,q);/ C! G- h$ M+ D4 C; c: A
dh:=hhv(max(k,d),q);& m" ~: N- ^! x' Y& n3 E. j
dL:=LLv(min(k,d),q);
( E6 L2 {$ j! r! k/ \9 mmh:=hhv(max(f,a),q);
8 T |! |3 x8 omL:=LLv(max(f,a),q);
0 j) J: C/ U/ Jrh:=hhv(max(max(r1,r2),r3),q);
! k8 x3 V: Q" U' L7 KrL:=LLv(min(min(r1,r2),r3),q);4 ]6 D6 m: q0 {" O9 T2 r, w
{2、叠加比}
1 ?3 J2 ?& w" D) O6 n5 j8 v# v8 kbd:=(kh-kL)/(dh-dL)/3;
4 Q" a6 z1 Z ]& Y& ~bm:=(kh-kL)/(mh-mL)/3;
+ s" i I; ^8 h+ p, Mbr:=(kh-kL)/(rh-rL)/3;
9 ?3 w8 a3 i" P# b{3、叠加平移量}5 w/ J! K+ D! x' r
wk:=(kh-kL)/3;
( L7 i* Y0 P5 |1 E) Ewd:=(kh+kL-(dh+dL)*bd)/2-wk[p];" l! a) c+ v' `: o+ U
wm:=(kh+kL-(mh+mL)*bm)/2;3 s; g- u4 } R( N* Z
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];) s& r# ^6 n4 p* Z0 @
{以下画叠加线}7 m( `+ X4 y; Z8 _3 _& |! @' r1 s
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
2 p: q# Q( B `2 q4 L6 j1 z9 U+ LPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;8 K5 I) s4 e0 U" i! o3 B) P
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
+ r+ B, p9 y. s5 e% fPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;; M |( H; C9 ~
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4; p/ p7 h- `* X% v
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
4 g# |7 V7 Y; k- W2 v9 N _$ M3 SPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;/ G# P& }6 S2 _5 }
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;, K3 @0 r& I# ]- [$ H& ]' p
STICKLINE(m |