|
k:"kdj.k",linethick,COLORWHITE;" b9 x3 E" c3 F- A4 y* ^; q2 g9 I3 R
d:"kdj.d",linethick0,COLORYELLOW;: b" [4 R, z6 N: p, \* [
r1:"rsi.rsi1",linethick0,ColorC080FF;
' |. n5 Z6 @! Q) Mr2:"rsi.rsi2",linethick0,ColorFF8080;* A1 f+ m6 b9 L6 ~" R# ~/ o' n" `( k
r3:"rsi.rsi3",linethick0,Color87F8F4;
& f, ~9 a1 h1 v* Jf:"macd.diff",linethick0,Color72C072;# v2 {% v" A7 U
a:"macd.dea",linethick0,ColorE98210;
, k& I; ~& v+ O' D5 {m:"macd.macd",linethick0,COLORWHITE;0 P# r2 c: v* R/ d* b# d
{以下界说叠加区间(在这里是可见K线的范围)}: C+ K" M& |* x. o' H; R6 r
q:=SYSPARAM(3)-SYSPARAM(2);
2 @; H" E+ E& a4 |; m' z' C/ cp:=SYSPARAM(3);+ ?% |, O! a; l( \% \
{以下盘算叠加比和叠加平移量}
) Q. H) e3 _2 m2 \& X$ s9 C{1、叠加字段高度}
3 S$ k% d8 g+ W7 \: Wkh:=hhv(h,q);
4 k* ^$ Q3 b7 e4 i: ?! W8 r7 o% fkL:=LLv(L,q);
) D" y9 J. |2 qdh:=hhv(max(k,d),q);9 s6 r3 J+ ~( X9 @( B
dL:=LLv(min(k,d),q);
0 X6 K/ N! q% v) Omh:=hhv(max(f,a),q);
& h* M, X% k) T5 D8 J1 pmL:=LLv(max(f,a),q);$ r8 _4 }9 A: d8 u9 m
rh:=hhv(max(max(r1,r2),r3),q);
) H# C! K% y. p9 m3 frL:=LLv(min(min(r1,r2),r3),q);
- @9 T- y$ S, S{2、叠加比}
* E' r! S/ ^9 ybd:=(kh-kL)/(dh-dL)/3;$ u& v4 ]) A4 s; t) _6 X
bm:=(kh-kL)/(mh-mL)/3;+ j8 S0 i2 P& n
br:=(kh-kL)/(rh-rL)/3;1 ~4 B" |5 d4 |7 u( B
{3、叠加平移量}
5 d" _' _& C% j9 `wk:=(kh-kL)/3;
% e& @* E# `2 M5 z: `% Hwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];) u/ O2 R0 H$ ^( i: P
wm:=(kh+kL-(mh+mL)*bm)/2;
& {3 \! [; U* t0 V; x+ b7 [1 ~. `wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
- V' n% J, L% H{以下画叠加线}
) j6 T/ C6 p* s( Q3 w. z$ q) ~8 Y$ K, ~ }PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
; E; N- r/ O6 q, S RPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
, u# P+ E: H7 E2 G+ ^. {PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
6 Q U8 ?; ]& p0 ~PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
+ _( k8 J. S9 I+ ?) NPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
, g+ k/ f6 ]- J3 `, u2 q& @! `PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
. B+ y& I3 t) M; `+ P7 e9 k7 UPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
- d# B4 w4 ~/ @" [STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
% t* C0 l2 \' C" b; aSTICKLINE(m |