|
k:"kdj.k",linethick,COLORWHITE;
+ j! T6 h' e- ~- hd:"kdj.d",linethick0,COLORYELLOW;
. f& x- ]/ b8 v! m0 Gr1:"rsi.rsi1",linethick0,ColorC080FF;
/ ]' o; [- {# b3 m( a6 F5 gr2:"rsi.rsi2",linethick0,ColorFF8080;1 |- j. a# R/ Y
r3:"rsi.rsi3",linethick0,Color87F8F4;
: |; p$ R! D1 V% i+ n; Qf:"macd.diff",linethick0,Color72C072;
( O3 [& e+ K" U4 Q( U$ y9 @a:"macd.dea",linethick0,ColorE98210;- k9 w3 h' [1 ~' l4 ]# ~1 S
m:"macd.macd",linethick0,COLORWHITE;! ]0 r4 v) Z4 F& {; }
{以下界说叠加区间(在这里是可见K线的范围)}
2 d3 e Y! E; T! cq:=SYSPARAM(3)-SYSPARAM(2);2 k# p/ u: O+ ]: }1 p# ]$ U, _! V
p:=SYSPARAM(3);8 p4 G3 }! V9 U$ a3 @
{以下盘算叠加比和叠加平移量}. f# Y) y3 H" w4 t+ s1 ^
{1、叠加字段高度}5 e, C3 `: W0 _3 r
kh:=hhv(h,q);1 ^7 |9 B% v Q1 k# l- c2 c
kL:=LLv(L,q);
) a/ l; d8 E* Fdh:=hhv(max(k,d),q);! o: T) z/ P& n+ N1 b# n
dL:=LLv(min(k,d),q);7 h' S b; z: @3 w
mh:=hhv(max(f,a),q);
# k1 Z! A6 t9 W( ?mL:=LLv(max(f,a),q);' u9 c9 K1 a* S1 X) I5 G
rh:=hhv(max(max(r1,r2),r3),q);
# s7 K1 C' T, trL:=LLv(min(min(r1,r2),r3),q);: H/ {- X$ t: N# M0 C0 B
{2、叠加比}( R. J! ?1 R8 v2 ]3 E* w
bd:=(kh-kL)/(dh-dL)/3;
8 @: M& _/ B( b Y& g9 g# ebm:=(kh-kL)/(mh-mL)/3;
4 ~0 a3 t8 O4 G9 i. E; wbr:=(kh-kL)/(rh-rL)/3;. W6 K2 Q v4 R" C6 o/ {
{3、叠加平移量}
: P# j' O2 F' w8 ?wk:=(kh-kL)/3;* O' q, Z( `( X" A
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];! D# U; T$ s/ \2 E, k8 g
wm:=(kh+kL-(mh+mL)*bm)/2;2 ?% s1 t$ O: M% d" n& w2 `
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
" Q9 ]4 z; C9 G/ i{以下画叠加线}% e% ^$ p. c3 ?! x" |3 p+ _( M
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
w# c( F7 v7 L" u% L: IPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;5 M$ Q% A% @) Q5 S: p+ f4 q. P# H
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
& J' {- A0 T0 p+ ~3 wPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
) F/ X" B- X% K7 F( p5 Q% oPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
6 b) C0 h% H, Y, qPARTLINE(1,f*bm[p]+wm[p]),Color72C072;" w: G& o; M) \' h
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;4 W& N, a: b; P7 N. z& }5 ?
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA; `4 B$ T& u2 @) e# k: ?3 {) @! k" F
STICKLINE(m |