|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
5 Z! f; t5 F. s5 ^; O$ j$ A! Rnnl:=DISPSTATUS=2;
7 Y( t' `$ G- J# ?& f6 q3 M% z* [qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));5 k. p. e) _. V" G, A
hh:=HHV(h ,lhnh);1 l4 ^! {% j* c1 B; o# b0 K
ll:=llV(l ,lhnh);
5 }1 H1 p' @. xq0:=hh+(hh-ll)*POW(0.618,5);& z1 J: ^5 U9 m9 l. J
hh:=HHV(h ,lhnh);
9 i( m4 T5 i) m" P/ r; X2 ~4 C ~9 mq1:=ll+(hh-ll)*POW(0.618,1);
, k& d: X. b- E9 N2 Bq2:=ll+(hh-ll)*POW(0.618,2);1 U8 ^& n( N- d
q3:=ll+(hh-ll)*POW(0.618,3);
9 J1 U( _5 V/ h% X! q' O4 S" Rq4:=ll+(hh-ll)/2;5 m1 p6 @5 ]6 j6 ]& N
q5:=ll+(hh-ll)*POW(0.618,5);5 F) o6 c9 S/ n" d0 v2 E4 m- c6 g' g
q6:=hh-(hh-ll)*POW(0.618,3);4 N `) D' W g0 l
q7:=hh-(hh-ll)*POW(0.618,5);
: X( {8 C% |! V/ z) j" u" R0 xll:=llV(l ,lhnh);) p0 c4 o- x0 {5 i# r1 A$ w
q8:=ll-(hh-ll)*POW(0.618,5);" k0 Y1 _; `7 l( D, D
PARTLINE(q0,qqqq,RGB(238,238,28));/ v: Y e* a$ d- a, U6 e% P' F: @# ?
PARTLINE(hh ,qqqq,RGB(255,0,255));, Q4 F* {3 D/ E. u! N3 J8 C
PARTLINE(q1,qqqq,RGB(238,238,28));
8 R* T7 {( `+ y- cPARTLINE(q2,qqqq,RGB(238,238,28));
0 K5 Z* i, E) APARTLINE(q3,qqqq,RGB(238,238,28));4 @8 f/ ^7 ?3 T. K, @% D
PARTLINE(q4,qqqq,RGB(238,0,0));8 c ~/ ^- m/ g3 X8 w9 d
PARTLINE(q5,qqqq,RGB(238,238,28));
' A! N3 I# C' F) ]% V3 h! JPARTLINE(q6,qqqq,RGB(238,238,28));
( W! D: Y" C8 S. tPARTLINE(q7,qqqq,RGB(238,238,28));0 Z; H3 K% i( t3 p4 i
PARTLINE(ll,qqqq,RGB(255,0,255));0 E, U+ B1 Y3 a! ^) z& F9 c
PARTLINE(q8,qqqq,RGB(238,238,28));' d1 b8 J% r3 c/ y8 }
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; . s) P. _: F' q/ G8 ~! }
$ O- y, t8 \) R0 ?DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;( p% v, u! }; k$ \6 S5 E
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;7 I: D ?$ f1 {+ l& w5 l; ?8 \
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
# L4 I9 o5 P3 u" Z, ?DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
' a E, [/ _5 ^' Z* \; hDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
" g/ {+ l: ^8 b, U1 }# X0 ]DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;' z4 Y( N3 ]" G- S$ X/ x! T
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
8 w5 U( ]0 z: ^DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;( i8 I: S/ J6 S6 H H
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;/ k: g! m' `1 v$ w/ d9 Y7 e
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |