W_BALL
uball->owornmask &= ~W_BALL;
setworn(mkobj_at(BALL_SYM, u.ux, u.uy), W_BALL);
{ W_BALL, &uball },