PureBytes Links
Trading Reference Links
|
Dimitris,
Thank you for your prompt and super helpful advice. That's exactly
what I needed.
Is there anything this program will not do???
~kb~
--- In amibroker@xxxx, "DIMITRIS TSOKAKIS" <TSOKAKIS@xxxx> wrote:
> /*GAINERS*/
> values = C>Ref(C,-1);
> EnableScript("vbscript");
> days = Day();
> months = Month();
> years = Year();
> initialize = Status("stocknum") == 0;
> <%
> Name = "_GAINERS"
> days = AFL("days")
> months = AFL("months")
> years = AFL("years")
> values = AFL("values")
> initialize = AFL("initialize")
> Set oAB = CreateObject("Broker.Application")
> If initialize Then
> oAB.Stocks.Remove( Name )
> End If
> Set comp = oAB.Stocks.Add( Name )
> For i = 0 To UBound( days )
> Set qt = comp.Quotations.Add( years( i ) & "-" & months( i )
& "-
> " & days( i ) )
> If values( i ) = 1 Then qt.Volume = qt.Volume + 1
> Next
> If initialize Then
> oAB.RefreshAll()
> End If
> %>
> Buy = 0;
>
> PASTE IN AUTOMATIC ANALYSIS,
> SELECT
> *Apply to->Use filter->Define->your watch list
> *Range All quotations
> and SCAN.
> IN INDICATOR BUILDER PASTE THE
> Graph0=Foreign("_GAINERS","V");
> and you will have the Gainers graph.
>
> Dimitris Tsokakis
> --- In amibroker@xxxx, kbennett@xxxx wrote:
> >
> > I have a watchlist of bellweather stocks which I monitor daily,
and
> > pass the closing prices to Excel. In Excel I count the number of
> > gainers and chart the result over time.
> > Is it possible to do this in AFL and to use the analysis to
produce
> a
> > custom indicator?
> > Thanks for any help or guidance.
> > kb
|