|
lhnh:=BARSLAST(DISPSTATUS=1)+1;
( T9 o& t5 Y; [+ y' vnnl:=DISPSTATUS=2;
* Y9 Y1 u: T* G& `2 Aqqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));9 Y/ T# C1 U+ j7 j' d. c3 N) @
hh:=HHV(h ,lhnh);
* j0 O5 F3 v* S# ~' q Lll:=llV(l ,lhnh);7 a* i9 M7 m& D+ L. O, d$ ?$ j
q0:=hh+(hh-ll)*POW(0.618,5);) C* j% P) ?2 v; m! x+ t: S D
hh:=HHV(h ,lhnh); v ^6 p$ s2 |6 m
q1:=ll+(hh-ll)*POW(0.618,1);
# g( N1 _1 `, t; r B4 pq2:=ll+(hh-ll)*POW(0.618,2);. _, |4 @' H3 \) D0 y4 _4 {( k9 U
q3:=ll+(hh-ll)*POW(0.618,3);1 a3 h7 Z K/ ]1 t, O2 j
q4:=ll+(hh-ll)/2;
! X1 M% @" G Rq5:=ll+(hh-ll)*POW(0.618,5);9 e3 D. ?! S0 @# l3 \: ~& D3 N
q6:=hh-(hh-ll)*POW(0.618,3);# n2 a4 p* u8 F# \! d6 B
q7:=hh-(hh-ll)*POW(0.618,5);
( x; P5 \% v% ~/ R# j9 R/ fll:=llV(l ,lhnh); Q" ?1 e+ w) v5 S- f$ `
q8:=ll-(hh-ll)*POW(0.618,5);, n0 y% n$ E/ t* i6 m9 ?
PARTLINE(q0,qqqq,RGB(238,238,28));
3 E/ b1 T) i6 x- f) t9 s# p* ~# FPARTLINE(hh ,qqqq,RGB(255,0,255));
" R6 }) i5 a4 h# \! t% i9 oPARTLINE(q1,qqqq,RGB(238,238,28));
! L7 f7 \3 k1 d4 cPARTLINE(q2,qqqq,RGB(238,238,28));8 Q& m, ]' M) W8 {$ h( o( e
PARTLINE(q3,qqqq,RGB(238,238,28));
) }6 c0 a4 F5 k( }$ N3 ePARTLINE(q4,qqqq,RGB(238,0,0));5 g+ N, d7 o0 K$ f- p8 S
PARTLINE(q5,qqqq,RGB(238,238,28));
6 c- {! B% K- ^1 f- c( {PARTLINE(q6,qqqq,RGB(238,238,28));
. M' ~" K- y/ ]1 RPARTLINE(q7,qqqq,RGB(238,238,28));
4 `4 L9 e1 F) g* X3 ^( FPARTLINE(ll,qqqq,RGB(255,0,255));/ E7 q) B: L" Y" _% k0 M E
PARTLINE(q8,qqqq,RGB(238,238,28));
2 r" J8 M& @/ ^9 a) H9 ~DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
+ q! |5 ~# ]7 K' d# ~0 K( }: A7 m! ~0 h: F
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
0 e' w$ W) Z# QDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;* X y8 Q7 \9 [3 S# f( o
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
- g5 u3 U/ d2 _' zDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
* d" j6 z( U7 N7 gDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
+ m; Y4 l" t- E% M6 sDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
! H P l% Z7 C& B3 p+ L \DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;$ U+ ^6 l2 N o7 T/ |( e' g* g: S
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
7 |0 ]# n9 d% u' F6 {& ODRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
1 S, J+ K6 _4 _+ Y G" ^DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |