|
lhnh:=BARSLAST(DISPSTATUS=1)+1;$ q) W- x7 q2 o! l0 K! z
nnl:=DISPSTATUS=2;! I4 N8 i* H! p1 X
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));. \1 S) K" i- p1 n, i( d
hh:=HHV(h ,lhnh);) V, e* j7 G9 }8 I( `5 Q& b
ll:=llV(l ,lhnh);; r) M! M9 i; K0 A; h
q0:=hh+(hh-ll)*POW(0.618,5);
- O& A. \! d9 `" [hh:=HHV(h ,lhnh);- T) O$ o$ {8 }8 J4 {7 V G& A9 k
q1:=ll+(hh-ll)*POW(0.618,1);
2 Y7 x7 C6 l! nq2:=ll+(hh-ll)*POW(0.618,2);, |! N9 K* ]2 E# C- X+ T
q3:=ll+(hh-ll)*POW(0.618,3);
Y( v7 H' V; G4 e) u! `q4:=ll+(hh-ll)/2;
* j9 O( `: w; ~' Q* ^q5:=ll+(hh-ll)*POW(0.618,5);
* Z" z* D7 c4 ~4 `q6:=hh-(hh-ll)*POW(0.618,3);) T: g9 m# m) N" ]. v) H; `$ J
q7:=hh-(hh-ll)*POW(0.618,5);. M4 ]* k$ g, h. {/ u3 Z
ll:=llV(l ,lhnh);
3 q2 O9 v! P l3 s1 R8 U$ G! oq8:=ll-(hh-ll)*POW(0.618,5);- _, j- D) P4 L8 b. ^# v: y1 q8 a
PARTLINE(q0,qqqq,RGB(238,238,28));
* x4 a) }/ f/ \$ n* G" lPARTLINE(hh ,qqqq,RGB(255,0,255));
& r3 J" t; E0 K0 ^) m6 U6 I8 VPARTLINE(q1,qqqq,RGB(238,238,28));+ y$ N! ~! F& @% a1 [& U! D
PARTLINE(q2,qqqq,RGB(238,238,28));
, I+ T3 { g& q% S: m4 L; q" @PARTLINE(q3,qqqq,RGB(238,238,28));
! j' [# H) E+ L2 S5 V, c7 W, sPARTLINE(q4,qqqq,RGB(238,0,0));
4 |- q* N% b/ X$ ^! O2 V9 Y! IPARTLINE(q5,qqqq,RGB(238,238,28));
2 i6 b2 q0 R$ g5 i6 iPARTLINE(q6,qqqq,RGB(238,238,28));
( H3 K/ j$ q7 z: qPARTLINE(q7,qqqq,RGB(238,238,28));5 F2 @8 q- M C
PARTLINE(ll,qqqq,RGB(255,0,255));
: I4 Z \/ s! a( {" k9 P4 c% v& ^PARTLINE(q8,qqqq,RGB(238,238,28));# c- w( Z! R4 W
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
0 t; d0 _3 v0 s& G B$ e
. R0 d0 w5 K I8 d2 \DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;6 f2 V2 Y* b- E( ?6 q+ M1 \8 ^3 N8 X
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;! ~' e6 ?& `) M" e( S( c
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
9 B& K$ H3 }) I' x* a* J" o: WDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;0 N3 Z5 z. ]1 G, o
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;' N1 ~5 Q+ {/ N6 w6 k/ }
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
0 X( i* }* w2 hDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;% Z$ Q7 [- n; ~1 o' U2 v' z
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;1 l( u' O/ J1 [0 h4 G
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
) e% B. w: t" a, R& p8 k' oDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |