Sync our register usage with NetBSD's (non-)usage.

18 files changed, 220 insertions, 220 deletions

diff --git a/games/larn/bill.c b/games/larn/bill.c
index 360b65d..59eb96e 100644
--- a/games/larn/bill.c
+++ b/games/larn/bill.c
@@ -115,7 +115,7 @@ char *mail[] = {
 void
 mailbill()
 {
-	register int i;
+	int i;
 	char fname[32];
 	char buf[128];
 	char **cp;
diff --git a/games/larn/create.c b/games/larn/create.c
index 50d3290..1bfa1ee 100644
--- a/games/larn/create.c
+++ b/games/larn/create.c
@@ -12,7 +12,7 @@ extern short oldx,oldy;
  */
 makeplayer()
 	{
-	register int i;
+	int i;
 	scbr();  clear();
 	c[HPMAX]=c[HP]=10;		/*	start player off with 15 hit points	*/
 	c[LEVEL]=1;				/*	player starts at level one			*/
@@ -45,9 +45,9 @@ makeplayer()
 	Note that it is here we remove genocided monsters from the present level.
  */
 newcavelevel(x)
-	register int x;
+	int x;
 	{
-	register int i,j;
+	int i,j;
 	if (beenhere[level]) savelevel();	/* put the level back into storage	*/
 	level = x;				/* get the new level and put in working storage */
 	if (beenhere[x]==0) for (i=0; i<MAXY; i++) for (j=0; j<MAXX; j++) know[j][i]=mitem[j][i]=0;
@@ -76,7 +76,7 @@ static int mx,mxl,mxh,my,myl,myh,tmp2;
  makemaze(k)
 	int k;
 	{
-	register int i,j,tmp;
+	int i,j,tmp;
 	int z;
 	if (k > 1 && (rnd(17)<=4 || k==MAXLEVEL-1 || k==MAXLEVEL+MAXVLEVEL-1))
 		{
@@ -118,9 +118,9 @@ static int mx,mxl,mxh,my,myl,myh,tmp2;
 	function to eat away a filled in maze
  */
 eat(xx,yy)
-	register int xx,yy;
+	int xx,yy;
 	{
-	register int dir,try;
+	int dir,try;
 	dir = rnd(4);	try=2;
 	while (try)
 		{
@@ -166,7 +166,7 @@ cannedlevel(k)
 	int k;
 	{
 	char *row,*lgetl();
-	register int i,j;
+	int i,j;
 	int it,arg,mit,marg;
 	if (lopen(larnlevels)<0)
 		{
@@ -217,9 +217,9 @@ cannedlevel(k)
 	level V3 has potion of cure dianthroritis and demon prince
  */
 treasureroom(lv)
-	register int lv;
+	int lv;
 	{
-	register int tx,ty,xsize,ysize;
+	int tx,ty,xsize,ysize;
 
 	for (tx=1+rnd(10);  tx<MAXX-10;  tx+=10)
 	  if ( (lv==MAXLEVEL-1) || (lv==MAXLEVEL+MAXVLEVEL-1) || rnd(13)==2)
@@ -240,7 +240,7 @@ treasureroom(lv)
 troom(lv,xsize,ysize,tx,ty,glyph)
 	int lv,xsize,ysize,tx,ty,glyph;
 	{
-	register int i,j;
+	int i,j;
 	int tp1,tp2;
 	for (j=ty-1; j<=ty+ysize; j++)
 		for (i=tx-1; i<=tx+xsize; i++)			/* clear out space for room */
@@ -286,9 +286,9 @@ static void fillroom();
 	subroutine to create the objects in the maze for the given level
  */
 makeobject(j)
-	register int j;
+	int j;
 	{
-	register int i;
+	int i;
 	if (j==0)
 		{
 		fillroom(OENTRANCE,0);		/*	entrance to dungeon			*/
@@ -377,7 +377,7 @@ fillmroom(n,what,arg)
 	int n,arg;
 	char what;
 	{
-	register int i;
+	int i;
 	for (i=0; i<n; i++)		fillroom(what,arg);
 	}
 froom(n,itm,arg)
@@ -394,7 +394,7 @@ fillroom(what,arg)
 	int arg;
 	char what;
 	{
-	register int x,y;
+	int x,y;
 
 #ifdef EXTRA
 	c[FILLROOM]++;
@@ -422,7 +422,7 @@ fillroom(what,arg)
 fillmonst(what)
 	char what;
 	{
-	register int x,y,trys;
+	int x,y,trys;
 	for (trys=5; trys>0; --trys) /* max # of creation attempts */
 	  {
 	  x=rnd(MAXX-2);  y=rnd(MAXY-2);
@@ -443,7 +443,7 @@ fillmonst(what)
 sethp(flg)
 	int flg;
 	{
-	register int i,j;
+	int i,j;
 	if (flg) for (i=0; i<MAXY; i++) for (j=0; j<MAXX; j++) stealth[j][i]=0;
 	if (level==0) { c[TELEFLAG]=0; return; } /*	if teleported and found level 1 then know level we are on */
 	if (flg)   j = rnd(12) + 2 + (level>>1);   else   j = (level>>1) + 1;
@@ -456,7 +456,7 @@ sethp(flg)
  */
 checkgen()
 	{
-	register int x,y;
+	int x,y;
 	for (y=0; y<MAXY; y++)
 		for (x=0; x<MAXX; x++)
 			if (monster[mitem[x][y]].genocided)
diff --git a/games/larn/diag.c b/games/larn/diag.c
index db4761c..860b18a 100644
--- a/games/larn/diag.c
+++ b/games/larn/diag.c
@@ -18,7 +18,7 @@ static struct tms cputime;
 static int rndcount[16];
 diag()
 	{
-	register int i,j;
+	int i,j;
 	int hit,dam;
 	cursors();  lwclose();
 	if (lcreat(diagfile) < 0)	/*	open the diagnostic file	*/
@@ -113,7 +113,7 @@ diag()
 dcount(l)
 	int l;
 	{
-	register int i,j,p;
+	int i,j,p;
 	int k;
 	k=0;
 	for (i=0; i<MAXX; i++)
@@ -128,7 +128,7 @@ dcount(l)
  */
 diagdrawscreen()
 	{
-	register int i,j,k;
+	int i,j,k;
 
 	for (i=0; i<MAXY; i++)
 
@@ -148,8 +148,8 @@ static time_t zzz=0;
 savegame(fname)
 	char *fname;
 	{
-	register int i,k;
-	register struct sphere *sp;
+	int i,k;
+	struct sphere *sp;
 	struct stat statbuf;
 	nosignal=1;  lflush();	savelevel();
 	ointerest();
@@ -194,8 +194,8 @@ savegame(fname)
 restoregame(fname)
 	char *fname;
 	{
-	register int i,k;
-	register struct sphere *sp,*sp2;
+	int i,k;
+	struct sphere *sp,*sp2;
 	struct stat filetimes;
 	cursors(); lprcat("\nRestoring . . .");  lflush();
 	if (lopen(fname) <= 0)
diff --git a/games/larn/display.c b/games/larn/display.c
index b0192c5..0c30590 100644
--- a/games/larn/display.c
+++ b/games/larn/display.c
@@ -28,7 +28,7 @@ static void botsub();
 
 bot_linex()
 	{
-	register int i;
+	int i;
 	if (cbak[SPELLS] <= -50 || (always))
 		{
 		cursor( 1,18);
@@ -132,7 +132,7 @@ static struct bot_side_def
 
 botside()
 	{
-	register int i,idx;
+	int i,idx;
 	for (i=0; i<17; i++)
 		{
 		idx = bot_data[i].typ;
@@ -149,10 +149,10 @@ botside()
 
 static void
 botsub(idx,str)
-	register int idx;
+	int idx;
 	char *str;
 	{
-	register int x,y;
+	int x,y;
 	y = idx & 0xff;		x = (idx>>8) & 0xff;	  idx >>= 16;
 	if (c[idx] != cbak[idx])
 		{ cbak[idx]=c[idx];  cursor(x,y);  lprintf(str,(long)c[idx]); }
@@ -167,7 +167,7 @@ int d_xmin=0,d_xmax=MAXX,d_ymin=0,d_ymax=MAXY;	/* for limited screen drawing */
 draws(xmin,xmax,ymin,ymax)
 	int xmin,xmax,ymin,ymax;
 	{
-	register int i,idx;
+	int i,idx;
 	if (xmin==0 && xmax==MAXX) /* clear section of screen as needed */
 		{
 		if (ymin==0) cl_up(79,ymax);
@@ -198,7 +198,7 @@ draws(xmin,xmax,ymin,ymax)
 char screen[MAXX][MAXY],d_flag;	/* template for the screen */
 drawscreen()
 	{
-	register int i,j,k;
+	int i,j,k;
 	int lastx,lasty;  /* variables used to optimize the object printing */
 	if (d_xmin==0 && d_xmax==MAXX && d_ymin==0 && d_ymax==MAXY)
 		{
@@ -268,7 +268,7 @@ drawscreen()
 showcell(x,y)
 	int x,y;
 	{
-	register int i,j,k,m;
+	int i,j,k,m;
 	if (c[BLINDCOUNT])  return;	/* see nothing if blind		*/
 	if (c[AWARENESS]) { minx = x-3;	maxx = x+3;	miny = y-3;	maxy = y+3; }
 			else	  { minx = x-1;	maxx = x+1;	miny = y-1;	maxy = y+1; }
@@ -350,7 +350,7 @@ moveplayer(dir)
 							[6-northwest] [7-southeast] [8-southwest]
 						if direction=0, don't move--just show where he is */
 	{
-	register int k,m,i,j;
+	int k,m,i,j;
 	if (c[CONFUSE]) if (c[LEVEL]<rnd(30)) dir=rund(9); /*if confused any dir*/
 	k = playerx + diroffx[dir];		m = playery + diroffy[dir];
 	if (k<0 || k>=MAXX || m<0 || m>=MAXY) { nomove=1; return(yrepcount = 0); }
@@ -376,7 +376,7 @@ static int lincount,count;
 seemagic(arg)
 	int arg;
 	{
-	register int i,number;
+	int i,number;
 	count = lincount = 0;  nosignal=1;
 
 	if (arg== -1) /* if display spells while casting one */
diff --git a/games/larn/global.c b/games/larn/global.c
index 9fa19d9..4f7f29a 100644
--- a/games/larn/global.c
+++ b/games/larn/global.c
@@ -65,9 +65,9 @@ loselevel()
 	subroutine to increase experience points
  */
 raiseexperience(x)
-	register long x;
+	long x;
 	{
-	register int i,tmp;
+	int i,tmp;
 	i=c[LEVEL];	c[EXPERIENCE]+=x;
 	while (c[EXPERIENCE] >= skill[c[LEVEL]] && (c[LEVEL] < MAXPLEVEL))
 		{
@@ -93,9 +93,9 @@ raiseexperience(x)
 	subroutine to lose experience points
  */
 loseexperience(x)
-	register long x;
+	long x;
 	{
-	register int i,tmp;
+	int i,tmp;
 	i=c[LEVEL];		c[EXPERIENCE]-=x;
 	if (c[EXPERIENCE] < 0) c[EXPERIENCE]=0;
 	while (c[EXPERIENCE] < skill[c[LEVEL]-1])
@@ -125,7 +125,7 @@ loseexperience(x)
 	warning -- will kill player if hp goes to zero
  */
 losehp(x)
-	register int x;
+	int x;
 	{
 	if ((c[HP] -= x) <= 0)
 		{
@@ -134,7 +134,7 @@ losehp(x)
 	}
 
 losemhp(x)
-	register int x;
+	int x;
 	{
 	c[HP] -= x;		if (c[HP] < 1)		c[HP]=1;
 	c[HPMAX] -= x;	if (c[HPMAX] < 1)	c[HPMAX]=1;
@@ -150,13 +150,13 @@ losemhp(x)
 	subroutine to gain maximum hit points
  */
 raisehp(x)
-	register int x;
+	int x;
 	{
 	if ((c[HP] += x) > c[HPMAX]) c[HP] = c[HPMAX];
 	}
 
 raisemhp(x)
-	register int x;
+	int x;
 	{
 	c[HPMAX] += x;	c[HP] += x;
 	}
@@ -171,13 +171,13 @@ raisemhp(x)
 	subroutine to gain maximum spells
  */
 raisespells(x)
-	register int x;
+	int x;
 	{
 	if ((c[SPELLS] += x) > c[SPELLMAX])	c[SPELLS] = c[SPELLMAX];
 	}
 
 raisemspells(x)
-	register int x;
+	int x;
 	{
 	c[SPELLMAX]+=x; c[SPELLS]+=x;
 	}
@@ -192,13 +192,13 @@ raisemspells(x)
 	subroutine to lose maximum spells
  */
 losespells(x)
-	register int x;
+	int x;
 	{
 	if ((c[SPELLS] -= x) < 0) c[SPELLS]=0;
 	}
 
 losemspells(x)
-	register int x;
+	int x;
 	{
 	if ((c[SPELLMAX] -= x) < 0) c[SPELLMAX]=0;
 	if ((c[SPELLS] -= x) < 0) c[SPELLS]=0;
@@ -212,9 +212,9 @@ losemspells(x)
 		for the given cave level
  */
 makemonst(lev)
-	register int lev;
+	int lev;
 	{
-	register int tmp,x;
+	int tmp,x;
 	if (lev < 1)	lev = 1;			if (lev > 12)	lev = 12;
 	tmp=WATERLORD;
 	if (lev < 5)
@@ -250,7 +250,7 @@ positionplayer()
  */
 recalc()
 	{
-	register int i,j,k;
+	int i,j,k;
 	c[AC] = c[MOREDEFENSES];
 	if (c[WEAR] >= 0)
 		switch(iven[c[WEAR]])
@@ -315,7 +315,7 @@ recalc()
  */
 quit()
 	{
-	register int i;
+	int i;
 	cursors();	strcpy(lastmonst,"");
 	lprcat("\n\nDo you really want to quit?");
 	while (1)
@@ -344,7 +344,7 @@ more()
 take(itm,arg)
 	int itm,arg;
 	{
-	register int i,limit;
+	int i,limit;
 /*	cursors(); */
 	if ((limit = 15+(c[LEVEL]>>1)) > 26)  limit=26;
 	for (i=0; i<limit; i++)
@@ -401,7 +401,7 @@ drop_object(k)
  */
 enchantarmor()
 	{
-	register int tmp;
+	int tmp;
 	if (c[WEAR]<0) { if (c[SHIELD] < 0)
 		{ cursors(); beep(); lprcat("\nYou feel a sense of loss"); return; }
 					else { tmp=iven[c[SHIELD]]; if (tmp != OSCROLL) if (tmp != OPOTION) { ivenarg[c[SHIELD]]++; bottomline(); } } }
@@ -414,7 +414,7 @@ enchantarmor()
  */
 enchweapon()
 	{
-	register int tmp;
+	int tmp;
 	if (c[WIELD]<0)
 		{ cursors(); beep(); lprcat("\nYou feel a sense of loss"); return; }
 	tmp = iven[c[WIELD]];
@@ -431,7 +431,7 @@ enchweapon()
  */
 pocketfull()
 	{
-	register int i,limit;
+	int i,limit;
 	if ((limit = 15+(c[LEVEL]>>1)) > 26)  limit=26;
 	for (i=0; i<limit; i++) if (iven[i]==0) return(0);
 	return(1);
@@ -442,7 +442,7 @@ pocketfull()
  */
 nearbymonst()
 	{
-	register int tmp,tmp2;
+	int tmp,tmp2;
 	for (tmp=playerx-1; tmp<playerx+2; tmp++)
 		for (tmp2=playery-1; tmp2<playery+2; tmp2++)
 			if (mitem[tmp][tmp2]) return(1); /* if monster nearby */
@@ -455,7 +455,7 @@ nearbymonst()
  */
 stealsomething()
 	{
-	register int i,j;
+	int i,j;
 	j=100;
 	while (1)
 		{
@@ -474,7 +474,7 @@ stealsomething()
  */
 emptyhanded()
 	{
-	register int i;
+	int i;
 	for (i=0; i<26; i++)
 		if (iven[i]) if (i!=c[WIELD]) if (i!=c[WEAR]) if (i!=c[SHIELD]) return(0);
 	return(1);
@@ -485,7 +485,7 @@ emptyhanded()
  */
 creategem()
 	{
-	register int i,j;
+	int i,j;
 	switch(rnd(4))
 		{
 		case 1:	 i=ODIAMOND;	j=50;	break;
@@ -503,7 +503,7 @@ creategem()
 adjustcvalues(itm,arg)
 	int itm,arg;
 	{
-	register int flag;
+	int flag;
 	flag=0;
 	switch(itm)
 		{
@@ -530,9 +530,9 @@ adjustcvalues(itm,arg)
 	returns a pointer to the string
  */
 gettokstr(str)
-	register char *str;
+	char *str;
 	{
-	register int i,j;
+	int i,j;
 	i=50;
 	while ((getchar() != '"') && (--i > 0));
 	i=36;
@@ -552,8 +552,8 @@ gettokstr(str)
 static char gpwbuf[33];
 getpassword()
 	{
-	register int i,j;
-	register char *gpwp;
+	int i,j;
+	char *gpwp;
 	extern char *password;
 	scbr();	/*	system("stty -echo cbreak"); */
 	gpwp = gpwbuf;	lprcat("\nEnter Password: "); lflush();
@@ -571,7 +571,7 @@ getpassword()
  */
 getyn()
 	{
-	register int i;
+	int i;
 	i=0; while (i!='y' && i!='n' && i!='\33') i=getchar();
 	return(i);
 	}
@@ -582,7 +582,7 @@ getyn()
  */
 packweight()
 	{
-	register int i,j,k;
+	int i,j,k;
 	k=c[GOLD]/1000; j=25;  while ((iven[j]==0) && (j>0)) --j;
 	for (i=0; i<=j; i++)
 		switch(iven[i])
diff --git a/games/larn/help.c b/games/larn/help.c
index 0d06d6f..fa31c82 100644
--- a/games/larn/help.c
+++ b/games/larn/help.c
@@ -13,7 +13,7 @@
 extern char helpfile[];
 help()
 	{
-	register int i,j;
+	int i,j;
 #ifndef VT100
 	char tmbuf[128];	/* intermediate translation buffer when not a VT100 */
 #endif VT100
@@ -48,7 +48,7 @@ help()
  */
 welcome()
 	{
-	register int i;
+	int i;
 #ifndef VT100
 	char tmbuf[128];	/* intermediate translation buffer when not a VT100 */
 #endif VT100
diff --git a/games/larn/io.c b/games/larn/io.c
index a7fac5d..112268b 100644
--- a/games/larn/io.c
+++ b/games/larn/io.c
@@ -156,7 +156,7 @@ sncbr()
  */
 newgame()
 	{
-	register long *p,*pe;
+	long *p,*pe;
 	for (p=c,pe=c+100; p<pe; *p++ =0);
 	time(&initialtime);             srandomdev();
 	lcreat((char*)0);	/* open buffering for output to terminal */
@@ -198,9 +198,9 @@ lprintf(va_alist)
 va_dcl
     {
 	va_list ap;	/* pointer for variable argument list */
-	register char *fmt;
-	register char *outb,*tmpb;
-	register long wide,left,cont,n;		/* data for lprintf	*/
+	char *fmt;
+	char *outb,*tmpb;
+	long wide,left,cont,n;		/* data for lprintf	*/
 	char db[12];			/* %d buffer in lprintf	*/
 
 	va_start(ap);	/* initialize the var args pointer */
@@ -280,7 +280,7 @@ va_dcl
  *	Returns nothing of value.
  */
 lprint(x)
-	register long x;
+	long x;
 	{
 	if (lpnt >= lpend) lflush();
 	*lpnt++ =  255 & x;			*lpnt++ =  255 & (x>>8);
@@ -296,11 +296,11 @@ lprint(x)
  *	Returns nothing of value
  */
 lwrite(buf,len)
-    register char *buf;
+    char *buf;
     int len;
     {
-	register char *str;
-	register int num2;
+	char *str;
+	int num2;
 	if (len > 399)  /* don't copy data if can just write it */
 		{
 #ifdef EXTRA
@@ -333,7 +333,7 @@ lwrite(buf,len)
  */
 long lgetc()
     {
-    register int i;
+    int i;
     if (ipoint != iepoint)  return(inbuffer[ipoint++]);
     if (iepoint!=MAXIBUF)   return(0);
     if ((i=read(fd,inbuffer,MAXIBUF))<=0)
@@ -359,7 +359,7 @@ long lgetc()
  */
 long lrint()
 	{
-	register unsigned long i;
+	unsigned long i;
 	i  = 255 & lgetc();				i |= (255 & lgetc()) << 8;
 	i |= (255 & lgetc()) << 16;		i |= (255 & lgetc()) << 24;
 	return(i);
@@ -374,11 +374,11 @@ long lrint()
  *	Returns nothing of value
  */
 lrfill(adr,num)
-	register char *adr;
+	char *adr;
 	int num;
 	{
-	register char *pnt;
-	register int num2;
+	char *pnt;
+	int num2;
 	while (num)
 		{
 		if (iepoint == ipoint)
@@ -408,8 +408,8 @@ lrfill(adr,num)
  */
 char *lgetw()
 	{
-	register char *lgp,cc;
-	register int n=LINBUFSIZE,quote=0;
+	char *lgp,cc;
+	int n=LINBUFSIZE,quote=0;
 	lgp = lgetwbuf;
 	do cc=lgetc();  while ((cc <= 32) && (cc > NULL));  /* eat whitespace */
 	for ( ; ; --n,cc=lgetc())
@@ -427,8 +427,8 @@ char *lgetw()
  */
 char *lgetl()
 	{
-	register int i=LINBUFSIZE,ch;
-	register char *str=lgetwbuf;
+	int i=LINBUFSIZE,ch;
+	char *str=lgetwbuf;
 	for ( ; ; --i)
 		{
 		if ((*str++ = ch = lgetc()) == NULL)
@@ -523,9 +523,9 @@ lwclose()
  *								    avoids calls to lprintf (time consuming)
  */
 lprcat(str)
-    register char *str;
+    char *str;
     {
-	register char *str2;
+	char *str2;
 	if (lpnt >= lpend) lflush();
 	str2 = lpnt;
 	while (*str2++ = *str++);
@@ -557,7 +557,7 @@ static char *x_num[]= { "H","H",";2H",";3H",";4H",";5H",";6H",";7H",";8H",";9H",
 cursor(x,y)
 	int x,y;
 	{
-	register char *p;
+	char *p;
 	if (lpnt >= lpend) lflush();
 
 	p = y_num[y];	/* get the string to print */
@@ -679,12 +679,12 @@ cl_line(x,y)
  * cl_up(x,y) Clear screen from [x,1] to current position. Leave cursor at [x,y]
  */
 cl_up(x,y)
-	register int x,y;
+	int x,y;
 	{
 #ifdef VT100
 	cursor(x,y);  lprcat("\33[1J\33[2K");
 #else VT100
-	register int i;
+	int i;
 	cursor(1,1);
 	for (i=1; i<=y; i++)   { *lpnt++ = CL_LINE;  *lpnt++ = '\n'; }
 	cursor(x,y);
@@ -695,12 +695,12 @@ cl_up(x,y)
  * cl_dn(x,y) 	Clear screen from [1,y] to end of display. Leave cursor at [x,y]
  */
 cl_dn(x,y)
-	register int x,y;
+	int x,y;
 	{
 #ifdef VT100
 	cursor(x,y); lprcat("\33[J\33[2K");
 #else VT100
-	register int i;
+	int i;
 	cursor(1,y);
 	if (!CD)
 		{
@@ -718,7 +718,7 @@ cl_dn(x,y)
  * standout(str)	Print the argument string in inverse video (standout mode).
  */
 standout(str)
-	register char *str;
+	char *str;
 	{
 #ifdef VT100
 	setbold();
@@ -752,8 +752,8 @@ set_score_output()
 static int scrline=18; /* line # for wraparound instead of scrolling if no DL */
 lflush ()
 	{
-	register int lpoint;
-	register char *str;
+	int lpoint;
+	char *str;
 	static int curx = 0;
 	static int cury = 0;
 
@@ -838,7 +838,7 @@ lflush ()
  */
 lflush()
     {
-	register int lpoint;
+	int lpoint;
 	if ((lpoint = lpnt - lpbuf) > 0)
         {
 #ifdef EXTRA
@@ -878,9 +878,9 @@ flush_buf()
  *	Processes only the \33[#m sequence (converts . files for termcap use
  */
 char *tmcapcnv(sd,ss)
-	register char *sd,*ss;
+	char *sd,*ss;
 	{
-	register int tmstate=0;	/* 0=normal, 1=\33 2=[ 3=# */
+	int tmstate=0;	/* 0=normal, 1=\33 2=[ 3=# */
 	char tmdigit=0;	/* the # in \33[#m */
 	while (*ss)
 		{
diff --git a/games/larn/main.c b/games/larn/main.c
index a554031..7aa5697 100644
--- a/games/larn/main.c
+++ b/games/larn/main.c
@@ -39,7 +39,7 @@ main(argc,argv)
 	int argc;
 	char **argv;
 	{
-	register int i,j;
+	int i,j;
 	int hard;
 	char *ptr=0,*ttype;
 	struct passwd *pwe;
@@ -236,7 +236,7 @@ main(argc,argv)
  */
 showstr()
 	{
-	register int i,number;
+	int i,number;
 	for (number=3, i=0; i<26; i++)
 		if (iven[i]) number++;	/* count items in inventory */
 	t_setup(number);	qshowstr();	  t_endup(number);
@@ -244,7 +244,7 @@ showstr()
 
 qshowstr()
 	{
-	register int i,j,k,sigsav;
+	int i,j,k,sigsav;
 	srcount=0;  sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	if (c[GOLD]) { lprintf(".)   %d gold pieces",(long)c[GOLD]); srcount++; }
 	for (k=26; k>=0; k--)
@@ -260,7 +260,7 @@ qshowstr()
  *	subroutine to clear screen depending on # lines to display
  */
 t_setup(count)
-	register int count;
+	int count;
 	{
 	if (count<20)  /* how do we clear the screen? */
 		{
@@ -276,7 +276,7 @@ t_setup(count)
  *	subroutine to restore normal display screen depending on t_setup()
  */
 t_endup(count)
-	register int count;
+	int count;
 	{
 	if (count<18)  /* how did we clear the screen? */
 		draws(0,MAXX,0,(count>MAXY) ? MAXY : count);
@@ -291,7 +291,7 @@ t_endup(count)
  */
 showwear()
 	{
-	register int i,j,sigsav,count;
+	int i,j,sigsav,count;
 	sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	srcount=0;
 
@@ -325,7 +325,7 @@ showwear()
  */
 showwield()
 	{
-	register int i,j,sigsav,count;
+	int i,j,sigsav,count;
 	sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	srcount=0;
 
@@ -361,7 +361,7 @@ showwield()
  */
 showread()
 	{
-	register int i,j,sigsav,count;
+	int i,j,sigsav,count;
 	sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	srcount=0;
 
@@ -387,7 +387,7 @@ showread()
  */
 showeat()
 	{
-	register int i,j,sigsav,count;
+	int i,j,sigsav,count;
 	sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	srcount=0;
 
@@ -413,7 +413,7 @@ showeat()
  */
 showquaff()
 	{
-	register int i,j,sigsav,count;
+	int i,j,sigsav,count;
 	sigsav=nosignal;  nosignal=1; /* don't allow ^c etc */
 	srcount=0;
 
@@ -435,8 +435,8 @@ showquaff()
 	}
 
 show1(idx,str2)
-	register int idx;
-	register char *str2[];
+	int idx;
+	char *str2[];
 	{
 	if (str2==0)  lprintf("\n%c)   %s",idx+'a',objectname[iven[idx]]);
 	else if (*str2[ivenarg[idx]]==0)  lprintf("\n%c)   %s",idx+'a',objectname[iven[idx]]);
@@ -444,7 +444,7 @@ show1(idx,str2)
 	}
 
 show3(index)
-	register int index;
+	int index;
 	{
 	switch(iven[index])
 		{
@@ -486,7 +486,7 @@ randmonst()
  */
 parse()
 	{
-	register int i,j,k,flag;
+	int i,j,k,flag;
 	while	(1)
 		{
 		k = yylex();
@@ -578,7 +578,7 @@ parse()
 						c[LANCEDEATH]=1;   c[WEAR] = c[SHIELD] = -1;
 						raiseexperience(6000000L);  c[AWARENESS] += 25000;
 						{
-						register int i,j;
+						int i,j;
 						for (i=0; i<MAXY; i++)
 							for (j=0; j<MAXX; j++)  know[j][i]=1;
 						for (i=0; i<SPNUM; i++)	spelknow[i]=1;
@@ -645,7 +645,7 @@ parse2()
 run(dir)
 	int dir;
 	{
-	register int i;
+	int i;
 	i=1; while (i)
 		{
 		i=moveplayer(dir);
@@ -660,7 +660,7 @@ run(dir)
  */
 wield()
 	{
-	register int i;
+	int i;
 	while (1)
 		{
 		if ((i = whatitem("wield"))=='\33')  return;
@@ -691,7 +691,7 @@ ycwi(x)
  */
 wear()
 	{
-	register int i;
+	int i;
 	while (1)
 		{
 		if ((i = whatitem("wear"))=='\33')  return;
@@ -719,8 +719,8 @@ wear()
  */
 dropobj()
 	{
-	register int i;
-	register char *p;
+	int i;
+	char *p;
 	long amt;
 	p = &item[playerx][playery];
 	while (1)
@@ -763,7 +763,7 @@ dropobj()
  */
 readscr()
 	{
-	register int i;
+	int i;
 	while (1)
 		{
 		if ((i = whatitem("read"))=='\33')  return;
@@ -785,7 +785,7 @@ readscr()
  */
 eatcookie()
 {
-register int i;
+int i;
 char *p;
 while (1)
 	{
@@ -819,7 +819,7 @@ while (1)
  */
 quaff()
 	{
-	register int i;
+	int i;
 	while (1)
 		{
 		if ((i = whatitem("quaff"))=='\33')  return;
@@ -855,8 +855,8 @@ whatitem(str)
 unsigned long readnum(mx)
 	long mx;
 	{
-	register int i;
-	register unsigned long amt=0;
+	int i;
+	unsigned long amt=0;
 	sncbr();
 	if ((i=getchar()) == '*')  amt = mx;   /* allow him to say * for all gold */
 	else
@@ -875,7 +875,7 @@ unsigned long readnum(mx)
  *	routine to zero every byte in a string
  */
 szero(str)
-	register char *str;
+	char *str;
 	{
 	while (*str)
 		*str++ = 0;
diff --git a/games/larn/monster.c b/games/larn/monster.c
index 909cec1..240df92 100644
--- a/games/larn/monster.c
+++ b/games/larn/monster.c
@@ -116,7 +116,7 @@ struct isave	/* used for altar reality */
 createmonster(mon)
 	int mon;
 	{
-	register int x,y,k,i;
+	int x,y,k,i;
 	if (mon<1 || mon>MAXMONST+8)	/* check for monster number out of bounds */
 		{
 		beep(); lprintf("\ncan't createmonst(%d)\n",(long)mon); nap(3000); return;
@@ -152,7 +152,7 @@ createmonster(mon)
  *	This routine will return FALSE if at a wall or the dungeon exit on level 1
  */
 int cgood(x,y,itm,monst)
-	register int x,y;
+	int x,y;
 	int itm,monst;
 	{
 	if ((y>=0) && (y<=MAXY-1) && (x>=0) && (x<=MAXX-1)) /* within bounds? */
@@ -174,7 +174,7 @@ int cgood(x,y,itm,monst)
 createitem(it,arg)
 	int it,arg;
 	{
-	register int x,y,k,i;
+	int x,y,k,i;
 	if (it >= MAXOBJ) return;	/* no such object */
 	for (k=rnd(8), i= -8; i<0; i++,k++)	/* choose direction, then try all */
 		{
@@ -195,7 +195,7 @@ createitem(it,arg)
 static char eys[] = "\nEnter your spell: ";
 cast()
 	{
-	register int i,j,a,b,d;
+	int i,j,a,b,d;
 	cursors();
 	if (c[SPELLS]<=0) {	lprcat("\nYou don't have any spells!");	return;	}
 	lprcat(eys);		--c[SPELLS];
@@ -229,9 +229,9 @@ static int dirsub();
 speldamage(x)
 	int x;
 	{
-	register int i,j,clev;
+	int i,j,clev;
 	int xl,xh,yl,yh;
-	register char *p,*kn,*pm;
+	char *p,*kn,*pm;
 	if (x>=SPNUM) return;	/* no such spell */
 	if (c[TIMESTOP])  { lprcat("  It didn't seem to work"); return; }  /* not if time stopped */
 	clev = c[LEVEL];
@@ -487,7 +487,7 @@ isconfuse()
 nospell(x,monst)
 	int x,monst;
 	{
-	register int tmp;
+	int tmp;
 	if (x>=SPNUM || monst>=MAXMONST+8 || monst<0 || x<0) return(0);	/* bad spell or monst */
 	if ((tmp=spelweird[monst-1][x])==0) return(0);
 	cursors();  lprc('\n');  lprintf(spelmes[tmp],monster[monst].name);  return(1);
@@ -503,7 +503,7 @@ nospell(x,monst)
 fullhit(xx)
 	int xx;
 	{
-	register int i;
+	int i;
 	if (xx<0 || xx>20) return(0);	/* fullhits are out of range */
 	if (c[LANCEDEATH]) return(10000);	/* lance of death */
 	i = xx * ((c[WCLASS]>>1)+c[STRENGTH]+c[STREXTRA]-c[HARDGAME]-12+c[MOREDAM]);
@@ -525,7 +525,7 @@ direct(spnum,dam,str,arg)
 	char *str;
 	{
 	int x,y;
-	register int m;
+	int m;
 	if (spnum<0 || spnum>=SPNUM || str==0) return; /* bad arguments */
 	if (isconfuse()) return;
 	dirsub(&x,&y);
@@ -575,8 +575,8 @@ godirect(spnum,dam,str,delay,cshow)
 	int spnum,dam,delay;
 	char *str,cshow;
 	{
-	register char *p;
-	register int x,y,m;
+	char *p;
+	int x,y,m;
 	int dx,dy;
 	if (spnum<0 || spnum>=SPNUM || str==0 || delay<0) return; /* bad args */
 	if (isconfuse()) return;
@@ -683,7 +683,7 @@ tdirect(spnum)
 	int spnum;
 	{
 	int x,y;
-	register int m;
+	int m;
 	if (spnum<0 || spnum>=SPNUM) return; /* bad args */
 	if (isconfuse()) return;
 	dirsub(&x,&y);
@@ -708,7 +708,7 @@ omnidirect(spnum,dam,str)
 	int spnum,dam;
 	char *str;
 	{
-	register int x,y,m;
+	int x,y,m;
 	if (spnum<0 || spnum>=SPNUM || str==0) return; /* bad args */
 	for (x=playerx-1; x<playerx+2; x++)
 		for (y=playery-1; y<playery+2; y++)
@@ -738,7 +738,7 @@ static int
 dirsub(x,y)
 	int *x,*y;
 	{
-	register int i;
+	int i;
 	lprcat("\nIn What Direction? ");
 	for (i=0; ; )
 		switch(getchar())
@@ -813,7 +813,7 @@ dirpoly(spnum)
 hitmonster(x,y)
 	int x,y;
 	{
-	register int tmp,monst,damag,flag;
+	int tmp,monst,damag,flag;
 	if (c[TIMESTOP])  return;  /* not if time stopped */
 	vxy(&x,&y);	/* verify coordinates are within range */
 	if ((monst = mitem[x][y]) == 0) return;
@@ -853,9 +853,9 @@ hitmonster(x,y)
  */
 hitm(x,y,amt)
 	int x,y;
-	register amt;
+	amt;
 	{
-	register int monst;
+	int monst;
 	int hpoints,amt2;
 	vxy(&x,&y);	/* verify coordinates are within range */
 	amt2 = amt;		/* save initial damage so we can return it */
@@ -898,7 +898,7 @@ hitm(x,y,amt)
 hitplayer(x,y)
 	int x,y;
 	{
-	register int dam,tmp,mster,bias;
+	int dam,tmp,mster,bias;
 	vxy(&x,&y);	/* verify coordinates are within range */
 	lastnum = mster = mitem[x][y];
 /*	spirit naga's and poltergeist's do nothing if scarab of negate spirit	*/
@@ -973,7 +973,7 @@ dropsomething(monst)
  *	Returns nothing of value.
  */
 dropgold(amount)
-	register int amount;
+	int amount;
 	{
 	if (amount > 250) createitem(OMAXGOLD,amount/100);  else  createitem(OGOLDPILE,amount);
 	}
@@ -989,7 +989,7 @@ dropgold(amount)
 something(level)
 	int level;
 	{
-	register int j;
+	int j;
 	int i;
 	if (level<0 || level>MAXLEVEL+MAXVLEVEL) return;	/* correct level? */
 	if (rnd(101)<8) something(level); /* possibly more than one item */
@@ -1012,9 +1012,9 @@ static char nobjtab[] = { 0, OSCROLL,  OSCROLL,  OSCROLL,  OSCROLL, OPOTION,
 	OLONGSWORD };
 
 newobject(lev,i)
-	register int lev,*i;
+	int lev,*i;
 	{
-	register int tmp=32,j;
+	int tmp=32,j;
 	if (level<0 || level>MAXLEVEL+MAXVLEVEL) return(0);	/* correct level? */
 	if (lev>6) tmp=37; else if (lev>4) tmp=35;
 	j = nobjtab[tmp=rnd(tmp)];	/* the object type */
@@ -1079,8 +1079,8 @@ static char spsel[] = { 1, 2, 3, 5, 6, 8, 9, 11, 13, 14 };
 spattack(x,xx,yy)
 	int x,xx,yy;
 	{
-	register int i,j=0,k,m;
-	register char *p=0;
+	int i,j=0,k,m;
+	char *p=0;
 	if (c[CANCELLATION]) return(0);
 	vxy(&xx,&yy);	/* verify x & y coordinates */
 	switch(x)
@@ -1226,8 +1226,8 @@ checkloss(x)
 annihilate()
 	{
 	int i,j;
-	register long k;
-	register char *p;
+	long k;
+	char *p;
 	for (k=0, i=playerx-1; i<=playerx+1; i++)
 	  for (j=playery-1; j<=playery+1; j++)
 		if (!vxy(&i,&j)) /* if not out of bounds */
@@ -1326,7 +1326,7 @@ boom:	sphboom(x,y);	/* blow up stuff around sphere */
 rmsphere(x,y)
 	int x,y;
 	{
-	register struct sphere *sp,*sp2=0;
+	struct sphere *sp,*sp2=0;
 	for (sp=spheres; sp; sp2=sp,sp=sp->p)
 	  if (level==sp->lev)	/* is sphere on this level? */
 	    if ((x==sp->x) && (y==sp->y))	/* locate sphere at this location */
@@ -1351,7 +1351,7 @@ rmsphere(x,y)
 sphboom(x,y)
 	int x,y;
 	{
-	register int i,j;
+	int i,j;
 	if (c[HOLDMONST]) c[HOLDMONST]=1;
 	if (c[CANCELLATION]) c[CANCELLATION]=1;
 	for (j=max(1,x-2); j<min(x+3,MAXX-1); j++)
@@ -1376,7 +1376,7 @@ sphboom(x,y)
  */
 genmonst()
 	{
-	register int i,j;
+	int i,j;
 	cursors();  lprcat("\nGenocide what monster? ");
 	for (i=0; (!isalpha(i)) && (i!=' '); i=getchar());
 	lprc(i);
diff --git a/games/larn/moreobj.c b/games/larn/moreobj.c
index 2f6f21c..ddad0d6 100644
--- a/games/larn/moreobj.c
+++ b/games/larn/moreobj.c
@@ -120,7 +120,7 @@ ohear()
 othrone(arg)
 	int arg;
 	{
-	register int i,k;
+	int i,k;
 
 	lprcat("\nDo you (p) pry off jewels, (s) sit down"); iopts();
 	while (1)
@@ -162,7 +162,7 @@ othrone(arg)
 
 odeadthrone()
 	{
-	register int k;
+	int k;
 
 	lprcat("\nDo you (s) sit down"); iopts();
 	while (1)
@@ -189,7 +189,7 @@ odeadthrone()
  */
 ochest()
 	{
-	register int i,k;
+	int i,k;
 	lprcat("\nDo you (t) take it, (o) try to open it"); iopts();
 	while (1)
 	  {
@@ -245,7 +245,7 @@ ochest()
 
 ofountain()
 	{
-	register int x;
+	int x;
 	cursors();
 	lprcat("\nDo you (d) drink, (w) wash yourself"); iopts();
 	while (1) switch(getchar())
@@ -326,7 +326,7 @@ fch(how,x)
 fntchange(how)
 	int how;
 	{
-	register long j;
+	long j;
 	lprc('\n');
 	switch(rnd(9))
 		{
diff --git a/games/larn/movem.c b/games/larn/movem.c
index 5091875..8ae1358 100644
--- a/games/larn/movem.c
+++ b/games/larn/movem.c
@@ -22,7 +22,7 @@ static short w1[9],w1x[9],w1y[9];
 static int tmp1,tmp2,tmp3,tmp4,distance;
 movemonst()
 	{
-	register int i,j;
+	int i,j;
 	if (c[TIMESTOP]) return;	/* no action if time is stopped */
 	if (c[HASTESELF])  if ((c[HASTESELF]&1)==0)  return;
 	if (spheres) movsphere();	/* move the spheres of annihilation if any */
@@ -95,7 +95,7 @@ static int tmpitem,xl,xh,yl,yh;
 movemt(i,j)
 	int i,j;
 	{
-	register int k,m,z,tmp,xtmp,ytmp,monst;
+	int k,m,z,tmp,xtmp,ytmp,monst;
 	switch(monst=mitem[i][j])  /* for half speed monsters */
 		{
 		case TROGLODYTE:  case HOBGOBLIN:  case METAMORPH:  case XVART:
@@ -192,7 +192,7 @@ out:  if (tmp<distance) /* did find connectivity */
 mmove(aa,bb,cc,dd)
 	int aa,bb,cc,dd;
 	{
-	register int tmp,i,flag;
+	int tmp,i,flag;
 	char *who,*p;
 	flag=0;	/* set to 1 if monster hit by arrow trap */
 	if ((cc==playerx) && (dd==playery))
@@ -276,8 +276,8 @@ mmove(aa,bb,cc,dd)
 #define SPHMAX 20	/* maximum number of spheres movsphere can handle */
 movsphere()
 	{
-	register int x,y,dir,len;
-	register struct sphere *sp,*sp2;
+	int x,y,dir,len;
+	struct sphere *sp,*sp2;
 	struct sphere sph[SPHMAX];
 
 	/* first duplicate sphere list */
diff --git a/games/larn/nap.c b/games/larn/nap.c
index 7b294fa..fbe4f61 100644
--- a/games/larn/nap.c
+++ b/games/larn/nap.c
@@ -14,7 +14,7 @@
  *	routine to take a nap for n milliseconds
  */
 nap(x)
-	register int x;
+	int x;
 	{
 	if (x<=0) return; /* eliminate chance for infinite loop */
 	lflush();
@@ -93,7 +93,7 @@ static napms(time)
 	struct timeb _gtime;
 	time_t matchtime;
 	unsigned short matchmilli;
-	register struct timeb *tp = & _gtime;
+	struct timeb *tp = & _gtime;
 
 	if (time <= 0) return;
 	ftime(tp);
diff --git a/games/larn/object.c b/games/larn/object.c
index 230e7bc..cb5c216 100644
--- a/games/larn/object.c
+++ b/games/larn/object.c
@@ -12,7 +12,7 @@
  */
 lookforobject()
 {
-register int i,j;
+int i,j;
 if (c[TIMESTOP])  return;	/* can't find objects is time is stopped	*/
 i=item[playerx][playery];	if (i==0) return;
 showcell(playerx,playery);  cursors();  yrepcount=0;
@@ -289,7 +289,7 @@ finditem(itm)
 ostairs(dir)
 	int dir;
 	{
-	register int k;
+	int k;
 	lprcat("\nDo you (s) stay here  ");
 	if (dir > 0)	lprcat("(u) go up  ");	else	lprcat("(d) go down  ");
 	lprcat("or (f) kick stairs? ");
@@ -345,7 +345,7 @@ ostairs(dir)
 oteleport(err)
 	int err;
 	{
-	register int tmp;
+	int tmp;
 	if (err) if (rnd(151)<3)  died(264);  /*	stuck in a rock */
 	c[TELEFLAG]=1;	/*	show ?? on bottomline if been teleported	*/
 	if (level==0) tmp=0;
@@ -390,7 +390,7 @@ opotion(pot)
 quaffpotion(pot)
 	int pot;
 	{
-	register int i,j,k;
+	int i,j,k;
 	if (pot<0 || pot>=MAXPOTION) return; /* check for within bounds */
 	potionname[pot][0] = ' ';
 	switch(pot)
@@ -534,9 +534,9 @@ char time_change[] = { HASTESELF,HERO,ALTPRO,PROTECTIONTIME,DEXCOUNT,
  *	function to adjust time when time warping and taking courses in school
  */
 adjtime(tim)
-	register long tim;
+	long tim;
 	{
-	register int j;
+	int j;
 	for (j=0; j<26; j++)	/* adjust time related parameters */
 		if (c[time_change[j]])
 			if ((c[time_change[j]] -= tim) < 1) c[time_change[j]]=1;
@@ -549,7 +549,7 @@ adjtime(tim)
 read_scroll(typ)
 	int typ;
 	{
-	register int i,j;
+	int i,j;
 	if (typ<0 || typ>=MAXSCROLL) return;  /* be sure we are within bounds */
 	scrollname[typ][0] = ' ';
 	switch(typ)
@@ -640,7 +640,7 @@ oorb()
 
 opit()
 	{
-	register int i;
+	int i;
 	if (rnd(101)<81)
 	  if (rnd(70) > 9*c[DEXTERITY]-packweight() || rnd(101)<5)
 		if (level==MAXLEVEL-1) obottomless(); else
@@ -704,9 +704,9 @@ obook()
 	function to read a book
  */
 readbook(lev)
-	register int lev;
+	int lev;
 	{
-	register int i,tmp;
+	int i,tmp;
 	if (lev<=3) i = rund((tmp=splev[lev])?tmp:1); else
 		i = rnd((tmp=splev[lev]-9)?tmp:1) + 9;
 	spelknow[i]=1;
@@ -741,7 +741,7 @@ ocookie()
 ogold(arg)
 	int arg;
 	{
-	register long i;
+	long i;
 	i = iarg[playerx][playery];
 	if (arg==OMAXGOLD) i *= 100;
 		else if (arg==OKGOLD) i *= 1000;
@@ -752,7 +752,7 @@ ogold(arg)
 
 ohome()
 	{
-	register int i;
+	int i;
 	nosignal = 1;	/* disable signals */
 	for (i=0; i<26; i++) if (iven[i]==OPOTION) if (ivenarg[i]==21)
 		{
diff --git a/games/larn/regen.c b/games/larn/regen.c
index 06ac28d..40b84f6 100644
--- a/games/larn/regen.c
+++ b/games/larn/regen.c
@@ -11,8 +11,8 @@
  */
 regen()
 	{
-	register int i,flag;
-	register long *d;
+	int i,flag;
+	long *d;
 	d = c;
 #ifdef EXTRA
 	d[MOVESMADE]++;
diff --git a/games/larn/savelev.c b/games/larn/savelev.c
index 702801f..1ef873f 100644
--- a/games/larn/savelev.c
+++ b/games/larn/savelev.c
@@ -8,10 +8,10 @@ extern struct cel *cell;
  */
 savelevel()
 	{
-	register struct cel *pcel;
-	register char *pitem,*pknow,*pmitem;
-	register short *phitp,*piarg;
-	register struct cel *pecel;
+	struct cel *pcel;
+	char *pitem,*pknow,*pmitem;
+	short *phitp,*piarg;
+	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];
@@ -30,10 +30,10 @@ savelevel()
  */
 getlevel()
 	{
-	register struct cel *pcel;
-	register char *pitem,*pknow,*pmitem;
-	register short *phitp,*piarg;
-	register struct cel *pecel;
+	struct cel *pcel;
+	char *pitem,*pknow,*pmitem;
+	short *phitp,*piarg;
+	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];
diff --git a/games/larn/scores.c b/games/larn/scores.c
index c5c8b93..b932beb 100644
--- a/games/larn/scores.c
+++ b/games/larn/scores.c
@@ -124,7 +124,7 @@ writeboard()
  */
 makeboard()
 	{
-	register int i;
+	int i;
 	for (i=0; i<SCORESIZE; i++)
 		{
 		winr[i].taxes = winr[i].score = sco[i].score = 0;
@@ -145,7 +145,7 @@ makeboard()
  */
 hashewon()
 	{
-	register int i;
+	int i;
 	c[HARDGAME] = 0;
 	if (readboard() < 0) return(0);	/* can't find scoreboard */
 	for (i=0; i<SCORESIZE; i++)	/* search through winners scoreboard */
@@ -167,8 +167,8 @@ hashewon()
 long paytaxes(x)
 	long x;
 	{
-	register int i;
-	register long amt;
+	int i;
+	long amt;
 	if (x<0) return(0L);
 	if (readboard()<0) return(0L);
 	for (i=0; i<SCORESIZE; i++)
@@ -192,8 +192,8 @@ long paytaxes(x)
  */
 winshou()
 	{
-	register struct wscofmt *p;
-	register int i,j,count;
+	struct wscofmt *p;
+	int i,j,count;
 	for (count=j=i=0; i<SCORESIZE; i++) /* is there anyone on the scoreboard? */
 		if (winr[i].score != 0)
 			{ j++; break; }
@@ -230,7 +230,7 @@ winshou()
 shou(x)
 	int x;
 	{
-	register int i,j,n,k;
+	int i,j,n,k;
 	int count;
 	for (count=j=i=0; i<SCORESIZE; i++)	/* is the scoreboard empty? */
 		if (sco[i].score!= 0)
@@ -274,7 +274,7 @@ shou(x)
 static char esb[] = "The scoreboard is empty.\n";
 showscores()
 	{
-	register int i,j;
+	int i,j;
 	lflush();  lcreat((char*)0);  if (readboard()<0) return;
 	i=winshou();	j=shou(0);
 	if (i+j == 0) lprcat(esb); else lprc('\n');
@@ -288,7 +288,7 @@ showscores()
  */
 showallscores()
 	{
-	register int i,j;
+	int i,j;
 	lflush();  lcreat((char*)0);  if (readboard()<0) return;
 	c[WEAR] = c[WIELD] = c[SHIELD] = -1;  /* not wielding or wearing anything */
 	for (i=0; i<MAXPOTION; i++) potionname[i][0]=' ';
@@ -305,7 +305,7 @@ showallscores()
  */
 sortboard()
 	{
-	register int i,j,pos;
+	int i,j,pos;
 	long jdat;
 	for (i=0; i<SCORESIZE; i++) sco[i].order = winr[i].order = -1;
 	pos=0;  while (pos < SCORESIZE)
@@ -341,7 +341,7 @@ newscore(score, whoo, whyded, winner)
 	int winner, whyded;
 	char *whoo;
 	{
-	register int i;
+	int i;
 	long taxes;
 	if (readboard() < 0) return; 	/*	do the scoreboard	*/
 	/* if a winner then delete all non-winning scores */
@@ -384,7 +384,7 @@ new1sub(score,i,whoo,taxes)
 	int i;
 	char *whoo;
 	{
-	register struct wscofmt *p;
+	struct wscofmt *p;
 	p = &winr[i];
 	p->taxes += taxes;
 	if ((score >= p->score) || (c[HARDGAME] > p->hardlev))
@@ -409,8 +409,8 @@ new2sub(score,i,whoo,whyded)
 	int i,whyded;
 	char *whoo;
 	{
-	register int j;
-	register struct scofmt *p;
+	int j;
+	struct scofmt *p;
 	p = &sco[i];
 	if ((score >= p->score) || (c[HARDGAME] > p->hardlev))
 		{
@@ -467,7 +467,7 @@ static int scorerror;
 died(x)
 	int x;
 	{
-	register int f,win;
+	int f,win;
 	char ch,*mod;
 	time_t zzz;
 	long i;
@@ -555,7 +555,7 @@ invalid:
 diedsub(x)
 int x;
 	{
-	register char ch,*mod;
+	char ch,*mod;
 	lprintf("Score: %d, Diff: %d,  %s ",(long)c[GOLD],(long)c[HARDGAME],logname);
 	if (x < 256)
 		{
@@ -573,8 +573,8 @@ int x;
  */
 diedlog()
 	{
-	register int n;
-	register char *p;
+	int n;
+	char *p;
 	struct stat stbuf;
 	lcreat((char*)0);
 	if (lopen(logfile)<0)
@@ -620,7 +620,7 @@ getplid(nam)
 	char *nam;
 	{
 	int fd7,high=999,no;
-	register char *p,*p2;
+	char *p,*p2;
 	char name[80];
 	if (havepid != -1) return(havepid);	/* already did it */
 	lflush();	/* flush any pending I/O */
diff --git a/games/larn/store.c b/games/larn/store.c
index e751554..9f64c95 100644
--- a/games/larn/store.c
+++ b/games/larn/store.c
@@ -174,7 +174,7 @@ static void dnditem();
 
 dnd_hed()
 	{
-	register int i;
+	int i;
 	for (i=dnditm; i<26+dnditm; i++)	dnditem(i);
 	cursor(50,18); lprcat("You have ");
 	}
@@ -204,7 +204,7 @@ static void nogold()
 
 dndstore()
   {
-  register int i;
+  int i;
   dnditm = 0;
   nosignal = 1; /* disable signals */
   clear();  dnd_2hed();
@@ -264,9 +264,9 @@ dndstore()
  */
 static void
 dnditem(i)
-	register int i;
+	int i;
 	{
-	register int j,k;
+	int j,k;
 	if (i >= maxitm)  return;
 	cursor( (j=(i&1)*40+1) , (k=((i%26)>>1)+5) );
 	if (itm[i].qty == 0)  { lprintf("%39s","");  return; }
@@ -318,7 +318,7 @@ sch_hed()
 
 oschool()
 	{
-	register int i;
+	int i;
 	long time_used;
 	nosignal = 1; /* disable signals */
 	sch_hed();
@@ -423,7 +423,7 @@ banktitle(str)
 	clear();  lprcat(str);
 	if (outstanding_taxes>0)
 		{
-		register int i;
+		int i;
 		lprcat("\n\nThe Larn Revenue Service has ordered that your account be frozen until all\n"); beep();
 		lprintf("levied taxes have been paid.  They have also told us that you owe %d gp in\n",(long)outstanding_taxes);
 		lprcat("taxes, and we must comply with them. We cannot serve you at this time.  Sorry.\n");
@@ -444,7 +444,7 @@ banktitle(str)
  */
 ointerest()
 	{
-	register int i;
+	int i;
 	if (c[BANKACCOUNT]<0) c[BANKACCOUNT] = 0;
 	else if ((c[BANKACCOUNT]>0) && (c[BANKACCOUNT]<500000))
 		{
@@ -461,7 +461,7 @@ static long gemvalue[26]={0};	/* the appraisal of the gems */
 obanksub()
 	{
 	unsigned long amt;
-	register int i,k;
+	int i,k;
 	ointerest();	/* credit any needed interest */
 
 	for (k=i=0; i<26; i++)
@@ -547,9 +547,9 @@ obanksub()
 	subroutine to appraise any stone for the bank
  */
 appraise(gemstone)
-	register int gemstone;
+	int gemstone;
 	{
-	register int j,amt;
+	int j,amt;
 	for (j=0; j<26; j++)
 	  if (iven[j]==gemstone)
 		{
@@ -589,7 +589,7 @@ static otradhead()
 
 otradepost()
   {
-  register int i,j,value,isub,izarg;
+  int i,j,value,isub,izarg;
   dnditm = dndcount = 0;
   nosignal = 1; /* disable signals */
   resetscroll();	otradhead();
@@ -652,7 +652,7 @@ cnsitm()
  */
 olrs()
 	{
-	register int i,first;
+	int i,first;
 	unsigned long amt;
 	first = nosignal = 1; /* disable signals */
 	clear();  resetscroll(); cursor(1,4);
diff --git a/games/larn/tok.c b/games/larn/tok.c
index ff19398..449c7d2 100644
--- a/games/larn/tok.c
+++ b/games/larn/tok.c
@@ -114,7 +114,7 @@ flushall()
 sethard(hard)
 	int hard;
 	{
-	register int j,k,i;
+	int j,k,i;
 	j=c[HARDGAME]; hashewon();
 	if (restorflag==0)	/* don't set c[HARDGAME] if restoring game */
 		{
@@ -143,8 +143,8 @@ sethard(hard)
  */
 readopts()
 	{
-	register char *i;
-	register int j,k;
+	char *i;
+	int j,k;
 	int flag;
 	flag=1;	/* set to 0 if he specifies a name for his character */
 	if (lopen(optsfile) < 0)