AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia BASS.DLL - Rauschen erzeugen / create noise
Thema durchsuchen
Ansicht
Themen-Optionen

BASS.DLL - Rauschen erzeugen / create noise

Ein Thema von TERWI · begonnen am 11. Mai 2014 · letzter Beitrag vom 31. Dez 2020
Antwort Antwort
TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.079 Beiträge
 
Delphi 10.4 Sydney
 
#1

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 16. Mai 2014, 15:07
Weder hier im Thread noch auf der verlinkten Seite gibt es eine procedure GetNoiseVal!

Wenn du weißes Rauschen hast, warum filterst du nicht einfach mit einen Tiefpassfilter?

Für solche Signalverarbeitungssachen im Hobbybereich würde ich eh MATLAB bzw. Scilab nehmen.
Sonst muss man sich doch mit soviel Kleinkram rumschlagen.
  Mit Zitat antworten Zitat
Benutzerbild von TERWI
TERWI

Registriert seit: 29. Mär 2008
Ort: D-49626
381 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 16. Mai 2014, 18:23
@TiGü:
Ich will dir sicher nicht zu nahe treten, aber ich glaube du hast nicht wirklich verstanden, worum es hier geht.
Die DSP-Page hast du, wenn überhaupt, auch nur überflogen ....
Weißes Rauschen braucht man zu Audio-Zwecken so gut wie nie. Ich hatte weiter oben schon was dazu geschrieben.

Zitat:
Weder hier im Thread noch auf der verlinkten Seite gibt es eine procedure GetNoiseVal!
Oooh, sorry tausendmal. Muss richtig heißen: GetPinkNoiseVal. Die Hauptroutine meiner Klasse.
Farbe vergessen ... Hast du dann auch meinen Source nicht (richtig) gelesen (und verstanden) - sonst wäre dir das sicherlich aufgefallen.

Zitat:
Wenn du weißes Rauschen hast, warum filterst du nicht einfach mit einen Tiefpassfilter?
Mach ich gern und sofort - wenn du mir ein taugliches 3dB/Oktav-Filter zeigst, das einfach aufzubauen und dazu noch so linear wie möglich ist ... Oder den (einfachen) mathematischen Algorithmus dazu.
Ein einfacher RC-Tiefpaß hat schon 6dB ! Leider zu viel.

Zitat:
Für solche Signalverarbeitungssachen im Hobbybereich würde ich eh MATLAB bzw. Scilab nehmen.
Das ist Simulations-Software ! Was nutzt mir die, wenn ich nicht den mathematischen Background habe und ich so nicht die Umsetzung von Hardware-Schaltungen auf Software-Code gebraten bekomme ...
Was glaubst du, warum sich etliche Mathematiker die Birne zerbrechen, um ein entsprechend möglichst lineares rosa Rauschen allein durch ein (in Software umsetzbares) Rechenwerk zu Stande zu bekommen ?
Die nutzen natürlich MatLab & Co, um ihre geistigen Ergüsse zu prüfen.
Siehe z.B. besagte DSP-Seite ganz unten - da steht es groß und breit mit Diagramm. Rechnerisch sehr schön linear.

Zitat:
Sonst muss man sich doch mit soviel Kleinkram rumschlagen.
Ich weiß ja nicht, wie das bei dir ist: Wenn du eine Idee hast und nicht gleich auf Anhieb im WWW die passenden Lösungen mundgerecht präsentiert bekommst .... schmeißt du dann gleich alles hin und verwirfst deine (gute) Idee ?
Entwicklern - Hard wie Soft - wurde seit je her nix vor den Arsch getragen. Handarbeit, Nachdenken, Recherche und Ausbrobieren/Messen ist angesagt. OK - das ist heute dank dem WEB einfacher als vor 20 Jahren und mehr. Dennoch bleibt nicht nur ein wenig eigener Geistesblitz erforderlich !
Und wenn es denn nur durch ggf. uneffektive, sukzessive Approximation (ich finde den Ausdruck einfach geil) geschieht.

Geändert von TERWI (16. Mai 2014 um 19:37 Uhr)
  Mit Zitat antworten Zitat
mse1

Registriert seit: 21. Nov 2007
115 Beiträge
 
#3

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 18. Mai 2014, 17:04
Die MSEgui Signalverarbeitungs-Toolbox hat auch einen Rauschgenerator:
https://gitorious.org/mseide-msegui/...sesignoise.pas
Ein Demo mit Pulseaudio Ausgang ist hier:
https://gitorious.org/mseuniverse/ms...ignal/noisegen
Das Demo braucht die MSEide+MSEgui git master Version:
https://gitorious.org/mseide-msegui/mseide-msegui
Edit:
Das sieht eher nach brown noise aus, da ist wohl noch etwas Nacharbeit notwendig...
Angehängte Grafiken
Dateityp: png noisegen.png (29,0 KB, 23x aufgerufen)
Martin Schreiber

Geändert von mse1 (18. Mai 2014 um 19:42 Uhr)
  Mit Zitat antworten Zitat
mse1

Registriert seit: 21. Nov 2007
115 Beiträge
 
#4

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 23. Mai 2014, 09:22
MSEide+MSEgui git master 9b2b47fd benutzt nun den Filter von Paul Kellet für pink:
Code:
procedure tsignoise.sighandlerpink1(const ainfo: psighandlerinfoty);
var
 white: double;
begin
 fz:= 36969 * (fz and $ffff) + (fz shr 16); //mwc by George Marsaglia
 fw:= 18000 * (fw and $ffff) + (fw shr 16);
 white:= (integer((fz shl 16) + fw)/fscale);
 
 fb0:= 0.99886 * fb0 + white * 0.0555179;  //filter by Paul Kellet
 fb1:= 0.99332 * fb1 + white * 0.0750759;
 fb2:= 0.96900 * fb2 + white * 0.1538520;
 fb3:= 0.86650 * fb3 + white * 0.3104856;
 fb4:= 0.55000 * fb4 + white * 0.5329522;
 fb5:= -0.7616 * fb5 - white * 0.0168980;
 foutputpo^:= (fb0+fb1+fb2+fb3+fb4+fb5+fb6+white*0.5362) *
                             famplitudepo^.value + foffsetpo^.value;
 fb6:= white * 0.115926;
end;
Angehängte Grafiken
Dateityp: png pinknoise.png (28,6 KB, 14x aufgerufen)
Martin Schreiber
  Mit Zitat antworten Zitat
mse1

Registriert seit: 21. Nov 2007
115 Beiträge
 
#5

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 23. Mai 2014, 12:37
Hier der Mittelwert von 11449 FFT's mit jeweils 65536 Punkten.
Angehängte Grafiken
Dateityp: png pinknoise1.png (5,0 KB, 15x aufgerufen)
Martin Schreiber
  Mit Zitat antworten Zitat
guschtel

Registriert seit: 26. Dez 2020
1 Beiträge
 
#6

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 31. Dez 2020, 01:08
hi, hast du nochmal was dran gemacht? Ansonsten großes Lob! Grüße Bernd
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.784 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: BASS.DLL - Rauschen erzeugen / create noise

  Alt 31. Dez 2020, 06:23
hi, hast du nochmal was dran gemacht? Ansonsten großes Lob! Grüße Bernd
siehe hier: https://lists.freepascal.org/piperma...er/055334.html

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz