|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
+ u, i) n( {$ e! f( s9 h: a; ~8 Ennl:=DISPSTATUS=2;* R7 M% L' u: T7 u5 y8 L
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));* `5 c" T# x" J# M! ^! S
hh:=HHV(h ,lhnh);% H" v7 d0 m# p
ll:=llV(l ,lhnh);
" e+ r9 @ h- s0 Y, i+ T6 e9 aq0:=hh+(hh-ll)*POW(0.618,5);. Q& W( U2 Z# h: F) |. {
hh:=HHV(h ,lhnh);* r: V. n* X" \
q1:=ll+(hh-ll)*POW(0.618,1);+ H! D5 q- m, Z) N* {+ N% s
q2:=ll+(hh-ll)*POW(0.618,2);
' u; V6 w! H _# T% dq3:=ll+(hh-ll)*POW(0.618,3);
! d G7 ?8 G! u, Q E! h3 q; Gq4:=ll+(hh-ll)/2;/ T' F7 V& J! B5 [7 d6 a9 D2 ^
q5:=ll+(hh-ll)*POW(0.618,5);' i P) B( ~9 V6 [ X' l
q6:=hh-(hh-ll)*POW(0.618,3);
2 m/ k U+ F; k/ ?q7:=hh-(hh-ll)*POW(0.618,5);! j/ ~5 T \7 E3 r5 j; |% n, }3 R9 R
ll:=llV(l ,lhnh);+ X0 ?" A" A7 L5 F0 A6 F
q8:=ll-(hh-ll)*POW(0.618,5);
2 r( M. T$ j& A" xPARTLINE(q0,qqqq,RGB(238,238,28));3 X- F0 C8 g; Z9 I
PARTLINE(hh ,qqqq,RGB(255,0,255));% @. o5 k( _- Y
PARTLINE(q1,qqqq,RGB(238,238,28));0 X" {3 l* w% T0 `! K' X
PARTLINE(q2,qqqq,RGB(238,238,28));* Y3 m( I/ `8 Z' H: o
PARTLINE(q3,qqqq,RGB(238,238,28));
) \; Z! u! k1 S: C: u* h. JPARTLINE(q4,qqqq,RGB(238,0,0));
& f: x& o! D% Y' [9 qPARTLINE(q5,qqqq,RGB(238,238,28));- S0 a. [4 u9 U2 M! P. M: g
PARTLINE(q6,qqqq,RGB(238,238,28));" A4 r( U7 v* m% z9 F+ D
PARTLINE(q7,qqqq,RGB(238,238,28));5 G5 [# Q, ~' j3 D4 ^, @+ \
PARTLINE(ll,qqqq,RGB(255,0,255));
# f5 d, b4 P$ p7 h( [' |/ DPARTLINE(q8,qqqq,RGB(238,238,28));4 F; ?$ `; z) H7 A7 ? V
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; $ N& x1 T+ U% X9 ~& H4 p+ w9 F
+ ]0 v( w( ^- f1 z! I( Z$ i& I. _
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
8 w# T! u% A8 FDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF; h3 t1 _, }* M$ V [! f& m' v
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
. s D& t. g7 }5 `' a6 x2 dDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
( A3 q1 H* V4 m8 J" RDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
7 y$ ^; I) x! W s) fDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF; c4 E/ M+ Z" [* W) W
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
+ p! v6 u% H) S3 l- h8 rDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;6 ~1 S) b& @0 D6 {) K3 Z, u/ B6 W
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;+ P, ?9 k; V) C- u( S% M. A" {2 {
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |