|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
0 Z; D- ~5 X) K7 ^ H O8 S' {0 Lnnl:=DISPSTATUS=2;
4 L$ E: _" u; _qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));0 `3 F" F7 {3 a" _! B) H9 I* e
hh:=HHV(h ,lhnh);/ F' ^9 ~ M% h- D+ `5 }, N* J7 }
ll:=llV(l ,lhnh);" V8 _/ f$ H- s& w: ~$ o4 ~
q0:=hh+(hh-ll)*POW(0.618,5);5 G8 F2 D# |& g$ m9 l: R, s2 a# q
hh:=HHV(h ,lhnh);/ R' c: [ J7 A9 K7 O% q3 _
q1:=ll+(hh-ll)*POW(0.618,1);
9 ?5 e; L/ Y! kq2:=ll+(hh-ll)*POW(0.618,2);. b3 @4 Y; o. }! Y6 O4 Y& P
q3:=ll+(hh-ll)*POW(0.618,3);
8 k8 O( q$ u4 O8 A' O+ ~q4:=ll+(hh-ll)/2;
1 c- R- X5 X4 X- ]q5:=ll+(hh-ll)*POW(0.618,5);: J( q- |/ T5 U8 a4 M1 |) o) B
q6:=hh-(hh-ll)*POW(0.618,3);+ L% N$ f, H- ^ |3 y
q7:=hh-(hh-ll)*POW(0.618,5);
* l, E% ~% P: L7 Yll:=llV(l ,lhnh);
, `7 e: W* h3 r0 X+ Y- i% h& Aq8:=ll-(hh-ll)*POW(0.618,5);, a- X5 x% y3 L% p) {
PARTLINE(q0,qqqq,RGB(238,238,28));
: f, A v* z* |5 \ o# [1 V5 MPARTLINE(hh ,qqqq,RGB(255,0,255));
% x" m* }3 r- F& ~; U. APARTLINE(q1,qqqq,RGB(238,238,28));) t* P9 r8 ?' b- P1 D( |
PARTLINE(q2,qqqq,RGB(238,238,28));/ H1 Y/ q k7 c$ G
PARTLINE(q3,qqqq,RGB(238,238,28));3 h% ^( r) o8 d6 C$ k
PARTLINE(q4,qqqq,RGB(238,0,0));7 H! H) S3 h3 k
PARTLINE(q5,qqqq,RGB(238,238,28));% h& B0 b0 ]! {* @
PARTLINE(q6,qqqq,RGB(238,238,28));
3 C2 c B! v- `$ E& T9 I5 P) F: ePARTLINE(q7,qqqq,RGB(238,238,28));' h$ M) A0 E4 d6 n0 t
PARTLINE(ll,qqqq,RGB(255,0,255));' |9 ^$ r" [4 B( E8 @
PARTLINE(q8,qqqq,RGB(238,238,28));
; Z# V! z J: JDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
- r5 D( `5 p3 [! g' y3 k8 Y7 }5 N, p Q
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
' h0 Z- l" l" g+ YDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;" w: M9 h3 b. A2 W. Z
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;1 O; F1 Y! \0 O0 u, l, A
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;, ]1 [; D! ?7 A3 N2 L
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;. P0 q, `8 _9 Z& ?5 C& e
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
" e3 t* c! _ f8 ^DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
: s u0 w/ g( V( |% FDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;- j7 y' a$ t' Z. f2 Y' O3 v
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
: M2 W8 V+ J: W( V7 JDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |