|
lhnh:=BARSLAST(DISPSTATUS=1)+1;$ o2 Y4 N# E' q7 @7 |, q
nnl:=DISPSTATUS=2;& n. A- v7 E3 d7 ]3 z7 D. F
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));9 D4 g7 E: x5 w- ?: T9 h- {
hh:=HHV(h ,lhnh);
# ^+ G7 h6 x( f$ A! @" nll:=llV(l ,lhnh);
6 m' j9 v0 n2 S! ~/ ]' c" M- l/ U0 `q0:=hh+(hh-ll)*POW(0.618,5);
' u$ P: y u$ |hh:=HHV(h ,lhnh);$ e) A% E- K3 H+ {& d: K
q1:=ll+(hh-ll)*POW(0.618,1);
5 \$ p2 g6 D& o6 m3 v4 oq2:=ll+(hh-ll)*POW(0.618,2);
9 }0 e* t( b' ]6 {q3:=ll+(hh-ll)*POW(0.618,3);( d: l( `/ \, ?2 \
q4:=ll+(hh-ll)/2;
; c# c) m7 p, H& q0 b& Hq5:=ll+(hh-ll)*POW(0.618,5);; j4 |- l5 n0 n. V
q6:=hh-(hh-ll)*POW(0.618,3);
6 [0 Y; v5 m+ L5 tq7:=hh-(hh-ll)*POW(0.618,5);9 I$ _5 a! \5 O$ ]
ll:=llV(l ,lhnh);
( E0 ~2 h/ P. Yq8:=ll-(hh-ll)*POW(0.618,5);* C1 ]: Z, s$ W' q+ ?/ L+ y
PARTLINE(q0,qqqq,RGB(238,238,28));2 z9 e( n; e' p0 s) o& v2 L/ M. i$ _
PARTLINE(hh ,qqqq,RGB(255,0,255));" |6 d6 ?* ?2 b+ E4 ]
PARTLINE(q1,qqqq,RGB(238,238,28));( |& d# D! C# e5 N% R2 W
PARTLINE(q2,qqqq,RGB(238,238,28));$ G+ {7 g m$ U* J1 T& ?# G5 I
PARTLINE(q3,qqqq,RGB(238,238,28));! R. \2 V5 X* p2 K! g
PARTLINE(q4,qqqq,RGB(238,0,0));
- d1 N1 g, o; ]8 |7 F/ bPARTLINE(q5,qqqq,RGB(238,238,28));) `1 S, q& i7 T4 f- |2 w1 s
PARTLINE(q6,qqqq,RGB(238,238,28));+ \3 l) \7 L2 K
PARTLINE(q7,qqqq,RGB(238,238,28)); o9 }6 Y# S' s! b
PARTLINE(ll,qqqq,RGB(255,0,255));
! k1 m4 B$ Y# |( [* {# ?2 dPARTLINE(q8,qqqq,RGB(238,238,28));- [/ ?- v% N% o5 l% H8 E
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 6 h H2 c, L) c5 T o$ Y
# h- H& f: z! r+ [" {
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;/ X8 d7 z" K+ a# q
DRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;
9 s; K `- c& V/ Q* CDRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;& c- w% k- N) S+ E) l. r) m
DRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
3 o) `( ?) u. S ZDRAWTEXT(nnl,q4,'50% '+q4),Colorred;- y) p/ A& {& F Z' T) E1 g9 D
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
; @' I. A5 v, N! f6 I; oDRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;
+ V" V8 z8 R- |$ Z: A# ]. QDRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;/ S" } U' _5 {
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
2 a* V1 q! q" Q" JDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |