|
k:"kdj.k",linethick,COLORWHITE;
- k; E! k" n+ ^. R3 V ed:"kdj.d",linethick0,COLORYELLOW;) l: a7 x9 o8 u+ ?
r1:"rsi.rsi1",linethick0,ColorC080FF;
3 K; F9 M6 Z3 R$ }* g$ D" F/ _r2:"rsi.rsi2",linethick0,ColorFF8080;
% ]1 @( o4 a3 n9 or3:"rsi.rsi3",linethick0,Color87F8F4;5 k T8 v% }2 x
f:"macd.diff",linethick0,Color72C072;) h6 G, c$ a Q8 N8 v
a:"macd.dea",linethick0,ColorE98210;
7 X% P1 Y( e8 Dm:"macd.macd",linethick0,COLORWHITE;# I% r1 V! C& g/ U- z7 T3 Z. X j
{以下界说叠加区间(在这里是可见K线的范围)}
/ l* R& }0 c6 W/ x9 yq:=SYSPARAM(3)-SYSPARAM(2);
4 j& B( y6 m/ sp:=SYSPARAM(3);, N# N. {! I6 L" l- y* }# }$ t, ~; A
{以下盘算叠加比和叠加平移量}3 w$ ` @1 j$ g$ R4 z3 B
{1、叠加字段高度}1 \5 {( w, n. ^; j3 h
kh:=hhv(h,q);- Z* `+ ?( }( q9 v+ g" O* W, h
kL:=LLv(L,q);0 [, e% Z! F2 ?7 M
dh:=hhv(max(k,d),q);
' i+ P5 |( R b, ~dL:=LLv(min(k,d),q);. _( j, Z# G& D3 ]
mh:=hhv(max(f,a),q);
9 N3 E9 a8 y/ A' [* CmL:=LLv(max(f,a),q);" |$ {4 T- c3 I$ o, w1 p/ m
rh:=hhv(max(max(r1,r2),r3),q);4 T' l+ t( u; s4 J+ L
rL:=LLv(min(min(r1,r2),r3),q);
7 h6 Q9 V5 g$ v: }8 @& G{2、叠加比}
7 V2 {) U. d5 i( p7 U* @) [# pbd:=(kh-kL)/(dh-dL)/3;% O# J' ]7 B9 L) ?9 r% ]
bm:=(kh-kL)/(mh-mL)/3;
?& I9 |( T- E9 k+ ~- i1 l" O1 zbr:=(kh-kL)/(rh-rL)/3;+ J3 n3 v; S% ]# \2 j
{3、叠加平移量}
! f p3 A% Z& d6 t' S6 N: ~9 Twk:=(kh-kL)/3;# A1 c- J( K$ ~5 I
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];5 \: Q3 t% F' ]0 B8 ~/ `
wm:=(kh+kL-(mh+mL)*bm)/2;
, i+ c1 i; m* o* ~& b+ P6 q; hwr:=(kh+kL-(rh+rL)*br)/2+wk[p];
8 Y. p; m: A& G: P8 C- N7 h2 y{以下画叠加线}1 X1 {" f+ S, k( O; \
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
) d, x8 ?% m D. K3 M5 F" g( fPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;1 O% }3 w: t: p1 B& z
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
! S3 L' b- L0 A: e) @& q& CPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
* v7 n' A2 E6 q6 z, s5 U2 FPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;$ s6 j: W7 A. P' s
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;/ k& m: m. P' V7 U' k7 b: s
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;% M6 _2 U% W8 c e! l8 ^9 U& j
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;- p5 T. L& V* R
STICKLINE(m |