|
k:"kdj.k",linethick,COLORWHITE;' T) Z, Q, Y- l- ^% q% }
d:"kdj.d",linethick0,COLORYELLOW;+ H1 U* Y; N1 h4 W
r1:"rsi.rsi1",linethick0,ColorC080FF;3 M- g5 g4 f: W+ }; U) W7 ~- j
r2:"rsi.rsi2",linethick0,ColorFF8080;
" E+ e5 Z. ]/ _, d6 Q0 H: G6 }3 tr3:"rsi.rsi3",linethick0,Color87F8F4;; ?( u# r/ b( S3 |. {+ s, C8 i
f:"macd.diff",linethick0,Color72C072;, q7 n* f( c/ m w( a' v; v
a:"macd.dea",linethick0,ColorE98210;
8 C$ ]1 U7 p# @5 @8 e4 v3 dm:"macd.macd",linethick0,COLORWHITE;
" [6 a! C% N: h5 A2 U{以下界说叠加区间(在这里是可见K线的范围)}
4 S- `/ N$ y9 h2 Y, y$ o: vq:=SYSPARAM(3)-SYSPARAM(2);4 f# a! ~7 }7 d- b( W6 }+ |4 j3 l
p:=SYSPARAM(3);0 L3 ^$ @8 E* Q; \) x2 f
{以下盘算叠加比和叠加平移量}0 a3 G% q( s: o% L# Q Z
{1、叠加字段高度}
' R7 A) _9 R2 U' H2 _kh:=hhv(h,q);
6 l# ]7 m: F7 z7 r% @( DkL:=LLv(L,q);
" v$ P% M7 x. N2 Qdh:=hhv(max(k,d),q);. s m. K4 e- C. q) p0 X& F' [2 D
dL:=LLv(min(k,d),q);
) F% D8 L9 |- Q. | U& Qmh:=hhv(max(f,a),q);4 E' Y" U# P; z+ T. G! l
mL:=LLv(max(f,a),q);# b6 C/ Y& a! O. ^" ^* N6 Q
rh:=hhv(max(max(r1,r2),r3),q);
. l' E" f: n' j' drL:=LLv(min(min(r1,r2),r3),q);9 S9 I( b7 Z z
{2、叠加比}
1 u, ]. V" ~+ \7 k4 s5 Qbd:=(kh-kL)/(dh-dL)/3;* b# W8 D v# }) ^" p
bm:=(kh-kL)/(mh-mL)/3;# Q+ g$ Q! k% n
br:=(kh-kL)/(rh-rL)/3;
! `; \3 X" y: ^9 \/ {- [{3、叠加平移量}
; V* Z9 A+ U( N( Hwk:=(kh-kL)/3;! o) s" |" }+ k' [* q9 O: ^3 C
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
( L$ w+ P u+ n! G. d$ ^9 r" Vwm:=(kh+kL-(mh+mL)*bm)/2;
' a+ K* n& z6 O4 O3 mwr:=(kh+kL-(rh+rL)*br)/2+wk[p];7 Q2 u1 |: u3 c4 j1 b9 \
{以下画叠加线}
, E- p# j! }) x/ J( w2 W2 Q& |PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
* P& b% Q& y. ?% UPARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;% F8 P% O9 ?; V4 j) T9 X
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
7 o6 H9 C$ J2 I8 o* lPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;, v( I: z2 y2 {* P! I) ~/ @, U
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;1 k, C+ k( {% a4 o" N
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;% M+ j8 b8 p# Y
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
4 `- A4 }! L& T' zSTICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
9 \- q+ D" A- H+ n# `" ^( I# eSTICKLINE(m |