|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
6 L9 Q% f# j; a/ u! t7 rnnl:=DISPSTATUS=2;
6 i' g2 K, j4 S- @) r" kqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));. c% T, K3 r- e
hh:=HHV(h ,lhnh);4 K: i% i+ l" O- H3 e/ M: I# n* o
ll:=llV(l ,lhnh);+ s( g9 d; d/ m
q0:=hh+(hh-ll)*POW(0.618,5);
?# @. l3 W+ X% x6 m x9 P* N( G% i8 Ohh:=HHV(h ,lhnh);
, X1 |; q- Y0 Q6 q3 _q1:=ll+(hh-ll)*POW(0.618,1);+ C! t0 \" i% q U- e7 \
q2:=ll+(hh-ll)*POW(0.618,2);1 b1 p. w, u' H: C
q3:=ll+(hh-ll)*POW(0.618,3);9 f5 ?3 Q/ X% z% S9 w2 t3 A+ {# w
q4:=ll+(hh-ll)/2;
/ E/ ^8 G% X7 C1 d3 bq5:=ll+(hh-ll)*POW(0.618,5);* D8 ]# W! a+ q5 q' [+ v" L
q6:=hh-(hh-ll)*POW(0.618,3);
& ?4 J' b" u: N: n9 Tq7:=hh-(hh-ll)*POW(0.618,5);
. S6 V. J( e; ~# L1 ~ll:=llV(l ,lhnh);
) J* y7 o( z5 b, n, Q" p9 H: w- @3 `* sq8:=ll-(hh-ll)*POW(0.618,5);( O4 `6 p1 m. L U
PARTLINE(q0,qqqq,RGB(238,238,28));
1 N( C; T7 k @PARTLINE(hh ,qqqq,RGB(255,0,255));; B5 p# v3 r5 F5 v+ ^7 S
PARTLINE(q1,qqqq,RGB(238,238,28));
" ^7 F2 _' V* g, O, t9 mPARTLINE(q2,qqqq,RGB(238,238,28));! K6 ~+ p# v$ Z& s0 L% D! _
PARTLINE(q3,qqqq,RGB(238,238,28));$ f! c. f) |; ?6 P+ M
PARTLINE(q4,qqqq,RGB(238,0,0));
@1 ~ k F* _: sPARTLINE(q5,qqqq,RGB(238,238,28));, {: I0 A" S) J( @( K% ~. J
PARTLINE(q6,qqqq,RGB(238,238,28));" X! I7 [5 M; d" N2 k! E
PARTLINE(q7,qqqq,RGB(238,238,28));1 r" `- C( M0 a& C* h2 M5 P
PARTLINE(ll,qqqq,RGB(255,0,255));
- b: D" \2 U- RPARTLINE(q8,qqqq,RGB(238,238,28));
l8 ], e8 ~. } q1 ^: @. u. q1 ADRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; ' B/ _% P- W) J: N) o0 n
: w9 ]. P; w3 j2 f
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
9 |: h2 ]" Q2 cDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
! A7 H9 c$ \" ?" k+ QDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;+ W# k. _5 J1 s" H! `
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;" w! Q3 o" G" _$ l7 k3 @: c
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;! Q, m* C W0 f B3 g& Z
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
* @' ~: V" y- K- e& [* uDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
" P' Y3 @ p; \' z9 H% DDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
" T o/ ~, ]7 S6 w+ gDRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;! T" L# i( E, A
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |