From 03a18e473ab64753262d9099569534edf64775f3 Mon Sep 17 00:00:00 2001 From: Pat Ludwig Date: Thu, 6 Jan 2022 22:09:04 -0600 Subject: [PATCH] Fix enemy fire Choice 3, both should apply both $double_fire and $hit_rate --- 12_Bombs_Away/perl/bombsaway.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/12_Bombs_Away/perl/bombsaway.pl b/12_Bombs_Away/perl/bombsaway.pl index dd4c4674..478d01a7 100644 --- a/12_Bombs_Away/perl/bombsaway.pl +++ b/12_Bombs_Away/perl/bombsaway.pl @@ -89,7 +89,7 @@ NOW THEN, '; our $double_fire = 0; my $response = choose( 'DOES THE ENEMY HAVE GUNS(1), MISSILES(2), OR BOTH(3)', 3); - if ($response < 2) { + if ($response != 2) { print q{WHAT'S THE PERCENT HIT RATE OF ENEMY GUNNERS (10 TO 50)? }; chomp (our $hit_rate = ); if ($hit_rate < 10) { @@ -98,7 +98,7 @@ NOW THEN, '; } say ''; } - else { + if ($response > 1) { $double_fire = 35; } return endgame();