|
lhnh:=BARSLAST(DISPSTATUS=1)+1;2 u$ d& D2 @/ ]6 ^$ Q2 q; ~
nnl:=DISPSTATUS=2;
0 o2 s# Z7 {- i* Y% ~qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
+ M( G' t! H6 w& S0 Bhh:=HHV(h ,lhnh);( v. |: Z7 b, f1 u
ll:=llV(l ,lhnh);
, G. v* ?3 |! \# I# h6 [8 Eq0:=hh+(hh-ll)*POW(0.618,5);; G7 V6 ^$ X* D
hh:=HHV(h ,lhnh);- o! V2 X) o) b9 d. G
q1:=ll+(hh-ll)*POW(0.618,1);
! R5 p6 l1 w" G' E4 k1 Eq2:=ll+(hh-ll)*POW(0.618,2);
' o* g5 s) t+ J2 x5 K: Uq3:=ll+(hh-ll)*POW(0.618,3);
# \! L) A+ F+ u; fq4:=ll+(hh-ll)/2;
7 ?1 X: f' g G) U- Gq5:=ll+(hh-ll)*POW(0.618,5);
3 ?, p \: P8 A) aq6:=hh-(hh-ll)*POW(0.618,3);
. Y! b2 u( g6 N" [" Tq7:=hh-(hh-ll)*POW(0.618,5);) `# w! F) S( S5 ^& {" N
ll:=llV(l ,lhnh);2 K. ^8 H) H$ o6 p+ d
q8:=ll-(hh-ll)*POW(0.618,5);
3 @5 r g# o3 y2 c; hPARTLINE(q0,qqqq,RGB(238,238,28));
) L' R' q; g. p; bPARTLINE(hh ,qqqq,RGB(255,0,255));
$ M( ?- P2 x. b e1 V7 XPARTLINE(q1,qqqq,RGB(238,238,28));
8 k4 Z* \. a6 _; z; d+ ePARTLINE(q2,qqqq,RGB(238,238,28));2 V( d5 ^% B! N
PARTLINE(q3,qqqq,RGB(238,238,28));% E6 P, W) X% D9 |5 \' y# z
PARTLINE(q4,qqqq,RGB(238,0,0));8 {0 y# n8 G: V5 v
PARTLINE(q5,qqqq,RGB(238,238,28));, v6 f7 P6 H1 v
PARTLINE(q6,qqqq,RGB(238,238,28));
4 {; }; ^0 s- N# u0 YPARTLINE(q7,qqqq,RGB(238,238,28));
) r, q" f2 m7 \PARTLINE(ll,qqqq,RGB(255,0,255));3 K. O: }! s9 \& U4 j' o4 \
PARTLINE(q8,qqqq,RGB(238,238,28));
8 Z0 L" J; j9 k9 ~: ?( H. z4 UDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; , C0 C& f# k9 ?9 E. t' M% W
' d% f* m: a* m0 ^5 p, L$ n
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;$ d( D3 k. z, m
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;6 g4 R4 k9 W; O- b6 p
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;8 H P+ e0 I8 a( } O: i, E9 [3 P
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;; O+ n6 n' J5 z, Z$ i
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;; O! @4 n0 u- S. y
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
' n3 F0 j8 ~/ f7 b# ZDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;8 d3 G8 u2 n! w. ]2 U; r' d1 L
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;" O7 l) V: a" G/ w
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;9 l/ s$ b0 a5 ?: O8 Z
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |