|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
- U. X6 @8 \/ @) p- Z* Annl:=DISPSTATUS=2;( E/ a0 u: _4 M* n) t/ P g
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
$ N: T. _+ e* L, F, j) e3 \hh:=HHV(h ,lhnh);
' R) ]7 ~- j6 y! H6 c( lll:=llV(l ,lhnh);
, ]9 |1 r6 E5 C. nq0:=hh+(hh-ll)*POW(0.618,5);
8 _0 }9 _) m$ n! J" }- lhh:=HHV(h ,lhnh);
; _5 C& j |- h6 r8 g; g* |q1:=ll+(hh-ll)*POW(0.618,1);2 U, `9 V' x: t& R0 p( m2 K: p
q2:=ll+(hh-ll)*POW(0.618,2);
0 E: D; V0 ~; C8 n% Y* l. k( D9 vq3:=ll+(hh-ll)*POW(0.618,3);
4 q7 |2 V! B1 b+ Kq4:=ll+(hh-ll)/2;
% B! Z( U, n6 uq5:=ll+(hh-ll)*POW(0.618,5);
" O: J& ?3 V' k8 Z4 y6 Wq6:=hh-(hh-ll)*POW(0.618,3);& A. C! E: h5 e, h
q7:=hh-(hh-ll)*POW(0.618,5);
0 D6 E" @% G5 oll:=llV(l ,lhnh);" ^8 Y: O, d* T. z: x4 ?3 _
q8:=ll-(hh-ll)*POW(0.618,5);
) I& Q" v3 T! IPARTLINE(q0,qqqq,RGB(238,238,28));- N# q1 S4 Q5 \1 H, x4 e: R
PARTLINE(hh ,qqqq,RGB(255,0,255));
% q, k( {( T3 z5 T0 ?4 tPARTLINE(q1,qqqq,RGB(238,238,28));
, z. u, V3 j4 W* sPARTLINE(q2,qqqq,RGB(238,238,28));. J/ Q) ?1 F# \7 g+ p( e
PARTLINE(q3,qqqq,RGB(238,238,28)); ~, s/ [) W4 w
PARTLINE(q4,qqqq,RGB(238,0,0));7 C1 F' \6 L8 y9 r# S
PARTLINE(q5,qqqq,RGB(238,238,28));
: m4 b) O/ C" [5 A, h$ F8 HPARTLINE(q6,qqqq,RGB(238,238,28));
+ o, L; R% s3 j8 o7 \PARTLINE(q7,qqqq,RGB(238,238,28));( \. a( H; f! c& J$ Q6 T+ Z$ k
PARTLINE(ll,qqqq,RGB(255,0,255));
. \& p, y6 K H: E' MPARTLINE(q8,qqqq,RGB(238,238,28));
! v6 g3 Q$ P4 jDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 8 B8 Y- Z; N! |, B5 y6 v/ C6 e
* g* T' J/ s, ~+ m# P, QDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;' M& i$ R/ t( `6 p5 Y" O7 D, T
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;/ W$ H3 p+ j' M5 \2 v0 ~/ W2 Q/ K4 I' L
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;4 V5 l( l( v$ u/ j1 Y6 B0 \0 r
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
0 o1 g0 D9 i5 v; K# K; R+ T+ eDRAWTEXT(nnl,q4,'50% '+q4),Colorred;6 j* r4 P3 x1 M' m" _; w; c) _3 ]+ S. _
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
6 A3 q3 R% a- \6 ^( e* eDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;4 p/ _9 u$ \, C8 g
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
* u8 D9 A( h) o6 f' EDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
* r% Y# @& F0 _7 u% ?; P9 lDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |