|
lhnh:=BARSLAST(DISPSTATUS=1)+1;! F- E0 u% C# o' A2 p0 [/ y
nnl:=DISPSTATUS=2;1 E* ~" v/ T2 c4 r1 |0 K
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));; [& q9 n' `3 m) w% i& H% g9 u$ o
hh:=HHV(h ,lhnh);1 c- S9 \5 T Z& {& ~: h0 Z
ll:=llV(l ,lhnh);; {5 @* C' u* x9 z. d3 \$ r
q0:=hh+(hh-ll)*POW(0.618,5);
" G3 D, Y# B) Y2 u$ t" u8 x+ |hh:=HHV(h ,lhnh);
( x# M/ v; U. ^. _' ]q1:=ll+(hh-ll)*POW(0.618,1);
) o) T5 E' A9 S+ H1 [) ]/ W1 Uq2:=ll+(hh-ll)*POW(0.618,2);
1 U- C# `: B( x6 D" vq3:=ll+(hh-ll)*POW(0.618,3);
% C* v- d7 X$ ?8 E+ ^" Y) k2 dq4:=ll+(hh-ll)/2;% k2 V4 B5 a) ]' f* P" b
q5:=ll+(hh-ll)*POW(0.618,5);
$ P9 j/ e2 ? m7 d4 d( gq6:=hh-(hh-ll)*POW(0.618,3);
$ q/ }/ ^0 f$ d0 J' i5 j! \7 |: [q7:=hh-(hh-ll)*POW(0.618,5);: `9 P$ u7 m" g! `+ f& r
ll:=llV(l ,lhnh); m4 e- ?4 [& Z& }* i, m- F
q8:=ll-(hh-ll)*POW(0.618,5);
% [, b8 K( X3 Q$ _PARTLINE(q0,qqqq,RGB(238,238,28));
+ n8 t" Q9 j/ H) y6 I9 oPARTLINE(hh ,qqqq,RGB(255,0,255));
0 F" M) I$ g+ u" |/ |- {9 O# @PARTLINE(q1,qqqq,RGB(238,238,28));
0 _" a. E$ L& V: Q' T8 Z4 Y% G. v/ CPARTLINE(q2,qqqq,RGB(238,238,28));- B/ d6 y% S' m: i4 R: N3 k
PARTLINE(q3,qqqq,RGB(238,238,28));
; ~2 e$ E( `2 B( V2 @ g- ZPARTLINE(q4,qqqq,RGB(238,0,0));) w5 y, [. j* C$ j* ^
PARTLINE(q5,qqqq,RGB(238,238,28));) M5 D, [2 ^5 w6 t9 W
PARTLINE(q6,qqqq,RGB(238,238,28));/ o; O0 t& ?+ y9 ]: X: [$ B: o
PARTLINE(q7,qqqq,RGB(238,238,28));! R: N0 }5 D/ a# A+ e, O5 m
PARTLINE(ll,qqqq,RGB(255,0,255));
$ o9 H g' U( |9 {PARTLINE(q8,qqqq,RGB(238,238,28));
) Z& U T) M$ U9 nDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 5 [- R/ ]$ F, M* \7 l9 D; T9 E& t
& n8 b9 y O1 ~ K4 F
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
' s; A: x% C! Z/ A4 a3 {, e) p. c% xDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;( r/ ~+ _5 t& j& `
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;! Z8 d1 W3 D$ n: z9 M
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
8 {8 @5 O$ D& yDRAWTEXT(nnl,q4,'50% '+q4),Colorred;5 C1 o. b0 \& ~% t. A- d O; }: R
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;4 E1 j T: c1 k$ j% A
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;) z- c: i; S' M4 D4 x
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;1 w& O3 w# f3 B+ l% s
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
% g1 W" a2 E! T3 S- E% f& k- W0 BDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |