|
k:"kdj.k",linethick,COLORWHITE;1 I6 V! v* c4 U
d:"kdj.d",linethick0,COLORYELLOW;6 S: |, U% G4 K. L
r1:"rsi.rsi1",linethick0,ColorC080FF;7 g$ b H8 g8 c9 I f
r2:"rsi.rsi2",linethick0,ColorFF8080;' H' x- h: {# ~! R n( G
r3:"rsi.rsi3",linethick0,Color87F8F4;6 L& x) \3 f( W U" M4 O
f:"macd.diff",linethick0,Color72C072;
5 H" f" r/ [0 |$ H/ @2 p3 y' xa:"macd.dea",linethick0,ColorE98210;
, f, c, M% L4 e2 o6 |6 Pm:"macd.macd",linethick0,COLORWHITE;. X' l; L0 x e) G \" J% r) t) d
{以下界说叠加区间(在这里是可见K线的范围)}2 Y2 S! X# W" [& ]1 T
q:=SYSPARAM(3)-SYSPARAM(2);
1 v1 d' i/ Q6 R5 vp:=SYSPARAM(3);* u0 w* `* S3 h/ L3 j
{以下盘算叠加比和叠加平移量}3 ]0 B0 g& }+ Q1 x; `& S4 Q
{1、叠加字段高度}
7 K$ o) {% }9 R3 k6 }) t. Y8 ekh:=hhv(h,q);
, w8 }! I* {1 \kL:=LLv(L,q);' v7 a" n0 |8 ~5 s0 D
dh:=hhv(max(k,d),q);
3 T% E7 |5 x4 |; JdL:=LLv(min(k,d),q);
9 `' M+ A: ^6 g9 h+ o& Q+ vmh:=hhv(max(f,a),q);
; e$ k; \( [0 _. `& S' ]mL:=LLv(max(f,a),q);* w- `- V1 U9 o6 F% w
rh:=hhv(max(max(r1,r2),r3),q);
' g! T* E" I. V: ?8 ~) [rL:=LLv(min(min(r1,r2),r3),q);
$ ]% r' ~0 [+ a{2、叠加比}& Y* p5 t8 h# n7 R! z; `# c1 S1 z7 U. v
bd:=(kh-kL)/(dh-dL)/3;
/ b* P2 s/ }9 obm:=(kh-kL)/(mh-mL)/3;* y0 c$ |) f$ h
br:=(kh-kL)/(rh-rL)/3;
1 t+ H! D0 U' ^. \# X9 ^5 L+ B: g{3、叠加平移量}
$ Y6 m0 |4 W& m) n1 _. {8 k; lwk:=(kh-kL)/3;
0 p+ w1 ^0 h( ?5 {$ X1 owd:=(kh+kL-(dh+dL)*bd)/2-wk[p];! O* G9 [8 R A1 a' P- q! n
wm:=(kh+kL-(mh+mL)*bm)/2;
3 Y! M. E1 O# t t/ A' K; w- Twr:=(kh+kL-(rh+rL)*br)/2+wk[p];6 |. P3 X% { I/ d. ^# z5 Q
{以下画叠加线}
5 O0 c: _ [' E" [0 h% dPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
/ A" ^: \- A# J8 v# qPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
0 W9 ]8 |9 ~) s8 h5 GPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;! [9 j0 c; f( v. V2 O
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;# \" |+ x" w; p: l6 l4 |/ z& P
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;: d1 V+ `4 P0 U1 G* r
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
. \( y _% c2 r% S. O; D, A CPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;7 R; @6 O: M$ z) i
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
5 _- A# \) p9 L+ ]& k2 RSTICKLINE(m |