Add an "Adventure II" Makefile; allow compiling with gfortran.

As I'm using OSX as my primary development environment these days, and
fort77/f77 don't seem to have made it to Homebrew yet, it's suddenly
useful to me to be able to compile these Fortran programs with GNU
gfortran. I've edited all three "original Fortran" Makefiles to run
"which f77; which gfortran" and pick the most f77-like option (or fail
if you have no Fortran compiler on your system).

On Ubuntu Linux, you'll want to run
    sudo apt-get install fort77
On OSX, the appropriate command is
    brew install gfortran

Unfortunately, GNU gfortran isn't as faithful to these old dialects as
the f77 compiler was...

  - In LUPI0440/, I needed to add "EXTERNAL RAN" in two places to prevent
gfortran from mistakenly using its built-in RAN function instead of the
one defined in the program itself.

  - In PLAT0550/, I needed to replace the syntax "INTEGER x*4" with
"INTEGER*4 x", since gfortran doesn't accept the former syntax at all.

However, these changes are small enough, and provide enough of a benefit
(Adventure II is now playable on OSX!) that I'm sure they're worthwhile.

Author: Quuxplusone

LUPI0440/Makefile

@@ -0,0 +1,13 @@
+ifneq (, $(shell which f77))
+FORTRAN:=f77
+else ifneq (, $(shell which gfortran))
+FORTRAN:=gfortran
+else
+$(error I couldn't find any way to compile Fortran on your system!)
+endif
+
+adv440: advII.dat advII.f
+	$(FORTRAN) advII.f -o adv440
+
+clean:
+	rm -f adv440

LUPI0440/advII.f

@@ -143,6 +143,7 @@
 C  DEMO IS TRUE IF THIS IS A PRIME-TIME DEMONSTRATION GAME
 C  YEA IS RANDOM YES/NO REPLY
 C
+      EXTERNAL RAN
       LOGICAL TOTING,HERE,AT,BITSET,DARK,WZDARK,LMWARN,CLOSNG,PANIC,
      1CLOSED,GAVEUP,SCORNG,DEMO,YEA,FORCED,PCT
       DATA LINSIZ/68000/,TRVSIZ/1000/,LOCSIZ/200/,SETUP/0/,
@@ -2604,6 +2605,7 @@ SUBROUTINE DROP(IOBJ,WHERE)
       RETURN
       END
       INTEGER FUNCTION DISTNT(FROM,NO)
+      EXTERNAL RAN
       COMMON/TRVCOM/TK,TRAVEL,KEY,COND
       INTEGER TK(20),KEY(200),TRAVEL(1000,3),COND(200),FROM,RAN
 1     DISTNT=FROM

MCDO0551/Makefile

@@ -1,9 +1,16 @@
+ifneq (, $(shell which f77))
+FORTRAN:=f77
+else ifneq (, $(shell which gfortran))
+FORTRAN:=gfortran -std=legacy
+else
+$(error I couldn't find any way to compile Fortran on your system!)
+endif
 
 adv551: ADVTXT aamain.f asubs.f
-	f77 aamain.f asubs.f -o adv551
+	$(FORTRAN) aamain.f asubs.f -o adv551
 
 asetup: asetup.f asubs.f
-	f77 asetup.f asubs.f -o asetup
+	$(FORTRAN) asetup.f asubs.f -o asetup
 
 ADVTXT: asetup ADVDAT
 	./asetup

PLAT0550/Makefile

@@ -1,10 +1,17 @@
+ifneq (, $(shell which f77))
+FORTRAN:=f77
+else ifneq (, $(shell which gfortran))
+FORTRAN:=gfortran -std=legacy
+else
+$(error I couldn't find any way to compile Fortran on your system!)
+endif
 
 adv550: munge ADVENTURE.ACODE
 	./munge
-	f77 exec.f -o adv550
+	$(FORTRAN) exec.f -o adv550
 
 munge: munge.f munge.i
-	f77 munge.f -o munge
+	$(FORTRAN) munge.f -o munge
 
 clean:
 	rm -f adv550 ADVINIT[1-4].DAT munge

PLAT0550/munge.f

@@ -10,7 +10,8 @@
       INCLUDE 'munge.i'
 C
       INTEGER*2 PRIMARY(0:TABLESIZE)
-      INTEGER KEYSBF*4, NUMKEYS*2
+      INTEGER*4 KEYSBF
+      INTEGER*2 NUMKEYS
       INTEGER*4 EKEYSBF(1)
       EQUIVALENCE (KEYSBF, EKEYSBF)
       COMMON /KEYSCM/ KEYSBF(2, KEYSBFSIZE), NUMKEYS
@@ -382,8 +383,8 @@
 C*
       SUBROUTINE BUFWRITE(LEN)
       INCLUDE 'munge.i'
-      INTEGER KEYSBF*4, BUFPOS*4, NUMKEYS*2
-      INTEGER*2 WORDS
+      INTEGER*4 KEYSBF, BUFPOS
+      INTEGER*2 NUMKEYS, WORDS
       SAVE BUFPOS
       COMMON /KEYSCM/ KEYSBF(2, KEYSBFSIZE), NUMKEYS
       DATA BUFPOS/1/
@@ -778,7 +779,8 @@ SUBROUTINE KEYWRITE(IOKEY, Z_TEXT)
       CHARACTER*(*) Z_TEXT
       INTEGER*2 I_LINE(60), TEXTBUFFER(60)
       EQUIVALENCE (Z_OLINE,I_LINE)
-      INTEGER KEYSBF*4, NUMKEYS*2
+      INTEGER*4 KEYSBF
+      INTEGER*2 NUMKEYS
       INTEGER*4 KEYPOS, NEXTPOS
       REAL*4 RND
       COMMON /KEYSCM/ KEYSBF(2, KEYSBFSIZE), NUMKEYS