mirror of
git://scm.dxcluster.org/scm/spider
synced 2024-09-21 15:57:12 +00:00
51 lines
830 B
Perl
51 lines
830 B
Perl
#
|
|
#
|
|
# These are various values used by the AK1A protocol stack
|
|
#
|
|
# Change these at your peril (or if you know what you are doing)!
|
|
#
|
|
# Copyright (c) 1998 - Dirk Koopman G1TLH
|
|
#
|
|
# $Id$
|
|
#
|
|
|
|
package DXProt;
|
|
|
|
# the interval between pc50s (in seconds)
|
|
$pc50_interval = 14*60;
|
|
|
|
# the version of DX cluster (tm) software I am masquerading as
|
|
$myprot_version = 5300;
|
|
|
|
# default hopcount to use
|
|
$def_hopcount = 30;
|
|
|
|
# some variable hop counts based on message type
|
|
%hopcount = (
|
|
11 => 25,
|
|
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;
|