|
k:"kdj.k",linethick,COLORWHITE;9 q+ T& B( e9 G- J1 m( o" o
d:"kdj.d",linethick0,COLORYELLOW;* M9 E# g) I+ r
r1:"rsi.rsi1",linethick0,ColorC080FF; }3 v, `0 d, D' F0 a
r2:"rsi.rsi2",linethick0,ColorFF8080;
# K' [3 j6 R# ^% R" Y; p8 Wr3:"rsi.rsi3",linethick0,Color87F8F4;
- r5 Y# i3 p3 e" U k& ]; Gf:"macd.diff",linethick0,Color72C072;9 s4 n! U$ ~/ o s' P+ Z
a:"macd.dea",linethick0,ColorE98210;* X- L& O t& @
m:"macd.macd",linethick0,COLORWHITE;
; {; {5 ?) E2 x9 S. s. D; t{以下界说叠加区间(在这里是可见K线的范围)}
; f+ W1 ^6 e3 h" r; F! kq:=SYSPARAM(3)-SYSPARAM(2);; x) q) k4 X6 n/ V* f
p:=SYSPARAM(3);5 n+ f3 a- @, z8 b7 k6 k5 x$ f
{以下盘算叠加比和叠加平移量}
+ G0 q# d+ I7 J6 v. m/ j{1、叠加字段高度}- |" N5 u" ]: I+ m2 |$ B7 S7 U
kh:=hhv(h,q);5 K3 h+ Z' H6 z$ B6 I
kL:=LLv(L,q);9 Y9 s M) _# D, }" Z
dh:=hhv(max(k,d),q);. @2 D7 c& } w6 j9 J$ V5 j
dL:=LLv(min(k,d),q);' [3 { L& {. B& c
mh:=hhv(max(f,a),q);
0 r, ^0 A- k8 o: [- l! H- V( amL:=LLv(max(f,a),q);+ T5 |$ u G8 D7 Y+ }9 y
rh:=hhv(max(max(r1,r2),r3),q);7 v( V ?! R9 l: \) E, \: N
rL:=LLv(min(min(r1,r2),r3),q);
5 y, B: K6 N; K) I m A0 c{2、叠加比}3 s: C$ i1 e1 r! y2 ^" A
bd:=(kh-kL)/(dh-dL)/3;2 o+ t; ^' K* ~4 T, y) ~3 b* X
bm:=(kh-kL)/(mh-mL)/3;/ D% Q. M. @" s6 I2 J& `. |
br:=(kh-kL)/(rh-rL)/3;$ R$ o+ v; x2 E6 l
{3、叠加平移量}! s% u I9 v% \8 ?0 ]& N
wk:=(kh-kL)/3;
) x! s: w" m0 ^. n9 H$ X& ?% Ywd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
6 Z: Z' U6 r; H) T3 l* uwm:=(kh+kL-(mh+mL)*bm)/2;+ z/ G) p5 n- X
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
" V& s6 o0 @5 z1 {9 D! Q; b' k{以下画叠加线}' A+ b" c7 C6 ~. M3 z& E, |
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;& ~" `* P1 _5 H
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
: \/ u3 Q+ o: ^4 u' W2 K& S: iPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
7 q1 d! o a: x v$ zPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;% C& o. V& Q1 ^" c; D
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
; ~: M5 C! D+ \ t, w! jPARTLINE(1,f*bm[p]+wm[p]),Color72C072;6 I N$ K/ z* g& n0 ]
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
% I, F% P1 f: a/ zSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;7 f+ v. s( O0 T; s8 M' H
STICKLINE(m |