|
k:"kdj.k",linethick,COLORWHITE;
& N. Q: y+ o. B, e% }# W" l- t. x: ]6 Nd:"kdj.d",linethick0,COLORYELLOW;, S* p$ |' G" @8 g$ U5 V
r1:"rsi.rsi1",linethick0,ColorC080FF;
! u9 ?/ Y# S4 V- X" O, ~% |7 Ir2:"rsi.rsi2",linethick0,ColorFF8080;* g# R9 C6 l5 y
r3:"rsi.rsi3",linethick0,Color87F8F4;0 {1 s- t0 K7 ?$ U
f:"macd.diff",linethick0,Color72C072;3 A, O. o- }. I
a:"macd.dea",linethick0,ColorE98210;0 S# y, h! J/ m
m:"macd.macd",linethick0,COLORWHITE;+ X7 ?& v0 ~; f9 i( e
{以下界说叠加区间(在这里是可见K线的范围)}1 g( X/ o! d0 n5 ]
q:=SYSPARAM(3)-SYSPARAM(2);
$ C+ ~3 @3 K) `" Gp:=SYSPARAM(3);# e5 o! E% P0 f3 \- q
{以下盘算叠加比和叠加平移量}
: m v/ ] D! A' G+ N# r0 @% f{1、叠加字段高度}
& y( R$ B' L# p% V/ E4 V6 mkh:=hhv(h,q);/ F) M& L; u `% K- T
kL:=LLv(L,q);
6 a" K" K& T+ vdh:=hhv(max(k,d),q);
# W/ J1 ~; u# [' vdL:=LLv(min(k,d),q);- n7 D h: w7 e/ w3 @
mh:=hhv(max(f,a),q);; K9 y6 }- |! S
mL:=LLv(max(f,a),q);6 f) r$ a- D5 x6 {3 t
rh:=hhv(max(max(r1,r2),r3),q);
! c% }& z/ n5 jrL:=LLv(min(min(r1,r2),r3),q);. C L7 i6 a- ]( V2 m6 M1 j# m
{2、叠加比}+ X4 l2 W7 z9 Q- i: u% ^9 Z
bd:=(kh-kL)/(dh-dL)/3;
% q d, t7 f- _+ o% M7 zbm:=(kh-kL)/(mh-mL)/3;
. K6 [: ^& F& k7 ]2 p0 l; Obr:=(kh-kL)/(rh-rL)/3;
( m) G) }) f' n, Y) l{3、叠加平移量}9 Y f9 J) ]) ~6 C+ Q" O
wk:=(kh-kL)/3;# C8 S- S0 z1 F# \+ X& k) X, G
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];' Q# W; h5 Q5 L
wm:=(kh+kL-(mh+mL)*bm)/2;9 r4 u7 k1 z! F/ y- X0 ^
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
: |9 K ]+ J! R" k. v{以下画叠加线}
: ]8 i2 } {! V9 ?: s3 _PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
4 p0 n$ s6 p# ]3 K* DPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
* a0 }4 o/ f# u; }: b4 x! u( K/ A# @PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;7 \* P1 X7 }. Q
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;0 }% h4 h& `/ P, G" l, V
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
; j3 w# d" x/ L. x/ @PARTLINE(1,f*bm[p]+wm[p]),Color72C072;0 E& R# ^: o, x. p
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;' Q2 s; p! B. A0 K4 ^# q: N
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;1 N! `/ q: e1 s' j; Y |
STICKLINE(m |