|
k:"kdj.k",linethick,COLORWHITE;* t9 V5 V; O6 N( i% j
d:"kdj.d",linethick0,COLORYELLOW;' e+ ]6 T: s6 Q& f
r1:"rsi.rsi1",linethick0,ColorC080FF;
5 v; L& O, e$ `9 a) N9 r; L; B ?6 y$ Tr2:"rsi.rsi2",linethick0,ColorFF8080;3 b! _! X9 e a- p! ~
r3:"rsi.rsi3",linethick0,Color87F8F4;
- ^, `$ d/ [% y6 T4 E8 c! J Sf:"macd.diff",linethick0,Color72C072;
( h# H1 M' I4 _ h# ta:"macd.dea",linethick0,ColorE98210;% M, A1 D' m$ Q! g% S8 @* i
m:"macd.macd",linethick0,COLORWHITE;1 {4 H1 V0 H7 M, F- ?5 N
{以下界说叠加区间(在这里是可见K线的范围)}
) U: R" E, x" ~2 M! r% Yq:=SYSPARAM(3)-SYSPARAM(2);2 Z0 y/ e2 k! O
p:=SYSPARAM(3);+ r6 k( I- m: m
{以下盘算叠加比和叠加平移量}
/ a: r' W. Z7 q! H- D* v/ m+ K; M{1、叠加字段高度}
' m- n$ Q F3 f* u U) ykh:=hhv(h,q);8 `) S7 N: |) f$ y6 J, Q# v# v
kL:=LLv(L,q);- g% s) Z3 G. D" [
dh:=hhv(max(k,d),q);. U( N2 B) {- _8 ]
dL:=LLv(min(k,d),q);
3 j* L/ U0 `& ?* qmh:=hhv(max(f,a),q);( o) Y0 C. v& Y {+ b8 @
mL:=LLv(max(f,a),q);( i: x }2 B/ V
rh:=hhv(max(max(r1,r2),r3),q);
, N% t) z2 t2 N: C1 j' d, RrL:=LLv(min(min(r1,r2),r3),q);7 n! \0 X, Y, t: h' r3 f
{2、叠加比}
( g# \" S: D/ e" ebd:=(kh-kL)/(dh-dL)/3;& F/ x5 C% x9 q7 O1 t3 o
bm:=(kh-kL)/(mh-mL)/3;
- Z, J2 g: Y5 S% d( h' `, ebr:=(kh-kL)/(rh-rL)/3;. Z4 D4 ^; Z+ I
{3、叠加平移量}
/ }) g4 b5 E2 O# `: Hwk:=(kh-kL)/3;
" {6 p7 s5 x7 |+ C B% Q; q5 vwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];* n& }) R! H7 P; [ `- ~% U3 B
wm:=(kh+kL-(mh+mL)*bm)/2;" z2 J- c- N' C1 M1 G8 D
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];' h4 O. g. y- I" D+ D* D+ f5 u) H
{以下画叠加线}$ d& y$ Q. ? q# {; `6 a
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;/ h7 `3 s2 Z% _9 b _
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;' b7 m/ t3 D# v* ?0 i3 X
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;: [# c3 q- _* v
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
O' Q, Y" b, u% QPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
4 R4 h8 {8 ^! I. E0 q; OPARTLINE(1,f*bm[p]+wm[p]),Color72C072;% D6 B* R" ?5 |; A
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
2 N" _8 f/ _+ q- ^3 Z# L. W. m/ V4 M# QSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
7 q8 z# x" v& |7 _( y- s( R8 W* eSTICKLINE(m |