|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
! ^7 [6 s. V/ Mnnl:=DISPSTATUS=2;
0 l/ ?* ]6 K% j$ y% g: Mqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));! r1 W. q! ^ O
hh:=HHV(h ,lhnh);: z% l- O" r: c; Z$ m
ll:=llV(l ,lhnh);
/ g# {, z9 E U6 T8 W% q( pq0:=hh+(hh-ll)*POW(0.618,5);
. Z" k& z* s4 M/ t$ w8 G5 Khh:=HHV(h ,lhnh);
* S1 b5 `! L% L/ v. h- R4 p* L* e$ qq1:=ll+(hh-ll)*POW(0.618,1);
8 {- F- P4 e1 P0 m7 P( ?( Nq2:=ll+(hh-ll)*POW(0.618,2);$ \' C5 B' K5 |
q3:=ll+(hh-ll)*POW(0.618,3);7 ` U9 N8 M% H+ k3 l" ^) p$ v1 G
q4:=ll+(hh-ll)/2;
2 ]" H( o+ _7 q; @8 Gq5:=ll+(hh-ll)*POW(0.618,5);3 ^& R1 |. ^' @ `
q6:=hh-(hh-ll)*POW(0.618,3);
" g0 W& p- G* f8 ^6 dq7:=hh-(hh-ll)*POW(0.618,5);& p* c Z, Q& J) b' F0 F. ^/ B# P4 x
ll:=llV(l ,lhnh);
6 }( E4 R/ H% K! S- B( F. ~/ jq8:=ll-(hh-ll)*POW(0.618,5);
5 v+ N w( w0 }1 u" cPARTLINE(q0,qqqq,RGB(238,238,28));
9 C, `2 J. p. v% {/ vPARTLINE(hh ,qqqq,RGB(255,0,255));8 |6 U2 H5 c% c' \! a# f8 k, E1 z
PARTLINE(q1,qqqq,RGB(238,238,28));
) r k6 M- [8 u" p% Q: yPARTLINE(q2,qqqq,RGB(238,238,28));
/ `$ R. V! b$ P N* `0 TPARTLINE(q3,qqqq,RGB(238,238,28));$ \6 \3 j' I- Z3 D7 |2 B
PARTLINE(q4,qqqq,RGB(238,0,0));# B- u( R( \0 e' W. d
PARTLINE(q5,qqqq,RGB(238,238,28));& A; M2 `/ l' y2 R& n8 w+ f
PARTLINE(q6,qqqq,RGB(238,238,28));
! T* r' r" b1 V7 RPARTLINE(q7,qqqq,RGB(238,238,28));
) h9 `; W" Q. P- RPARTLINE(ll,qqqq,RGB(255,0,255));
& K, n2 \1 v. tPARTLINE(q8,qqqq,RGB(238,238,28));8 y) w; L2 u0 }' }3 P
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; . G6 p k' a+ s$ T* G
9 C4 V: y# u+ |7 f2 m
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
: m3 w! |. c3 wDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;1 ?4 }4 a( } o, L" L
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;0 |2 ?: I/ c& j7 _4 x$ c
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
' z: O+ g/ g0 U6 r2 xDRAWTEXT(nnl,q4,'50% '+q4),Colorred;, ^( g- t8 C0 R: J( Z& U3 `
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;, G- E8 X6 F3 N! `5 f% S) }
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;1 C) }5 W$ f+ y1 b# L' S( |8 t1 O. |
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;8 ^. E* G7 A% | h+ `$ u* F: N
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;0 d* B+ a+ I- D* a
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |