Starc bands

Kant-en-klare, geteste indicatoren en handelssystemen
Plaats reactie
Eric
Berichten: 2936
Lid geworden op: za sep 10, 2005 2:41 am
Locatie: Den Haag

Starc bands

Bericht door Eric » do aug 10, 2006 12:51 pm

Starc bands zijn vergelijkbaar met Bollinger Bands. Ze vormen een band, evenredig met de Average True Range, om een Moving Average.

Upper STARC band = SMA + Factor * ATR
Lower STARC band = SMA - Factor * ATR

Wanneer de koers zich in de buurt van de banden beweegt wordt dit gezien als een overbought / oversold situatie.

STARC staat voor Stoller Average Range Channels. De indicator is genoemd naar zijn bedenker Manning Stoller.

Code: Selecteer alles

{- Filename: Starc Bands -}

var
  MAPeriode, ATRPeriode: integer;
  BandFactor: real;
  sMA, sATR: TSeries;
begin
{ Indicator parameters }
  MAPeriode := CreateParameterInteger('MA periode', 1, 999, 6, true);
  ATRPeriode := CreateParameterInteger('ATR periode', 1, 999, 15, true);
  BandFactor := CreateParameterReal('Band factor', 0.1, 99, 2, true);

{ Indicator eigenschappen }
  with Indicator do 
  begin
{ Aantal benodigde koersen om eerste indicatorwaarde te berekenen }
    RequiredBars := MaxInt(MAPeriode, ATRPeriode);
    NewBand := false;
    ScaleRange := srCommon;
  end;

  sMA := MA(Close, maSimple, MAPeriode);
  sATR := MultiplySeriesBy(MA(TrueRange(High, Low, Close), maSimple, ATRPeriode), BandFactor);

  with CreateLine(sMA) do
  begin
    Name := 'MA';
    Color := clYellow;
  end;
  with CreateLine(AddSeries(sMA, sATR)) do
  begin
    Name := 'UpperBand';
    Color := clSilver;
  end;
  with CreateLine(SubtractSeries(sMA, sATR)) do
  begin
    Name := 'LowerBand';
    Color := clSilver;
  end;
end.

Plaats reactie