|
lhnh:=BARSLAST(DISPSTATUS=1)+1;8 O: ~' `7 g3 f8 f/ B4 E
nnl:=DISPSTATUS=2;: _/ e, B# e; O
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));/ d- d) g: D n
hh:=HHV(h ,lhnh);4 _# G+ t( U* y6 T V% B4 v- ], u7 O
ll:=llV(l ,lhnh);" \' h! Y P! V' C1 z( a3 Z
q0:=hh+(hh-ll)*POW(0.618,5);& `' m! v# x; l+ T2 n: V2 I( B7 V' x
hh:=HHV(h ,lhnh);' S; O% p7 n6 B9 d0 d1 |
q1:=ll+(hh-ll)*POW(0.618,1);
9 s. b3 L; L* L U% i- `$ qq2:=ll+(hh-ll)*POW(0.618,2);1 `* l5 p& p( m, ?* E5 o% y
q3:=ll+(hh-ll)*POW(0.618,3);; j- }9 q" ^, A8 G
q4:=ll+(hh-ll)/2;: [( F* F7 y2 D
q5:=ll+(hh-ll)*POW(0.618,5);
5 H- _% j+ }) d4 B# T; x. X6 nq6:=hh-(hh-ll)*POW(0.618,3);1 a6 f3 T7 J) P
q7:=hh-(hh-ll)*POW(0.618,5);$ W# e, o7 `& q( u; g
ll:=llV(l ,lhnh);
4 m |6 Y9 A/ dq8:=ll-(hh-ll)*POW(0.618,5);
& `! e1 X8 ]4 c5 @PARTLINE(q0,qqqq,RGB(238,238,28));
% Q* D; e' ?0 _6 y+ aPARTLINE(hh ,qqqq,RGB(255,0,255));
& v4 t- s2 T A( Z5 M8 j4 GPARTLINE(q1,qqqq,RGB(238,238,28));
; X8 {# W6 r$ \3 _0 oPARTLINE(q2,qqqq,RGB(238,238,28));
2 R( y5 ?' \5 F! CPARTLINE(q3,qqqq,RGB(238,238,28));8 y: L) m; n0 _; l
PARTLINE(q4,qqqq,RGB(238,0,0));- S' y4 v9 o( a
PARTLINE(q5,qqqq,RGB(238,238,28));! f. `6 t+ F8 f' C1 \
PARTLINE(q6,qqqq,RGB(238,238,28));1 X+ x' |1 u9 ?
PARTLINE(q7,qqqq,RGB(238,238,28));
3 F4 Q# O- h3 B; BPARTLINE(ll,qqqq,RGB(255,0,255));. y7 z: K6 Y: c# ~$ w1 ^
PARTLINE(q8,qqqq,RGB(238,238,28));
/ Q' @9 O7 C; q1 s- ^ L& zDRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; / l4 U: z) Y }
% \' Q4 g. z _9 h( H, U2 z
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;4 f% W! k) h$ r% A
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
5 M! A2 I- { }( i6 l( w! qDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
0 p9 }) l6 B* l/ HDRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
% r9 W* f6 p. N1 p& tDRAWTEXT(nnl,q4,'50% '+q4),Colorred;. H9 T3 D' [& D- ?& ~
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
; K! `. M, K w- B" m! i; k# i# |" RDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;) q8 U% H% m# w) |' N
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;
- O: P6 P. _) I5 I D4 p. n( {DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
8 D! w, L; g& g4 @7 C: TDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |