gitea-mirror/basic-computer-games
1
0
Fork 0
mirror of https://github.com/coding-horror/basic-computer-games.git synced 2025-12-26 12:51:29 -08:00
Code Issues Packages Projects Releases Wiki Activity

MAINT: Apply pre-commit

Browse Source 
Remove byte-order-marker pre-commit check as there would be
many adjustments necessary
This commit is contained in:
Martin Thoma
2022-03-05 09:29:23 +01:00
parent f5e33ae38f
commit e64fb6795c
536 changed files with 6267 additions and 5556 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
26_Chomp/perl/chomp.pl
View File

@@ -13,7 +13,7 @@ sub main {
}
sub game_play {
# the initial game set up
&print_intro;
my ($players,$rows,$cols) = &get_user_info;
@@ -24,7 +24,7 @@ sub game_play {
# continuous loop until the poison pill is swallowed
until ($game_over == 1) {
if ($player > ($players-1)) { #checks to make sure we're just looping thru valid players
if ($player > ($players-1)) { #checks to make sure we're just looping thru valid players
$player = 0;
}
$player++;
@@ -39,7 +39,7 @@ sub game_play {
&modify_gameboard($rows,$cols,$user_row,$user_col);
&print_gameboard($rows,$cols);
}
}
sub get_player_row_col {
@@ -136,7 +136,7 @@ sub modify_gameboard {
my ($rows,$cols,$user_row,$user_col) = @_;
foreach my $row ($user_row..($rows)) {
foreach my $col ($user_col..($cols)) {
$cookie[$row][$col]=" ";
$cookie[$row][$col]=" ";
}
}
}