|
k:"kdj.k",linethick,COLORWHITE;) Q* b- A) }, H' |% E
d:"kdj.d",linethick0,COLORYELLOW;: F! G8 M8 q5 p# b% o5 _; ]
r1:"rsi.rsi1",linethick0,ColorC080FF;' C" B# r& {4 i `5 i- O
r2:"rsi.rsi2",linethick0,ColorFF8080;# z3 w+ d- ~; K/ t& B# k' W
r3:"rsi.rsi3",linethick0,Color87F8F4;
3 t5 a) I2 \9 Q7 ff:"macd.diff",linethick0,Color72C072;
2 q3 F7 x& X+ w( O1 Ya:"macd.dea",linethick0,ColorE98210;
4 r0 b) F! z5 \) ?* @m:"macd.macd",linethick0,COLORWHITE;+ p- y% A3 H9 l
{以下界说叠加区间(在这里是可见K线的范围)}
6 e7 p6 ~5 x$ z# h$ m- @' F4 aq:=SYSPARAM(3)-SYSPARAM(2);
K* _6 h5 U/ M8 w; [8 }+ K' Sp:=SYSPARAM(3);5 O5 T4 V L# S' E& {% b" g
{以下盘算叠加比和叠加平移量}
0 m0 B V' n& D" F9 u$ [{1、叠加字段高度}
$ h: P3 a3 } e5 rkh:=hhv(h,q);
$ N+ t1 R$ ?0 Z1 g( WkL:=LLv(L,q);% F; S) x4 L6 S$ j' N
dh:=hhv(max(k,d),q);
" }' Z& b* r& o, W- h& XdL:=LLv(min(k,d),q);: C- C1 b: r- E: O, R* n
mh:=hhv(max(f,a),q);: n2 S9 [/ ]! Q, F/ P7 }* M9 m
mL:=LLv(max(f,a),q);+ a. j: _" f' } L2 a! z; Q
rh:=hhv(max(max(r1,r2),r3),q);1 J8 T" b6 P) |
rL:=LLv(min(min(r1,r2),r3),q);( `! c2 C+ {& F- z5 @+ F9 D# g
{2、叠加比}; d" P; M% a, \0 P6 u( n! V
bd:=(kh-kL)/(dh-dL)/3;
7 M% ~' G1 S2 B& t8 x/ O/ J: }bm:=(kh-kL)/(mh-mL)/3;! ?5 C% w9 h- ]' g
br:=(kh-kL)/(rh-rL)/3;4 k) b5 X2 ^8 ]8 _
{3、叠加平移量}
! w9 L. D" H0 F: |2 rwk:=(kh-kL)/3;' f A3 v2 b. V9 u% w! o7 ?
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];( l+ K: ~, f) L% U& Z
wm:=(kh+kL-(mh+mL)*bm)/2;
* b# z) p5 b( e5 f" m! q" jwr:=(kh+kL-(rh+rL)*br)/2+wk[p];& d% t; F. N" i! a' c
{以下画叠加线}' ]1 h& ~% K2 u4 Q
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
5 |- R1 ], y+ p5 w) nPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;/ E8 Q, ~7 l$ P5 \# v5 I
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;% p1 m. M6 [3 N+ y/ z
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
; U% y1 ^8 F5 @- MPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
: A0 n8 X: V( c/ vPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
/ f' B5 c- T. M1 yPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;- P4 u: i; }" N$ t; N- g3 W
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;. m* ]% C" q0 S; h
STICKLINE(m |