[comp.sources.games] v12i016: larn - dungeon type adventure game, Patch1

billr@saab.CNA.TEK.COM (Bill Randle) (01/04/91)

Submitted-by: routley@tle.ENET.DEC.COM (Kevin Routley)
Posting-number: Volume 12, Issue 16
Archive-name: larn/Patch1
Patch-To: larn: Volume 11, Issue 84-95
Environment: Unix, VMS, MS-DOS, termcap



#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of shell archive."
# Contents:  patches01
# Wrapped by billr@saab on Thu Jan  3 12:14:35 1991
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'patches01' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'patches01'\"
else
echo shar: Extracting \"'patches01'\" \(5917 characters\)
sed "s/^X//" >'patches01' <<'END_OF_FILE'
X*** /dev/null	Thu Jan  3 12:00:01 1991
X--- patchlevel.h	Thu Jan  3 12:08:27 1991
X***************
X*** 0 ****
X--- 1 ----
X+ #define PATCHLEVEL	1
X*** /dev/null	Thu Jan  3 12:00:01 1991
X--- PATCHLOG	Thu Jan  3 12:12:55 1991
X***************
X*** 0 ****
X--- 1,15 ----
X+ Patch1
X+ ======
X+ 
X+ Fixes the problem where no .larnopts file causes the dungeon to not be 
X+ displayed.  Selects the "hack-like" objects:
X+ 
X+ Fixes the SIGSEV (ACCVIO) problem with the '?' command.  Append trailing blank
X+ lines to the help file.
X+ 
X+ Courtesy of jef@helios.ee.lbl.gov (Jef Poskanzer). Bug in cursor postioning
X+ (only appears on certain terminals)
X+ 
X+ Courtesy of nethack.rankin@eql.caltech.edu (Pat Rankin).  spells and spheres
X+ missing from the MMS file, link against the VAXCRTL sharable instead of the
X+ object library [how someone on VMS is supposed to use a U*ix diff,I don't know].
X*** descrip.mms.orig	Mon Dec 17 09:10:24 1990
X--- descrip.mms	Thu Jan  3 12:04:57 1991
X***************
X*** 1,7 ****
X  SOURCES = 	BILL.C, CONFIG.C, CREATE.C, DATA.C, DIAG.C, DISPLAY.C, -
X  		FORTUNE.C, GLOBAL.C, HELP.C, IO.C, MAIN.C, MONSTER.C, -
X  		MOREOBJ.C, MOVEM.C, NAP.C, OBJECT.C, REGEN.C, SAVELEV.C, -
X! 		SCORES.C, SIGNAL.C, STORE.C, TOK.C, VMS.C, -
X  		ACTION.C, FGETLR.C, TGETENT.C, TGETSTR.C, TGOTO.C, TPUTS.C
X  
X  OBJECTS =	BILL.OBJ, CONFIG.OBJ, CREATE.OBJ, DATA.OBJ, DIAG.OBJ, -
X--- 1,7 ----
X  SOURCES = 	BILL.C, CONFIG.C, CREATE.C, DATA.C, DIAG.C, DISPLAY.C, -
X  		FORTUNE.C, GLOBAL.C, HELP.C, IO.C, MAIN.C, MONSTER.C, -
X  		MOREOBJ.C, MOVEM.C, NAP.C, OBJECT.C, REGEN.C, SAVELEV.C, -
X! 		SCORES.C, SIGNAL.C, SPELLS.C, SPHERES.C, STORE.C, TOK.C, VMS.C, -
X  		ACTION.C, FGETLR.C, TGETENT.C, TGETSTR.C, TGOTO.C, TPUTS.C
X  
X  OBJECTS =	BILL.OBJ, CONFIG.OBJ, CREATE.OBJ, DATA.OBJ, DIAG.OBJ, -
X***************
X*** 8,14 ****
X  		DISPLAY.OBJ, FORTUNE.OBJ, GLOBAL.OBJ, HELP.OBJ, IO.OBJ, -
X  		MAIN.OBJ, MONSTER.OBJ, MOREOBJ.OBJ, MOVEM.OBJ, NAP.OBJ, -
X  		OBJECT.OBJ, REGEN.OBJ, SAVELEV.OBJ, SCORES.OBJ, SIGNAL.OBJ, -
X! 		STORE.OBJ, TOK.OBJ, VMS.OBJ, -
X  		ACTION.OBJ, FGETLR.OBJ, TGETENT.OBJ, TGETSTR.OBJ, TGOTO.OBJ, -
X  		TPUTS.OBJ
X  
X--- 8,14 ----
X  		DISPLAY.OBJ, FORTUNE.OBJ, GLOBAL.OBJ, HELP.OBJ, IO.OBJ, -
X  		MAIN.OBJ, MONSTER.OBJ, MOREOBJ.OBJ, MOVEM.OBJ, NAP.OBJ, -
X  		OBJECT.OBJ, REGEN.OBJ, SAVELEV.OBJ, SCORES.OBJ, SIGNAL.OBJ, -
X! 		SPELLS.OBJ, SPHERES.OBJ, STORE.OBJ, TOK.OBJ, VMS.OBJ, -
X  		ACTION.OBJ, FGETLR.OBJ, TGETENT.OBJ, TGETSTR.OBJ, TGOTO.OBJ, -
X  		TPUTS.OBJ
X  
X***************
X*** 16,22 ****
X  		DISPLAY.DBJ, FORTUNE.DBJ, GLOBAL.DBJ, HELP.DBJ, IO.DBJ, -
X  		MAIN.DBJ, MONSTER.DBJ, MOREOBJ.DBJ, MOVEM.DBJ, NAP.DBJ, -
X  		OBJECT.DBJ, REGEN.DBJ, SAVELEV.DBJ, SCORES.DBJ, SIGNAL.DBJ, -
X! 		STORE.DBJ, TOK.DBJ, VMS.DBJ, -
X  		ACTION.DBJ, FGETLR.DBJ, TGETENT.DBJ, TGETSTR.DBJ, TGOTO.DBJ, -
X  		TPUTS.DBJ
X  
X--- 16,22 ----
X  		DISPLAY.DBJ, FORTUNE.DBJ, GLOBAL.DBJ, HELP.DBJ, IO.DBJ, -
X  		MAIN.DBJ, MONSTER.DBJ, MOREOBJ.DBJ, MOVEM.DBJ, NAP.DBJ, -
X  		OBJECT.DBJ, REGEN.DBJ, SAVELEV.DBJ, SCORES.DBJ, SIGNAL.DBJ, -
X! 		SPELLS.DBJ, SPHERES.DBJ, STORE.DBJ, TOK.DBJ, VMS.DBJ, -
X  		ACTION.DBJ, FGETLR.DBJ, TGETENT.DBJ, TGETSTR.DBJ, TGOTO.DBJ, -
X  		TPUTS.DBJ
X  
X***************
X*** 25,32 ****
X  .SUFFIXES
X  .SUFFIXES .OBJ .DBJ .C
X  
X! LARN.EXE : $(OBJECTS)
X! 	LINK /NODEBUG/EXEC=LARN.EXE $(OBJECTS), sys$library:vaxcrtl.olb/libr
X  
X  LARND.EXE : $(DOBJECTS)
X  	LINK /DEBUG/EXEC=LARND.EXE $(DOBJECTS), sys$library:vaxcrtl.olb/libr
X--- 25,32 ----
X  .SUFFIXES
X  .SUFFIXES .OBJ .DBJ .C
X  
X! LARN.EXE : $(OBJECTS) vaxcrtl.opt
X! 	LINK /NODEBUG/EXEC=LARN.EXE $(OBJECTS),vaxcrtl.opt/options
X  
X  LARND.EXE : $(DOBJECTS)
X  	LINK /DEBUG/EXEC=LARND.EXE $(DOBJECTS), sys$library:vaxcrtl.olb/libr
X***************
X*** 34,39 ****
X--- 34,44 ----
X  LARNPCA.EXE : $(DOBJECTS), TERMCAP.OLB
X          LINK /DEBUG=SYS$LIBRARY:PCA$OBJ.OBJ/EXEC=LARNPCA.EXE $(DOBJECTS),-
X               SYS$LIBRARY:VAXCRTL.OLB/LIBR
X+ 
X+ vaxcrtl.opt :	    # ~ echo 'sys$share:vaxcrtl/shareable' >vaxcrtl.opt
X+   open/write f vaxcrtl.opt
X+   write f "sys$share:vaxcrtl/shareable"
X+   close f
X  
X  $(OBJECTS),$(DOBJECTS) : HEADER.H
X  
X*** larn.hlp.orig	Mon Dec 17 13:12:10 1990
X--- larn.hlp	Thu Jan  3 11:58:28 1991
X***************
X*** 177,179 ****
X--- 177,186 ----
X  
X  
X  
X+ 
X+ 
X+ 
X+ 
X+ 
X+  .
X+ 
X*** larnhlp.txt.orig	Mon Dec 17 13:13:44 1990
X--- larnhlp.txt	Thu Jan  3 12:05:43 1991
X***************
X*** 177,179 ****
X--- 177,186 ----
X  
X  
X  
X+ 
X+ 
X+ 
X+ 
X+ 
X+  .
X+ 
X*** store.c.orig	Mon Dec 17 09:09:17 1990
X--- store.c	Thu Jan  3 11:59:29 1991
X***************
X*** 561,567 ****
X    for (j=i=0 ; i<26 ; i++)
X        if (iven[i])
X            {
X!       cursor( (j%2)*40, (j>>1)+8 );
X        tradorder[i] = 0 ;    /* init position on screen to zero */
X        switch (iven[i])
X                {
X--- 561,567 ----
X    for (j=i=0 ; i<26 ; i++)
X        if (iven[i])
X            {
X!       cursor( (j%2)*40+1, (j>>1)+8 );
X        tradorder[i] = 0 ;    /* init position on screen to zero */
X        switch (iven[i])
X                {
X***************
X*** 614,620 ****
X      {
X      int j;
X      j = tradorder[i] ;
X!     cursor( (j%2)*40, (j>>1)+8 );
X      lprintf( "%39s", "" );
X      tradorder[i] = 0;
X      }
X--- 614,620 ----
X      {
X      int j;
X      j = tradorder[i] ;
X!     cursor( (j%2)*40+1, (j>>1)+8 );
X      lprintf( "%39s", "" );
X      tradorder[i] = 0;
X      }
X*** tok.c.orig	Mon Dec 17 09:09:07 1990
X--- tok.c	Thu Jan  3 11:55:03 1991
X***************
X*** 244,250 ****
X  		lprintf("Can't open options file \"%s\"\n", optsfile);
X  		lflush();
X  		sleep(2);
X! 		return; /* user name if no character name */
X  		}
X  	i = " ";
X  	while (*i)
X--- 244,251 ----
X  		lprintf("Can't open options file \"%s\"\n", optsfile);
X  		lflush();
X  		sleep(2);
X! 		original_objects = FALSE;
X! 		goto set_objects;
X  		}
X  	i = " ";
X  	while (*i)
X***************
X*** 349,354 ****
X--- 350,356 ----
X  			sleep(1);
X  		}
X  	  }
X+  set_objects:
X  	if (flag)
X  	    strcpy(logname,loginname);
X  
END_OF_FILE
if test 5917 -ne `wc -c <'patches01'`; then
    echo shar: \"'patches01'\" unpacked with wrong size!
fi
# end of 'patches01'
fi
echo shar: End of shell archive.
exit 0