|
k:"kdj.k",linethick,COLORWHITE;
Y P& o: m6 t3 A# Nd:"kdj.d",linethick0,COLORYELLOW;( ~% `5 f9 g" y& W3 w8 |
r1:"rsi.rsi1",linethick0,ColorC080FF;7 I( r& R6 [6 A% a& {3 q
r2:"rsi.rsi2",linethick0,ColorFF8080;4 ]- z6 k* R4 Z$ _7 r/ |; H
r3:"rsi.rsi3",linethick0,Color87F8F4;
& L# W$ O3 i5 T# U3 ^1 W' g" ^. Jf:"macd.diff",linethick0,Color72C072;
2 p( J! @% K4 }8 {, R; Ga:"macd.dea",linethick0,ColorE98210;
4 n2 h5 F' a# mm:"macd.macd",linethick0,COLORWHITE;# R1 @# h+ x. g4 O$ q& E& k
{以下界说叠加区间(在这里是可见K线的范围)}
6 W" e" G1 o# q( M% b" Y$ H1 Uq:=SYSPARAM(3)-SYSPARAM(2);
) Q, k0 x8 K2 z4 y3 V/ ~( {p:=SYSPARAM(3);4 M, n: i& \! A* f3 y. e
{以下盘算叠加比和叠加平移量}2 G1 `1 O y1 U* H/ v" I4 C
{1、叠加字段高度}
3 n2 R5 J# k. {7 a) S, O' f$ M; Pkh:=hhv(h,q);5 n$ \% `: }+ M9 U; n( d& a
kL:=LLv(L,q);: |! h4 |" g3 Y! q
dh:=hhv(max(k,d),q);
! ^! t. ?" J$ vdL:=LLv(min(k,d),q);' f$ |! A" K! t$ t
mh:=hhv(max(f,a),q);
1 Z* S( |$ t0 h8 c! omL:=LLv(max(f,a),q);
8 c1 m/ S3 D4 i, v, d/ q4 [rh:=hhv(max(max(r1,r2),r3),q);+ p9 Q2 M9 j. \) `' \) I; Y0 x, x' g
rL:=LLv(min(min(r1,r2),r3),q);
9 B% ^8 U) b, u- F) ~& w9 f{2、叠加比}- H0 e( Z3 R" f; V
bd:=(kh-kL)/(dh-dL)/3;! s# [" O+ w* z" M
bm:=(kh-kL)/(mh-mL)/3;
, N' F) [- |- Y; E |br:=(kh-kL)/(rh-rL)/3;
$ b- }* _* c/ {9 `3 A+ M v{3、叠加平移量}
& l$ G( h" O" j; L: M% vwk:=(kh-kL)/3;
6 u* [" u/ f9 E% I% w1 n4 g7 V/ xwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];7 Y1 x+ j& W% ^. m+ i6 r" P
wm:=(kh+kL-(mh+mL)*bm)/2;- a: K4 x9 X& }# S4 s
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
, C3 z T2 m3 h; p& O; ~{以下画叠加线}
' g+ c9 ^# E& lPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
0 y3 d g" a' i' ~* lPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;, y; @2 d' Y' k, n
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
$ _ ]% S2 e' m2 I) d6 ^PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;7 n; |8 Y6 n2 D+ D/ o
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;5 {! T% a3 g, s B1 m
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;) |: X, n" t9 g% h: U
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;; v: q0 J# K0 o$ b% Y' f5 F
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;% H0 _& I. ?% B- y6 l% z. F
STICKLINE(m |