lhnh:=BARSLAST(DISPSTATUS=1)+1;
0 ^( ~2 m" G" V; c7 O0 c0 Bnnl:=DISPSTATUS=2;0 l; u6 z9 c. ]$ m
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
2 M, h9 U5 y/ ~$ M. dhh:=HHV(h ,lhnh);
- G: Z! D E6 T3 D$ b$ G" a1 ]& Lll:=llV(l ,lhnh);
5 ?. Z% z0 d2 R g, \3 Cq0:=hh+(hh-ll)*POW(0.618,5);: W" U: P/ T2 O' f! s
hh:=HHV(h ,lhnh);, n# L: L# D7 z4 c9 C
q1:=ll+(hh-ll)*POW(0.618,1);
6 p: F9 L7 N( a( c: g- |q2:=ll+(hh-ll)*POW(0.618,2);
+ p0 A# `- C9 y7 ^8 nq3:=ll+(hh-ll)*POW(0.618,3);2 D& d. B7 D5 e* P* t* \$ N0 ~5 `
q4:=ll+(hh-ll)/2;% ~" J3 n0 d0 {, K- {, v
q5:=ll+(hh-ll)*POW(0.618,5);1 X! h. d- M+ _0 u* @- z
q6:=hh-(hh-ll)*POW(0.618,3);
- G, q- F% ^1 A% kq7:=hh-(hh-ll)*POW(0.618,5);
4 P3 }& A' ~. `4 y2 Mll:=llV(l ,lhnh);
' Z/ _% g. w. G( d* v- }q8:=ll-(hh-ll)*POW(0.618,5);8 @8 d; i# _4 \' I3 o2 J
PARTLINE(q0,qqqq,RGB(238,238,28));
' Y0 m; H9 b' h+ g' D$ cPARTLINE(hh ,qqqq,RGB(255,0,255));
* G7 f; [$ o8 V6 u, E3 yPARTLINE(q1,qqqq,RGB(238,238,28));: r+ {1 v7 p F5 @& ]. L
PARTLINE(q2,qqqq,RGB(238,238,28));
S: I$ Q6 ~, G. X' ZPARTLINE(q3,qqqq,RGB(238,238,28));9 B, ?3 W7 A: l2 r, S/ Y, f
PARTLINE(q4,qqqq,RGB(238,0,0));/ L, s, _- h5 j2 U
PARTLINE(q5,qqqq,RGB(238,238,28));
. _/ u" s! ~; a# B1 q5 {PARTLINE(q6,qqqq,RGB(238,238,28));
5 W4 [& r5 u# u( y* C7 o- WPARTLINE(q7,qqqq,RGB(238,238,28));2 u( k; A3 P. |5 a; W
PARTLINE(ll,qqqq,RGB(255,0,255));
2 I y; N2 O/ Q0 DPARTLINE(q8,qqqq,RGB(238,238,28));* c. X. l; l3 X$ e
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
. z& j* X/ V- @. F9 T p0 `4 u7 H* f. L1 K' ]$ X- c% M
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
- \7 U' ?& A) aDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;( e$ Z) E" j0 X3 i! G) L& G) a
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;5 ~9 @! ^% J* B+ [
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;" }5 G6 b4 k, n/ |0 X& L
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;- f0 ]! F" @* I8 H
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
. z& |8 F- R' Z! JDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;8 r1 K" @, [2 Y H2 `- p
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
7 p3 Z5 H* n' N/ b2 z1 ~DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
( x+ i+ {; s/ S1 K9 K" S% IDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |