X-Git-Url: https://jxself.org/git/?p=wumpus.git;a=blobdiff_plain;f=wumpus.c;h=8b3cc47354eab835e2b27ea8fcb2a9ebaceb4d21;hp=21e56e8eb82c9791cd93a06cdc69031318fb7d60;hb=d9bfd34e9699154385a9f98939780d090ac62528;hpb=a5b73e164f8dcf8c012e83b2e33a79ff66de5405

diff --git a/wumpus.c b/wumpus.c
index 21e56e8..8b3cc47 100644
--- a/wumpus.c
+++ b/wumpus.c
@@ -1,7 +1,7 @@
 /*
  * wumpus.c --- a faithful translation of the classic "Hunt The Wumpus" game.
  *
- * Translator: Eric S. Raymond <eric@snark.thyrsus.com>
+ * Translator: Eric S. Raymond <esr@snark.thyrsus.com>
  * Version: $Id$
  *
  * This was the state of the art 20 years ago, in 1972.  We've come a long
@@ -342,9 +342,7 @@ badrange:
 
 		/* this simulates logic at 895 in the BASIC code */
 		check_shot();
-		if (finished == NOT)
-		    goto ammo;
-		else
+		if (finished != NOT)
 		    return;
 	    }
 
@@ -511,7 +509,8 @@ goodmove:
 	/* 1145 RETURN							*/
 	/* 1150 END							*/
 	(void) puts("ZAP--SUPER BAT SNATCH! ELSEWHEREVILLE FOR YOU!");
-	loc[YOU] = FNA();
+	scratchloc = loc[YOU] = FNA();
+	goto goodmove;
     }
 }
 
@@ -521,10 +520,10 @@ char *argv[];
 {
     int	c;
 
-    if (strcmp(argv[1], "-s") == 0)
-	srand(atol(argv[2]));
+    if (argc >= 2 && strcmp(argv[1], "-s") == 0)
+	srand(atoi(argv[2]));
     else
-	srand(time((long *) 0));
+	srand((int)time((long *) 0));
 
     /* 15 PRINT "INSTRUCTIONS (Y-N)";					*/
     /* 20 INPUT I$							*/