|
lhnh:=BARSLAST(DISPSTATUS=1)+1; V V( X; {* F( Z3 q+ A9 b( X' l
nnl:=DISPSTATUS=2;
- {- t# x+ ^0 ]. d( ^% eqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
7 a! ?2 |" a: g& Xhh:=HHV(h ,lhnh);) X; U# {$ r: B, q( r6 ^
ll:=llV(l ,lhnh);
% @3 j& m5 Z0 h" R( |/ Cq0:=hh+(hh-ll)*POW(0.618,5);
~8 o) b& r$ ~# A1 h8 _$ _; uhh:=HHV(h ,lhnh);
& m! A7 j: y% W# i mq1:=ll+(hh-ll)*POW(0.618,1);$ `1 |* G4 M1 m* p. m6 _* m4 @0 Z
q2:=ll+(hh-ll)*POW(0.618,2);- w4 c3 ] [) e: T0 C
q3:=ll+(hh-ll)*POW(0.618,3);9 w }9 B% A! |* s1 _
q4:=ll+(hh-ll)/2;
. i9 _! p; y7 T# e1 d' Kq5:=ll+(hh-ll)*POW(0.618,5);9 y0 F* _. W3 ` ?" ~& [2 J
q6:=hh-(hh-ll)*POW(0.618,3);
8 b5 ?; y( I( v# r/ I4 \1 W, Lq7:=hh-(hh-ll)*POW(0.618,5);
) \+ F$ t$ f3 f' n1 {ll:=llV(l ,lhnh);
, {& K7 h' D) ?3 b6 l. E3 z! X, Kq8:=ll-(hh-ll)*POW(0.618,5);
- l* u. W! ]- w; Q, j( JPARTLINE(q0,qqqq,RGB(238,238,28));1 _* d! o! Q( W4 Q n/ M
PARTLINE(hh ,qqqq,RGB(255,0,255));# J" @ I+ V' F5 u" r' E! z% C$ G
PARTLINE(q1,qqqq,RGB(238,238,28));6 l+ F0 U# K0 s0 z* e7 q- d* ~
PARTLINE(q2,qqqq,RGB(238,238,28));
) `& L' k' g! d: s$ |" CPARTLINE(q3,qqqq,RGB(238,238,28));
2 O9 ?+ M) {% x0 ]+ JPARTLINE(q4,qqqq,RGB(238,0,0));% m6 E: h7 S" R" @7 M" D
PARTLINE(q5,qqqq,RGB(238,238,28)); m: y6 z/ m3 u1 S& q% K, G- f, O' \
PARTLINE(q6,qqqq,RGB(238,238,28));
5 E* W4 D* E: n; J4 A" {2 APARTLINE(q7,qqqq,RGB(238,238,28));
. C8 {6 d X' C2 o* @3 VPARTLINE(ll,qqqq,RGB(255,0,255));
- A7 }. y# e+ r* U5 o7 oPARTLINE(q8,qqqq,RGB(238,238,28));
/ k ~1 @6 o4 ~, a0 ~DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
C4 y) R' v0 @) N$ _ ~7 c& N
3 m" q/ s6 X$ p! j2 _ IDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
3 M7 b9 \8 b jDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
! k( |2 O/ `* J. [. HDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
& h6 x+ H: R8 x Y3 _DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;, A- }; q3 P: ~/ Y
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
* ?% O5 i5 j4 t9 VDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
! o" W% ^9 t2 P9 z4 XDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
: A! m' u" l% f+ S; e% UDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
$ M" o4 Y' s a1 S' P8 G0 FDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;9 D( \: r- o! f
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |