52 lines
1.4 KiB
C
52 lines
1.4 KiB
C
#ifndef lint
|
|
static char rcsid[] = "$Id: savelev.c,v 1.2 1993/08/02 17:20:18 mycroft Exp $";
|
|
#endif /* not lint */
|
|
|
|
/* savelev.c Larn is copyrighted 1986 by Noah Morgan. */
|
|
#include "header.h"
|
|
extern struct cel *cell;
|
|
|
|
/*
|
|
* routine to save the present level into storage
|
|
*/
|
|
savelevel()
|
|
{
|
|
register struct cel *pcel;
|
|
register char *pitem,*pknow,*pmitem;
|
|
register short *phitp,*piarg;
|
|
register struct cel *pecel;
|
|
pcel = &cell[level*MAXX*MAXY]; /* pointer to this level's cells */
|
|
pecel = pcel + MAXX*MAXY; /* pointer to past end of this level's cells */
|
|
pitem=item[0]; piarg=iarg[0]; pknow=know[0]; pmitem=mitem[0]; phitp=hitp[0];
|
|
while (pcel < pecel)
|
|
{
|
|
pcel->mitem = *pmitem++;
|
|
pcel->hitp = *phitp++;
|
|
pcel->item = *pitem++;
|
|
pcel->know = *pknow++;
|
|
pcel++->iarg = *piarg++;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* routine to restore a level from storage
|
|
*/
|
|
getlevel()
|
|
{
|
|
register struct cel *pcel;
|
|
register char *pitem,*pknow,*pmitem;
|
|
register short *phitp,*piarg;
|
|
register struct cel *pecel;
|
|
pcel = &cell[level*MAXX*MAXY]; /* pointer to this level's cells */
|
|
pecel = pcel + MAXX*MAXY; /* pointer to past end of this level's cells */
|
|
pitem=item[0]; piarg=iarg[0]; pknow=know[0]; pmitem=mitem[0]; phitp=hitp[0];
|
|
while (pcel < pecel)
|
|
{
|
|
*pmitem++ = pcel->mitem;
|
|
*phitp++ = pcel->hitp;
|
|
*pitem++ = pcel->item;
|
|
*pknow++ = pcel->know;
|
|
*piarg++ = pcel++->iarg;
|
|
}
|
|
}
|