Beep?

[himitsu]

Moin,

eigentlich kein großes Ding, aber dennoch bissl nervig.

Wie bringt man einen Piep aus dem PC raus?


Mein Problem sind wohl die Energiesparmodi der Geräte, oder irgendwie sowas.

* Bei kurzen Audiofiles (weniger als 2 Sekunden, geht der Anfang verloren.
* Je nachdem, wie lange vorher kein Ton war, fehlen eine halbe bis mehrere Sekunden, am Anfang.
* und oft gibt es ein hässliches Knacksen zu Beginn
* und öfters stockt es auch, innerhalb der ersten sekunden (kurze Aussätzer/Hänger) ... auch z.B. wenn über VLC die WAV abgespielt

* Letzteres merkt man nur bei längeren Audioausgaben ... Kurze Pieps fehlen halb oder gar komplett

Delphi-Quellcode:

// geht meistens (wenn Ton lang genug), aber ist hässlich
Windows.Beep(8000, 300);

// naja
Beep

// das Selbe
MessageBeep(MB_OK);  // oder MB_ICONINFORMATION

// wenn noch nicht offen, dann geht ohne Sleep dei erste Ausgabe immer ganz verloren
if not geladen then MediaPlayer1.Open;
Sleep(750);
MediaPlayer1.Play;

// ..
PlaySound('C:\irgendwo\beep-07a.wav', 0, SND_FILENAME or SND_ASYNC {or SND_NODEFAULT} or SND_NOWAIT);

for var i := 0 to 10 do begin Winapi.Windows.Beep(8000, 3); Sleep(30); end;
PlaySound('beep_07a', 0, SND_RESOURCE or SND_ASYNC or SND_NODEFAULT or SND_NOWAIT);

Mein Problem ist ... wir haben einen RFID-Reader, der macht Piep beim Scan, bzw. man kann ihn auch softwareseitig Piepsen und Blinken lassen.
Ich hab aber auch Scanner, die geben nur über eine winzige blaue LED eine Rückmeldung ... die aber unpraktisch öfters durch die Hand verdeckt wird ... nun hätte ich gern den PC piepsen lassen, aber bringt nicht viel, wenn der Ton nicht aus dem Monitor raus kommt. (HDMI)

[Rollo62]

Get es damit besser ?
Ist aber wahrscheinlich intern das Gleiche.

[johndoe049]

sysutils.beep

Ist asynchron und sollte eigentlich Bios/UEFI für einen beep verwenden. Geht über den internen PC Lautsprecher. Ggf. nachrüsten, wenn nichts zu hören ist. Ist nicht schön der irgendwie so 80er Jahre mässig.

Kurze Töne über HDMI ist regelmässig schlecht zu implementieren. Da hängt zuviel Zeitverzögerung über die einzelnen Verbindungsstellen und der Signalextraktion von HDMI mit drinnen.

Der interne Lautsprecher knackt bei eingen PCs auch nur noch sehr kurz.

Kannst aber auch eine blind audio stream erzeugen und dann zur gewünschten Zeit das Audiosignal anpassen. Ist aber etwas aufwändiger.

[Rollo62]

Eine Möglichkeit wäre vielleicht noch, mit Grijjy TextToSpeech
https://blog.grijjy.com/2017/01/09/c...ext-to-speech/

Delphi-Quellcode:

procedure TFormMain.FormCreate(Sender: TObject);
begin
  FTextToSpeech := TgoTextToSpeech.Create;
  FTextToSpeech.OnAvailable := TextToSpeechAvailable;
  FTextToSpeech.OnSpeechStarted := TextToSpeechStarted;
  FTextToSpeech.OnSpeechFinished := TextToSpeechFinished;
end;

...

procedure NeedABeep;
begin
  FTextToSpeech.Speak( 'Piep' );  // :-D
end;

[himitsu]

Wenn ich schnell genug mehrmals Piepse, dann kommen die letzten Piepse schon halbwegs ordentlich raus, aber der/die ersten und zwischendurch fehlt oft einfach Alles/Vieles.

Und wieviel vom ersten hörbaren Pieps fehlt das ist auch unterschiedlich.


Eine Verzögerung wäre nicht schlimm, wenn man wenigstens etwas hören könnte,
weil wenn man eh nur bei weniger als die Hälfte der Beeps etwas hört, dann kann man es auch ganz weglassen.



Der interne PC-Piepser ist ja oftmals garnicht mehr vorhanden.
Wir hatten mal einen Treiber für einen Lexware-Drucker, der hatte über den PC-Lautsprecher noch eine Sprachausgabe im Win 3.1 ... gut, während der Ausgabe war dafür der komplette PC lahmgelegt, weil mit höchter Priorität.

[johndoe049]

Zitat von himitsu:

Wenn ich schnell genug mehrmals Piepse, dann kommen die letzten Piepse schon halbwegs ordentlich raus, aber der/die ersten und zwischendurch fehlt oft einfach Alles/Vieles.

Und wieviel vom ersten hörbaren Pieps fehlt das ist auch unterschiedlich.


Eine Verzögerung wäre nicht schlimm, wenn man wenigstens etwas hören könnte,
weil wenn man eh nur bei weniger als die Hälfte der Beeps etwas hört, dann kann man es auch ganz weglassen.



Der interne PC-Piepser ist ja oftmals garnicht mehr vorhanden.
Wir hatten mal einen Treiber für einen Lexware-Drucker, der hatte über den PC-Lautsprecher noch eine Sprachausgabe im Win 3.1 ... gut, während der Ausgabe war dafür der komplette PC lahmgelegt, weil mit höchter Priorität.

Dann würde ich die Audioausgabe in einen eigenen Thread packen, der permanent ein Audiosignal als Steam mit Lautstärke 0 oder 1 und < 15 hz. ausgibt. Per Signal wird dann die Lautstärke und die hz. erhöht. Sollte eigentlich dann keine grossen Verzögerungen mehr ergeben, da du dann ja nur einen aktiven Audiostream veränderst und nicht erst neu startest.

Ich würde nur nicht unbedingt dann Hunde oder Katzen in der Nähe haben wollen.