|
k:"kdj.k",linethick,COLORWHITE;4 y; h8 z' L& o
d:"kdj.d",linethick0,COLORYELLOW;0 ]7 E; ]$ f. K' R1 d0 r2 p0 Q
r1:"rsi.rsi1",linethick0,ColorC080FF;" h4 _$ E( l B7 N9 h j
r2:"rsi.rsi2",linethick0,ColorFF8080;' U! B( F5 @1 h) [5 y
r3:"rsi.rsi3",linethick0,Color87F8F4;
6 n7 r/ H% t% F! }) g( {3 xf:"macd.diff",linethick0,Color72C072;* r6 E/ c! r( J( d
a:"macd.dea",linethick0,ColorE98210;" r: ~* e& F$ J9 T; o% ^; ?2 e
m:"macd.macd",linethick0,COLORWHITE;4 `' D8 x+ V2 W4 j% k
{以下界说叠加区间(在这里是可见K线的范围)}
+ `0 D7 Y& p; i% q4 m) {+ ~q:=SYSPARAM(3)-SYSPARAM(2);( g& J. o+ T& Q6 ~
p:=SYSPARAM(3);
9 `8 h3 F4 w; K, J7 S{以下盘算叠加比和叠加平移量}' M8 q; S/ O* f% b9 C* V
{1、叠加字段高度}* _2 D1 Y5 n' [! Y! y) X
kh:=hhv(h,q);
# D9 w( j8 o3 QkL:=LLv(L,q);% O& C: T, z* B6 n8 G1 R( S( i
dh:=hhv(max(k,d),q); a8 w$ D' ^/ A" v1 i
dL:=LLv(min(k,d),q);
8 y u8 L4 j8 | q% Cmh:=hhv(max(f,a),q);, ~. y1 F7 d: K: Z
mL:=LLv(max(f,a),q);8 H$ @% g5 v+ \% [/ h
rh:=hhv(max(max(r1,r2),r3),q);0 j5 B. R6 R" v' Z s" M5 J
rL:=LLv(min(min(r1,r2),r3),q);5 L( W% [3 E. t& b, `: l6 }6 |' t3 i
{2、叠加比}
6 q* Z5 [" y& ^- M7 {bd:=(kh-kL)/(dh-dL)/3;3 w; L7 x3 v# P" T' v% U p* t
bm:=(kh-kL)/(mh-mL)/3;) B+ }, S3 X$ B" Y( B
br:=(kh-kL)/(rh-rL)/3;
; P: }! {) L) P& y3 D{3、叠加平移量}# h7 R9 l" W; X) [" V5 w0 M! P
wk:=(kh-kL)/3;/ e7 z! B) F7 w6 u2 C
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];! W; D& m; w4 ?6 M: G
wm:=(kh+kL-(mh+mL)*bm)/2;; i0 [+ N0 v" I, U0 Y S" s7 A w
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
! n. f _% X% c! R, g+ h* @{以下画叠加线}
% A- b, J2 h& v5 NPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;% S K% g( h6 y, E" x3 B
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
* `' ]( L2 g1 X$ O9 H% ]! FPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;( x- m/ J4 v" ^3 f7 B
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;& k" f. P- r0 C
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
$ P5 g5 U7 f2 gPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
1 Y" T3 X& h W/ a1 U9 |PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;5 F. h4 A# K# R9 N. E- v* G; y- ]
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
{. p1 x3 ~/ p4 R) r3 l, I1 ]) \STICKLINE(m |