FFT Berechnung fails

[Delphi.Narium]

Vor längerer Zeit hat mal hier bei der Konkurenz jemand was dazu gepostet, die dort verlinkte ZIP-Datei mit den Quellen ist noch verfügbar.

Habe das vor Jahren mal für meinen Player genutzt. Eventuell kannst Du den Quellen ja entnehmen, wie der Umgang mit FFT dort realisiert wurde und das eine oder andere für Dich entsprechend adaptieren.

[venice2]

Zitat von Delphi.Narium:

Vor längerer Zeit hat mal hier bei der Konkurenz jemand was dazu gepostet, die dort verlinkte ZIP-Datei mit den Quellen ist noch verfügbar.

Habe das vor Jahren mal für meinen Player genutzt. Eventuell kannst Du den Quellen ja entnehmen, wie der Umgang mit FFT dort realisiert wurde und das eine oder andere für Dich entsprechend adaptieren.

Danke ich benötige keinen Fremdcode es funktioniert doch alles.
Es ging nur um die frage warum ich BASS_DATA_FFT2048 anstelle von BASS_DATA_FFT1024 1024 verwenden muß weil mir einige Balken fehlten.
Das ist mittlerweile beantwortet.

Es gab da einige Unstimmigkeiten.

[TomyN]

Eine FFT ist bei einem realen Input symetrisch, d.h. es genügt die Hälfte der Werte.
Wenn ich es richtig verstehe, dann hast Du ja zwei Kanäle, daher macht das alles schon Sinn.

[Blup]

Was soll FFT_SkipCount den in dieser Reihenfolge bewirken?
Die Samples der einzelnen Channels liegen direkt hintereinander.
Da wäre es eher anders herum sinnvoll, wenn man Samples auslassen will.
Ich würde in FFT_SkipCount eher die zu überspringenden Sample-Paare angeben:

Delphi-Quellcode:

VisData.Spectrum[0, I] := fn(Data32Pos^)
inc(Data32Pos);
VisData.Spectrum[1, I] := fn(Data32Pos^)
inc(Data32Pos, 1 + (2 * FFT_SkipCount));

Schon bei FFT_SkipCount = 1 wird jetzt DataPos bei jedem Schleifendurchlauf um 4 Samples weiter gesetzt.
Bei 256 Durchläufen sind das 1024 Samples. Größere Werte für FFT_SkipCount sind hier nicht zulässig.

[venice2]

Keine Ahnung auf was du hinaus willst.
Du weist doch gar nicht wofür FFT_SkipCount steht.

Delphi-Quellcode:

  BASS_SONIQUEVIS_CONFIG_FFT_SKIPCOUNT = 2; // Skip count range is from 1 to 3 (because of limited FFT request size)
  BASS_SONIQUEVIS_CONFIG_WAVE_SKIPCOUNT = 3; // Skip count range is from 0 to (...) try it out, whenever Bass crashes or does not return enough sample data

Definition von FFT_SKIPCOUNT und WAVE_SKIPCOUNT.

Der Speicher wird so zugewiesen
GetMem(Data32, FFT_SkipCount shl 13);

FFTSize ist abhängig vom übergebenen FFT_SkipCount
BASS_DATA_FFT1024, BASS_DATA_FFT2048, BASS_DATA_FFT4096

Delphi-Quellcode:

        case (FFT_SkipCount) of
          1:
            FFTSize := BASS_DATA_FFT1024;
          2:
            FFTSize := BASS_DATA_FFT2048;
          3:
            FFTSize := BASS_DATA_FFT4096;
        else
          FFT_SkipCount := 1;
          FFTSize := BASS_DATA_FFT1024;
        end;

        Bass_ChannelGetdata(channel, Data32, FFTSize or DWORD(IfThen(ChanInfo.chans = 2,
              BASS_DATA_FFT_INDIVIDUAL) or IfThen(not VisInfo^.UltraPlayerVis,
              BASS_DATA_FFT_NOWINDOW)));

Dementsprechend hole ich mir dann die passenden Werte über Bass_ChannelGetdata. Siehe FFTSize

Zitat:

Bei 256 Durchläufen sind das 1024 Samples. Größere Werte für FFT_SkipCount sind hier nicht zulässig.

Man muß das gesamt Bild sehen und nicht nur einen Teil davon. Du darfst hier nicht von einen festen Wert ausgehen BASS_DATA_FFT1024

Aber hat nichts mit meiner Frage in diesen Thread zu tun und dieser war ja auch schon beantwortet.