GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-30 07:59:42 +01:00
Code Issues Projects Releases Wiki Activity

Plugins/Battleship: fix some bugs

Browse Source
This commit is contained in:
Pragmatic Software 2021-07-03 11:19:09 -07:00
parent e0eb8b1a75
commit be2a4b41e9
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Plugins/Battleship.pm
View File

@ -75,6 +75,9 @@ sub initialize {
# player limit per game # player limit per game
$self->{MAX_PLAYERS} = 5; $self->{MAX_PLAYERS} = 5;
# max missed moves before player is ejected from game
$self->{MAX_MISSED_MOVES} = 5;
# types of board tiles # types of board tiles
$self->{TYPE_OCEAN} = 0; $self->{TYPE_OCEAN} = 0;
$self->{TYPE_WHIRLPOOL} = 1; $self->{TYPE_WHIRLPOOL} = 1;
@ -902,7 +905,7 @@ sub perform_attack {
if ($sections_left > 0) { if ($sections_left > 0) {
$self->send_message($self->{channel}, "$color{red}$player->{name} has sunk $victim->{name}'s $ship_names{$length}! $victim->{name} has $ships_left $ships and $sections_left $sections remaining!$color{reset}"); $self->send_message($self->{channel}, "$color{red}$player->{name} has sunk $victim->{name}'s $ship_names{$length}! $victim->{name} has $ships_left $ships and $sections_left $sections remaining!$color{reset}");
} else { } else {
$self->send_message($self->{channel}, "$color{red}$player->{name} has sunk ${victim}->{name}'s final $ship_names{$length}! $victim->{name} is out of the game!$color{reset}"); $self->send_message($self->{channel}, "$color{red}$player->{name} has sunk $victim->{name}'s final $ship_names{$length}! $victim->{name} is out of the game!$color{reset}");
$victim->{lost} = 1; $victim->{lost} = 1;
# check if there is only one player still standing # check if there is only one player still standing
@ -1148,7 +1151,7 @@ sub run_one_state {
next if $player->{removed} or $player->{lost}; next if $player->{removed} or $player->{lost};
# remove player if they have missed 3 inputs # remove player if they have missed 3 inputs
if ($player->{missedinputs} >= 3) { if ($player->{missedinputs} >= $self->{MAX_MISSED_MOVES}) {
$self->send_message( $self->send_message(
$self->{channel}, $self->{channel},
"$color{red}$player->{name} has missed too many moves and has been ejected from the game!$color{reset}" "$color{red}$player->{name} has missed too many moves and has been ejected from the game!$color{reset}"
@ -1381,8 +1384,9 @@ sub state_move {
my $players = 0; my $players = 0;
foreach my $player (@{$state->{players}}) { foreach my $player (@{$state->{players}}) {
next if $player->{removed} or $player->{lost};
$moved++ if $player->{location}; $moved++ if $player->{location};
$players++ if not $player->{removed}; $players++;
} }
if ($moved == $players) { if ($moved == $players) {
@ -1400,7 +1404,7 @@ sub state_move {
my @missed; my @missed;
foreach my $player (@{$state->{players}}) { foreach my $player (@{$state->{players}}) {
next if $player->{removed}; next if $player->{removed} or $player->{lost};
if (not $player->{location}) { if (not $player->{location}) {
$player->{missedinputs}++; $player->{missedinputs}++;
@ -1422,7 +1426,7 @@ sub state_move {
my @pending; my @pending;
foreach my $player (@{$state->{players}}) { foreach my $player (@{$state->{players}}) {
next if $player->{removed}; next if $player->{removed} or $player->{lost};
if (not $player->{location}) { if (not $player->{location}) {
push @pending, $player->{name}; push @pending, $player->{name};