first commit
This commit is contained in:
Executable
+56
@@ -0,0 +1,56 @@
|
||||
# 200 Raptor start and stop
|
||||
if {$cmd == "200"} {
|
||||
puts "Executing external command"
|
||||
exec nohup /opt/RRFRaptor/RRFRaptor.sh &
|
||||
return 1
|
||||
}
|
||||
|
||||
# 201 Raptor quick scan
|
||||
if {$cmd == "201"} {
|
||||
puts "Executing external command"
|
||||
exec /opt/RRFRaptor/RRFRaptor.sh scan
|
||||
return 1
|
||||
}
|
||||
|
||||
# 202 Raptor sound
|
||||
if {$cmd == "202"} {
|
||||
if { [file exists /tmp/RRFRaptor_status.tcl] } {
|
||||
source "/tmp/RRFRaptor_status.tcl"
|
||||
if {$RRFRaptor == "ON"} {
|
||||
playSilence 1500
|
||||
playFile /opt/RRFRaptor/sounds/active.wav
|
||||
} else {
|
||||
playSilence 1500
|
||||
playFile /opt/RRFRaptor/sounds/desactive.wav
|
||||
}
|
||||
}
|
||||
return 1
|
||||
}
|
||||
|
||||
# 203 Raptor quick scan sound
|
||||
if {$cmd == "203"} {
|
||||
if { [file exists /tmp/RRFRaptor_scan.tcl] } {
|
||||
source "/tmp/RRFRaptor_scan.tcl"
|
||||
if {$RRFRaptor == "None"} {
|
||||
playSilence 1500
|
||||
playFile /opt/RRFRaptor/sounds/qso_ko.wav
|
||||
} else {
|
||||
playSilence 1500
|
||||
playFile /opt/RRFRaptor/sounds/qso_ok.wav
|
||||
if {$RRFRaptor == "RRF"} {
|
||||
playFile /etc/spotnik/Srrf.wav
|
||||
} elseif {$RRFRaptor == "FON"} {
|
||||
playFile /etc/spotnik/Sfon.wav
|
||||
} elseif {$RRFRaptor == "TECHNIQUE"} {
|
||||
playFile /etc/spotnik/Stec.wav
|
||||
} elseif {$RRFRaptor == "INTERNATIONAL"} {
|
||||
playFile /etc/spotnik/Sint.wav
|
||||
} elseif {$RRFRaptor == "LOCAL"} {
|
||||
playFile /etc/spotnik/Sloc.wav
|
||||
} elseif {$RRFRaptor == "BAVARDAGE"} {
|
||||
playFile /etc/spotnik/Sbav.wav
|
||||
}
|
||||
}
|
||||
}
|
||||
return 1
|
||||
}
|
||||
Reference in New Issue
Block a user