NetHack 1.3d/do wear.c