|
PureBytes Links
Trading Reference Links
|
Hoping someone can help here. I found this works properly only if the drawn
lines extend to the end of the chart. The values are correct for the prices
of the drawn lines, and the starting bar (left end), but the right end of
the drawn study is taken as the last bar of the chart .
How can I get the value of barindex() of the right end of the drawn line
study.
Cheers,
Graham
http://e-wire.net.au/~eb_kavan/
-----Original Message-----
From: Graham [mailto:gkavanagh@xxxxxxxxxxxxx]
Sent: Sunday, June 27, 2004 10:19 AM
To: amibroker@xxxxxxxxxxxxxxx
Subject: [amibroker] Fib lines from manual study lines
Hope DT hasn't already done this one, but his work in automated angled
sup/res lines got me to thinking drawing angled Fibonacci levels. The built
in fib tool is good, but only uses horizontal lines, so I thought I would do
one for any pair of drawn lines.
Just draw 2 lines on the price chart and name them F1 and F2 in the line
properties window. You can add or delete lines, change % and colours just
using the fibline statement per the last few lines of the code.
Plot(C,"",colorBlack,styleBar);
Upper=ValueWhen(NOT IsNull( Study("f1",GetChartID())
),Study("f1",GetChartID()));
Lower=ValueWhen(NOT IsNull(
Study("f2",GetChartID())),Study("f2",GetChartID()));
TLB = ValueWhen( Upper AND IsNull(Ref(Upper,-1)), BarIndex());
TLP = ValueWhen( Upper AND IsNull(Ref(Upper,-1)), Upper );
TRB = ValueWhen( Upper ==LastValue(Upper), BarIndex());
TRP = ValueWhen( Upper ==LastValue(Upper), Upper );
BLB = ValueWhen( Lower AND IsNull(Ref(Lower,-1)), BarIndex());
BLP = ValueWhen( Lower AND IsNull(Ref(Lower,-1)), Lower );
BRB = ValueWhen( Lower ==LastValue(Lower), BarIndex());
BRP = ValueWhen( Lower ==LastValue(Lower), Lower );
procedure FibLine(x,y)
{
LB = LastValue( BLB+(TLB-BLB)*x );
RB = LastValue( BRB+(TRB-BRB)*x );
LP = LastValue( BLP+(TLP-BLP)*x );
RP = LastValue( BRP+(TRP-BRP)*x );
Line = LineArray( LB, LP, RB, RP ,0 );
Plot( Line, "Line "+(x*100)+"%", y, styleLine);
}
FibLine(0.5,colorRed);
FibLine(0.618,colorBlue);
FibLine(0.382,colorGreen);
FibLine(1.618,colorRed);
FibLine(-0.618,colorRed);
Cheers,
Graham
http://e-wire.net.au/~eb_kavan/
Check AmiBroker web page at:
http://www.amibroker.com/
Check group FAQ at:
http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Yahoo! Groups Links
------------------------ Yahoo! Groups Sponsor --------------------~-->
Yahoo! Domains - Claim yours for only $14.70
http://us.click.yahoo.com/Z1wmxD/DREIAA/yQLSAA/GHeqlB/TM
--------------------------------------------------------------------~->
Check AmiBroker web page at:
http://www.amibroker.com/
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|