diff -u -r angband-290/src/files.c angband/src/files.c
--- angband-290/src/files.c	Mon Apr 10 07:42:28 2000
+++ angband/src/files.c	Thu Apr 27 21:26:58 2000
@@ -2152,7 +2152,7 @@
 	for (i = 0; i < 12; i++)
 	{
 		object_desc(o_name, &st_ptr->stock[i], TRUE, 3);
-		fprintf(fff, "%c%s %s\n", I2A(i%12), paren, o_name);
+		fprintf(fff, "%c%s %s\n", I2A(i), paren, o_name);
 	}
 	fprintf(fff, "\n\n");
 
@@ -2161,7 +2161,7 @@
 	for (i = 12; i < 24; i++)
 	{
 		object_desc(o_name, &st_ptr->stock[i], TRUE, 3);
-		fprintf(fff, "%c%s %s\n", I2A(i%12), paren, o_name);
+		fprintf(fff, "%c%s %s\n", I2A(i), paren, o_name);
 	}
 	fprintf(fff, "\n\n");