Zitat:
Du hast dann an insgesamt drei Stellen im uSpectrum.pas Code sqrt stehen
Es funktioniert ja nur Sector case 1: in meinem source von daher war das schon stimmig da die anderen noch nicht funktionieren.
Aber auch dort habe ich jetzt sqrt addiert. Ist schon stimmig
Aber wie gesagt noch gravierende unterschiede.
Sehe ich wenn ich mein Wave abspiele.
SmallInt vom vorherigen Beitrag sollte stimmen von daher ist die Initialisierung eigentlich die gleiche.
Kann aber nicht mit Bestimmtheit sagen das die Probleme nicht von der FFT herrühren was die Datentypen angeht.
Wäre super wenn sich mal jemand die mühe macht das nochmal gegen zu prüfen
Rings 300hz 10 Octaves (müssten so aussehen aber da kommt bei mir noch gar nichts.
Hmmm…
EDIT:
Einen Fehler habe ich gefunden.
FFT..
Delphi-Quellcode:
if FView = 0 then
sr := (4096 * (FGain / 100)) / FFFTSize
else
sr := 1 / FFFTSize;
muss aber
Delphi-Quellcode:
if FView = 0 then
sr := (4096 * FGain) / FFFTSize
else
sr := 1 / FFFTSize;
sein
Macht schon einen großen Unterschied ob 8 oder 0,08
gruss