|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
9 a6 m0 M* L4 N, ^6 V" B% Onnl:=DISPSTATUS=2;
( B: m: J; k `. b L0 O4 [qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));2 {# u. M: f# W' K# e: y* q
hh:=HHV(h ,lhnh);
9 H- y( F# s$ W# n" _ll:=llV(l ,lhnh);0 W {- u1 C6 q% L+ x# D
q0:=hh+(hh-ll)*POW(0.618,5);" L4 j3 ]2 J/ a3 `
hh:=HHV(h ,lhnh);
; p+ _/ @. V! C7 hq1:=ll+(hh-ll)*POW(0.618,1);
) K5 n# u) ^7 A# Q0 W; F$ s% [) Uq2:=ll+(hh-ll)*POW(0.618,2);7 w. P" M6 d/ r: L0 M A
q3:=ll+(hh-ll)*POW(0.618,3);. X& u% H2 F; j: J
q4:=ll+(hh-ll)/2;9 _& l8 K0 o; i) Y4 d
q5:=ll+(hh-ll)*POW(0.618,5);
0 {1 I* | _ v) M+ yq6:=hh-(hh-ll)*POW(0.618,3);
. ~" }" W0 A' X c1 Zq7:=hh-(hh-ll)*POW(0.618,5); T# Z8 F5 A2 m% ]# {2 l
ll:=llV(l ,lhnh);
& D& q. v/ F5 n1 H/ Fq8:=ll-(hh-ll)*POW(0.618,5);
3 N* X: ^1 {, g* b3 {. TPARTLINE(q0,qqqq,RGB(238,238,28));
0 p2 g. X3 t" ~PARTLINE(hh ,qqqq,RGB(255,0,255));
$ {! X- V: C" [8 `PARTLINE(q1,qqqq,RGB(238,238,28));0 S, o- F- h/ P4 @
PARTLINE(q2,qqqq,RGB(238,238,28));
# B5 q4 ?) ~* v6 g& v: jPARTLINE(q3,qqqq,RGB(238,238,28));
% r# X3 x- m- `; T: [PARTLINE(q4,qqqq,RGB(238,0,0));
/ a: G; }; V5 a' |8 wPARTLINE(q5,qqqq,RGB(238,238,28));& V" m! i" K! h. s5 O5 H
PARTLINE(q6,qqqq,RGB(238,238,28));
6 W, o+ e* W }. CPARTLINE(q7,qqqq,RGB(238,238,28));6 ?: p7 S# G" ~/ M0 Y0 L& S
PARTLINE(ll,qqqq,RGB(255,0,255));
' l2 J0 G1 `& s* T, C7 pPARTLINE(q8,qqqq,RGB(238,238,28));: T# w( }# S5 c' y+ T1 O6 m: j
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; : v6 C! N' o* N3 {& O
! |+ M# X5 u9 `) |: B. ` l
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;. |7 [7 Z* \8 s& P m2 d/ | B
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
6 p8 H8 B5 K! Y4 L5 tDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
& Y) \5 L$ h6 Z4 k9 Z; `DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;# E4 M; v' L; j. | i9 W
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
9 m# x7 R8 |2 ` x; x# W8 \: yDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
. N4 D w% ]2 UDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
& h" T3 c b u$ |5 R! l3 w0 \DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;( D7 `+ U( m) |8 T3 ^8 H
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
/ `4 J3 L R) @/ R/ u* U: d* o% JDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |