|
k:"kdj.k",linethick,COLORWHITE;
' p) \# A# `- b: s- m0 L1 Vd:"kdj.d",linethick0,COLORYELLOW;
. a/ N) t U( @" g$ ir1:"rsi.rsi1",linethick0,ColorC080FF;" Q1 l# P2 Q- Z* h
r2:"rsi.rsi2",linethick0,ColorFF8080;: R" I' G r) O U
r3:"rsi.rsi3",linethick0,Color87F8F4;6 J8 R7 J2 ~7 l" O. {& }5 C
f:"macd.diff",linethick0,Color72C072;4 p, I3 t( R- o8 ?
a:"macd.dea",linethick0,ColorE98210;
$ U$ A& B) C- g+ r8 O+ [m:"macd.macd",linethick0,COLORWHITE;/ }$ c3 {+ T5 Q7 C# e& Z1 s7 D
{以下界说叠加区间(在这里是可见K线的范围)}
- h! k& I" |2 Eq:=SYSPARAM(3)-SYSPARAM(2);2 K; ^1 ]( A2 o0 R
p:=SYSPARAM(3);+ Q5 \( K& H3 ^/ ^
{以下盘算叠加比和叠加平移量}% y" i: G! ]3 u v
{1、叠加字段高度}) M1 P1 X, x- Q/ R% a. k
kh:=hhv(h,q);
/ \4 |2 D7 s8 n: Z+ q& B" w' TkL:=LLv(L,q);
2 n; }3 _/ O, u% ydh:=hhv(max(k,d),q);
7 Y$ U2 h2 r8 E& h1 qdL:=LLv(min(k,d),q);
: |8 e/ _$ d# K6 @2 kmh:=hhv(max(f,a),q);
/ O) a+ \2 C& |7 x7 umL:=LLv(max(f,a),q);
B6 A; v: T+ ?7 i: X. Wrh:=hhv(max(max(r1,r2),r3),q);! y$ o7 [) K a j
rL:=LLv(min(min(r1,r2),r3),q);
/ P5 J# T G* e$ D{2、叠加比}
6 V) G1 `' H2 p: d9 kbd:=(kh-kL)/(dh-dL)/3;. K% m# D2 Z& L1 c
bm:=(kh-kL)/(mh-mL)/3;4 ?' Z$ l% H1 P! S: w2 V% j
br:=(kh-kL)/(rh-rL)/3; W8 j7 ]5 W/ G5 q+ T; A: d
{3、叠加平移量}1 Y$ Y% F4 e* Y( r
wk:=(kh-kL)/3;
/ d) L! e. U- I/ U ]3 S* t$ o `wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];5 K/ b6 F7 S7 M+ y% D6 R
wm:=(kh+kL-(mh+mL)*bm)/2;6 E* X9 q$ I2 o
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];% }3 U- U y8 h! d1 @- `
{以下画叠加线}
) p* j6 r( [% z' f# [/ X' RPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;( H! u) _9 J; I$ Z2 a
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
4 O1 G; { T0 CPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
! g" P8 s# W+ e' {PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
. _+ B+ ^, ]8 y& ~: fPARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
# j+ p% h e4 A0 ~6 t: d; y/ ZPARTLINE(1,f*bm[p]+wm[p]),Color72C072; H" {3 r2 O8 n; {! A
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;1 v0 v* B; Q2 H3 \* L, ]
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;! S. x. e( g7 U, j
STICKLINE(m |