|
k:"kdj.k",linethick,COLORWHITE;6 a; w# `9 U! o1 D" E2 _1 o
d:"kdj.d",linethick0,COLORYELLOW;
2 B' I1 {* f5 [/ h3 tr1:"rsi.rsi1",linethick0,ColorC080FF;
1 e1 o' Q G; G t' N/ D$ C9 wr2:"rsi.rsi2",linethick0,ColorFF8080;" { d3 j2 _% n% k% e! l
r3:"rsi.rsi3",linethick0,Color87F8F4;6 ~' B* y0 [# F3 l- m4 J
f:"macd.diff",linethick0,Color72C072;
6 ~+ a/ q2 X# k6 \9 Y- m6 la:"macd.dea",linethick0,ColorE98210;
) T5 @3 i4 O7 V0 |' Y wm:"macd.macd",linethick0,COLORWHITE;
5 H) X! L1 {1 a5 f{以下界说叠加区间(在这里是可见K线的范围)}
; q& z% K4 S4 d+ ~: `7 eq:=SYSPARAM(3)-SYSPARAM(2);* W ]. J6 X( N$ y
p:=SYSPARAM(3);
; |. ?2 i# m2 m% m; G+ [{以下盘算叠加比和叠加平移量}8 X; o% r9 m- |5 m
{1、叠加字段高度}
7 ~" p# w B5 ]% M( T2 S" Ikh:=hhv(h,q);5 w6 H% j a( G' u
kL:=LLv(L,q);
, r% W G( M5 E& |# G% N0 cdh:=hhv(max(k,d),q);" Z5 U. a" F! }/ U2 F4 F5 I6 n3 _1 i. M
dL:=LLv(min(k,d),q);( \7 g( e8 \5 ^2 y6 k
mh:=hhv(max(f,a),q);3 W9 ^' r7 S2 t. @4 I( c
mL:=LLv(max(f,a),q);
- H5 p& f" Q8 m: U% f) o* R& crh:=hhv(max(max(r1,r2),r3),q);6 y) P# ?- _) G: p" F! s
rL:=LLv(min(min(r1,r2),r3),q);! N" Z/ l" x2 h# K) O- Z* v
{2、叠加比}
+ Y5 u6 s; t1 J" {5 U1 hbd:=(kh-kL)/(dh-dL)/3;2 V) M/ I% }) N% s
bm:=(kh-kL)/(mh-mL)/3;' @( u/ z2 g7 N) b
br:=(kh-kL)/(rh-rL)/3;2 I3 x' T d, m: o: e0 k) q
{3、叠加平移量}
. ^) Q2 W3 R1 ^9 x% n+ Lwk:=(kh-kL)/3;
1 n, V5 \# p ?wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];. b8 J7 f" m1 w5 q
wm:=(kh+kL-(mh+mL)*bm)/2;
$ T! C a. o' _5 L$ A: k& `6 H! xwr:=(kh+kL-(rh+rL)*br)/2+wk[p];: a, p5 C, D* ~- b4 n) @; h7 a
{以下画叠加线}1 j" Z& v" X3 e- v8 O0 A
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
, D f+ y# Y6 V% W0 |" zPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;& t) m; D3 g, T' g1 u
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
, g: _- \; [! t; K) rPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;" X4 U( G8 _+ ~- t% }9 P
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;; x2 v% U" {. Z) g5 @1 h* {
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;- z/ l) i, I! z
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;6 E; T. a" x' l- t ]0 o. ]' m
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
5 F/ x7 h# e: v9 G1 F0 z6 d+ WSTICKLINE(m |