date and time created 90/10/11 11:35:49 by bostic

[unix-history] / usr / src / contrib / dungeon / rooms.h

C
C ROOMS
C
       COMMON /ROOMS/ RLNT,RDESC2,RDESC1(200),REXIT(200),
&               RACTIO(200),RVAL(200),RFLAG(200)
       INTEGER RRAND(200)
       EQUIVALENCE (RVAL,RRAND)
       INTEGER EQR(200,5)
       EQUIVALENCE (RDESC1, EQR)