|
lhnh:=BARSLAST(DISPSTATUS=1)+1;9 L4 } }8 w4 H# O" P# @
nnl:=DISPSTATUS=2;
6 c i$ `7 s5 o* w* k6 K1 Qqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
- t" E. G6 f l, Uhh:=HHV(h ,lhnh);$ I* g0 Y2 H- G f' B
ll:=llV(l ,lhnh);- W" o6 Q* E1 v6 g8 Z' \
q0:=hh+(hh-ll)*POW(0.618,5);
& ~1 I$ f9 p* s, c& {% q$ m" ohh:=HHV(h ,lhnh);
. q) O0 e, {& @# G. Dq1:=ll+(hh-ll)*POW(0.618,1);. b# M: z! b9 u* e, E( G
q2:=ll+(hh-ll)*POW(0.618,2);
0 |- m6 L# I2 `) z" b* o O t# [q3:=ll+(hh-ll)*POW(0.618,3);- ^2 P% a/ ]8 L
q4:=ll+(hh-ll)/2;
4 \! J% `, |4 g) Fq5:=ll+(hh-ll)*POW(0.618,5);6 i) E! H a+ G8 E! M1 H7 A! H; q$ m
q6:=hh-(hh-ll)*POW(0.618,3);
0 P/ ^0 t. _- \6 \$ a: _4 vq7:=hh-(hh-ll)*POW(0.618,5);2 z: c: _; ~: ~& ~ S& Q
ll:=llV(l ,lhnh);! H5 G) L4 r7 {/ j r: w$ E
q8:=ll-(hh-ll)*POW(0.618,5);( n& w4 j5 ~+ `; G2 {4 `4 m
PARTLINE(q0,qqqq,RGB(238,238,28));
: w$ U, U0 B8 O6 NPARTLINE(hh ,qqqq,RGB(255,0,255));
5 M% u8 H1 Y7 F" J9 y" r2 {PARTLINE(q1,qqqq,RGB(238,238,28));
5 w/ w) f8 Q) \ Y% hPARTLINE(q2,qqqq,RGB(238,238,28));! I# _) ?0 F6 o5 C2 w, E% `' h2 {
PARTLINE(q3,qqqq,RGB(238,238,28));
$ x3 B- N% S( S' P6 \PARTLINE(q4,qqqq,RGB(238,0,0));
8 q* b+ V5 w1 a9 Y: Q5 |PARTLINE(q5,qqqq,RGB(238,238,28));
' Y- W: g- o- ^1 T2 B( A5 {PARTLINE(q6,qqqq,RGB(238,238,28));
1 V, J4 r. q1 ^2 w) ?PARTLINE(q7,qqqq,RGB(238,238,28));
; N& w/ K6 r" O9 k, q7 \0 I2 m( OPARTLINE(ll,qqqq,RGB(255,0,255));* ^0 `% I& f2 T5 u
PARTLINE(q8,qqqq,RGB(238,238,28));
# S' V$ \, i3 M! ^" }DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
3 d% C' \' D6 k* V5 t
m8 }$ d7 @( A3 S& |DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;8 w8 Z/ x% E' v1 I( m6 P, F6 y
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;! G3 m4 ^( `" d1 h
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;' c/ _0 o* Q8 h( V8 U
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
8 Z5 f7 L$ i# Z. t8 p) m4 G$ @# hDRAWTEXT(nnl,q4,'50% '+q4),Colorred;4 T# O, y" E+ O" [& w
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;& s/ T2 o) D; X3 I
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;& V) _) S$ L4 Z) e3 v6 k
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
5 @0 o/ C {/ k5 aDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;, S, k6 y" z: O" w2 ~
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |