|
k:"kdj.k",linethick,COLORWHITE;
$ ~! j8 ^" u! j$ [) od:"kdj.d",linethick0,COLORYELLOW;4 X+ e5 ^6 Z4 d/ S F( Q, z* o, j
r1:"rsi.rsi1",linethick0,ColorC080FF;
3 r- J; H' H* j) er2:"rsi.rsi2",linethick0,ColorFF8080;9 L! M) W5 E9 s5 f' y* _
r3:"rsi.rsi3",linethick0,Color87F8F4;
' _* L) Z8 H3 X6 ~, rf:"macd.diff",linethick0,Color72C072; }- L- E) S8 F" k6 a
a:"macd.dea",linethick0,ColorE98210;$ g% h2 M4 b5 { O4 j
m:"macd.macd",linethick0,COLORWHITE;; n4 E) a- ^+ n( E: @+ \
{以下界说叠加区间(在这里是可见K线的范围)}
9 V/ N- s+ _. I: wq:=SYSPARAM(3)-SYSPARAM(2);6 D) j! U9 j# z% c6 m, m2 F
p:=SYSPARAM(3);
9 @' L, z' K- M7 E{以下盘算叠加比和叠加平移量}; Y! }; e" a4 J- u" k8 C
{1、叠加字段高度}. f; F; u' G, Q0 b P; X
kh:=hhv(h,q);
# Y) x3 Y+ A, B8 |" M6 y2 y6 v" ZkL:=LLv(L,q);1 H7 d) z/ O9 T( J2 A! L
dh:=hhv(max(k,d),q);
+ t" }! d* c1 I0 _dL:=LLv(min(k,d),q);
9 ]+ [7 L8 L7 n/ C/ k3 Cmh:=hhv(max(f,a),q);
/ D5 `! t8 ?! M; z8 _" b, q0 \2 WmL:=LLv(max(f,a),q);# s/ F, @# g% @3 y
rh:=hhv(max(max(r1,r2),r3),q);
8 J% N( l) v9 x$ `rL:=LLv(min(min(r1,r2),r3),q);
+ A4 I. g! t& r# e" E7 W{2、叠加比}
3 p* q+ K( c7 q2 Xbd:=(kh-kL)/(dh-dL)/3;
1 P' m# L8 z1 e# cbm:=(kh-kL)/(mh-mL)/3;
# n: B: {/ B1 c: Z( |- g2 f7 ebr:=(kh-kL)/(rh-rL)/3;
7 y: b: @& M" a2 O6 L{3、叠加平移量}$ ^. T1 |: |/ k6 m
wk:=(kh-kL)/3;& e& [1 ?5 R2 M, ]4 w/ ]0 e, I
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
7 l; x# A: M& t6 @$ ^/ ^5 ]wm:=(kh+kL-(mh+mL)*bm)/2;$ {7 N4 e# W1 d5 k/ s5 U4 f
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
3 u" \6 a. {$ ?# Q" \, ]2 `{以下画叠加线}
8 C T9 s4 s8 r/ {PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
# n- q& ~( d6 U7 d, bPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;* V6 o: z& A/ e2 q4 h, \8 O
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
9 C! K; @: n- e0 L" d& qPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;( V! q# x: D1 z7 z, C( A$ t& E) r
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;1 |4 O4 ~! ?0 g+ {7 b# k, Z$ W
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
# D, S/ q/ L2 H; o0 G, [; f7 APARTLINE(1,a*bm[p]+wm[p]),ColorE98210;5 d. l5 c" |$ m
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;+ D2 U/ ]7 X! E7 |* I# E& ?
STICKLINE(m |