Changes in clxd to allow 1x1 calls and a 1x4 call r3ares for example.
Changes are in pattern matrix and in length statement below.
sub c_call {
local($c) = @_;
@valid_patterns = ( 'CNC' # W1W
'CNCC', # W4ZR
'CNNC', # Y34K
'NCNC', # 9N1A
'CCNC', # NL7G
'CNCCC', # G4KHG
'CCNCC', # DF7RX
'CNNCC', # T47CW
'NCNCC', # 9Q5XX
'CNNCCC', # S56SAC
'CCNCCC', # DL6RAI
'NCNCCC' # 4S7AWG
'CNCCCC' # R3ARES
#I hope I forgot nobody
);
$valid = 1;
if ( length($c) < 3 ) { $valid = 0; }
#Changed from 4 to 3 to accomidate 1x1 calls - wu3v
if ( length($c) > 6 ) { $valid = 0; }
if ( $valid ) {
$c =~ tr/a-z/C/;
$c =~ tr/0-9/N/;