TCustomLFOSineLike

type TCustomLFOSineLike = class(TCustomOscillator)

protected

  FIntSpeed: Integer;

  FSpeed: Single;

  FMax: Single;

  FMin: Single;

  FValue: Single;

  FPos: Integer;

  FScale: Single;

  FPosMul: Single;

  FHalfScale: Single;

  function GetValue; virtual;

  procedure SetMin();

  procedure SetMax();

  procedure SetSpeed();

public

  constructor Create; override;

  property Value: Single; [r]

  property Speed: Single; [rw]

  property Min: Single; [rw]

  property Max: Single; [rw]

end;

TCustomLFOSineLike

TCustomOscillator

TDspSampleRatePersistent

TDspPersistent

TNotifiablePersistent

TObject