/* savelev.c Larn is copyrighted 1986 by Noah Morgan. */
* routine to save the present level into storage
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];
* routine to restore a level from storage
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];