#pas
unit hiBASS_ChannelVisibleSpectrum;

    FFTPeacks  : array [0..1023] of Integer; //стр11
    FFTFallOff : array [0..1023] of Integer; //стр12

 Type TFFTData  = array [0..1023] of Single; //стр36

  for i := 0 to 350 do                       //стр65