|
lhnh:=BARSLAST(DISPSTATUS=1)+1;! p+ q% M+ N8 d5 ^7 d
nnl:=DISPSTATUS=2;) V/ C5 O0 d# f
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));4 {3 s) J+ |% m# H- \" }, `& ?
hh:=HHV(h ,lhnh);4 n. ~* @1 r/ e( @$ U" R
ll:=llV(l ,lhnh);' r, f$ d# H; q. @6 R- h( y
q0:=hh+(hh-ll)*POW(0.618,5);. S. ^2 b% F5 F% q6 o! V$ `
hh:=HHV(h ,lhnh);8 J$ w: C4 V6 d6 e8 }# w
q1:=ll+(hh-ll)*POW(0.618,1);
6 y4 u- h4 M3 _8 Q5 z9 G7 tq2:=ll+(hh-ll)*POW(0.618,2);
0 ]3 L) t* j3 ^! n: `# ^q3:=ll+(hh-ll)*POW(0.618,3);2 ~5 x- U8 R: w3 F2 b$ n8 _4 C7 d
q4:=ll+(hh-ll)/2;5 |+ ~& l0 N' Z" u! m7 s
q5:=ll+(hh-ll)*POW(0.618,5);, q& Q8 k( \, K& r) i1 R9 _
q6:=hh-(hh-ll)*POW(0.618,3);! a6 r; @# `/ l6 ]7 e9 d
q7:=hh-(hh-ll)*POW(0.618,5); E* E% Y ^: a" }
ll:=llV(l ,lhnh);
& w% I& P4 n$ y' `+ kq8:=ll-(hh-ll)*POW(0.618,5);
+ J. a9 X) \( w6 f) I( `, K* bPARTLINE(q0,qqqq,RGB(238,238,28));
4 o& E+ a4 X7 T! |( P6 w9 xPARTLINE(hh ,qqqq,RGB(255,0,255));$ R' d# `( q* e5 i/ U% Z
PARTLINE(q1,qqqq,RGB(238,238,28));7 L1 U9 y& T: J* n9 h( M
PARTLINE(q2,qqqq,RGB(238,238,28));. G M7 |; _( ]. w; c
PARTLINE(q3,qqqq,RGB(238,238,28));
. E) T, G$ p& W/ iPARTLINE(q4,qqqq,RGB(238,0,0));
, @% E9 j- L9 A& r) O# z7 hPARTLINE(q5,qqqq,RGB(238,238,28));
, ?- { Y* E; C: {' qPARTLINE(q6,qqqq,RGB(238,238,28));0 }; J; J) u8 q; ? k7 b
PARTLINE(q7,qqqq,RGB(238,238,28));3 W% A1 L6 Z3 q6 U) u( Y( C
PARTLINE(ll,qqqq,RGB(255,0,255));. K' T, |7 O$ @
PARTLINE(q8,qqqq,RGB(238,238,28));
0 d& X+ B( N7 N" z EDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
& m. D! e" }# @! l) ?5 Y. T
: X! q5 Q- t+ j- C: FDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;+ x8 m. ]+ p9 j' K' B& m
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;/ m ]( D8 P3 F5 ^# ^
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;7 ~5 w. u) G, x' K' N1 j
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
" k- I0 G. n n. c: sDRAWTEXT(nnl,q4,'50% '+q4),Colorred;0 E# b: [6 J4 P; N$ s
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
0 w* X4 _8 A* n- Y* A, jDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
- E( C1 p2 c: E+ h6 w7 K" f1 j7 N/ eDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
3 d6 h! R, C% U7 nDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;$ N8 c, H- U2 b
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2020-4-29 21:41:00