-# Nexuiz specific parsing of some server messages
+# Xonotic specific parsing of some server messages
-sub nex_slotsstring()
+sub xon_slotsstring()
{
my $slotsstr = "";
if(defined $store{slots_max})
my $slots_s = ($slots == 1) ? '' : 's';
$slotsstr = " ($slots free slot$slots_s)";
my $s = $config{dp_server_from_wan} || $config{dp_server};
- $slotsstr .= "; join now: \002nexuiz +connect $s"
+ $slotsstr .= "; join now: \002xonotic +connect $s"
if $slots >= 1 and not $store{lms_blocked};
}
return $slotsstr;
}
else
{
- my $slotsstr = nex_slotsstring();
+ my $slotsstr = xon_slotsstring();
out irc => 0, "PRIVMSG $config{irc_channel} :\001ACTION can be joined again$slotsstr!\001";
}
}
return 0;
} ],
- # chat: Nexuiz server -> IRC channel
+ # chat: Xonotic server -> IRC channel
[ dp => q{\001(.*?)\^7: (.*)} => sub {
my ($nick, $message) = map { color_dp2irc $_ } @_;
out irc => 0, "PRIVMSG $config{irc_channel} :<$nick\017> $message";
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, nick set
+ # chat: Xonotic server -> IRC channel, nick set
[ dp => q{:join:(\d+):(\d+):([^:]*):(.*)} => sub {
my ($id, $slot, $ip, $nick) = @_;
$store{"playernickraw_byid_$id"} = $nick;
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, nick change/set
+ # chat: Xonotic server -> IRC channel, nick change/set
[ dp => q{:name:(\d+):(.*)} => sub {
my ($id, $nick) = @_;
$store{"playernickraw_byid_$id"} = $nick;
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, vote call
+ # chat: Xonotic server -> IRC channel, vote call
[ dp => q{:vote:vcall:(\d+):(.*)} => sub {
my ($id, $command) = @_;
$command = color_dp2irc $command;
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, vote stop
+ # chat: Xonotic server -> IRC channel, vote stop
[ dp => q{:vote:vstop:(\d+)} => sub {
my ($id) = @_;
my $oldnick = $id ? $store{"playernick_byid_$id"} : "(console)";
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, master login
+ # chat: Xonotic server -> IRC channel, master login
[ dp => q{:vote:vlogin:(\d+)} => sub {
my ($id) = @_;
my $oldnick = $id ? $store{"playernick_byid_$id"} : "(console)";
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, master do
+ # chat: Xonotic server -> IRC channel, master do
[ dp => q{:vote:vdo:(\d+):(.*)} => sub {
my ($id, $command) = @_;
$command = color_dp2irc $command;
return 0;
} ],
- # chat: Nexuiz server -> IRC channel, result
+ # chat: Xonotic server -> IRC channel, result
[ dp => q{:vote:v(yes|no|timeout):(\d+):(\d+):(\d+):(\d+):(-?\d+)} => sub {
my ($result, $yes, $no, $abstain, $not, $min) = @_;
my $spam = "$yes:$no" . (($min >= 0) ? " ($min needed)" : "") . ", $abstain didn't care, $not didn't vote";
return 0;
} ],
- # chat: IRC channel -> Nexuiz server
+ # chat: IRC channel -> Xonotic server
[ irc => q{:([^! ]*)![^ ]* (?i:PRIVMSG) (?i:(??{$config{irc_channel}})) :(?i:(??{$store{irc_nick}}))(?: |: ?|, ?)(.*)} => sub {
my ($nick, $message) = @_;
$nick = color_dpfix $nick;
$store{map} = $map;
$store{map_starttime} = time();
if ($config{irc_announce_mapchange} eq 'always' || ($config{irc_announce_mapchange} eq 'notempty' && $store{slots_active} > 0)) {
- my $slotsstr = nex_slotsstring();
+ my $slotsstr = xon_slotsstring();
out irc => 0, "PRIVMSG $config{irc_channel} :\00304" . $map . "\017 has begun$slotsstr";
}
delete $store{lms_blocked};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel (start)
+ # scores: Xonotic server -> IRC channel (start)
[ dp => q{:scores:(.*):(\d+)} => sub {
my ($map, $time) = @_;
$store{scores} = {};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel, legacy format
+ # scores: Xonotic server -> IRC channel, legacy format
[ dp => q{:player:(-?\d+):(\d+):(\d+):(\d+):(\d+):(.*)} => sub {
my ($frags, $deaths, $time, $team, $id, $name) = @_;
return if not exists $store{scores};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel (CTF), legacy format
+ # scores: Xonotic server -> IRC channel (CTF), legacy format
[ dp => q{:teamscores:(\d+:-?\d*(?::\d+:-?\d*)*)} => sub {
my ($teams) = @_;
return if not exists $store{scores};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel, new format
+ # scores: Xonotic server -> IRC channel, new format
[ dp => q{:player:see-labels:(-?\d+)[-0-9,]*:(\d+):(\d+):(\d+):(.*)} => sub {
my ($frags, $time, $team, $id, $name) = @_;
return if not exists $store{scores};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel (CTF), new format
+ # scores: Xonotic server -> IRC channel (CTF), new format
[ dp => q{:teamscores:see-labels:(-?\d+)[-0-9,]*:(\d+)} => sub {
my ($frags, $team) = @_;
return if not exists $store{scores};
return 0;
} ],
- # scores: Nexuiz server -> IRC channel
+ # scores: Xonotic server -> IRC channel
[ dp => q{:end} => sub {
return if not exists $store{scores};
my $s = $store{scores};