|
lhnh:=BARSLAST(DISPSTATUS=1)+1;# n$ U1 g8 I T6 c* I4 K$ N
nnl:=DISPSTATUS=2;4 _1 z4 a5 K* {9 n& C
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));$ w0 [/ ?7 `- r# c' f
hh:=HHV(h ,lhnh);' r i: Z, H9 M9 ^4 F5 Z- l; W# t
ll:=llV(l ,lhnh);
- r9 r0 T# R6 Jq0:=hh+(hh-ll)*POW(0.618,5);2 g! v' {# P8 @1 ?
hh:=HHV(h ,lhnh);
7 z& o6 j) ^, nq1:=ll+(hh-ll)*POW(0.618,1);! z6 K: ~ o7 {7 f( a
q2:=ll+(hh-ll)*POW(0.618,2);
4 x4 B( |8 q0 _4 |$ b6 ]1 Rq3:=ll+(hh-ll)*POW(0.618,3);
# T. L( r4 ] \0 e7 Lq4:=ll+(hh-ll)/2; d3 _4 ]; u/ Y& H
q5:=ll+(hh-ll)*POW(0.618,5);
( K4 Z0 U6 Z* h9 i' c# n4 Y" Kq6:=hh-(hh-ll)*POW(0.618,3);9 s4 t# b, S5 y( J
q7:=hh-(hh-ll)*POW(0.618,5);7 [( L% A5 E8 E* u- y2 H4 o0 j/ f
ll:=llV(l ,lhnh);
5 W9 m U& ^/ s% U0 hq8:=ll-(hh-ll)*POW(0.618,5);
5 X5 m. Y- w+ _PARTLINE(q0,qqqq,RGB(238,238,28));
0 L8 J0 o3 Y. c2 NPARTLINE(hh ,qqqq,RGB(255,0,255));* b1 ?/ m p" V9 N" @% y
PARTLINE(q1,qqqq,RGB(238,238,28));' i+ H7 h1 t/ ? q: k, \2 h
PARTLINE(q2,qqqq,RGB(238,238,28));8 R. ]- j" a/ ?/ j; S8 G4 j/ o! c
PARTLINE(q3,qqqq,RGB(238,238,28));
6 H: A& G+ I$ A& a7 [ gPARTLINE(q4,qqqq,RGB(238,0,0));4 p- O% v# `# Z1 ]
PARTLINE(q5,qqqq,RGB(238,238,28));
* z* o* ^+ X7 e" }PARTLINE(q6,qqqq,RGB(238,238,28));
! J; C2 e% G+ T0 A% @PARTLINE(q7,qqqq,RGB(238,238,28));- x9 \. z# R0 L, F
PARTLINE(ll,qqqq,RGB(255,0,255));$ x4 ^0 c: l( G
PARTLINE(q8,qqqq,RGB(238,238,28));
+ Z* h$ y& {3 [& nDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; & i* p8 ~7 Y; C, C
" i- i' T' W6 f! ~! \# `
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;) H" h+ E! h$ U2 }, D8 M/ ~, k) E
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
9 w* |. \% g5 F3 L! tDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;( O. h3 _: q$ j7 g; t
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
c8 O' `/ E4 D: U$ lDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
" h K' {/ g7 U$ jDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
" y# k! H7 G0 j j- @DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;1 G' C# V" L7 A# `
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;' m P+ F' M9 z# @: v/ d
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;7 i; d! {$ x+ Q1 L ~5 d
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |