|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
! s: g' Y8 r/ J0 }8 z" _! a1 w% nnnl:=DISPSTATUS=2;
+ w: l4 I/ k; Aqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));- B( G$ B) o. k
hh:=HHV(h ,lhnh);
9 n$ n9 S# o; q" |. r% Jll:=llV(l ,lhnh);! M/ V4 v2 I7 |* x0 r8 y# ?
q0:=hh+(hh-ll)*POW(0.618,5);
3 D2 {) E6 P; {1 Ghh:=HHV(h ,lhnh);8 h( o3 o" Q, L
q1:=ll+(hh-ll)*POW(0.618,1);6 Y& p" @) ?6 o$ ]8 x* ?% o& k
q2:=ll+(hh-ll)*POW(0.618,2);' F! g- D( k* X; I4 \ l
q3:=ll+(hh-ll)*POW(0.618,3);' H& R% Z0 b, b0 J+ R
q4:=ll+(hh-ll)/2;
3 T( `% k1 ^9 b7 @- Q% iq5:=ll+(hh-ll)*POW(0.618,5);) E: s; }5 O/ \* ^7 d+ {+ T1 x
q6:=hh-(hh-ll)*POW(0.618,3);
! E% b4 e3 V& p& q2 x( eq7:=hh-(hh-ll)*POW(0.618,5);, K; v1 g6 q( h& |
ll:=llV(l ,lhnh);
+ Z& i7 N4 a$ `/ M' L1 Z) Z fq8:=ll-(hh-ll)*POW(0.618,5);
i! M) p0 [ N1 \: ?& M/ S0 _PARTLINE(q0,qqqq,RGB(238,238,28));
* P; X0 F- {' [$ ^0 ~PARTLINE(hh ,qqqq,RGB(255,0,255));6 t* }1 ]* p" Y$ O
PARTLINE(q1,qqqq,RGB(238,238,28)); I* s2 _$ R- e3 i& ^
PARTLINE(q2,qqqq,RGB(238,238,28));
N4 s5 z* I. F' {9 kPARTLINE(q3,qqqq,RGB(238,238,28));* n5 i$ e( n* v7 d
PARTLINE(q4,qqqq,RGB(238,0,0));$ I6 s {/ q" b+ h' V
PARTLINE(q5,qqqq,RGB(238,238,28));5 I1 j; q; S8 L4 m/ }
PARTLINE(q6,qqqq,RGB(238,238,28));" E; O4 {: z! P8 c
PARTLINE(q7,qqqq,RGB(238,238,28));
9 M' g9 v( k& C7 W3 j0 Q( DPARTLINE(ll,qqqq,RGB(255,0,255));8 X. Q) s5 C# M; Z
PARTLINE(q8,qqqq,RGB(238,238,28));, ~4 W' }5 [2 u
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; * a a4 M) e! e
7 U2 [3 \/ S! B1 ]3 V5 lDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
, @5 ~6 @ Z l+ ?( j1 H; _DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
( C) m: {+ a% k3 c* D- E# ADRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
& g! H( }/ \1 Z; ~" lDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
9 c; R. ]! T) p$ d" P$ fDRAWTEXT(nnl,q4,'50% '+q4),Colorred;* s7 x1 I M0 P, [- C2 P! W0 |/ E
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
: |4 s1 g( S. j1 v2 K% i* sDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;2 @1 b$ E5 p: Z2 b3 Z
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;$ ?8 F% m: z; R! l
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;0 P b+ O j3 C
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |