|
lhnh:=BARSLAST(DISPSTATUS=1)+1;) z% w: @% @" ^& `! |5 d3 _
nnl:=DISPSTATUS=2;; C+ U9 H8 L, {1 S
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));) u2 ]$ n6 S3 T
hh:=HHV(h ,lhnh);
7 C1 _8 q# K$ V5 C* k% i- `ll:=llV(l ,lhnh);
: P, K2 G# m, t2 bq0:=hh+(hh-ll)*POW(0.618,5);
* Y/ C. `; W, dhh:=HHV(h ,lhnh);
1 `! x, h5 Y/ `' P8 G% i7 sq1:=ll+(hh-ll)*POW(0.618,1);
$ G7 O8 f) \! a3 K, wq2:=ll+(hh-ll)*POW(0.618,2);
' E$ Y% s' E/ f' N- Jq3:=ll+(hh-ll)*POW(0.618,3);
$ ^$ Y$ k4 M, sq4:=ll+(hh-ll)/2;0 A2 d: g6 m" M0 |7 f" D
q5:=ll+(hh-ll)*POW(0.618,5);8 J# d8 v9 u' J9 H3 L
q6:=hh-(hh-ll)*POW(0.618,3);5 O, O. k0 ^( P
q7:=hh-(hh-ll)*POW(0.618,5);
# B6 Y- J# L9 n0 G6 Gll:=llV(l ,lhnh);7 H0 V: i8 k. A* l5 F
q8:=ll-(hh-ll)*POW(0.618,5);, e v3 G% k+ i( @; c- T/ `9 U
PARTLINE(q0,qqqq,RGB(238,238,28));
$ w; R* U- _( s% \. `PARTLINE(hh ,qqqq,RGB(255,0,255));
: Z$ `0 [; ]& j3 s- A8 x) |: bPARTLINE(q1,qqqq,RGB(238,238,28));
) k6 j! {. r1 t$ Q% q0 BPARTLINE(q2,qqqq,RGB(238,238,28));! r% l9 M, T8 ~/ L
PARTLINE(q3,qqqq,RGB(238,238,28));% M \7 \9 Y2 s/ _6 ?9 }
PARTLINE(q4,qqqq,RGB(238,0,0));
; r/ m$ f5 O: e& v9 pPARTLINE(q5,qqqq,RGB(238,238,28));3 P9 J( y* R0 y7 g P$ t, U
PARTLINE(q6,qqqq,RGB(238,238,28));6 ~9 D- P% K/ W7 q# P, B
PARTLINE(q7,qqqq,RGB(238,238,28));" G1 V6 ]" ?% M5 A% k
PARTLINE(ll,qqqq,RGB(255,0,255));
' x& c; k) k1 A; zPARTLINE(q8,qqqq,RGB(238,238,28));
) L& d- R5 e8 U1 r8 B) h4 DDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
% D& w1 k8 |0 S# z& R: ~5 _
/ b3 y; s* _2 O FDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;! ~2 k% L' G; o, E* f9 H4 G7 X2 ^ c
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
3 ]" I/ Z3 Z4 w6 n+ F6 I# {3 ]DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;+ l0 ?, @8 m" ~8 W5 @7 R, n S
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;& o/ d: S& U1 w) F* F+ U2 Y. n' w
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;8 M1 i2 g) |$ }
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
& G p4 q( Y4 eDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;1 K+ }7 l. s# ~, r+ z$ ?
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;: \' p/ O: \! Y) C& z ?- x
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;0 ^- S8 p/ |4 i* ]
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |