lhnh:=BARSLAST(DISPSTATUS=1)+1;
& V0 }9 {. z" q- B# H+ _1 Hnnl:=DISPSTATUS=2;
: L# }. X7 G/ }2 O: c: Y( Xqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));. _$ t! n5 l% l- f! K& W6 a
hh:=HHV(h ,lhnh);
5 Y2 |2 {+ q6 p/ Pll:=llV(l ,lhnh);; H% g4 l2 s& R7 i4 W
q0:=hh+(hh-ll)*POW(0.618,5);: j' G- c2 o) H+ s
hh:=HHV(h ,lhnh);
' v: x/ k. j8 {2 Fq1:=ll+(hh-ll)*POW(0.618,1);
2 c6 }( [8 E( u+ eq2:=ll+(hh-ll)*POW(0.618,2);* W, [9 D+ f9 l* ^; s8 x
q3:=ll+(hh-ll)*POW(0.618,3);2 H6 D2 c N. O
q4:=ll+(hh-ll)/2;
, t( F7 d* h( x0 W8 qq5:=ll+(hh-ll)*POW(0.618,5);' R- K" N; s2 j/ Q/ H# @1 L
q6:=hh-(hh-ll)*POW(0.618,3);2 j* T! R+ T. v. K! k; `* r9 B
q7:=hh-(hh-ll)*POW(0.618,5);
; Y* n- ~$ S; k u- L4 T$ P2 _- z3 [ll:=llV(l ,lhnh);
& ^9 f3 e. F* d$ n R, iq8:=ll-(hh-ll)*POW(0.618,5);2 P& o' \1 o( \
PARTLINE(q0,qqqq,RGB(238,238,28));
, d3 v8 c9 y {# NPARTLINE(hh ,qqqq,RGB(255,0,255));
2 z- R: i# i ^: h+ \PARTLINE(q1,qqqq,RGB(238,238,28));( p2 k5 h0 ?# ?5 m# C
PARTLINE(q2,qqqq,RGB(238,238,28));" H% U- g2 \7 o- {
PARTLINE(q3,qqqq,RGB(238,238,28));
: \" L# [; _& i" BPARTLINE(q4,qqqq,RGB(238,0,0));9 C6 |5 G: w" Z+ W5 U" L
PARTLINE(q5,qqqq,RGB(238,238,28));6 }0 l: U" w' j6 i
PARTLINE(q6,qqqq,RGB(238,238,28));* i s0 g/ r0 @3 t* y1 e# M
PARTLINE(q7,qqqq,RGB(238,238,28));
, o& _" \, \! d/ C% W7 q* U* |PARTLINE(ll,qqqq,RGB(255,0,255));2 h p0 c2 v1 Q1 e1 `
PARTLINE(q8,qqqq,RGB(238,238,28));+ I: R% `$ [0 t
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; ! ]8 y' Z7 q; R: L
" L t1 }( f" U$ bDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
; ]7 w: }" [1 T! h$ j$ \DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;" U; U, i% y( f& h- o' S$ o. M: a
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;. W4 I2 s1 \9 H
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
' W4 [: i, e2 L7 y5 kDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
0 i* b6 x. c) c7 s ?DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
& _* _* {; T z% f0 hDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
0 t- R- Y! j" S% _DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
+ u% y8 ]" {) I3 x% |0 jDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
7 P# g+ k: L( M5 iDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |