hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-22 00:07:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

add country names to the end of the Ve7cc dx spots string

Browse Source
This commit is contained in:
minima 2004-12-17 12:25:09 +00:00
parent 080b937d5e
commit d7c0e5450b
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
perl/Prefix.pm
View File

@ -481,7 +481,7 @@ sub cty_data
my @dxcc = extract($call);
if (@dxcc) {
return ($dxcc[1]->dxcc, $dxcc[1]->itu, $dxcc[1]->cq, ($dxcc[1]->state||''), ($dxcc[1]->city||''));
return ($dxcc[1]->dxcc, $dxcc[1]->itu, $dxcc[1]->cq, ($dxcc[1]->state||''), ($dxcc[1]->city||''), ($dxcc[1]->name||''));
}
return (666,0,0,'','');
}

5
perl/VE7CC.pm
View File

@ -34,7 +34,10 @@ sub dx_spot
# remove interface callsign;
pop;
return sprintf("CC11^%0.1f^%s^", $freq, $spotted) . join('^', cldate($t), ztime($t), @_);
my $spotted_cc = (Prefix::cty_data($spotted))[5];
my $spotter_cc = (Prefix::cty_data($_[1]))[5];
return sprintf("CC11^%0.1f^%s^", $freq, $spotted) . join('^', cldate($t), ztime($t), @_, $spotter_cc, $spotted_cc);
}
1;