X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtVars.pm;h=a5f6bc433b677fc3ac126e105fe56c578e97eb3c;hb=d6e7a9bbbb50b7feccab14ec690b3ccf690bc385;hp=52477433c531adefb96c416bc8de6f30498c6c9e;hpb=1cf4bd14be226274d5deb05da8480ab91a5dac52;p=spider.git diff --git a/perl/DXProtVars.pm b/perl/DXProtVars.pm index 52477433..a5f6bc43 100644 --- a/perl/DXProtVars.pm +++ b/perl/DXProtVars.pm @@ -11,28 +11,40 @@ package DXProt; -# maximum number of users in a PC16 message -$pc16_max_users = 5; - -# maximum number of nodes in a PC19 message -$pc19_max_nodes = 5; - # the interval between pc50s (in seconds) $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; +$def_hopcount = 30; # some variable hop counts based on message type %hopcount = ( 11 => 25, - 16 => 10, - 17 => 10, - 19 => 10, - 21 => 10, + 16 => 25, + 17 => 25, + 19 => 25, + 21 => 25, +); + +# 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;