|
k:"kdj.k",linethick,COLORWHITE;$ U' l. T" S: U# M& u
d:"kdj.d",linethick0,COLORYELLOW;
: V! o0 j) W% F) E+ j7 d0 `- vr1:"rsi.rsi1",linethick0,ColorC080FF;! h" a2 R9 U# ]
r2:"rsi.rsi2",linethick0,ColorFF8080;- s+ ^" _% g5 A6 Z- S; W- I
r3:"rsi.rsi3",linethick0,Color87F8F4;
" n( h- q' w6 E5 _4 @ J" {f:"macd.diff",linethick0,Color72C072;" i ]0 {3 D& [" h+ m
a:"macd.dea",linethick0,ColorE98210;
: |6 f0 U' o, A% am:"macd.macd",linethick0,COLORWHITE; ^" L( x2 T8 N& u4 u# B7 s8 Q: d
{以下界说叠加区间(在这里是可见K线的范围)}
$ L' [+ Q7 Q9 ?, e1 Cq:=SYSPARAM(3)-SYSPARAM(2);) d% \) g O K& u- H* h
p:=SYSPARAM(3);
% x8 g' M% U) i{以下盘算叠加比和叠加平移量}+ p0 w2 G" T4 B# U+ f
{1、叠加字段高度}7 C7 K/ ^, U" h# a4 V0 k" k7 @
kh:=hhv(h,q);
+ d* c* g0 w) HkL:=LLv(L,q);
- v' T, _ |( V2 g# _dh:=hhv(max(k,d),q);
6 N, G, d1 p) I& }# I9 E- s3 C) xdL:=LLv(min(k,d),q); j% _6 [7 J8 l) c( H, Z
mh:=hhv(max(f,a),q);
' {4 T; }! t1 g, Z3 }, m0 t- C7 _mL:=LLv(max(f,a),q);
8 C) J. O5 S$ z5 Nrh:=hhv(max(max(r1,r2),r3),q);
# d I# J1 N, i6 B9 |) WrL:=LLv(min(min(r1,r2),r3),q);
4 z0 ^. Z/ ?. ?" H+ y2 b; n6 \. r{2、叠加比}% j& L9 A7 v5 i4 R
bd:=(kh-kL)/(dh-dL)/3;" _! v; w' Z& _
bm:=(kh-kL)/(mh-mL)/3;: `- V9 Q) e% K: v0 F
br:=(kh-kL)/(rh-rL)/3; D/ v, C/ p" g3 J4 Z, ?3 X, p0 \
{3、叠加平移量}
3 A, j# d2 {7 gwk:=(kh-kL)/3;
. S/ S- q9 x8 p# R! C& |0 pwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];: e. A1 j* `, M3 ^ M/ \+ \
wm:=(kh+kL-(mh+mL)*bm)/2;
$ L' _- _! ~- M5 @wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
1 c9 U# d, S5 E! k/ a{以下画叠加线}
1 k ~1 m o% D) x/ VPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;4 D" L0 a) S" y2 ~; X
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
5 G& r; ^/ x/ j0 S0 V5 _PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
( A" P# c, P, K/ i7 [) S! l* Z& W& DPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;% K, k( i' D- Z+ V6 }8 g# k* H0 f
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
- G Z) [# c; S1 L' ^3 [6 DPARTLINE(1,f*bm[p]+wm[p]),Color72C072;0 f7 Y8 h, R& z' X
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;! H+ i3 ]; r6 n; L7 A) n
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;1 g6 S# k! j0 ]. }$ f+ H- K9 J
STICKLINE(m |