|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
7 {5 G- g) }( G+ l( unnl:=DISPSTATUS=2;
# J2 L* d+ U( c3 B/ k7 eqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));* O P. t$ Y* \
hh:=HHV(h ,lhnh);
. T! U* ^* ?% Y3 S) dll:=llV(l ,lhnh);
5 S5 [3 c# g2 ^q0:=hh+(hh-ll)*POW(0.618,5);' J$ o7 w+ r9 X; A! Q
hh:=HHV(h ,lhnh);) u5 m) e, Y* ~/ ^8 I7 A
q1:=ll+(hh-ll)*POW(0.618,1);
i# I* k' q+ t: ~3 `# H5 [ X" Mq2:=ll+(hh-ll)*POW(0.618,2);# s; q5 C( s7 I- |2 ^
q3:=ll+(hh-ll)*POW(0.618,3);
) ]) R4 D' ~; q+ n) b hq4:=ll+(hh-ll)/2;& S% o- t8 |1 ~4 q5 U, {& U# M
q5:=ll+(hh-ll)*POW(0.618,5);; |* ^* Q7 F. S& R) l4 E" M
q6:=hh-(hh-ll)*POW(0.618,3);
! ~$ R! u& R; ~- B* w6 [7 U+ Dq7:=hh-(hh-ll)*POW(0.618,5);
" K8 j( m/ O/ z: Y. m$ m! zll:=llV(l ,lhnh);
' Y; Y; u F+ Xq8:=ll-(hh-ll)*POW(0.618,5);
' j% u- B% Q0 w( UPARTLINE(q0,qqqq,RGB(238,238,28));
: s( X- r6 W$ U* d4 J) JPARTLINE(hh ,qqqq,RGB(255,0,255));
5 a9 W v" }( ^$ U5 QPARTLINE(q1,qqqq,RGB(238,238,28));
6 a9 H" Q4 l# C; u; J! V2 r% ZPARTLINE(q2,qqqq,RGB(238,238,28));' s; Y7 f* z9 [7 m
PARTLINE(q3,qqqq,RGB(238,238,28));
, x% i# A% M* b$ dPARTLINE(q4,qqqq,RGB(238,0,0));1 Z% C$ E6 \. K3 j2 h+ G0 y
PARTLINE(q5,qqqq,RGB(238,238,28));+ ]7 l& X/ q+ ]
PARTLINE(q6,qqqq,RGB(238,238,28));
8 T$ }9 q X4 Q' Y3 m: E3 gPARTLINE(q7,qqqq,RGB(238,238,28));* u/ M3 B# l* f5 J' v
PARTLINE(ll,qqqq,RGB(255,0,255));
7 v& W% @1 m0 V Q9 x y& f( VPARTLINE(q8,qqqq,RGB(238,238,28));
+ o3 c$ C* n! h5 F+ w/ x2 h) I/ BDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
3 a& v/ }6 f# O: j5 k8 _8 N2 Q: f" Z, L
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
: I$ Y4 w* l2 l& zDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
/ W# ]9 e7 o* D u& c) XDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;6 F$ j* Y' w! V2 i0 L
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;* W; {3 ?# Q. k6 j$ K
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
0 _! V1 c( F3 m- ]5 |# H; `DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
2 b6 K7 ^7 }" L% oDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;3 y9 a' Z* D) A5 q; J/ P) E
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
% r* x/ {+ p4 m6 pDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF; a) M F; \5 ^+ A) @
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |