lhnh:=BARSLAST(DISPSTATUS=1)+1;) g" o0 o. G6 d
nnl:=DISPSTATUS=2;& h6 _- `9 L4 ~$ u
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));) y5 P$ \4 L: K- W, Q
hh:=HHV(h ,lhnh);+ h. f* W5 g" ~4 ]
ll:=llV(l ,lhnh);
: F" p: _6 j& @! V V+ Dq0:=hh+(hh-ll)*POW(0.618,5);
" z8 Q! a! O# K6 f c# Nhh:=HHV(h ,lhnh);) r* R# o( S' Q0 J; J
q1:=ll+(hh-ll)*POW(0.618,1);9 [/ a. F: {7 f7 k* d
q2:=ll+(hh-ll)*POW(0.618,2);. A3 D; L. ?' q7 Q& k% q& h0 ]
q3:=ll+(hh-ll)*POW(0.618,3);
E7 P9 x# R9 z' Vq4:=ll+(hh-ll)/2;
% `* O: `/ A# _9 Y& a$ Q" wq5:=ll+(hh-ll)*POW(0.618,5);) L! H; t5 X' G/ g
q6:=hh-(hh-ll)*POW(0.618,3);* N" E- d0 C1 o: a7 d* T
q7:=hh-(hh-ll)*POW(0.618,5);
- l( l9 h p) w6 H0 E/ All:=llV(l ,lhnh);
/ O$ H5 n( |$ b. @+ `4 d0 eq8:=ll-(hh-ll)*POW(0.618,5);; g" Y9 w% s$ g8 r+ B2 M
PARTLINE(q0,qqqq,RGB(238,238,28));
' j2 o8 h2 e: m7 XPARTLINE(hh ,qqqq,RGB(255,0,255));- T! x, [1 N- }2 U1 N
PARTLINE(q1,qqqq,RGB(238,238,28));8 T# N5 R: a: i4 Q( b7 _
PARTLINE(q2,qqqq,RGB(238,238,28));2 M( x' w" x* `$ [1 f ~
PARTLINE(q3,qqqq,RGB(238,238,28));7 e. n |; k1 b! G @
PARTLINE(q4,qqqq,RGB(238,0,0));
0 n0 h3 {; c T" F2 e" L9 lPARTLINE(q5,qqqq,RGB(238,238,28));
, n+ X. n7 ^6 a! k0 X4 _5 g1 d% CPARTLINE(q6,qqqq,RGB(238,238,28));
; w& `) A6 I% y% D: fPARTLINE(q7,qqqq,RGB(238,238,28));$ K! I: Y: {. Q2 P$ Z
PARTLINE(ll,qqqq,RGB(255,0,255));
4 g. D6 f: r1 j/ u$ O( B5 NPARTLINE(q8,qqqq,RGB(238,238,28));+ b/ Q) [+ Z& _. X9 r8 e
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; : ?8 C4 V# M: g/ E b+ p6 R' Q
6 x8 X, ?: O* `9 q( z. Y0 R1 X" ]# n# BDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
0 T7 l. R9 \ {) SDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;& \! G+ S7 b7 u6 n
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;, G8 X% L7 H/ K) g/ g9 p
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
' R2 r/ V: q* K E. ?7 o- v m& |DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
8 ~4 T% F" M5 A w2 zDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;6 e6 ^0 [$ v$ |& W% H
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
# N4 _, @9 X A/ ^1 Y5 N- P$ Z) KDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
2 w% t2 T& Z6 f" nDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;) I/ A' b: @# S/ _; U* K
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |