|
k:"kdj.k",linethick,COLORWHITE;7 g4 `, @$ K0 _# U9 v( f1 D9 g* ~
d:"kdj.d",linethick0,COLORYELLOW;# f7 V3 T6 d4 P0 x
r1:"rsi.rsi1",linethick0,ColorC080FF;( Z% ]5 I$ t% C' K# V% i3 _
r2:"rsi.rsi2",linethick0,ColorFF8080;0 d* F! D( O2 c2 F, Y' b
r3:"rsi.rsi3",linethick0,Color87F8F4;
# n7 E4 I( s! b( \+ c4 x2 ^6 e) }f:"macd.diff",linethick0,Color72C072;1 Z. @, M: D( j E; B
a:"macd.dea",linethick0,ColorE98210;" |9 @& c$ Z& t' q$ ^ I. W6 r" C
m:"macd.macd",linethick0,COLORWHITE;
+ \/ J5 `3 z; x4 t3 m$ K{以下界说叠加区间(在这里是可见K线的范围)}
4 `0 S) c0 S3 g# R/ [2 v6 lq:=SYSPARAM(3)-SYSPARAM(2);4 X6 [: f7 P' Z/ j
p:=SYSPARAM(3);# h( ]2 Z& W" Q# G4 W) Q
{以下盘算叠加比和叠加平移量}* M4 L7 x' M+ K+ k8 L8 U
{1、叠加字段高度}
, _# [; c# F4 r v6 Gkh:=hhv(h,q);
) z9 `+ E* J! F1 t! D" R& v3 G" _kL:=LLv(L,q);
* c: z/ c& Z. r7 qdh:=hhv(max(k,d),q);
# {) ^% t' T! a' F6 _2 rdL:=LLv(min(k,d),q);) {7 o1 J q6 }7 t+ N/ U
mh:=hhv(max(f,a),q);4 Q/ r7 q' e9 `" D/ N& ~/ M
mL:=LLv(max(f,a),q);, J. y* G9 C; \# ^; Z; A
rh:=hhv(max(max(r1,r2),r3),q);' m& g% C% D, s5 k* z! g7 @! t' \* W8 { y
rL:=LLv(min(min(r1,r2),r3),q);
6 Q: O2 M. ^; F$ {8 f8 h" k{2、叠加比}3 G4 {' ]0 K% c) D' ]
bd:=(kh-kL)/(dh-dL)/3;
. m2 X0 N+ v) D8 \3 S7 p& Ubm:=(kh-kL)/(mh-mL)/3;
9 d- F! n2 R# W- g+ ?+ ~ dbr:=(kh-kL)/(rh-rL)/3;
+ m& F% s- W/ B4 H0 q' q/ z+ ?{3、叠加平移量}
% w8 h' f [7 p# bwk:=(kh-kL)/3;
8 `3 o8 G/ L# B& ^+ jwd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
1 W g# L4 F9 R s+ Vwm:=(kh+kL-(mh+mL)*bm)/2;
' v, u8 g% Y; ^% m! \wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
6 M m! ]. f" G" \. _# n" \{以下画叠加线}
7 R6 n2 n+ j' ? g3 iPARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
( u, s: t8 y8 u- j b q o6 [5 APARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
$ }$ a5 T% W# u4 qPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;4 s% z' U$ M" x6 S. J! ?
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
" Z7 @# [& X6 O- d' ?6 Q7 F( B! ?PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;- @) h) I: d5 `/ X: ]3 ]' R$ G
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;% w" s8 m3 }; F7 }
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
& R. s# c i# BSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;. A* N+ A+ R; j3 }* U0 F) |, ^3 h
STICKLINE(m |