lhnh:=BARSLAST(DISPSTATUS=1)+1;
$ v; D2 f1 T9 ~4 @2 G& dnnl:=DISPSTATUS=2;
4 E! c$ x8 ]3 V: q% ]qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
' |0 H5 J4 Y5 v3 `: h8 vhh:=HHV(h ,lhnh);
, ~1 H2 r! u) D' ~1 S3 s/ Hll:=llV(l ,lhnh);2 m! \- c. b% U7 n, A L% w; g4 `
q0:=hh+(hh-ll)*POW(0.618,5);+ m3 z) c8 k4 X7 k/ ^
hh:=HHV(h ,lhnh);
; F* Q9 P8 m7 ?8 @% |+ sq1:=ll+(hh-ll)*POW(0.618,1);9 _4 h$ x0 W1 I+ |& T* d7 e
q2:=ll+(hh-ll)*POW(0.618,2);- R0 D4 a$ I7 c/ Y
q3:=ll+(hh-ll)*POW(0.618,3);9 y9 i! P' f; p6 \
q4:=ll+(hh-ll)/2;
7 n; _8 V. n, v' n8 a! E6 aq5:=ll+(hh-ll)*POW(0.618,5);* h1 }2 ` _5 R; X1 T
q6:=hh-(hh-ll)*POW(0.618,3);+ F' x" W3 C+ K% t8 u
q7:=hh-(hh-ll)*POW(0.618,5);, z6 \- ` q* N
ll:=llV(l ,lhnh);% P. n6 X9 P% o5 j
q8:=ll-(hh-ll)*POW(0.618,5);
/ D3 Y; v$ a6 \; }7 rPARTLINE(q0,qqqq,RGB(238,238,28));9 g5 |# a* U3 V. _
PARTLINE(hh ,qqqq,RGB(255,0,255));& T4 B' p) x1 w* R
PARTLINE(q1,qqqq,RGB(238,238,28));
6 F2 o7 ` | W+ rPARTLINE(q2,qqqq,RGB(238,238,28));
; ]/ ?/ [- [, H) VPARTLINE(q3,qqqq,RGB(238,238,28));' r" p, I9 P0 j2 z/ K
PARTLINE(q4,qqqq,RGB(238,0,0));7 y6 g8 k- s4 N6 D9 Y
PARTLINE(q5,qqqq,RGB(238,238,28));# C. f7 S% B8 u, T
PARTLINE(q6,qqqq,RGB(238,238,28));! V3 ]9 y) {6 x1 W
PARTLINE(q7,qqqq,RGB(238,238,28));9 w1 G3 f% A6 R% y8 A9 w; g
PARTLINE(ll,qqqq,RGB(255,0,255));1 M% A X& ~/ j& F0 f
PARTLINE(q8,qqqq,RGB(238,238,28));
( g [& d; R; N' ~$ TDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 0 L0 q2 \/ `" @9 k
; `' T/ F2 U0 ^- UDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
% s$ D; N3 p0 X. w+ c2 z) SDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;$ P0 ~6 b5 ~, ]# J3 L
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;& ~2 S1 f/ ?; B% `. \3 |' y4 z
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;' \3 i7 F1 S8 G# U9 V+ r
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
7 h' g/ H5 ^1 h. ?DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
& c. \* I6 q! v0 PDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
' P* e: Y# ?+ M2 E+ W7 q$ YDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
; d7 c4 X- S) a8 Z8 G9 f3 C! y7 m FDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
- Z- ?9 H+ @) U3 Q QDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |