Function doddoremarm

src/do_wear.c:3021–3057

the #takeoffall command -- remove multiple worn items */

/* the #takeoffall command -- remove multiple worn items */
int
doddoremarm(void)
{
    int result = 0;

    if (svc.context.takeoff.what || svc.context.takeoff.mask) {
        You("continue %s.", svc.context.takeoff.disrobing);
        set_occupation(take_off, svc.context.takeoff.disrobing, 0);
        return ECMD_OK;
    } else if (!uwep && !uswapwep && !uquiver && !uamul && !ublindf
               && !uleft && !uright && !wearing_armor()) {
        You("are not wearing anything.");
        return ECMD_OK;
    }

    add_valid_menu_class(0); /* reset */
    if (flags.menu_style != MENU_TRADITIONAL
        || (result = ggetobj("take off", select_off, 0, FALSE,
                             (unsigned *) 0)) < -1)
        (void) menu_remarm(result);

    if (svc.context.takeoff.mask) {
        (void) strncpy(svc.context.takeoff.disrobing,
                       (((svc.context.takeoff.mask & ~W_WEAPONS) != 0)
                        /* default activity for armor and/or accessories,
                           possibly combined with weapons */
                        ? "disrobing"
                        /* specific activity when handling weapons only */
                        : "disarming"), CONTEXTVERBSZ);
        (void) take_off();
    }
    /* The time to perform the command is already completely accounted for
     * in take_off(); if we return 1, that would add an extra turn to each
     * disrobe.
     */
    return ECMD_OK;
}

/* #altunwield - just unwield alternate weapon, item-action '-' when picking
   uswapwep from context-sensitive inventory */