|
lhnh:=BARSLAST(DISPSTATUS=1)+1;# {- L9 D1 `0 O8 @! U5 i4 Z2 Y
nnl:=DISPSTATUS=2;( T5 Q& v6 ~* {. n
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
4 }3 [; f' m- V! c* b U+ B( vhh:=HHV(h ,lhnh);% L& D5 ^6 {* v* c, ? a2 m3 ] ?7 n7 ^
ll:=llV(l ,lhnh);* |. p3 ^0 X r) H
q0:=hh+(hh-ll)*POW(0.618,5);: N: i$ h6 d; [. G5 t7 c
hh:=HHV(h ,lhnh);. c0 m. p; T; W$ N" R. t
q1:=ll+(hh-ll)*POW(0.618,1);( c& \* V! \) }9 X
q2:=ll+(hh-ll)*POW(0.618,2);
) B5 s( a2 W9 }- o/ D$ s& Cq3:=ll+(hh-ll)*POW(0.618,3);3 P1 p: d5 `3 e; F- v1 P9 `
q4:=ll+(hh-ll)/2;
8 P Y/ f, i2 Wq5:=ll+(hh-ll)*POW(0.618,5);9 j5 C+ i/ a4 H2 H
q6:=hh-(hh-ll)*POW(0.618,3); o" Y# Y8 W; v* v3 U- }3 R3 a! O# g
q7:=hh-(hh-ll)*POW(0.618,5);
% j# i; m7 k5 S8 Tll:=llV(l ,lhnh);
( V( @* n# }: w% ?' y/ E" fq8:=ll-(hh-ll)*POW(0.618,5);
( D5 o2 h$ [) _' f2 DPARTLINE(q0,qqqq,RGB(238,238,28));' G, m4 h( O* r- O5 p! V5 Z6 i
PARTLINE(hh ,qqqq,RGB(255,0,255));
0 n- ]: W) i7 d3 l7 X, jPARTLINE(q1,qqqq,RGB(238,238,28));
9 h7 K# S/ h9 u8 K2 APARTLINE(q2,qqqq,RGB(238,238,28));8 r- q: b! n. \+ P' }2 g+ T) W& r4 x6 l" \
PARTLINE(q3,qqqq,RGB(238,238,28));
" m+ q. q: c! ?% U {PARTLINE(q4,qqqq,RGB(238,0,0));0 { q2 V* I: P+ Y8 p
PARTLINE(q5,qqqq,RGB(238,238,28));
: u2 \; X9 t7 j/ S* vPARTLINE(q6,qqqq,RGB(238,238,28));9 j( K$ \( P+ {7 D# b2 e2 n" t
PARTLINE(q7,qqqq,RGB(238,238,28));
6 @' T$ N9 j# o# d9 @) M" @' mPARTLINE(ll,qqqq,RGB(255,0,255));0 ^/ q3 u$ j2 E3 k
PARTLINE(q8,qqqq,RGB(238,238,28));: D# t) f$ W2 I# l' z i
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 1 B" p1 E! r; p. u- U
8 x2 |% q" r; d6 n4 j( D
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;' o4 L9 O# l, n! v% c0 e
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;, p, b# X- _8 ~, p* Q
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;# |3 c. A) Z* w- d
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
, @4 t' l. r/ v% b4 ]1 \DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
6 P9 D& A( P: g+ QDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
6 Y# n b3 W6 N/ y5 C6 f0 DDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
( j* ]2 l; L# e2 z( B3 y' VDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;' u a$ V' h$ k/ K) r- c' B, D
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
3 ? N, g1 `2 c5 CDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |