Price and Volume Trend

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

Price and Volume Trend

Bericht door Eric » do aug 17, 2006 5:12 pm

Een variant op de On Balance Volume is de Price and Volume Trend, waarbij niet de volumes worden gecumuleerd maar het voor de procentuele koersfluctuatie gewogen volume.

PVT = PVT[vorige dag] + Volume * (Close - Close[vorige dag]) / Close;

Code: Selecteer alles

{- Filename: Price and Volume Trend -}

var
  sPVT: TSeries;
  Sum: real;
  i: integer;
begin
{ Indicator eigenschappen }
  with Indicator do 
  begin
    ShortName := 'PVT';
{ Aantal benodigde koersen om eerste indicatorwaarde te berekenen }
    RequiredBars := 1;
  end;

  sPVT := CreateSeries(BarCount);
  Sum := 0;
  for i:=1 to BarCount-1 do
  begin
    Sum := Sum + Volume[i] * (Close[i] - Close[i-1]) / Close[i];
    sPVT[i] :=Sum;
  end;
  
  with CreateLine(sPVT) do
  begin
    Name := 'PVT';
    Color := clLime;
  end;
end.

Plaats reactie