|
lhnh:=BARSLAST(DISPSTATUS=1)+1;, M& s4 Y3 B& H1 V% n) S
nnl:=DISPSTATUS=2;
3 y2 Z0 L$ r+ Dqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
; m! Z; |0 T" ~, b a) u9 Khh:=HHV(h ,lhnh);
# I3 q- ^8 ] Hll:=llV(l ,lhnh);# @8 F$ ]% p% {: R* a
q0:=hh+(hh-ll)*POW(0.618,5);! m* C7 t% Y7 v& u
hh:=HHV(h ,lhnh);
E' L: P$ p' a6 gq1:=ll+(hh-ll)*POW(0.618,1);
+ w; U) G9 I1 oq2:=ll+(hh-ll)*POW(0.618,2);
, n2 f4 f( ~( ~q3:=ll+(hh-ll)*POW(0.618,3);
2 b2 X# l% ` O' j* Dq4:=ll+(hh-ll)/2;
' p$ j: r7 G% m, W7 r3 w. @q5:=ll+(hh-ll)*POW(0.618,5);
8 t9 T2 ~" g) x* x6 Qq6:=hh-(hh-ll)*POW(0.618,3);* Q# P/ e) I: k
q7:=hh-(hh-ll)*POW(0.618,5);
6 g# Z: i' \. W0 F- tll:=llV(l ,lhnh);- x& o# V1 \% T0 m! P: _' l; F% [
q8:=ll-(hh-ll)*POW(0.618,5);4 i3 m( t V' `
PARTLINE(q0,qqqq,RGB(238,238,28));6 a% o( `: l+ C( F, h S
PARTLINE(hh ,qqqq,RGB(255,0,255));2 V3 C( _8 ^$ N7 B* B) j9 {
PARTLINE(q1,qqqq,RGB(238,238,28));, B- z4 n1 i: O, k% T2 O
PARTLINE(q2,qqqq,RGB(238,238,28));2 t2 W* n5 z; p4 x7 v
PARTLINE(q3,qqqq,RGB(238,238,28));2 j5 Q2 Y+ F2 T5 K! d& M" C ^* M6 z. c
PARTLINE(q4,qqqq,RGB(238,0,0));
5 q( f* Y) y, hPARTLINE(q5,qqqq,RGB(238,238,28));
9 L" ^( f+ G# k) WPARTLINE(q6,qqqq,RGB(238,238,28));/ l2 p0 Z4 k" l8 ]9 F9 _1 |
PARTLINE(q7,qqqq,RGB(238,238,28));
% D! z/ \. d+ P9 d' ePARTLINE(ll,qqqq,RGB(255,0,255));
- ?/ v: a, I% x4 J- `( w9 e9 oPARTLINE(q8,qqqq,RGB(238,238,28));
: N ~+ {- ~ n1 y9 T" g6 P3 j* qDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
, F9 `# c4 K3 N" {! R+ E1 A5 B& P9 D7 I
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
3 i4 f& i" R' r4 u1 b' D* qDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;; |$ X. t! H& q' h* R2 T
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
. d. G: j$ L- [% f: WDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;0 h A+ L4 x; u
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;$ v2 V- |& H, q2 Y4 I
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;8 d6 m1 G: n8 C; H
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;8 `% w _, N4 N
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;8 t4 _: ?$ B( f! s" _; f
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF; l# U9 N4 E" f v- \ \& E
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |