|
k:"kdj.k",linethick,COLORWHITE;
v/ L2 m; ^6 R( ]d:"kdj.d",linethick0,COLORYELLOW;& i' [' k+ k8 Y) } o: }
r1:"rsi.rsi1",linethick0,ColorC080FF;
2 }3 R# S0 r2 hr2:"rsi.rsi2",linethick0,ColorFF8080;
* b2 Z+ o+ g& D- i) `2 i3 sr3:"rsi.rsi3",linethick0,Color87F8F4;
7 u) U7 Z* J2 I+ Df:"macd.diff",linethick0,Color72C072;7 L" J5 I! x0 j; p4 H3 U; Z
a:"macd.dea",linethick0,ColorE98210;$ i' h8 G' ~4 y1 @& C4 U
m:"macd.macd",linethick0,COLORWHITE;
4 D) Q6 l; U7 v) F/ z; K* I ^{以下界说叠加区间(在这里是可见K线的范围)}
; ]8 I6 A' _7 K$ m% p2 p% c& D; Fq:=SYSPARAM(3)-SYSPARAM(2);- l# U: [: i- C) o9 x' ^5 ~' W
p:=SYSPARAM(3);
2 c& p, F( ?# k, D$ d{以下盘算叠加比和叠加平移量}4 A5 u% s x2 L5 Q# y3 O" K
{1、叠加字段高度}! `# `% Y7 v1 n Z# C
kh:=hhv(h,q);7 n4 x" P% V2 A7 i
kL:=LLv(L,q);5 a0 }9 Q- \' j
dh:=hhv(max(k,d),q);$ i$ i1 S. S! ~% X0 L r* T
dL:=LLv(min(k,d),q);4 T9 u$ k8 q1 n8 u
mh:=hhv(max(f,a),q);
0 e/ f! m- w$ d) v2 k% }3 wmL:=LLv(max(f,a),q);
v1 q) R4 I$ k1 Hrh:=hhv(max(max(r1,r2),r3),q);* u' r' D9 V9 P
rL:=LLv(min(min(r1,r2),r3),q);
3 r0 t. \) ~$ B, Q9 Y2 b6 S{2、叠加比}+ e0 ?% A- p* ~9 m
bd:=(kh-kL)/(dh-dL)/3;
" P- H# J1 l# b3 nbm:=(kh-kL)/(mh-mL)/3;
& d+ O9 s+ g5 q+ @- t$ o( l, s6 q$ mbr:=(kh-kL)/(rh-rL)/3;
9 k4 Z; L c; h) l) w{3、叠加平移量}
- Y# e, J. r1 h0 d9 ^2 Jwk:=(kh-kL)/3;
4 M: b4 g E. `1 o Awd:=(kh+kL-(dh+dL)*bd)/2-wk[p];$ y, `. G9 q" O# |: Y
wm:=(kh+kL-(mh+mL)*bm)/2;; e. f- r7 J( K! }3 y( m* v
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];! [! A1 W+ A1 B' T4 X G3 F
{以下画叠加线}9 A, I: h, {9 v+ [$ |
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
) v8 i y& ?- JPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;: @6 J8 b4 @- g
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;+ _5 Z" U* F' x, k* R
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
: a8 Q% l/ f7 c2 ?9 L( b; PPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
% ^- h+ N0 `, @! a$ [/ l9 {PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
" E; l$ L7 X" v* E6 xPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;' z x! U9 T' M" V
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;! V9 I- J5 [0 ^. w
STICKLINE(m |