|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
j t* y' a9 dnnl:=DISPSTATUS=2;
" Y) [$ l% n% n0 _; d! Xqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));, [0 ^" B0 R+ g5 m6 J- s3 B
hh:=HHV(h ,lhnh);0 @; Q( g& V6 G% B' b
ll:=llV(l ,lhnh);% j# J; c7 x) u/ j4 p2 J
q0:=hh+(hh-ll)*POW(0.618,5);
# z2 l8 p0 Q" G' Q5 [% E0 Rhh:=HHV(h ,lhnh);
P9 `6 u% T: ^ q6 @* Iq1:=ll+(hh-ll)*POW(0.618,1);
1 y3 x" s$ R8 x$ _) _% @% rq2:=ll+(hh-ll)*POW(0.618,2);
! [* h: m7 l4 X% ^; o1 Aq3:=ll+(hh-ll)*POW(0.618,3);2 x2 O8 {2 B; p( H) m
q4:=ll+(hh-ll)/2;
. f8 ^# s% O' Nq5:=ll+(hh-ll)*POW(0.618,5);
; i+ B" I7 i; I9 G; I6 S2 Rq6:=hh-(hh-ll)*POW(0.618,3);! h/ p8 J+ i# @6 x/ b v0 ^" ~
q7:=hh-(hh-ll)*POW(0.618,5);6 [& N% R% [ N- v
ll:=llV(l ,lhnh);
% q8 i/ E1 U# dq8:=ll-(hh-ll)*POW(0.618,5);
$ G$ a; g9 x1 ~( RPARTLINE(q0,qqqq,RGB(238,238,28));
5 G+ @. s* k' M' k APARTLINE(hh ,qqqq,RGB(255,0,255));3 j# ~! s" i* L
PARTLINE(q1,qqqq,RGB(238,238,28));' y3 e: z) e, a/ S6 B; P: Y/ Z# i9 h
PARTLINE(q2,qqqq,RGB(238,238,28));
: w- Y3 M9 c: f' \% g3 o+ zPARTLINE(q3,qqqq,RGB(238,238,28));- k, _% Z) O" | N8 `* ]) N- Y
PARTLINE(q4,qqqq,RGB(238,0,0));; `4 B/ _5 M+ Q+ T7 I
PARTLINE(q5,qqqq,RGB(238,238,28));
# [% l) B$ Q/ o O6 s1 G5 c, [PARTLINE(q6,qqqq,RGB(238,238,28));
( @+ C0 e! m5 ?* o+ a* V/ T# G, RPARTLINE(q7,qqqq,RGB(238,238,28));* q# q A5 }" u6 C; A
PARTLINE(ll,qqqq,RGB(255,0,255));
. ~0 B8 H- Q1 Q7 F( \PARTLINE(q8,qqqq,RGB(238,238,28));0 j0 R$ u' P2 C2 q/ n4 C+ L" G5 ~
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
1 \0 r& T) m4 B. e# R2 ~1 n0 R6 g3 Z- r' H( |2 j1 M" v! Y5 B8 A
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
9 @* g7 A, @; a& ]DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;5 ^3 Q5 g" k7 T' ]
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
/ N+ |8 x7 G! Y& R: b- ADRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
, W3 j3 h+ J& t( K; ?DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
+ b! |0 h( R ^0 g; G* t( zDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;: ?: o5 K2 F' A0 G9 \
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
# @7 ~) a) T* d* XDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
* N7 M5 {0 [; g' x' V+ ^DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;2 d: g& b) h2 \
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |