|
k:"kdj.k",linethick,COLORWHITE;
' L1 x" G5 o: Jd:"kdj.d",linethick0,COLORYELLOW;
1 g* S4 e% G0 ]& n/ wr1:"rsi.rsi1",linethick0,ColorC080FF;5 W$ V7 b0 |% ^6 u- N+ ]
r2:"rsi.rsi2",linethick0,ColorFF8080;
! t+ i, r. ^/ p+ c; e. Ar3:"rsi.rsi3",linethick0,Color87F8F4;* @* \ A' u$ }) O, n& f
f:"macd.diff",linethick0,Color72C072;( j& x [( _' G8 l7 W
a:"macd.dea",linethick0,ColorE98210; @5 z' I! E; L9 C) |+ |
m:"macd.macd",linethick0,COLORWHITE; [6 L5 m; o8 g$ U" b" g5 M! @
{以下界说叠加区间(在这里是可见K线的范围)}( ~ e% N) x% y6 I$ y) f
q:=SYSPARAM(3)-SYSPARAM(2);
# J* w0 Q% x7 y- T yp:=SYSPARAM(3);% F9 v! o6 R5 t# n: k& g
{以下盘算叠加比和叠加平移量}, n7 O- |! H. a! Q) R9 ~0 ~6 Q
{1、叠加字段高度}
. {+ A0 R+ j' c* j) R: z" Gkh:=hhv(h,q);
: o( \( `+ r" Y" l/ W' a- dkL:=LLv(L,q);
# D; L2 c1 T Q4 l" odh:=hhv(max(k,d),q);
/ a y& g1 I1 A0 \8 z% |% adL:=LLv(min(k,d),q);% C+ K2 g$ ?* c7 O G* h, k, U
mh:=hhv(max(f,a),q);
% @8 ?0 I3 T: M; z# j0 w. o+ _4 ymL:=LLv(max(f,a),q);
- ?/ n7 x9 L, rrh:=hhv(max(max(r1,r2),r3),q);; V( y* } i; }- d
rL:=LLv(min(min(r1,r2),r3),q);
' h8 O0 n6 ^1 r' r7 G# |{2、叠加比}4 @( j& G3 h1 ~3 s
bd:=(kh-kL)/(dh-dL)/3;, x: d0 B2 F7 K% T
bm:=(kh-kL)/(mh-mL)/3;
7 m( M7 r! s* R, s; Fbr:=(kh-kL)/(rh-rL)/3;
, ^7 I e7 w- f! r6 a* v2 z{3、叠加平移量}
0 g" d& I x" o% E# r" h5 pwk:=(kh-kL)/3;
# J& S, b% e8 ~. @- fwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
+ M) p- N9 ? l5 @wm:=(kh+kL-(mh+mL)*bm)/2;$ y! |9 ]( b8 J% O" F% h
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
6 p W, a+ n0 { E{以下画叠加线}. f6 ^2 b/ U- O6 N3 G7 a$ Q! q/ B
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;$ z: b6 W( D; N+ ]# h! f
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;1 j" N: x* b7 e; l0 j2 X) ]
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;! y* V, O: M$ P$ E: S1 U2 O
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
! w$ E2 a B, r3 @ o) I7 }; i+ |PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;* X- x" P* [: }1 }/ A3 C/ v
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
. O J+ N/ }* b& N' v! W' p( APARTLINE(1,a*bm[p]+wm[p]),ColorE98210;8 n, L! c. U1 x9 U/ O; n
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
' B7 h2 ?* f; s" H! TSTICKLINE(m |