|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
' Y3 ~ C- D' x5 ~& w: w, Bnnl:=DISPSTATUS=2;
" F8 f9 n( d2 a& @$ ~qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));, j: U* [( E; F `) D
hh:=HHV(h ,lhnh);% A, A- N" @8 W) h
ll:=llV(l ,lhnh);* X- M' z+ U2 P9 H' Z
q0:=hh+(hh-ll)*POW(0.618,5);
- h, _, X" f* s$ D. B0 E( jhh:=HHV(h ,lhnh);
7 q) [1 r+ [/ A; t% g/ i7 sq1:=ll+(hh-ll)*POW(0.618,1);
% b' g# y8 t% n3 Lq2:=ll+(hh-ll)*POW(0.618,2);! J' H @4 S3 U/ v7 }( \, {* E8 r) S
q3:=ll+(hh-ll)*POW(0.618,3);8 G: F% t" R7 n* F! l
q4:=ll+(hh-ll)/2;
$ G' \9 Q4 F: @/ m2 Vq5:=ll+(hh-ll)*POW(0.618,5);; F4 ]; ^) v$ F5 r
q6:=hh-(hh-ll)*POW(0.618,3);
! c) {7 y. ] `* Jq7:=hh-(hh-ll)*POW(0.618,5);$ }0 y; J" S7 y2 i3 B: [1 }2 Q
ll:=llV(l ,lhnh);
2 q* ^1 V" S- W( S q1 `* ~; }q8:=ll-(hh-ll)*POW(0.618,5);1 s, n! [4 D# R* s2 Y3 b
PARTLINE(q0,qqqq,RGB(238,238,28)); q' e) J* n/ L
PARTLINE(hh ,qqqq,RGB(255,0,255));# g6 P, d/ y% B! p
PARTLINE(q1,qqqq,RGB(238,238,28));7 R3 g& C+ ]9 h! X! c
PARTLINE(q2,qqqq,RGB(238,238,28));0 W2 L7 h3 D; \
PARTLINE(q3,qqqq,RGB(238,238,28));
$ ]2 V& N6 u8 O* Y I! p( PPARTLINE(q4,qqqq,RGB(238,0,0));
9 x. Y: h* C4 J/ XPARTLINE(q5,qqqq,RGB(238,238,28));* V7 A/ i* R' j/ W; X. H
PARTLINE(q6,qqqq,RGB(238,238,28));1 E4 R" X. i1 |/ L' n
PARTLINE(q7,qqqq,RGB(238,238,28));/ U1 Q% ~! H+ B2 W2 _
PARTLINE(ll,qqqq,RGB(255,0,255));
; r5 \: L# V( ?+ t. HPARTLINE(q8,qqqq,RGB(238,238,28));
1 R/ }8 e s, _' dDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 4 g K+ E K M" T( F/ v3 D
9 h; B5 ^7 z0 a0 t1 A \2 ~. ?
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
/ V, d% f; j7 B, D9 cDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
9 O' d. v9 s3 k) O9 f6 z2 J8 W6 ~& MDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
2 v. Z( K/ G- N% H8 IDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
: D3 E1 z' ]$ h+ d( _DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
" c1 d, E ?" ~; dDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
. ~' e0 z4 ~9 ^/ r" Z" a' eDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
/ p( g" c: g7 J. \& @+ G$ uDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
$ c* {5 p b/ ^$ xDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;( k! J, S- y1 w
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |