der erste Beep kommt aus /usr/share/svxlink/event.d/Logic.tcl und das ist der eigentlichen Roger Beep.
In der Standardkonfig kommen aber noch zwei hinterher was unschön ist.
Diese kommen aus RepeaterLogicType.tcl:
proc repeater_down {reason} {
global mycall;
variable repeater_is_up;
variable Logic::prev_ident
variable Logic::min_time_between_ident
set repeater_is_up 0;
if {$reason == "SQL_FLAP_SUP"} {
playSilence 500;
playMsg "interference";
playSilence 500;
return;
}
set now [clock seconds];
if {$now-$prev_ident < $min_time_between_ident} {
# playTone 400 900 50
# playSilence 100
# playTone 360 900 50
# playSilence 500
return;
}
set prev_ident $now;
spellWord $mycall;
playMsg "repeater";
playSilence 250;
#playMsg "../extra-sounds" "shutdown";
}
Wie gezeigt muss:
# playTone 400 900 50 # playSilence 100 # playTone 360 900 50 # playSilence 500
auskommentiert werden, dann sind diese Zusatztöne weg.