|
k:"kdj.k",linethick,COLORWHITE;5 i- L/ `7 x' r0 k* P0 w1 a0 I
d:"kdj.d",linethick0,COLORYELLOW;; `7 u f1 g: ?6 }
r1:"rsi.rsi1",linethick0,ColorC080FF;
! C- e& a* j8 \ J/ P# t6 a- M" Lr2:"rsi.rsi2",linethick0,ColorFF8080;
0 `2 q6 p0 W& O" g( d5 b4 fr3:"rsi.rsi3",linethick0,Color87F8F4;
w4 X3 J4 n: `7 i! Df:"macd.diff",linethick0,Color72C072;
f6 V1 K; W9 \8 h; g& Oa:"macd.dea",linethick0,ColorE98210;
0 i( f: C8 w3 {m:"macd.macd",linethick0,COLORWHITE;% s1 ]/ n4 w! t8 x$ z2 u4 t |
{以下界说叠加区间(在这里是可见K线的范围)}! w+ o s# P2 ]
q:=SYSPARAM(3)-SYSPARAM(2);
" G z/ g) i ^# Cp:=SYSPARAM(3);
7 ?! {, e6 p# z9 \- x' E7 ?. @* y{以下盘算叠加比和叠加平移量}2 j6 R% D9 ^9 N, v1 v
{1、叠加字段高度}
! l# ^' Z+ }3 R( m: }, skh:=hhv(h,q);
1 h3 Q) p8 Q" H4 n0 ]kL:=LLv(L,q);
# r9 M2 j; B9 s: g. P3 l5 b( Z8 Tdh:=hhv(max(k,d),q);
. {' { e$ W, [( b& adL:=LLv(min(k,d),q);" p# z. g4 j' h6 E# Q$ H! Q2 n
mh:=hhv(max(f,a),q);% x$ M3 x8 U- w3 w- c8 a6 f9 {
mL:=LLv(max(f,a),q);
. O: k6 k# K& J5 p% ?. c- P% V+ s, hrh:=hhv(max(max(r1,r2),r3),q);* f5 m3 a9 o# }* D4 P& v7 R% y
rL:=LLv(min(min(r1,r2),r3),q);
, r7 |/ p& c W$ y8 E{2、叠加比}
! {6 Z i! Q( ]9 a- k$ i, e* f: k0 V% Hbd:=(kh-kL)/(dh-dL)/3;
) r2 u, @' P8 @$ N' Vbm:=(kh-kL)/(mh-mL)/3; T, G* N, K1 e+ N& n4 A
br:=(kh-kL)/(rh-rL)/3;$ T/ G8 q* w( t6 L1 E
{3、叠加平移量}) t1 s" N7 t* k$ W( t1 ^
wk:=(kh-kL)/3;
, g. e% }* b9 ]! V0 c( _wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
7 h( t! L. |' [3 ~: V# Owm:=(kh+kL-(mh+mL)*bm)/2;1 G' Y6 ]6 j" e
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
1 {6 w# Z" u& z4 K/ v% a% q" m; j{以下画叠加线}
& D; |5 [5 d1 n9 u$ h9 @PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
3 L, q4 S% h6 a1 r2 ?! APARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
; J8 g9 y; @; A. W+ p8 M' L4 ^! l/ wPARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
! Y7 J+ X8 \& \& K; `' h- @5 wPARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;. f8 M6 q2 V0 }
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;% e) W* x! P+ l7 L* O1 x& o
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
, C% I M" U. i. G7 b) N$ g" T+ ZPARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
: V+ D+ `5 x; A" B. x. C. @STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;# \! ]+ P# X! h( T4 b0 m4 N
STICKLINE(m |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2020-9-26 16:46:00