|
lhnh:=BARSLAST(DISPSTATUS=1)+1;9 [9 E8 v4 A4 w- a6 D. l
nnl:=DISPSTATUS=2;/ D2 s m3 B. a8 Q5 g0 z1 R0 h
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));( d, I9 @3 `) [
hh:=HHV(h ,lhnh);/ M( X" r# u" i3 n/ O5 z2 E0 B
ll:=llV(l ,lhnh);
& Y6 |: e3 F. H9 J: p5 D# xq0:=hh+(hh-ll)*POW(0.618,5);! Z$ }1 E4 Y6 H+ h6 f
hh:=HHV(h ,lhnh);
) u+ j5 C( n3 Hq1:=ll+(hh-ll)*POW(0.618,1);8 v. g; ~2 R" D8 [' L% T
q2:=ll+(hh-ll)*POW(0.618,2);
5 d% {3 o, G5 }' p4 o! _q3:=ll+(hh-ll)*POW(0.618,3);
( |7 T; t1 t+ l' ~) }2 l4 K, S1 mq4:=ll+(hh-ll)/2;4 }3 S7 a3 c4 V3 Y4 v: I
q5:=ll+(hh-ll)*POW(0.618,5);
# H$ l* o( V- o# v0 F: ]q6:=hh-(hh-ll)*POW(0.618,3);
: \) t8 f i5 Z$ n- m& Jq7:=hh-(hh-ll)*POW(0.618,5);! `% R/ ~( m2 d6 l, g4 Z
ll:=llV(l ,lhnh);3 o; m5 [# p- S4 O$ L4 N
q8:=ll-(hh-ll)*POW(0.618,5);
2 ~6 Y5 E& d0 K* E m( {7 l3 d( y, JPARTLINE(q0,qqqq,RGB(238,238,28));0 }4 v- T: ?% e/ k3 V) d: X
PARTLINE(hh ,qqqq,RGB(255,0,255));
; o: M _; A8 K7 N$ U! M# ]" p, lPARTLINE(q1,qqqq,RGB(238,238,28));. Y3 D! ?/ L! k8 n- o3 F
PARTLINE(q2,qqqq,RGB(238,238,28));
3 x: r5 j0 n, _, u( S+ u% r; VPARTLINE(q3,qqqq,RGB(238,238,28));% C7 F7 t1 S' f
PARTLINE(q4,qqqq,RGB(238,0,0));
- y5 G4 A* O+ k a" [0 L vPARTLINE(q5,qqqq,RGB(238,238,28));
6 }" p$ H8 S! U* N8 M. ]PARTLINE(q6,qqqq,RGB(238,238,28));
# i* R- J& L Y- ?9 z0 S. JPARTLINE(q7,qqqq,RGB(238,238,28));5 y& G, v* Y) m! a; K t+ n H
PARTLINE(ll,qqqq,RGB(255,0,255));/ [$ ~- M- q- K$ J
PARTLINE(q8,qqqq,RGB(238,238,28));
- w; i9 Q6 p0 _. G+ IDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF;
6 X1 h/ A8 ?# f5 e t9 M; U) d( f
2 Q' w" \9 _9 Z2 [) x& LDRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF; {/ v# a# J" j% D! D! K: [
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
: a0 s0 P; w9 B% m& T6 rDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;8 L, ?# j+ J7 v2 U" D
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;2 |$ h# }& \ Z! j g$ I- D {
DRAWTEXT(nnl,q4,'50% '+q4),Colorred;
: d2 B5 ]. r9 u9 Y- T0 ]% `- LDRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;5 ^. `1 L/ z5 i* G( }
DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
6 X1 b, b( `6 B1 VDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;' S* H, n T0 }! ]7 z
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
; _7 {7 g4 J& l( EDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |