|
k:"kdj.k",linethick,COLORWHITE;
. f N" G0 O6 D7 Md:"kdj.d",linethick0,COLORYELLOW;6 P7 `/ R# h6 Y' W& i% {
r1:"rsi.rsi1",linethick0,ColorC080FF;3 r+ I0 t: i# V
r2:"rsi.rsi2",linethick0,ColorFF8080;
% k' a" K* x$ N& b% ?r3:"rsi.rsi3",linethick0,Color87F8F4;
: A) I1 v7 G% B7 \f:"macd.diff",linethick0,Color72C072;
! L0 ^$ T& K( P- r1 H) \: l) ma:"macd.dea",linethick0,ColorE98210;
* k/ G- T) |! @# f0 U4 w* K& F3 Tm:"macd.macd",linethick0,COLORWHITE;% w( F+ I( D# U3 m, N
{以下界说叠加区间(在这里是可见K线的范围)}1 `8 }* S1 S( C x# F
q:=SYSPARAM(3)-SYSPARAM(2);
) ^7 B. d" P/ f* ]9 c' F. rp:=SYSPARAM(3);) y( {# {3 _9 u; M
{以下盘算叠加比和叠加平移量}. R! v& P' e* E' g& A; s
{1、叠加字段高度}
7 b) a( s; q. e3 `0 p! ckh:=hhv(h,q);0 B8 r8 a8 e: r% H/ |0 X, ^$ A
kL:=LLv(L,q);
5 ?. \- h7 M+ i g4 T% h; k2 Gdh:=hhv(max(k,d),q);) k+ I" C5 u! _3 b$ H- E; c" [3 n
dL:=LLv(min(k,d),q);
+ e, C. L, G3 K$ z+ h( l& o% Tmh:=hhv(max(f,a),q);
5 X" H) J$ V9 W5 _mL:=LLv(max(f,a),q);
' y" a" D" ?- z5 crh:=hhv(max(max(r1,r2),r3),q);
% V @: w0 k( g. p: K' n7 n1 nrL:=LLv(min(min(r1,r2),r3),q);
7 R4 t `% N! j, ^1 S+ Q* @{2、叠加比}2 u* K/ Y( [2 u! t% r; G
bd:=(kh-kL)/(dh-dL)/3;
* z' d7 L4 y3 ~7 N: obm:=(kh-kL)/(mh-mL)/3;" x' \ Q% w5 l" g
br:=(kh-kL)/(rh-rL)/3;0 n- [. u4 O/ {
{3、叠加平移量}
$ S2 v" V8 y- z5 b9 B" A0 L% awk:=(kh-kL)/3;
# o+ e: l6 E3 m5 Vwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
) d: Y- K- |! n3 O5 Ywm:=(kh+kL-(mh+mL)*bm)/2;
5 q% k/ g( V& j; I. kwr:=(kh+kL-(rh+rL)*br)/2+wk[p];1 A( y! t0 n3 e- y% T3 L
{以下画叠加线}8 Z* Y6 H4 {1 r& ~+ h4 g8 G
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
3 p) P$ N/ U. U5 `* K" _! `PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
P7 u0 b% a' ^) [PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
: a( d7 T7 ^3 P! m" J% bPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
) q: _! }9 Z' k8 J5 H7 \9 QPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;! E" X$ r+ ~ p9 _7 t' y
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;- \% e7 p( D! ~2 R* @8 `1 c
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
. h# k) x* h. t" ~2 ^( QSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
8 u* ]* s6 ]( O. VSTICKLINE(m |