lhnh:=BARSLAST(DISPSTATUS=1)+1;. I8 E% _: y8 R9 b
nnl:=DISPSTATUS=2;" V/ X7 _1 U ]/ Y( `4 o
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));; o/ _ d3 M+ R2 E0 { k: e4 U4 \3 \8 A
hh:=HHV(h ,lhnh);$ \! O4 ^. d( {0 c# r
ll:=llV(l ,lhnh);
* y) ]7 Q3 ~1 X: O. R$ m( dq0:=hh+(hh-ll)*POW(0.618,5);
8 L4 Y+ l+ N5 n$ u" J8 M2 ehh:=HHV(h ,lhnh);( ^/ K6 P5 W V/ \' h4 p$ N
q1:=ll+(hh-ll)*POW(0.618,1);
/ S; ~6 D! V1 l0 b' u# }q2:=ll+(hh-ll)*POW(0.618,2);
- k1 B$ T4 V n' R- M1 p; M6 vq3:=ll+(hh-ll)*POW(0.618,3);3 D8 [/ J$ W, K/ A- C; K6 [4 j6 t
q4:=ll+(hh-ll)/2;9 o$ F+ e% k: s/ d! \. G
q5:=ll+(hh-ll)*POW(0.618,5);
( F1 v+ S5 e. p% Fq6:=hh-(hh-ll)*POW(0.618,3);
. D' T, C" j5 n& Q1 Q yq7:=hh-(hh-ll)*POW(0.618,5);
4 ], i% P F& bll:=llV(l ,lhnh); ^9 s+ N2 y) T0 }7 u
q8:=ll-(hh-ll)*POW(0.618,5);0 U/ a9 l2 r: M8 c
PARTLINE(q0,qqqq,RGB(238,238,28));
" m6 D0 l( r( _9 lPARTLINE(hh ,qqqq,RGB(255,0,255));* {2 u4 o: _4 ]# `8 ~7 H
PARTLINE(q1,qqqq,RGB(238,238,28));
: y8 h# {. C- V0 {% O a( f) }, fPARTLINE(q2,qqqq,RGB(238,238,28));1 B. W5 E0 E3 O! q! I5 `
PARTLINE(q3,qqqq,RGB(238,238,28));
- K/ U2 \2 i$ x4 GPARTLINE(q4,qqqq,RGB(238,0,0));
* |, A& j! Z ~PARTLINE(q5,qqqq,RGB(238,238,28));
H. Z6 W1 }; } }* E. ^, |2 zPARTLINE(q6,qqqq,RGB(238,238,28));
4 Y' r$ w6 a& CPARTLINE(q7,qqqq,RGB(238,238,28)); J5 { w% m4 k+ A& X
PARTLINE(ll,qqqq,RGB(255,0,255));
9 y8 P. r# o/ B; F. y" \% FPARTLINE(q8,qqqq,RGB(238,238,28));7 U5 v/ a' C& R) Q% @5 [
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; / G. K3 g$ n I, Q' u3 G; R: @. k
5 ?1 p; x4 r8 `6 |. n5 V7 V. b, g% _DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
1 ?# b/ h% n3 X2 S# T# IDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
4 H3 D$ A! u" G. LDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;: i7 e* U8 a" F- c5 O* o
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;0 o# |( ?& t/ T& J$ V
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;! L) v8 ?- o. @$ j# S/ g5 y- ~
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
4 q, v: B9 Z/ B3 HDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;: x! O7 ]' u1 G* c
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
! X' V6 w6 U& q/ {4 M" \( i6 FDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
2 v0 ]. D7 @/ j- _. b5 {7 n q2 wDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |