|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
+ k# e- n3 H# x! `" Wnnl:=DISPSTATUS=2;6 `7 r: P. I L4 e( i1 Q
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
8 b+ g& K( g$ X7 a shh:=HHV(h ,lhnh);
5 ]6 G. ]/ }+ i) {0 @ll:=llV(l ,lhnh);
3 L U+ k- w* o" ?1 rq0:=hh+(hh-ll)*POW(0.618,5);
6 B. g/ ~* s! w9 [hh:=HHV(h ,lhnh);+ Q' F) G8 g3 z% G2 V3 L8 H" X
q1:=ll+(hh-ll)*POW(0.618,1);1 P. [3 Z4 |! f+ n
q2:=ll+(hh-ll)*POW(0.618,2);5 S7 E8 r( y1 l! c( Q2 b
q3:=ll+(hh-ll)*POW(0.618,3);! F1 @( W% a+ T
q4:=ll+(hh-ll)/2;/ c9 q( p, s/ x6 V) D
q5:=ll+(hh-ll)*POW(0.618,5);# _$ m+ |" S7 j0 j9 [; {
q6:=hh-(hh-ll)*POW(0.618,3);1 |9 @# R o7 t4 I8 t( ] L3 p
q7:=hh-(hh-ll)*POW(0.618,5);
4 H; u! x6 G# K" q) E1 S8 Q Y lll:=llV(l ,lhnh);1 |" Q* ^7 Y1 |3 e4 R3 O
q8:=ll-(hh-ll)*POW(0.618,5);' ^8 p1 k1 ]- G4 y
PARTLINE(q0,qqqq,RGB(238,238,28));
* O6 o4 Z8 z; [9 v6 @" _PARTLINE(hh ,qqqq,RGB(255,0,255));
0 N7 o. E+ G |9 N- x4 r4 VPARTLINE(q1,qqqq,RGB(238,238,28));: L) n6 q/ O: P% ~' L/ g Y4 [& ^
PARTLINE(q2,qqqq,RGB(238,238,28));! @7 h; c$ u; K, f
PARTLINE(q3,qqqq,RGB(238,238,28));
A3 f$ F6 v2 p5 R. b2 H8 p3 d7 PPARTLINE(q4,qqqq,RGB(238,0,0));
6 ?3 _. r2 Z/ i( ZPARTLINE(q5,qqqq,RGB(238,238,28));
; i; G$ s) s; ]( G# ?# KPARTLINE(q6,qqqq,RGB(238,238,28));
: @: G3 [# o4 [! ~' \' cPARTLINE(q7,qqqq,RGB(238,238,28));2 {) y. y) j9 s) g% o
PARTLINE(ll,qqqq,RGB(255,0,255));
; v" ^8 d5 Q, N3 O0 U: C# A. x' L* cPARTLINE(q8,qqqq,RGB(238,238,28));
7 c" h% ]2 J& J0 r* W3 ]. nDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; * [/ F; [# Y _0 o6 l _
& j4 j9 K, k/ X3 }8 rDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
3 q8 g& f& N' b( y1 U oDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;9 N2 M$ @, M- {, X. H& e
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;8 j4 P# x, Q/ `0 ~. w8 @+ `1 Q( F5 r
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;% f2 q# P. W* J) i# K
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
1 r6 X% Q8 o7 q0 b" O) `DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
! w: V9 g% |8 }- d/ D) o# }DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
R" v, Y# A7 B# A3 _DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;2 Q0 o) E$ c/ d3 ]7 @
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
- w! k2 M" V. F) u! p# B5 B% BDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |