|
lhnh:=BARSLAST(DISPSTATUS=1)+1;% S0 e, q7 j% @1 ~
nnl:=DISPSTATUS=2;& ?. M' ~0 Y& o; [
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));8 W$ n+ ]- U, x; o' y! v
hh:=HHV(h ,lhnh);
) p d& l% _# ^) s5 p% j- s' H/ Tll:=llV(l ,lhnh);; x' W& d3 b8 y1 s( z3 X
q0:=hh+(hh-ll)*POW(0.618,5);: t; r& r( ^; u+ Q
hh:=HHV(h ,lhnh);
Q+ ?3 N# w( ]3 n4 ^3 b' Y3 U* [q1:=ll+(hh-ll)*POW(0.618,1);) X$ T2 _2 T6 y8 x* j4 h
q2:=ll+(hh-ll)*POW(0.618,2);
. f* E" |3 \ b8 Aq3:=ll+(hh-ll)*POW(0.618,3);
q- o8 G! }. ?! t( Tq4:=ll+(hh-ll)/2;! i* V& w) e: ^6 N6 v
q5:=ll+(hh-ll)*POW(0.618,5);
M4 ` ]0 {+ q3 q% mq6:=hh-(hh-ll)*POW(0.618,3);
( t5 u0 r; T+ ~q7:=hh-(hh-ll)*POW(0.618,5);! u+ h8 \. l- L- N6 z
ll:=llV(l ,lhnh);
! O' s! B! R1 f' g& D& t- l" dq8:=ll-(hh-ll)*POW(0.618,5);
' f% `5 r4 P0 b, QPARTLINE(q0,qqqq,RGB(238,238,28));
9 {& U5 c) l7 K! D1 N! IPARTLINE(hh ,qqqq,RGB(255,0,255));& A4 j5 q9 `% e* O, Q
PARTLINE(q1,qqqq,RGB(238,238,28));
8 }! a: H5 q- s& r5 d7 e: @PARTLINE(q2,qqqq,RGB(238,238,28));5 @) [) S; J F; C ?
PARTLINE(q3,qqqq,RGB(238,238,28));( ]$ A5 ^# y. L1 X' s8 |
PARTLINE(q4,qqqq,RGB(238,0,0));8 \! u/ `, ?5 }: P! d7 S
PARTLINE(q5,qqqq,RGB(238,238,28));5 F" c) H1 f$ X& h
PARTLINE(q6,qqqq,RGB(238,238,28));( f- d; w1 H& i% J! A. l9 W6 i
PARTLINE(q7,qqqq,RGB(238,238,28));) I3 d& q3 X d% ]" A& |
PARTLINE(ll,qqqq,RGB(255,0,255));& h3 z4 J6 O- A U9 E. B
PARTLINE(q8,qqqq,RGB(238,238,28));
4 _6 Z* I' r& z* yDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; , i3 p, K) F4 _
( Q- } O% t& Q2 R& FDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;8 t. ]3 o/ @3 _; x: H
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;+ L* S% ~' n, z! w* [7 _8 ?
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;3 G* v q3 h- D* H" S( u
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
$ U( D" z$ _5 S5 D5 E3 kDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
! {9 @' y+ l5 q4 ~3 U* ADRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
0 V: t8 T4 e1 u( ?. o9 dDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;6 N# F. u R3 \8 U9 g- B# L
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF; _: D' f& _+ {$ |6 w2 Z
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;6 E2 u' f) u& |$ `0 F% x" [8 z! W. P
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |