|
lhnh:=BARSLAST(DISPSTATUS=1)+1;, `' D# s$ X3 W+ `" W+ t
nnl:=DISPSTATUS=2;
1 R1 U2 ~5 I- }% B- x& m8 V, Dqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));8 q- _, t4 v" ?1 M) ^& P
hh:=HHV(h ,lhnh);
8 [0 P2 F, d+ F z! x6 Nll:=llV(l ,lhnh);( A2 D- B$ P) w7 o: F. C& V
q0:=hh+(hh-ll)*POW(0.618,5);
( T! z( ]6 @0 N3 Y& f5 h# ], Ohh:=HHV(h ,lhnh);8 c# t8 d! G0 E* `+ `
q1:=ll+(hh-ll)*POW(0.618,1);
# _/ s: S' q) E( Eq2:=ll+(hh-ll)*POW(0.618,2);+ _7 A. i8 Z0 _& L6 J
q3:=ll+(hh-ll)*POW(0.618,3);; S& _: N! h5 Y4 w7 M4 w% O
q4:=ll+(hh-ll)/2;
1 P* {+ o/ H( zq5:=ll+(hh-ll)*POW(0.618,5);
5 x! z1 @/ Z' b F& ?q6:=hh-(hh-ll)*POW(0.618,3);( m! \5 d e" X4 }1 }; a K
q7:=hh-(hh-ll)*POW(0.618,5);; ^1 q" _% G5 P1 d$ n' @4 c& l
ll:=llV(l ,lhnh);0 |+ ]( J- s2 q0 h
q8:=ll-(hh-ll)*POW(0.618,5);
7 o% c: l' y. }- O& R3 j& XPARTLINE(q0,qqqq,RGB(238,238,28));8 h: b8 s8 f' Y1 [5 p9 H! y9 Y) Y
PARTLINE(hh ,qqqq,RGB(255,0,255));
- _5 b2 l/ q8 ?8 i/ `8 B; s4 _* W+ M* Y1 iPARTLINE(q1,qqqq,RGB(238,238,28));
; Y5 t- @! O+ t; c0 l0 D2 ZPARTLINE(q2,qqqq,RGB(238,238,28));
& M; h: I; t$ c( x8 sPARTLINE(q3,qqqq,RGB(238,238,28));
1 N7 Y3 v& K- k8 N+ f. aPARTLINE(q4,qqqq,RGB(238,0,0));
5 B$ W+ D3 p& B1 m8 GPARTLINE(q5,qqqq,RGB(238,238,28));! s0 q# H9 S! y" r, G
PARTLINE(q6,qqqq,RGB(238,238,28));- w/ c- i* H& v" J, t+ a
PARTLINE(q7,qqqq,RGB(238,238,28));
! B9 b& q4 q ?' l0 q" ZPARTLINE(ll,qqqq,RGB(255,0,255));, [9 @% q* B7 W# W# b& K! h" G
PARTLINE(q8,qqqq,RGB(238,238,28));1 e) H& x4 B' l: S8 K a0 R. j
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
/ T# T* }" a8 @# v" Q
) x" Y8 i/ \9 {' {DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;! b( L, j2 N, u, f1 L* R
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
: Q8 U: c$ l6 O" oDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
& g6 S# Z; i" | Q+ ?/ nDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;. F0 I& {) o; Q a
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;! \' K$ `7 M ^
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
3 B( |" p O _/ cDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
- e; l7 G/ T0 g9 A& Q) [$ s* l3 QDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;! R/ t0 w' U& y- j
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
3 Q; x$ ^' L8 Y, _: G6 y4 X' h5 ODRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |