|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
$ l+ D1 \3 P4 P; o0 }" s0 {0 ennl:=DISPSTATUS=2;
9 S f# v& a+ B" N9 e% e- |qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));$ K% E4 b: W1 T+ ]0 k/ u9 [) U) }
hh:=HHV(h ,lhnh);6 {+ c+ F' X! n5 Y- T0 b) x6 t
ll:=llV(l ,lhnh);
% L! `& G( y uq0:=hh+(hh-ll)*POW(0.618,5); ~% {& z) T' @/ {
hh:=HHV(h ,lhnh);
* l- L9 W6 l9 o( y* [% _, Gq1:=ll+(hh-ll)*POW(0.618,1);5 s& N3 k0 ]5 l6 D: z
q2:=ll+(hh-ll)*POW(0.618,2);
* M" F$ p, E" s; i2 `+ m( W& mq3:=ll+(hh-ll)*POW(0.618,3);
: U2 d. u! N! Q K8 hq4:=ll+(hh-ll)/2;
+ o% b6 ^' q* O& vq5:=ll+(hh-ll)*POW(0.618,5);
# s$ `$ J% g2 {! Zq6:=hh-(hh-ll)*POW(0.618,3);& b) G5 A0 x% @% |$ o
q7:=hh-(hh-ll)*POW(0.618,5);+ u- W- I( b, ^0 [1 \/ n
ll:=llV(l ,lhnh);' P9 y e- J9 f' [
q8:=ll-(hh-ll)*POW(0.618,5);+ Y2 l3 q. ?# t- [& b9 L
PARTLINE(q0,qqqq,RGB(238,238,28));8 h$ p* ?7 b0 x- r
PARTLINE(hh ,qqqq,RGB(255,0,255));
- o$ Q# j6 C9 u: J; ]5 Z6 y! P8 QPARTLINE(q1,qqqq,RGB(238,238,28));2 t' q2 S+ _5 C" p0 k6 S
PARTLINE(q2,qqqq,RGB(238,238,28));/ R, B8 w4 H1 C3 x" w/ q' {
PARTLINE(q3,qqqq,RGB(238,238,28));! A. N" P( f/ {
PARTLINE(q4,qqqq,RGB(238,0,0));# O8 I9 |7 w2 R' Q9 c1 K3 z
PARTLINE(q5,qqqq,RGB(238,238,28));
! h! F$ x) f1 v: A5 Q; W+ ~" RPARTLINE(q6,qqqq,RGB(238,238,28));% ~- F! ^) V5 s; s8 r* S
PARTLINE(q7,qqqq,RGB(238,238,28));& @& n5 k/ }; k8 ?! u
PARTLINE(ll,qqqq,RGB(255,0,255));& ^% a. }6 P1 b* k
PARTLINE(q8,qqqq,RGB(238,238,28));' Q k* i- v8 p3 D& x r* m5 u
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
+ o6 B9 M0 T& s' l; a7 m6 D
* _* t9 R' z4 p! ]& w% l Y) EDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;, v" a0 u3 Y' l# {% ]+ J+ m
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;7 K( ~( U& H5 Q# H/ K
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;9 d- u% ^7 W. w# u7 b" ^ i
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;+ T! @; F+ x% R. _; O+ w9 o
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
' [ g/ U& P s3 g# M, \0 jDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
0 l+ R% X$ W9 ^3 eDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;* G+ L8 A: p3 p$ z8 I
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
. c) l! O* v; u0 O: V# D- H$ N1 zDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
1 F9 \# j: d3 ~8 t6 P) l- c6 d0 _; hDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |