|
PureBytes Links
Trading Reference Links
|
Well, yes.
Hot morning coffee for example.
DT
--- In amibroker@xxxx, kbennett@xxxx wrote:
>
> 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
|