newsphere
long newsphere(int, int, int, int);
newsphere(xl, yl, i, rnd(20) + 11); /* make a sphere */
newsphere(x + diroffx[dir], y + diroffy[dir], dir, len);