|
lhnh:=BARSLAST(DISPSTATUS=1)+1;+ J% {7 h. e$ X' l" d
nnl:=DISPSTATUS=2;
$ L$ [1 D7 F7 M. _/ F) R {qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));8 K) u, q, _: A g
hh:=HHV(h ,lhnh);$ a O; C, ?% P) s7 q7 L
ll:=llV(l ,lhnh);( C1 e# \6 ?( ? m0 ]5 q
q0:=hh+(hh-ll)*POW(0.618,5);
7 D% g2 K& v2 f; u$ C5 @ @) ^% `hh:=HHV(h ,lhnh);
1 k/ a, }4 z* t$ Oq1:=ll+(hh-ll)*POW(0.618,1);
1 E) H/ K6 t K% {+ {1 p$ `& }q2:=ll+(hh-ll)*POW(0.618,2);
. {+ R" \% |4 }, ?$ c i T/ Zq3:=ll+(hh-ll)*POW(0.618,3);
9 G; R4 y9 D% x- O6 P* h9 ~q4:=ll+(hh-ll)/2;, S% [1 Y5 ]0 g) p, ?6 m% X
q5:=ll+(hh-ll)*POW(0.618,5);" P6 _+ P5 W0 s6 G% X4 G
q6:=hh-(hh-ll)*POW(0.618,3);
' U2 A2 s" ^% `q7:=hh-(hh-ll)*POW(0.618,5);+ P" m3 I5 E8 F9 }: |9 _' R, A; N
ll:=llV(l ,lhnh);) b/ b- m1 U; H* ^7 ]$ F
q8:=ll-(hh-ll)*POW(0.618,5);. H1 b3 f4 d/ z! f6 W
PARTLINE(q0,qqqq,RGB(238,238,28));7 C4 S' V# Y5 \9 L# z9 U
PARTLINE(hh ,qqqq,RGB(255,0,255));: h1 c% x0 f/ M( {# r( X
PARTLINE(q1,qqqq,RGB(238,238,28));
& Y0 t4 H! L" s3 g2 l* y/ NPARTLINE(q2,qqqq,RGB(238,238,28));
7 r0 V/ O E6 H5 k+ e% g3 O+ Q" cPARTLINE(q3,qqqq,RGB(238,238,28));
- I- R2 [& F' z2 g$ r2 s4 wPARTLINE(q4,qqqq,RGB(238,0,0));
: U$ D+ \' h& ]1 n4 p: y1 BPARTLINE(q5,qqqq,RGB(238,238,28));
- _3 X& T; L9 u% r( z$ _PARTLINE(q6,qqqq,RGB(238,238,28));: D& I2 M4 L+ v: [7 T3 N; b
PARTLINE(q7,qqqq,RGB(238,238,28));7 B5 J! j2 u9 K$ C! `& G% t: I! d9 A
PARTLINE(ll,qqqq,RGB(255,0,255));7 ^0 y" X& x U |7 C1 R
PARTLINE(q8,qqqq,RGB(238,238,28));7 ]" P: t; F( Y3 }% |8 A
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
) |- d5 W: }2 L$ o
5 s2 j5 W3 ] N4 \. dDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
& Z2 ]5 ^- _0 X; K" C1 I/ v6 FDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;5 Z1 |, ]( R7 D' P0 P7 P6 O
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;* v* i t) l& b+ E8 S
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;! M3 j/ _+ E) ~! h5 [, b x
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;& P9 w6 i6 U" A+ \) p6 b* ~$ ]
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
/ C# G# B7 ]. ~. mDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;- |( [, k2 b6 E- o6 b1 \4 A
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
4 z3 }) c4 q/ {8 }" N4 W) \$ p# {DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;, f. C( `! f: i7 S" e* S7 {
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |