|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
* f/ e* \: J( |3 b1 jnnl:=DISPSTATUS=2;: d6 |$ ~: x) p3 H% P# k
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));0 q% j9 a" v" r/ q3 N) V; f
hh:=HHV(h ,lhnh);: S7 U7 a8 d8 U# o3 E" |
ll:=llV(l ,lhnh);
0 ?+ y8 o/ |% \4 M. l; z- Uq0:=hh+(hh-ll)*POW(0.618,5); b6 x3 t0 J7 X" g0 f0 h G$ K
hh:=HHV(h ,lhnh);
. T' S3 X- E" e V" u1 j7 o1 Kq1:=ll+(hh-ll)*POW(0.618,1);
5 p( s+ ~: p+ W4 `8 s3 W. U- ~/ G# Mq2:=ll+(hh-ll)*POW(0.618,2);6 k6 A/ {9 k. ]% P6 n
q3:=ll+(hh-ll)*POW(0.618,3);. Y& H( t( D- O% l" S8 Z# g- O( B5 Q
q4:=ll+(hh-ll)/2;
" F; s5 N. e" h* ]q5:=ll+(hh-ll)*POW(0.618,5);2 @$ Q9 Q9 `) J7 j0 v
q6:=hh-(hh-ll)*POW(0.618,3);
+ }9 W# q; O$ O* Z8 F. ^' C- d9 jq7:=hh-(hh-ll)*POW(0.618,5);2 X! _0 K' A0 H
ll:=llV(l ,lhnh);( W! h. \8 y4 w* h/ o% ?6 d; L
q8:=ll-(hh-ll)*POW(0.618,5);, J+ E8 {$ U+ ?) t8 y* D
PARTLINE(q0,qqqq,RGB(238,238,28));5 e+ ]: F8 s- e$ f
PARTLINE(hh ,qqqq,RGB(255,0,255));
6 R5 l2 v! L: k# T, ]PARTLINE(q1,qqqq,RGB(238,238,28));6 K( {! s3 H1 E5 T8 L# A0 l4 }
PARTLINE(q2,qqqq,RGB(238,238,28));
5 @6 p" g; v0 J8 n+ d! W3 uPARTLINE(q3,qqqq,RGB(238,238,28));6 z1 p' y( ^, @! M1 c/ J
PARTLINE(q4,qqqq,RGB(238,0,0));. d. C% ~' F6 N9 B+ F
PARTLINE(q5,qqqq,RGB(238,238,28));, t2 B& L8 o' ]/ `
PARTLINE(q6,qqqq,RGB(238,238,28));' j9 z0 g5 P2 ]5 ^6 U
PARTLINE(q7,qqqq,RGB(238,238,28));3 S6 e5 |6 [+ {) ?+ g
PARTLINE(ll,qqqq,RGB(255,0,255));: k( N3 ]5 J. F2 X
PARTLINE(q8,qqqq,RGB(238,238,28));
+ |+ A' t+ V6 [8 DDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; / n X+ T$ }$ ]
; d F' @4 }8 j" s
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
! i4 {& w. |$ K/ Y6 } ?; X) y9 _) x/ SDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;. G+ i/ }2 l" ^! G, o$ ?
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF; a# X, I v% C# l u: n0 v6 I
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;4 c1 ~/ y1 w4 `% W
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;2 B, k4 ^0 U0 D1 P
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
% Q, ?! U1 |0 o- U( yDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;" z! H# e- m1 E. V5 @
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;6 A) W/ G) c# d8 q* t" \6 ?* c+ C
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
* \4 S; O4 R# ~: a# H6 ?DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |