|
k:"kdj.k",linethick,COLORWHITE;
# A4 `( r: A5 Od:"kdj.d",linethick0,COLORYELLOW;* G d( a" r* ]& v; d
r1:"rsi.rsi1",linethick0,ColorC080FF;
7 L7 _6 c2 _ O; S: t- u/ Br2:"rsi.rsi2",linethick0,ColorFF8080;' e& e6 M5 W% c' a
r3:"rsi.rsi3",linethick0,Color87F8F4;5 N3 j$ T4 [" ~$ _: K
f:"macd.diff",linethick0,Color72C072;
5 n2 Y6 R2 z, l$ M: u* G# a3 Za:"macd.dea",linethick0,ColorE98210;
7 \2 L: g' M+ i; g( ?3 {2 e* X7 K: _$ [m:"macd.macd",linethick0,COLORWHITE;
6 p6 p; M* h( S5 H0 k$ a6 G{以下界说叠加区间(在这里是可见K线的范围)}; C) H# V" r9 w* M( |
q:=SYSPARAM(3)-SYSPARAM(2);
# r; v1 V8 t+ n% {p:=SYSPARAM(3);
! a+ x" d$ x* ~- p) S{以下盘算叠加比和叠加平移量}
) Z) y; h7 `+ l& @{1、叠加字段高度}
2 q/ W' ^! n0 a! Akh:=hhv(h,q);
( _/ c+ B5 d, x, I/ `1 SkL:=LLv(L,q);' m/ B) f, K- A6 \% c) o. B2 v
dh:=hhv(max(k,d),q);
4 p* w2 @+ I4 ]% VdL:=LLv(min(k,d),q);
# w% k, f n) d+ e7 @* rmh:=hhv(max(f,a),q);! U2 H& R7 P9 @6 ^; N& W; K- Q
mL:=LLv(max(f,a),q); T9 v! |$ j' R, l4 ?
rh:=hhv(max(max(r1,r2),r3),q);' [0 v5 I4 r. \5 J% e5 ^& m% l
rL:=LLv(min(min(r1,r2),r3),q);6 }% @; g( [5 b h
{2、叠加比}, i" B* T3 G! j* S$ j% S { H
bd:=(kh-kL)/(dh-dL)/3;
7 Q: e9 K+ k3 @+ }5 e6 `4 fbm:=(kh-kL)/(mh-mL)/3;
* F' t# A; E# ?. b& L/ Nbr:=(kh-kL)/(rh-rL)/3;
; I+ q% H/ U* H2 S( [{3、叠加平移量}* e4 U; f! b$ x. [8 s1 h
wk:=(kh-kL)/3;
9 P8 h% ^8 h. g8 y0 G1 H( j' Dwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];. S6 m7 [3 u8 c t+ F5 U: D
wm:=(kh+kL-(mh+mL)*bm)/2;
1 \; E0 m$ z6 nwr:=(kh+kL-(rh+rL)*br)/2+wk[p];
2 d- e3 L8 E- Z2 r3 n{以下画叠加线}0 }% `. p7 {( ~1 c7 M, a
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;( z# R D- H$ x0 r ~
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
8 |9 V1 w0 k2 G" m& `PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
0 l, ~2 J- P. \+ K; y, UPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;( Q9 r( i% z$ s
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;! T0 M. R5 U- v0 e ?8 a
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
( u) K* p+ x! ^- G! _PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
1 B$ W! \5 R: Y4 G) r, xSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;( H' C& |# U- X( p3 ]7 \; z
STICKLINE(m |