k:"kdj.k",linethick,COLORWHITE;, x) z% [$ K# J) F1 a
d:"kdj.d",linethick0,COLORYELLOW;
8 `% ^* j* j9 wr1:"rsi.rsi1",linethick0,ColorC080FF;
( {- \$ ?" ^! C" ^9 H* A6 Pr2:"rsi.rsi2",linethick0,ColorFF8080;
0 _% e7 S8 U5 C7 U8 O" `r3:"rsi.rsi3",linethick0,Color87F8F4;# {5 s x) w" z+ ~
f:"macd.diff",linethick0,Color72C072;# l4 p8 r* V- M1 F3 X" R
a:"macd.dea",linethick0,ColorE98210;
) ~# M3 t& c' Em:"macd.macd",linethick0,COLORWHITE;
6 Z8 W( R7 s" H+ c1 l! `. j# E s{以下界说叠加区间(在这里是可见K线的范围)}
# P' K. _; U" h% ]q:=SYSPARAM(3)-SYSPARAM(2);, o- W; X- s5 X t
p:=SYSPARAM(3);# `' }$ K# i! Z& K
{以下盘算叠加比和叠加平移量}8 c- D$ E6 R* h; ]4 y# ^* C
{1、叠加字段高度}
3 F8 A/ ]( S* g9 t# C2 ekh:=hhv(h,q);
, v `* N* S% r$ U+ H9 Z3 dkL:=LLv(L,q);
" b$ O. [% x" T0 u0 o, Xdh:=hhv(max(k,d),q); G# V X l# {/ x. _/ n
dL:=LLv(min(k,d),q);7 f) G8 h+ V% g8 R7 Z7 h
mh:=hhv(max(f,a),q);
( B/ f9 @4 R. U8 w5 b/ w# {6 \mL:=LLv(max(f,a),q);1 a. K( T0 |/ Z& W
rh:=hhv(max(max(r1,r2),r3),q);
9 X! _* K# `. m6 W5 L3 p, a8 ]rL:=LLv(min(min(r1,r2),r3),q);5 {, D, ]; P1 C& S/ @8 R; V" B" M$ N
{2、叠加比}, _0 D2 P: ^! @
bd:=(kh-kL)/(dh-dL)/3;
; z' j4 o6 w5 u, L' @2 l* |- cbm:=(kh-kL)/(mh-mL)/3; r5 {' V+ n6 u+ t8 G6 Y
br:=(kh-kL)/(rh-rL)/3;; s$ r& m# ^+ z/ c% u8 \; N/ J7 S6 D0 ^6 P
{3、叠加平移量}
* i* z+ p' ~, p* Q5 G7 Xwk:=(kh-kL)/3;& U" c M6 K& ` }9 K! T! W
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
( M" [# R6 A- i+ W9 Cwm:=(kh+kL-(mh+mL)*bm)/2; @5 q! [" |* O4 P' e8 M
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
7 v- H4 ]/ l% r; D+ F+ f% s7 e{以下画叠加线}
" d9 k. P* K4 B; _PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;! ?8 f( q$ ?0 A( y
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
3 p$ E, v2 y( R3 ~( S. X* VPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;- `5 R0 Z5 n+ p P) @8 o5 \
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
2 _! }4 t I8 X. FPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;! Q. U3 Q! A; W E6 P, l7 C9 k
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;* v f* c& D+ b3 S( f: y( Z; I
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
3 ]8 _ ^, A9 `# C4 F+ bSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;: r# S N, b8 A# R6 }$ |
STICKLINE(m |