|
k:"kdj.k",linethick,COLORWHITE;
% g. V/ D; ^1 @/ d8 S: A, fd:"kdj.d",linethick0,COLORYELLOW;
3 U3 z% A0 c' p) z( b, _1 M! G6 Lr1:"rsi.rsi1",linethick0,ColorC080FF;
5 ]% |; @2 p9 s+ B& B/ Mr2:"rsi.rsi2",linethick0,ColorFF8080;
. y0 o- G6 X2 p6 s! V R. Er3:"rsi.rsi3",linethick0,Color87F8F4;! D) V& j8 @, J- W1 y3 k
f:"macd.diff",linethick0,Color72C072;7 T- h3 b+ _/ q4 }
a:"macd.dea",linethick0,ColorE98210;2 U0 g! c* [7 ?* C- m1 x8 k3 m
m:"macd.macd",linethick0,COLORWHITE;
+ [1 X, i2 J1 J1 o, ~{以下界说叠加区间(在这里是可见K线的范围)}
* [- V. q% D5 i* C8 Xq:=SYSPARAM(3)-SYSPARAM(2);
2 H% E7 ^1 ~2 C$ u/ bp:=SYSPARAM(3);- l& R% l& ^; X+ t
{以下盘算叠加比和叠加平移量}& u& B) F- X+ U% ^
{1、叠加字段高度}
( `; h5 S4 ~; ]9 S0 S) ?: _kh:=hhv(h,q);
! t- \# i- Y3 k) `kL:=LLv(L,q);* X; z2 f) `7 U* v* x! n2 g/ S
dh:=hhv(max(k,d),q);# d6 c) P- z' _7 l/ w
dL:=LLv(min(k,d),q);
1 B* ~! m5 t3 R* g: Z2 M$ z* dmh:=hhv(max(f,a),q);2 D+ D: G+ c$ M! V: z
mL:=LLv(max(f,a),q);
0 k& x1 Y0 E+ N& crh:=hhv(max(max(r1,r2),r3),q);& ?. s- F$ [% e. J% ]# I
rL:=LLv(min(min(r1,r2),r3),q);3 r$ l t; Y) i
{2、叠加比}/ S- y' ?) Q: e: Q9 j! L5 j
bd:=(kh-kL)/(dh-dL)/3;
: `1 E* [& H" }1 fbm:=(kh-kL)/(mh-mL)/3;
: P- h( I5 f* dbr:=(kh-kL)/(rh-rL)/3;
: ~' R5 g% p0 k0 d2 t' l{3、叠加平移量}
( S' h# E4 q& Q3 P) T: Lwk:=(kh-kL)/3; v9 t! x0 X# D! E
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
* u4 e. r$ l- z4 S$ Jwm:=(kh+kL-(mh+mL)*bm)/2;
- P& h& Q* K& m( P+ P& m) Iwr:=(kh+kL-(rh+rL)*br)/2+wk[p];; T/ {& j4 G% L% e+ W, a
{以下画叠加线}
6 |. W" _8 d" }PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
( I2 N) K0 m2 _2 B7 H: FPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
8 O( W6 k. q2 P% g4 ~: NPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
! ]9 N4 |# m: @2 E! \# n( O" bPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;' ?; }( x0 k2 ]/ J& b1 ~4 M
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
! \# C3 z* G& J% t: x1 LPARTLINE(1,f*bm[p]+wm[p]),Color72C072;
% M; T& I* w$ a6 @' J, e* jPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;6 L- Q5 ?: j/ L: p
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
$ T" R* m. Z( U/ d, N' \' i( uSTICKLINE(m |