|
k:"kdj.k",linethick,COLORWHITE;2 m; B( }% X$ a+ }; _7 T* Z# p$ `& e
d:"kdj.d",linethick0,COLORYELLOW;
4 s' I. a2 h* A5 W6 N( qr1:"rsi.rsi1",linethick0,ColorC080FF;
& [' _; s* Q% l- A( F( Fr2:"rsi.rsi2",linethick0,ColorFF8080;0 [7 I/ T( u7 t! |$ Y' K& Y
r3:"rsi.rsi3",linethick0,Color87F8F4;
5 j8 l$ p }. W. }f:"macd.diff",linethick0,Color72C072;
$ T9 a: s# p/ R) Pa:"macd.dea",linethick0,ColorE98210;3 M# v& n; V: K: @
m:"macd.macd",linethick0,COLORWHITE;( E# B( t$ e1 H8 g
{以下界说叠加区间(在这里是可见K线的范围)}
0 H$ U! x) c iq:=SYSPARAM(3)-SYSPARAM(2);7 ~' r! f; ^2 I C# u
p:=SYSPARAM(3);$ j' Q; M3 {6 B& a9 B
{以下盘算叠加比和叠加平移量}
8 e4 x; ]+ s+ }2 e8 |( ]{1、叠加字段高度}
* ?: r: k9 @. s- kkh:=hhv(h,q);( ~7 b- a! b! `- }3 m
kL:=LLv(L,q);) {6 ]# ]" ], D4 e6 [; G$ D
dh:=hhv(max(k,d),q);1 v+ H$ `8 @% N- h* m
dL:=LLv(min(k,d),q);
: n, i# y0 e/ _) R2 t+ u% wmh:=hhv(max(f,a),q);
: r2 l* [ G; C: X7 F' I/ pmL:=LLv(max(f,a),q);; ]; o+ p' l0 L2 x( {( j
rh:=hhv(max(max(r1,r2),r3),q);$ ~* E5 w0 A7 ]- n. {
rL:=LLv(min(min(r1,r2),r3),q);+ h4 D3 E6 Y! u$ a
{2、叠加比}
- d1 ~, f4 M- M& R" Sbd:=(kh-kL)/(dh-dL)/3;' ]) H% ~+ c9 G4 \
bm:=(kh-kL)/(mh-mL)/3;
% K8 M7 p% {6 R, A4 X& r/ }+ V% Nbr:=(kh-kL)/(rh-rL)/3;
/ [+ T* C1 J+ B; j$ A; O" n{3、叠加平移量}
7 @* e8 P- k; g8 u+ qwk:=(kh-kL)/3;2 D$ c' t) `3 v2 ~
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
- J0 m2 Q o: Swm:=(kh+kL-(mh+mL)*bm)/2;
9 J5 M. k+ ~+ X! [; S0 | kwr:=(kh+kL-(rh+rL)*br)/2+wk[p];( n% _! J1 _ _* G) l
{以下画叠加线}2 K+ s9 c( t3 c0 z6 M- C
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;( q; q. w0 n* M9 U, ?" b$ `
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
/ L# }, ?: \9 E9 A% Z2 YPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;' w k8 D" ~: U1 t' D6 V6 R
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
3 R& x# L% n- F3 `! @9 _0 i' j: BPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;. K; p9 u$ k6 O K4 w
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;, H( T/ _; y0 _" }9 r- o5 T
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;( m3 P# C1 T& |4 N
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
( S8 \$ l8 G! j! KSTICKLINE(m |