|
k:"kdj.k",linethick,COLORWHITE;
$ e' n- {$ O) Y$ ^d:"kdj.d",linethick0,COLORYELLOW;
7 d. S" N, s8 K( ~' t, w" R$ ar1:"rsi.rsi1",linethick0,ColorC080FF;& Q: i- K7 J5 |/ p; b
r2:"rsi.rsi2",linethick0,ColorFF8080;
6 _" u$ \7 Q$ w) c) qr3:"rsi.rsi3",linethick0,Color87F8F4;9 o. V2 y+ ?: R; y
f:"macd.diff",linethick0,Color72C072;9 }4 a$ `, F( O
a:"macd.dea",linethick0,ColorE98210;
/ H8 l* i W8 P* W5 @m:"macd.macd",linethick0,COLORWHITE;
" ~8 r, _ k* r{以下界说叠加区间(在这里是可见K线的范围)}/ i9 U" @6 J0 C1 n8 z+ Q
q:=SYSPARAM(3)-SYSPARAM(2);
" g7 J% Q$ e' Z, d( w, B: [5 Np:=SYSPARAM(3);
- k( s- l/ r, h" j) }{以下盘算叠加比和叠加平移量}& Q* O9 K1 B4 D4 Z/ o7 s
{1、叠加字段高度}% a8 [) E5 i, F2 F; G
kh:=hhv(h,q);
1 J/ B' ?0 Q$ S2 R: skL:=LLv(L,q);
* E* Z! W4 N5 e" `+ x! ldh:=hhv(max(k,d),q);2 O4 x" @3 r! ?' K
dL:=LLv(min(k,d),q);: W2 x: M8 \' R0 i( a+ P
mh:=hhv(max(f,a),q);
0 x: \2 O6 X' f5 ?3 Q5 ~8 hmL:=LLv(max(f,a),q);: j V) S) r! @: q& ` b1 ?( R
rh:=hhv(max(max(r1,r2),r3),q);
! O. n3 Q$ `& T! M+ h0 {rL:=LLv(min(min(r1,r2),r3),q);
& W( i6 T$ f0 _. f9 Y" Q{2、叠加比}) j: A9 X/ G. Q+ i4 P# p3 v
bd:=(kh-kL)/(dh-dL)/3;
+ N: R: W1 s E4 L! I- Y; Ubm:=(kh-kL)/(mh-mL)/3; q+ p/ ~! p0 T$ Z' R3 ^8 v$ b
br:=(kh-kL)/(rh-rL)/3;
$ ?7 k) P8 R! T ?5 y{3、叠加平移量}
2 j+ j$ h0 ]% vwk:=(kh-kL)/3;
" }1 T$ X. v7 q& n2 w1 F3 i' Gwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
1 R( r$ u' x* {$ Uwm:=(kh+kL-(mh+mL)*bm)/2;+ s% P+ O6 H5 t+ y: e$ n- A" p
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];2 x$ l* n4 M9 c
{以下画叠加线}/ _- ^( s* _/ C; h( _
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
. p' q% L! }+ }: ePARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
4 Z4 T' g9 _1 @: r' x7 v( JPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;- I9 H w; v* {! |
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
- m! H# y% V# K. U* WPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;4 ~8 r+ ~2 ?( s6 p
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
, m. y9 `0 o& h' J( k- l1 jPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
8 r3 ]9 y' d% xSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
s' D. p5 c C' m+ x1 h: O) ESTICKLINE(m |