[pskmail] Re: Updated server QSY handling
- From: Per Crusefalk <per@xxxxxxxxxxxx>
- To: pskmail@xxxxxxxxxxxxx
- Date: Tue, 23 Sep 2008 22:35:03 +0200
Doh, wrong file. This one is running on my server.
73
On tis, 2008-09-23 at 22:19 +0200, Per Crusefalk wrote:
> Hi,
>
> As I am about to exercise the QSY method in the server I realized that
> it only supports changing to frequencies and not memory channels.
> As you may be aware I use a memory to handle split mode and listen
> through the 500 Hz cw filter, so I need to be able to write the QSY as
> "M10" instead of for instance 10148. So, I changed the server so that I
> can use a memory channel here.
>
> 73 de Per
>
>
>
Index: rflinkserver.pl
===================================================================
--- rflinkserver.pl (revision 281)
+++ rflinkserver.pl (revision 278)
@@ -320,20 +320,10 @@
close (CMD);
} elsif (m/~QSY!/) {
####### switch frequency #################################
- if ($traffic_qrg) {
- # Check for memory channel or frequency
- if (index($traffic_qrg,"M") ne 0) {
# frequency
- sleep 10;
- $dummy = `rigctl -m
$rigtype -r $rigdevice -s $rigrate "F" $traffic_qrg`;
- print "QSY to
$traffic_qrg!\n";
- }
- else {
# memory
- my $memory_channel=0;
- sleep 10;
- $memory_channel =
substr($traffic_qrg,1); # get only memory number
- $dummy = `rigctl -m
$rigtype -r $rigdevice -s $rigrate "E" $memory_channel`;
- print "QSY to memory
channel $memory_channel!\n";
- }
+ if ($traffic_qrg) {
+ sleep 10;
+ $dummy = `rigctl -m $rigtype -r
$rigdevice -s $rigrate "F" $traffic_qrg`;
+ print "QSY to $traffic_qrg!\n"
}
} elsif (m/~STATUS?/) {
####### get server status #################################
Other related posts:
