NetHack 1.4f/do wear.c