|
k:"kdj.k",linethick,COLORWHITE;" p3 }; I- [' W, H2 |
d:"kdj.d",linethick0,COLORYELLOW;. H. R: Z' k5 T3 N. g2 c" x
r1:"rsi.rsi1",linethick0,ColorC080FF;1 o# r" P; w7 T
r2:"rsi.rsi2",linethick0,ColorFF8080;
5 o9 o# D) l# U% yr3:"rsi.rsi3",linethick0,Color87F8F4;
h* j% `2 @% ~; @6 Ef:"macd.diff",linethick0,Color72C072;
- K- L. ~( Q- e1 w! \* n; [( ~2 _" [a:"macd.dea",linethick0,ColorE98210;
Z4 l% h. B# M1 p2 Em:"macd.macd",linethick0,COLORWHITE;
8 U* M, X [4 O' u }# F* P! I{以下界说叠加区间(在这里是可见K线的范围)}( i0 e1 q: K% }8 z' O6 P! O
q:=SYSPARAM(3)-SYSPARAM(2);! E3 F( L' J# E) Z, h0 {9 l# L$ G
p:=SYSPARAM(3);4 r4 @# k) H U2 I
{以下盘算叠加比和叠加平移量}4 S9 I& C. V# V) l" H, j
{1、叠加字段高度}/ s. ~$ q8 u" {* E. ]/ k0 z
kh:=hhv(h,q);
$ j2 }+ J! m0 J( Z$ q! Z1 I6 O/ K7 S8 GkL:=LLv(L,q);+ G8 k- ]' y1 c
dh:=hhv(max(k,d),q);
+ R7 u8 C0 f. Z/ H; q; }" K+ TdL:=LLv(min(k,d),q); D' [% i w* w3 A' N) I* k2 o: l
mh:=hhv(max(f,a),q);
, p" \8 i) d- k8 BmL:=LLv(max(f,a),q);
, k2 S/ o5 O+ o0 N5 E$ Q, [rh:=hhv(max(max(r1,r2),r3),q);
& d1 u! M+ u W% prL:=LLv(min(min(r1,r2),r3),q);1 P! K# W! d; E' @( L
{2、叠加比}
1 E: X0 [3 ^& j5 C7 |1 Obd:=(kh-kL)/(dh-dL)/3;% j" b y/ n, ^
bm:=(kh-kL)/(mh-mL)/3;
0 f6 N8 `3 o3 ybr:=(kh-kL)/(rh-rL)/3;
# N1 p$ }$ G- M6 K8 S5 @0 a3 E' `{3、叠加平移量}
2 x! ]2 [+ W, G8 T; ?( Zwk:=(kh-kL)/3;
5 {% R6 |" o2 Swd:=(kh+kL-(dh+dL)*bd)/2-wk[p];$ K0 n- k5 z7 w; F
wm:=(kh+kL-(mh+mL)*bm)/2;
3 Z0 f; B x0 W0 R& A# Xwr:=(kh+kL-(rh+rL)*br)/2+wk[p]; E1 D @) a( e; n7 d3 f5 d6 B
{以下画叠加线}, }' z0 @4 `' \8 O# Q
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;% P% w$ G7 m* U7 z' E. z
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;+ O; D# L4 J! p4 r3 {8 `
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
h8 T/ m8 ^& {' nPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;, C1 P1 d. K9 t- w v- \
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;; z' h: x7 {' X
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;+ f* N% G* e, r1 t* R Q9 i
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;. y6 C/ q, `0 c. B; y6 D
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
0 W& z4 h; N9 W& a# M0 c6 [STICKLINE(m |