|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
8 d9 p2 }, u" I# T; o( h- ?* Jnnl:=DISPSTATUS=2;
( R# _) [* m2 `3 j" o+ w9 aqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
. Z2 |) }+ b8 b" Q( P2 uhh:=HHV(h ,lhnh);' V2 [6 b Q$ R1 |9 u& F) u. N. _
ll:=llV(l ,lhnh);
, \" @" N/ r( Y3 N% Q9 Q! c8 n) Qq0:=hh+(hh-ll)*POW(0.618,5);2 l) a0 |6 s9 z z" D, S
hh:=HHV(h ,lhnh);, d, p7 r0 S& Z. c# e1 T
q1:=ll+(hh-ll)*POW(0.618,1);
) [' C5 q+ a' M4 X+ Y9 Gq2:=ll+(hh-ll)*POW(0.618,2);
5 c% u: n6 N. _# ~& n' G/ Vq3:=ll+(hh-ll)*POW(0.618,3);
% U+ k' h: _. [$ J$ c* m( d4 ]6 Q( ^q4:=ll+(hh-ll)/2;; J; X6 W/ D3 y0 r
q5:=ll+(hh-ll)*POW(0.618,5);, w \2 I) w9 w( e6 {* |, `
q6:=hh-(hh-ll)*POW(0.618,3);
! z6 A- i; ?" ?/ B* S! A; C/ C) ^q7:=hh-(hh-ll)*POW(0.618,5);
9 S' R) Q8 I! s8 [/ U2 |* `- sll:=llV(l ,lhnh);! p B6 v2 }3 t
q8:=ll-(hh-ll)*POW(0.618,5);
: @6 v7 D# Z9 K" M2 vPARTLINE(q0,qqqq,RGB(238,238,28));
. f* ^4 J/ a0 x' NPARTLINE(hh ,qqqq,RGB(255,0,255)); B: }3 I4 m. A+ E( h
PARTLINE(q1,qqqq,RGB(238,238,28));
- p+ l/ ^) e( }: O4 C2 IPARTLINE(q2,qqqq,RGB(238,238,28));2 u5 a, a; p( }) |
PARTLINE(q3,qqqq,RGB(238,238,28));
5 ?' T- X j5 Q: O, {5 W6 c5 ^PARTLINE(q4,qqqq,RGB(238,0,0));7 T3 ~5 ?, @7 S6 M9 q( m# J8 \7 @
PARTLINE(q5,qqqq,RGB(238,238,28));
( B, y( g9 z8 z( ^PARTLINE(q6,qqqq,RGB(238,238,28));- x- n6 O, S2 P) E+ r$ n
PARTLINE(q7,qqqq,RGB(238,238,28));
4 _) x7 ]; {7 HPARTLINE(ll,qqqq,RGB(255,0,255));
) U9 E5 S# q7 G6 DPARTLINE(q8,qqqq,RGB(238,238,28));+ T9 r& B [2 `0 @: X2 |
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
9 a; O; g: S7 B, \. f, Z" Y
1 E4 r+ g6 z# N" [" O- JDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
, ?; m8 q& w5 S4 R% N& l2 UDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
# N4 o+ ]& b3 A( B% N/ c5 VDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
- f; ?1 B' p G. WDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
* {+ r }7 o5 t! u: @" lDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
0 N* b" ~& j3 gDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;$ h! I/ ^$ _6 m* F6 b: _8 }
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
) n6 e+ H8 B9 d$ s( }, XDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
" K' a( ^/ F" ?% vDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
0 e4 z4 C+ N5 H0 w2 L9 M% _DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |