|
lhnh:=BARSLAST(DISPSTATUS=1)+1;& r) X( Q( U& y; T( H5 ~
nnl:=DISPSTATUS=2;- P3 }9 b: y* m
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));6 T9 s+ ] a& a7 S
hh:=HHV(h ,lhnh);
! ?) z! p& X r _# q g7 Jll:=llV(l ,lhnh);6 g2 w' ]5 |; q r
q0:=hh+(hh-ll)*POW(0.618,5);1 z% o! n3 G8 ]% q
hh:=HHV(h ,lhnh);
/ y. S/ s% i+ C1 Y3 D1 y$ K: t1 G: Q( uq1:=ll+(hh-ll)*POW(0.618,1);
) w/ C& D4 p8 U2 F! Eq2:=ll+(hh-ll)*POW(0.618,2);
' V/ g8 Z: [& E3 L/ y9 W3 ]q3:=ll+(hh-ll)*POW(0.618,3);6 ]$ U% d2 v: U2 B
q4:=ll+(hh-ll)/2;
0 t1 ?; f) i2 oq5:=ll+(hh-ll)*POW(0.618,5);7 Y; o- [+ D1 b+ r( A8 i& S
q6:=hh-(hh-ll)*POW(0.618,3);- | r' X, o% f) [, X4 ]7 K7 O
q7:=hh-(hh-ll)*POW(0.618,5);; Z; \# C6 \5 G
ll:=llV(l ,lhnh);
5 F+ X9 C+ T- E$ x; e( C1 z$ f' wq8:=ll-(hh-ll)*POW(0.618,5);
]2 u- e- W9 }# _/ T" D. j1 GPARTLINE(q0,qqqq,RGB(238,238,28));$ G, P, i6 s2 R# B$ T( Z u/ R3 F
PARTLINE(hh ,qqqq,RGB(255,0,255));
- }2 R- I. I5 Y& F3 y" u% Y7 CPARTLINE(q1,qqqq,RGB(238,238,28));" G6 M2 o8 L! H6 s1 K- A
PARTLINE(q2,qqqq,RGB(238,238,28));
/ c8 C8 T- j3 R6 _ V+ f, MPARTLINE(q3,qqqq,RGB(238,238,28));" r* _9 _1 \3 x) z6 d' e
PARTLINE(q4,qqqq,RGB(238,0,0));
3 ?) p- Q$ B- \3 W$ MPARTLINE(q5,qqqq,RGB(238,238,28));" }$ Q3 G; D! t( E- x& o m7 D
PARTLINE(q6,qqqq,RGB(238,238,28));% z c3 a6 S! D/ T
PARTLINE(q7,qqqq,RGB(238,238,28));
5 \" M0 E& K2 ^% w. h9 PPARTLINE(ll,qqqq,RGB(255,0,255));& A' m: k ]5 L
PARTLINE(q8,qqqq,RGB(238,238,28));
" e y1 I+ Q. Z1 l5 v w1 QDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; $ T" D6 S$ N# _4 U
" d4 ]$ k. `- P; UDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;; q, z$ v% {8 p
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;! J- ]' G0 m) z+ a
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;5 V! Q9 S( ^1 C- ?5 k) e
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
6 c. _+ `; V' \9 H3 a$ Y1 ZDRAWTEXT(nnl,q4,'50% '+q4),Colorred;
) i' L9 v9 d t# L; cDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;( Y# r4 r% F. e# b0 X. r H
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
+ z, ^1 |+ O; {3 W0 \5 rDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;: `) X- C3 z3 O5 a u+ i$ Y6 V: i
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;/ ^, S$ |( ~: {+ o' n, ^0 o
DRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |