Function bc_order

src/ball.c:353–371

* Return the stacking of the hero's ball & chain. This assumes that the * hero is being punished. */

 *  hero is being punished.
 */
staticfn int
bc_order(void)
{
    struct obj *obj;

    if (uchain->ox != uball->ox || uchain->oy != uball->oy || carried(uball)
        || u.uswallow)
        return BCPOS_DIFFER;

    for (obj = svl.level.objects[uball->ox][uball->oy]; obj;
         obj = obj->nexthere) {
        if (obj == uchain)
            return BCPOS_CHAIN;
        if (obj == uball)
            return BCPOS_BALL;
    }
    impossible("bc_order:  ball&chain not in same location!");
    return BCPOS_DIFFER;
}

/*
 *  set_bc()