lhnh:=BARSLAST(DISPSTATUS=1)+1;
2 ^6 {( P/ Y x, A2 W" knnl:=DISPSTATUS=2;! Z' g* z8 b @3 t9 Q
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
/ c2 ~6 N5 m1 b! {4 D7 g4 lhh:=HHV(h ,lhnh);9 Q/ k# N; x, z4 X8 h' g8 v
ll:=llV(l ,lhnh);5 ? d' s" \! P7 Z
q0:=hh+(hh-ll)*POW(0.618,5);
- Y' P- Z' S9 Jhh:=HHV(h ,lhnh);
0 y S0 }* f6 u. j6 \5 b2 ~# O" fq1:=ll+(hh-ll)*POW(0.618,1);
& z8 J, j" A- s3 rq2:=ll+(hh-ll)*POW(0.618,2); e: Z b3 |8 {% \9 h( t4 r2 M
q3:=ll+(hh-ll)*POW(0.618,3);. F6 D0 k' V# I+ {
q4:=ll+(hh-ll)/2;
8 ?7 c0 V0 U* H: S3 E8 ^/ Xq5:=ll+(hh-ll)*POW(0.618,5);7 X2 S4 M4 R8 e8 J: q
q6:=hh-(hh-ll)*POW(0.618,3);
( m, P4 ]' y# F0 t5 Hq7:=hh-(hh-ll)*POW(0.618,5);
; ^& G9 V& h \( u" v, Kll:=llV(l ,lhnh);" {/ ~3 t7 o0 {. B; S! f0 i" H
q8:=ll-(hh-ll)*POW(0.618,5);% U2 Z9 a2 G7 a0 K7 \5 v
PARTLINE(q0,qqqq,RGB(238,238,28));
9 A( L! ?3 S0 G7 @PARTLINE(hh ,qqqq,RGB(255,0,255));' w4 y; _! A' ~# t) [) O, y; k
PARTLINE(q1,qqqq,RGB(238,238,28));
( u9 N! d( \8 r4 `; k" a' |PARTLINE(q2,qqqq,RGB(238,238,28));
. s5 c9 ] U+ RPARTLINE(q3,qqqq,RGB(238,238,28));
. G8 C, A Z. YPARTLINE(q4,qqqq,RGB(238,0,0));
9 J4 s V1 j4 d# qPARTLINE(q5,qqqq,RGB(238,238,28));6 n3 U+ l% l) \
PARTLINE(q6,qqqq,RGB(238,238,28));
' `: U6 \* y: w" IPARTLINE(q7,qqqq,RGB(238,238,28));& v5 D! M4 B) Z8 z1 x6 q
PARTLINE(ll,qqqq,RGB(255,0,255));
& ~6 E$ D3 O% i1 S. \2 ^# QPARTLINE(q8,qqqq,RGB(238,238,28));) \8 p: N2 D8 U8 B8 I5 S
DRAWTEXT(nnl,q0,'108.9% '+q0),Color00FFFF; 2 o+ Y! h: x+ K) [! t! t* }+ k0 Z! _
3 p" V% j& c3 e: y8 l6 B/ D/ [
DRAWTEXT(nnl,hh,'100% '+hh),ColorFF00FF;
4 |( G( g9 v/ Z8 s& ?5 QDRAWTEXT(nnl,q7,'90.9% '+q7),Color00FFFF;8 f+ P: i; O* J8 W0 t
DRAWTEXT(nnl,q6,'76.4% '+q6),Color00FFFF;
# H# G$ W5 @7 F3 c/ U8 q: ADRAWTEXT(nnl,q1,'61.8% '+q1),Color00FFFF;
( t; u& F# @% G0 kDRAWTEXT(nnl,q4,'50% '+q4),Colorred;) s9 z! c3 ]* W0 z9 F
DRAWTEXT(nnl,q2,'38.2% '+q2),Color00FFFF;
8 |5 k# i9 G+ ]6 j% b6 q; ~DRAWTEXT(nnl,q3,'23.7% '+q3),Color00FFFF;( p7 C8 b+ p6 x) T1 @: C8 j
DRAWTEXT(nnl,q5,'8.9% '+q5),Color00FFFF;8 X# C0 i; N# v; q
DRAWTEXT(nnl,ll,'0% '+ll),ColorFF00FF;
6 c+ \1 Y0 A, U* h) N& BDRAWTEXT(nnl,q8,'-8.9% '+q8),VALIGN2,Color00FFFF; |