|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
4 h8 Y( o+ I7 I' n. mnnl:=DISPSTATUS=2;
& D% V; E' _) f( I$ s$ C3 l( ?; Rqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));$ I/ W( C' J( A. r
hh:=HHV(h ,lhnh);/ `! {1 j; E, `/ ]) Q# {
ll:=llV(l ,lhnh);: Q. ?. E* H u _6 }
q0:=hh+(hh-ll)*POW(0.618,5);
+ c7 H. K$ u8 V" }hh:=HHV(h ,lhnh);
6 `" o: b/ r4 sq1:=ll+(hh-ll)*POW(0.618,1);1 E* j) P6 J9 |8 n3 y( M: g$ P3 X3 a
q2:=ll+(hh-ll)*POW(0.618,2);& M; u: Q; ~$ b. y8 [ a
q3:=ll+(hh-ll)*POW(0.618,3);
. v3 _+ S6 }" k$ d3 dq4:=ll+(hh-ll)/2;+ m: A$ @: n7 B1 L/ l
q5:=ll+(hh-ll)*POW(0.618,5);5 P9 l+ X- U7 e, l6 v1 ~
q6:=hh-(hh-ll)*POW(0.618,3);
" ^, u" N3 H( r7 I6 \+ X* J' aq7:=hh-(hh-ll)*POW(0.618,5);8 P# O8 J- B# [0 V0 a; K8 e
ll:=llV(l ,lhnh);
. X6 @ Q, ` Yq8:=ll-(hh-ll)*POW(0.618,5);
& q9 D! ^ G9 Z( ~; x' g. ?PARTLINE(q0,qqqq,RGB(238,238,28));0 {1 a0 a& S: P+ i+ X; A2 S& a
PARTLINE(hh ,qqqq,RGB(255,0,255));1 W8 x. m" O/ y0 [( X& w. A
PARTLINE(q1,qqqq,RGB(238,238,28));
- x& y% \+ ?8 Q' M2 Y& FPARTLINE(q2,qqqq,RGB(238,238,28));3 m/ y- O" {* J9 a- h( Q
PARTLINE(q3,qqqq,RGB(238,238,28));
' F# O9 L6 h5 L* D8 r: S2 d2 wPARTLINE(q4,qqqq,RGB(238,0,0));3 }9 i5 M2 k+ ^4 S
PARTLINE(q5,qqqq,RGB(238,238,28));
" E6 w1 v R2 i" N6 Y% UPARTLINE(q6,qqqq,RGB(238,238,28));
$ j/ a$ F0 w" C8 QPARTLINE(q7,qqqq,RGB(238,238,28));/ H; r$ U0 b0 y) a5 e
PARTLINE(ll,qqqq,RGB(255,0,255));
, y3 N& c1 k8 V2 t4 Z7 v J. WPARTLINE(q8,qqqq,RGB(238,238,28)); a" ~2 ^% P- P$ f# h8 m
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
1 U5 |- m+ A' g; |% O- o) Y- D7 q; y; A8 @6 a% H
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;" m1 U; R# f3 s! c
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;+ Y& i8 W0 N4 Z7 @
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
6 ]/ Q2 i0 u `0 O2 [% WDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
( j5 x# ^, I" A6 {: j/ e% D' P2 u ADRAWTEXT(nnl,q4,'50% '+q4),Colorred;* x5 ?- u/ Q. h6 m6 r( X. d
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
% N; k7 h) _8 |1 L7 e( UDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;8 y9 H: o) r5 \) l+ L# E/ y
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;! k, y7 m# ]" c
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
' }4 F! V, E/ O# j l" BDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |