Courtesy tones / rogerpiep

    Hallo zusammen,

    wenn ich mit das mit meinem laienhaftem Verständnis richtig verstanden habe, dann werden die zu sendende Roger Beep Töne in ihrer Höhe in der Logic.tcl definiert und sobalt das Event eintritt, abgespielt.

    Sollte ich mich darin irren, dann bitte direkt korrigieren.

    Meine Frage wäre allerding, wenn ich eine von den hier Beep-Files anstelle der o. g. Töne abspielen will, wie mache ich das?

    Quote


    wenn ich mit das mit meinem laienhaftem Verständnis richtig verstanden habe, dann werden die zu sendende Roger Beep Töne in ihrer Höhe in der Logic.tcl definiert und sobalt das Event eintritt, abgespielt.


    genau, mit Hilfe des Befehls playTone, Bsp:

    Code
    playTone 500 80 100;

    erzeugt einen Ton von 500 Hertz mit einer Amplitude von 80 und der Länge von 10ms.

    Quote

    wenn ich eine von den hier Beep-Files anstelle der o. g. Töne abspielen will, wie mache ich das?

    dann statt playTone einfach

    Code
    playMsg "Core" "dateiname";

    wobei "Core" der Namespace-Bezeichnung entspricht, also im Prinzip dem Verzeichnis /usr/share/svxlink/events.d/Core
    und "dateiname" Deiner wav-Datei. Die Erweiterung weglassen, weil SvxLink automatisch nach .wav oder .raw sucht, es geht also auch eine unkomprimierte raw-Datei.

    vy 73's de Adi, DL1HRC

    Hallo Adi,

    also wenn ich das richtig verstehe, dann müßte das folgendermaßen aussehen:

    playMsg "/usr/share/svxlink/events.d/beep;

    wobei beep nun für eine Datei namens beep.wav steht.

    Falls das nicht richtig ist, dann gib mir bitte mal die korrekte Syntax vor.

    Danke vorab.

    Moin moin,

    nee, nicht ganz:

    Code
    playMsg "Core" "beep";

    das file beep.wav packst Du in das Verzeichnis /usr/share/svxlink/sounds/de_DE/Core

    wenn Du eine deutsche Umgebung (also de_DE) konfiguriert hast. Du mußt nicht den ganzen Pfad angeben, weil der intern schon nach /usr/share/svxlink/sounds/LÄNDERCODE eingestellt ist, soweit ok?

    vy 73's de Adi, DL1HRC

    Hallo Adi,

    ja, es scheint zu gehen. zumindest bekomme ich das im Moment im Protokoll angezeigt, dass die Datei abgespielt wird.

    Nur, dass im Protokoll gemeckert wird, dass nur 8KHz Dateien verarbeitet werden können. Die, die ich vorgesehen hatte ist wohl nicht geeignet.
    Werde das aber noch weiter testen, wenn mein anderes Problem gelöst ist. dazu frage ich aber in einem neuen Thema.

    Aber Danke zunächst für die Hilfe.

    Hallo zusammen,

    es wird ein Dah-Di-Dah gewünscht und ich habe mir gedacht, fürge doch einfach zwei weitere Töne hinzu, in dem ich in

    /user/share/svxlink/Events.d/Logic.tcl

    die folgenden Zeilen einfüge

    proc send rgr_sound (hier fehlen die geschweiften klammern)
    variable SQL_rx_id;

    playTone 440 1500 100;
    PlaySilence 200;
    playTone 440 500 100;
    PlaySilence 200;
    playTone 440 1500 100;
    PlaySilence 200;

    Als dies nicht funktionierte, habe ich begonnen die Werte des Originaleintrags zu verändern. Und trotz jeweiligen Neustarts, hat sich beim Ändern des Wertes 400, welcher ja für die Tonhöhe zuständig ist, nichts mehr daran geändert

    Nun die Frage, kann man durch Einfügen mehrerer Zeilen eine Tonfolge erzeugen und wenn ja, wie geht es richtig?

    Und weiterhin, warum ändert sich nicht, wenn ich die Tonhöhe um z. B 1000 Hz erhöhe?

    Hallo,

    Quote

    /user/share/svxlink/Events.d/Logic.tcl

    bitte das locale-Prinzip beachten, sonst sind die Änderungen beim nächsten make install verschwunden!

    Ein "k" zu generieren geht auch einfacher:
    CW::play "K";

    Bitte in jedem Fall Groß- und Kleinschreibung beachten: Du hast eingetragen

    Code
    PlaySilence 200;

    und Events.d ist normalerweise auch events.d, zumindest im Original.
    Es muß aber richtig heißen

    Code
    playSilence 200;

    (das "P" am Anfang ist ein kleines "p"). Das sollte eigentlich auch als Fehlermeldung im log erscheinen. Man kann das natürlich alles ändern aber mit den entsprechenden Folgen...
    Falls es das nicht war, hast Du eventuell irgendwo eine Proczedur, die die original-Prozedur send_rgr_sound {} überschreibt?

    73's de Adi, DL1HRC

    Hallo Adi,

    danke für den Hinweis. Bei den ganzen Versuchen hatte ich vergessen, dass ich eine eigene Datei für den Roger Beep eingestellt habe. Da brauch ich mich für die ausbleibende Wirkung von Änderungen ja auch nicht zu wundern ;)

    Die Schreibfehler rühren daher, dass ich aus dem Putty-Fenster nicht mit Markieren-Kopieren-Einfügen arbeiten kann und es daher abgetippt habe. Musste ja inzwischen lernen, dass es auf die Schreibweise maßgeblich ankommt.

    Nach dieser Erkenntnis habe ich zunächst das mit dem CW probiert, eben auch in der von mir o. g. eigens eingestellten tcl Datei. Der Sender tastet, aber es kommt kein Ton mehr raus. Und das, obwohl ich die Schreibweise beachtet habe :)

    Habe die Zeile playTone............

    gegen die von Dir vorgeschlagene CW Zeile getauscht.

    Sofern das nicht richtig war, bräuchte ich da noch mal den Hinweis.

    Hi,

    hm, mach mal bitte alles wieder auf original (playTone wieder rein), damit wir sicher sind, dass es funktioniert, also einzelner beep sollte ausgegeben werden.
    Dann Änderungen/Hinzufügen bitte immer in den eigenen TCL's.
    Gibt das Log eventuell Fehlermeldungen aus wenn Du das CW::play "K"; eingetragen hast?
    Schreib mal nach dem CW::play "K"; noch

    puts "Funktion ausgeführt";
    Das sollte dann im Log erscheinen, wenn es funktioniert.

    Gruß Adi, DL1HRC

    Hallo Adi,

    Habe alle Zeilen, die mit playTone und playSilence beginnen auskommentiert und die Zeilen

    CW::Play"K";
    puts "Funktion ausgeführt"

    eingegeben. Beim Starten erscheint kein Fehler. Sofern es ein Hinweis ist, beim Editieren wird das K im MC direkt grün angezeigt.
    Im Betrieb dann:

    Rx1: The squelch is OPEN (68.6594)
    Rx1: The squelch is CLOSED (70.0909)
    *** ERROR: Unable to handle event: SimplexLogic::squelch_open 0 0 in logic Simpl exLogic (invalid command name "CW::play"K"")

    Der TX wird nicht mehr getastet, es passiert nichts.

    Allerdings hatte ich Erfolg mit der Methode, die ich zuerst angefragt habe. Durch einfügen zwei weitere Zeilen mit einer geänderten Tondauer ließ sich nun ein "K" generieren.

    Es ist dennoch interessant, mit der anderen Lösung. Könnte ja an anderer Stelle mal von Nöten sein :)

    "K" ist ein Parameter, d.h. zwischen CW::play und "K" muß ein Leerzeichen vorhanden sein, so wie von mir im vorherigen Thread geschrieben.

    Code
    CW::play "K";

    73 Adi, DL1HRC

    Hallo Adi,

    mein Mitstreiter pflegt in solchen Dingen immer zu sagen: Kaum macht man es richtig, klappt es auch schon.

    Klappt hervortrabend. Vielleicht noch eine abschließende Frage zu dem "Problemchen", kann man da auch Tonhöhe und/oder die LAutstärke verändern?
    Denn das geht ja sehr gut durch dieses "playTone" mit seinen Parametern.

    Quote

    Vielleicht noch eine abschließende Frage zu dem "Problemchen", kann man da auch Tonhöhe und/oder die LAutstärke verändern?

    ja, geht, zwei Möglichkeiten:
    1) vor dem CW::play "K"; das Folgende einfügen:

    Code
    setPitch 666;setAmplitude 666;setCpm 666;

    2) oder nach dem locale-Prinzip eine Datei cw_defaults.tcl erstellen mit folgendem Inhalt:

    Code
    namespace eval CW {
 setPitch 666;
 setAmplitude 666;
 setCpm 666;
}

    wobei für 666 natürlich ein vernünftiger Wert eingesetzt werden sollte :D

    73's de Adi, DL1HRC

    Hallo Adi,

    es kommt folgender Fehler:

    *** ERROR: Unable to handle event: SimplexLogic::squelch_open 0 0 in logic Simpl exLogic (invalid command name "setPitch")

    Habe alle Zeilen nacheinander und einzeln ausprobiert. Bei jeder kommt die jeweilige Fehlermeldung, dass der Befehl nicht bekannt sei.

    und so?

    Code
    CW::setPitch 666;
CW::setAmplitude 666;
CW::setCpm 666;

    "666" bitte durch sinnvolle Werte ersetzen.

    73's de Adi, DL1HRC

    Hallo Adi,

    jo, nu geht's. Denke jetzt sind auch alle Spielarten erörtert. Per Audiodatei, Tongenerierung direkt incl. Parameter, sowie CW incl. Parameter.

    Danke dafür.

    Es wäre jetzt natürlich noch toll, wenn die TCL-Routine auch in der Simplex Logic so funktionieren würde, dass netzseitige Teilnehmer und hfseitige einen unterschiedlichen Ton erzeugen auf HF. Es funktioniert ja nur immer dann, wenn hfseitig eine Station aufgehört hat zu senden. Dann wärs perfekt. Aber das Thema wurde ja schon mal behandelt.

    Im Moment kann man die noch an ihrer Qualität der Übertragung auseinanderhalten :lol: Aber da sind wir auch immer noch dran .

    Aber ist schon toll, was alles so geht :)

    Will Dich aber auch nicht über Gebühr in Stress versetzen :)

    Quote

    Will Dich aber auch nicht über Gebühr in Stress versetzen :)

    Puuuh, noch mal Schwein gehabt, ich packe die Betablocker wieder weg :lol: