X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtVars.pm;h=483f954e84723cb0277d7549e152712b025d04c0;hb=329702a31bd4a526077c713b12ede457276c79db;hp=52477433c531adefb96c416bc8de6f30498c6c9e;hpb=1cf4bd14be226274d5deb05da8480ab91a5dac52;p=spider.git diff --git a/perl/DXProtVars.pm b/perl/DXProtVars.pm index 52477433..483f954e 100644 --- a/perl/DXProtVars.pm +++ b/perl/DXProtVars.pm @@ -21,18 +21,36 @@ $pc19_max_nodes = 5; $pc50_interval = 14*60; # the version of DX cluster (tm) software I am masquerading as -$myprot_version = "5447"; +$myprot_version = 5300; # default hopcount to use $def_hopcount = 15; # some variable hop counts based on message type %hopcount = ( - 11 => 25, + 11 => 10, 16 => 10, 17 => 10, 19 => 10, 21 => 10, ); +# list of nodes we don't accept dx from +@nodx_node = ( +); + +# list of nodes we don't accept announces from +@noann_node = ( + +); + +# list of node we don't accept wwvs from +@nowwv_node = ( + +); + +# send out for/opernams for callsigns sending dx spots who haven't got qra locators +$send_opernam = 0; + +1;