|
lhnh:=BARSLAST(DISPSTATUS=1)+1;5 g$ X: p6 y) l$ e
nnl:=DISPSTATUS=2;% U* x0 I N/ f& ~
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
! o: w4 L1 Z9 C7 ^' @hh:=HHV(h ,lhnh);* C3 ^6 ?, F6 F2 M! H; O
ll:=llV(l ,lhnh);- ~( F0 E2 J3 G$ h5 c2 ?
q0:=hh+(hh-ll)*POW(0.618,5);. X, P/ } [1 b) `. {3 Y
hh:=HHV(h ,lhnh);5 v+ ^$ p) s& u. K$ o
q1:=ll+(hh-ll)*POW(0.618,1);4 Q, `0 v4 c! X R
q2:=ll+(hh-ll)*POW(0.618,2);* n. z# P+ _* O' w- _
q3:=ll+(hh-ll)*POW(0.618,3);
$ \- t: l2 l/ [) j8 Fq4:=ll+(hh-ll)/2;
' j: ^8 ^5 m* h; O5 x. ^q5:=ll+(hh-ll)*POW(0.618,5);3 j. Z7 V/ ?4 O
q6:=hh-(hh-ll)*POW(0.618,3);
0 I h" S2 J* z A M. \+ Tq7:=hh-(hh-ll)*POW(0.618,5);
% A* a# w3 {. Pll:=llV(l ,lhnh);
7 {6 g1 D* ?1 _6 Y$ Oq8:=ll-(hh-ll)*POW(0.618,5);& f% B, g! B5 ]3 l. Q
PARTLINE(q0,qqqq,RGB(238,238,28));, d: U o/ K( t9 c- j
PARTLINE(hh ,qqqq,RGB(255,0,255));
0 g, |) e5 S q* x( f+ a% E3 yPARTLINE(q1,qqqq,RGB(238,238,28));
2 }: X4 |& T; _4 NPARTLINE(q2,qqqq,RGB(238,238,28));) d& g' V8 o+ }/ D/ K
PARTLINE(q3,qqqq,RGB(238,238,28));8 K# N; d8 C5 P) `
PARTLINE(q4,qqqq,RGB(238,0,0));
3 U/ ~; q Q- ?% y' y0 W! |4 }PARTLINE(q5,qqqq,RGB(238,238,28));
: N% Z; j$ g" k, `PARTLINE(q6,qqqq,RGB(238,238,28));: t( ~; ]+ j! M5 z/ ?
PARTLINE(q7,qqqq,RGB(238,238,28));
/ l# L8 q$ F6 ~0 U0 b, m5 N/ Z8 I8 A" mPARTLINE(ll,qqqq,RGB(255,0,255));5 N8 U/ J# M9 W& t
PARTLINE(q8,qqqq,RGB(238,238,28));9 d4 o X8 C2 R: J( Q: n
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; + I, ?$ y( ]) D/ P
0 C. o9 L( o8 S$ Y( ^& ?
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
* H9 @8 T9 ^7 F! j3 X8 oDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;: H: L+ C# y( A4 }9 r1 U2 }8 _
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
5 c" }+ J4 v. s0 w! g$ z0 HDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
% R) N& n( ~. b# e: {9 \0 ?& U T% cDRAWTEXT(nnl,q4,'50% '+q4),Colorred;4 d: d0 X/ t7 _# O3 z/ ?! b
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;5 T" i2 ~' [; ^! J# }
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
. J: c2 }' ?, O4 b# l1 s# N9 VDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
. J5 T+ ]& t2 [& h) d6 wDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;! b' j a( o1 o, C5 |+ V+ q
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |