|
k:"kdj.k",linethick,COLORWHITE;
9 o* Q5 a% S$ e' K4 f3 T1 _% ~d:"kdj.d",linethick0,COLORYELLOW;8 v. P2 E# P4 b: ^4 M
r1:"rsi.rsi1",linethick0,ColorC080FF;3 p6 `+ ]5 J5 f$ \9 F
r2:"rsi.rsi2",linethick0,ColorFF8080;" ^! R$ X8 d0 r$ }
r3:"rsi.rsi3",linethick0,Color87F8F4;" W+ l4 _2 b& R2 F2 s1 L# J) [
f:"macd.diff",linethick0,Color72C072;. B6 u% a3 Q9 ?0 H; d
a:"macd.dea",linethick0,ColorE98210;2 h. D* z) E* E# V8 g+ i2 m& O
m:"macd.macd",linethick0,COLORWHITE;8 w' C$ D0 m) Q; n. X
{以下界说叠加区间(在这里是可见K线的范围)}) \, {7 M" m4 h
q:=SYSPARAM(3)-SYSPARAM(2);" Z, O% r; E; E J
p:=SYSPARAM(3);
! F8 N0 P5 Q+ ^8 N{以下盘算叠加比和叠加平移量}
7 A2 D, w! |" o7 ?{1、叠加字段高度}; p0 O2 v" d$ c2 h9 O( d, v8 P
kh:=hhv(h,q);# o0 ?4 V( y0 u t$ N0 Y
kL:=LLv(L,q);8 J0 T; }6 c( J% @7 o
dh:=hhv(max(k,d),q);7 T6 D5 G4 Q2 O" P4 u
dL:=LLv(min(k,d),q);
% |/ E. t, Y4 A( q; P' v! Kmh:=hhv(max(f,a),q);
$ a* v7 |3 j1 `0 V4 u( o: FmL:=LLv(max(f,a),q);
! Y" l3 R- }5 ~rh:=hhv(max(max(r1,r2),r3),q);& n: N7 M' n. E/ Q1 X% ]$ F
rL:=LLv(min(min(r1,r2),r3),q);5 f* E* T/ _3 H# W6 i+ ^5 r7 d
{2、叠加比}
; Z; C I" K) k. {bd:=(kh-kL)/(dh-dL)/3;
, \% H. \/ M: y# U0 U% s' G- Mbm:=(kh-kL)/(mh-mL)/3;5 q( o+ a$ a, {- }8 S7 c+ q4 b
br:=(kh-kL)/(rh-rL)/3;
0 s9 D* G# M3 m" e{3、叠加平移量}
9 l' o, m( U( A6 J- kwk:=(kh-kL)/3;
O: p; R1 P4 h; n) C2 c0 N$ `+ Twd:=(kh+kL-(dh+dL)*bd)/2-wk[p];; d) A7 f; }# t) ?& ?
wm:=(kh+kL-(mh+mL)*bm)/2;
* s7 U, ~) Q% J6 pwr:=(kh+kL-(rh+rL)*br)/2+wk[p];/ C) b7 z3 K9 }! t) C
{以下画叠加线}9 x; ^+ n- a. ~8 p. Z
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;9 j+ F( O6 I1 Z
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
- i8 q5 e+ @1 E$ u1 \PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
7 _, U! \* k" U) }+ V' _PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;/ H# P0 q# n" E2 \+ ~: u% T
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
7 J: O+ l' g9 _/ D) T0 t2 S0 ~* RPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
+ g' _5 [& w& f( q( C+ cPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;- k. K6 \$ ], c" E2 K4 t9 Y
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
, F5 J( E3 K$ Y8 P. s0 K+ uSTICKLINE(m |