&& you.num_turns < Options.tut_seen_invisible - 20)

             && you.num_turns < Options.tut_seen_invisible + 20)

                                      bool lowered = false)

                                      bool lowered = false,
                                      bool allow_all = false)

                if (allow_all)
                    result += (lowered? "/a" : "/A");

                                                         safe));

                                                         safe, allow_all));

        "interrupt_offer_corpse = interrupt_butcher, hungry",

static int   _determine_chunk_effect(int which_chunk_type, bool rotten_chunk);
static void  _eat_chunk( int chunk_effect, bool cannibal, int mon_intel = 0);
static void  _eating(unsigned char item_class, int item_type);
static void  _describe_food_change(int hunger_increment);
static bool  _food_change(bool suppress_message);
static bool  _vampire_consume_corpse(int slot, bool invent);
static void  _heal_from_food(int hp_amt, int mp_amt, bool unrot,
                             bool restore_str);

static int  _determine_chunk_effect(int which_chunk_type, bool rotten_chunk);
static void _eat_chunk( int chunk_effect, bool cannibal, int mon_intel = 0);
static void _eating(unsigned char item_class, int item_type);
static void _describe_food_change(int hunger_increment);
static bool _food_change(bool suppress_message);
static bool _vampire_consume_corpse(int slot, bool invent);
static void _heal_from_food(int hp_amt, int mp_amt, bool unrot,
                            bool restore_str);

            return false;

            return (false);

        // no switching necessary
        if (can_cut_meat( *wpn ))
            return (false);

    int old_weapon = you.equip[EQ_WEAPON];

    if ( !fallback )

    if (!fallback)

    int old_weapon = you.equip[EQ_WEAPON];
    mpr( "What would you like to use?", MSGCH_PROMPT );

    mpr("What would you like to use?", MSGCH_PROMPT);

bool butchery(int which_corpse)

static bool _prepare_butchery(bool can_butcher, bool barehand_butcher,
                              bool wpn_switch, bool removed_gloves,
                              bool new_cursed)
{
    // No preparation necessary.
    if (can_butcher)
        return (true);
    // We don't want auto-switching.
    if (!Options.easy_butcher)
        return (false);
    // If you can butcher by taking off your gloves, don't prompt.
    if (removed_gloves)
    {
        // Actually take off the gloves; this creates a
        // delay. We assume later on that gloves have a 1-turn
        // takeoff delay!
        takeoff_armour(you.equip[EQ_GLOVES]);
        barehand_butcher = true;
    }
    // note that if barehanded then the user selected '-' when
    // switching weapons
    if (!barehand_butcher && (!wpn_switch
                              || you.weapon() == NULL
                              || !can_cut_meat(*you.weapon())))
    {
        // still can't butcher. Early out
        if ( you.weapon() == NULL )
        {
            if (you.equip[EQ_GLOVES] == -1)
                mpr("What, with your bare hands?");
            else
                mpr("Your gloves aren't that sharp!");
        }
        else
            mpr("Maybe you should try using a sharper implement.");
        // Switch back to old weapon.
        if (!new_cursed && wpn_switch)
            start_delay( DELAY_WEAPON_SWAP, 1, you.equip[EQ_WEAPON] );
        return (false);
    }
    you.turn_is_over = true;
    // switched to a good butchering tool
    return (true);
}
static bool _butcher_corpse(int corpse_id)

    bool new_cursed = false;
    int old_weapon = you.equip[EQ_WEAPON];
    int old_gloves = you.equip[EQ_GLOVES];

    ASSERT(corpse_id != -1);
    const bool rotten  = food_is_rotten(mitm[corpse_id]);
    const bool can_sac = you.duration[DUR_PRAYER]
                         && god_likes_butchery(you.religion);
    if (can_sac && !rotten)
    {
        start_delay(DELAY_OFFER_CORPSE, 1, corpse_id);
    }
    else
    {
        if (can_sac && rotten)
        {
            simple_god_message(coinflip() ? " refuses to accept that"
                                            " mouldy sacrifice!"
                                          : " demands fresh blood!",
                               you.religion);
        }
        // If we didn't switch weapons, we get in one turn of butchery;
        // otherwise the work has to happen in the delay.
//      if (!wpn_switch && !removed_gloves)
//          ++mitm[corpse_id].plus2;

    const transformation_type transform =
        static_cast<transformation_type>(you.attribute[ATTR_TRANSFORMATION]);

        int work_req = 4 - mitm[corpse_id].plus2;
        if (work_req < 0)
            work_req = 0;

    // Xom probably likes this, occasionally
    // Vampires' fangs are optimised for biting, not for tearing flesh.
    // Other species with this mutation still might benefit from this.
    bool teeth_butcher = (player_mutation_level(MUT_FANGS) == 3
                          && you.species != SP_VAMPIRE);

        start_delay(DELAY_BUTCHER, work_req, corpse_id,
                    mitm[corpse_id].special);
    }
    you.turn_is_over = true;
    return true;
}

    bool barehand_butcher = (transform_can_butcher_barehanded(transform)
                             || you.has_claws()) && you.equip[EQ_GLOVES] == -1;

static void _terminate_butchery(bool wpn_switch, bool removed_gloves,
                                bool new_cursed, int old_weapon, int old_gloves)
{
    // switch weapon back
    if (!new_cursed && wpn_switch)
        start_delay( DELAY_WEAPON_SWAP, 1, old_weapon );

    bool gloved_butcher = you.has_claws() && (you.equip[EQ_GLOVES] != -1
                          && !item_cursed(you.inv[you.equip[EQ_GLOVES]]));

    // put on the removed gloves
    if (removed_gloves)
        start_delay( DELAY_ARMOUR_ON, 1, old_gloves );

    bool can_butcher = teeth_butcher || barehand_butcher
                          || you.equip[EQ_WEAPON] != -1
                        && can_cut_meat(you.inv[you.equip[EQ_WEAPON]]);

    you.turn_is_over = true;
}

bool butchery(int which_corpse)
{

    if (!Options.easy_butcher && !can_butcher)

    if (you.flight_mode() == FL_LEVITATE)

        mpr("Maybe you should try using a sharper implement.");

        mpr("You can't reach the floor from up here.");

    const transformation_type transform =
        static_cast<transformation_type>(you.attribute[ATTR_TRANSFORMATION]);

    if (you.flight_mode() == FL_LEVITATE)

    // Vampires' fangs are optimised for biting, not for tearing flesh.
    // Other species with this mutation still might benefit from this.
    bool teeth_butcher    = (player_mutation_level(MUT_FANGS) == 3
                             && you.species != SP_VAMPIRE);
    bool barehand_butcher = (transform_can_butcher_barehanded(transform)
                             || you.has_claws()) && you.equip[EQ_GLOVES] == -1;
    bool gloved_butcher   = (you.has_claws() && you.equip[EQ_GLOVES] != -1
                             && !item_cursed(you.inv[you.equip[EQ_GLOVES]]));
    bool can_butcher      = teeth_butcher || barehand_butcher
                            || you.equip[EQ_WEAPON] != -1
                               && can_cut_meat(you.inv[you.equip[EQ_WEAPON]]);
    if (!Options.easy_butcher && !can_butcher)

        mpr("You can't reach the floor from up here.");

        mpr("Maybe you should try using a sharper implement.");

    if ( !can_butcher && you.duration[DUR_BERSERKER] )

    if (!can_butcher && you.duration[DUR_BERSERKER])

        mpr ("You are too berserk to search for a butchering tool!");

        mpr("You are too berserk to search for a butchering tool!");

        if (mitm[o].base_type == OBJ_CORPSES &&
            mitm[o].sub_type == CORPSE_BODY)

        if (mitm[o].base_type == OBJ_CORPSES
            && mitm[o].sub_type == CORPSE_BODY)

    // pre-chosen corpse not found?
    if (prechosen && corpse_id != which_corpse)
        prechosen = false;

    bool canceled_butcher = false;
    // Now pick what you want to butcher. This is only a problem
    // if there are several corpses on the square.
    if ( num_corpses == 0 )

    if (num_corpses == 0)

             : "butcher");
        return false;

                                                                   : "butcher");
        return (false);

    else if ( !prechosen
              && (num_corpses > 1 || Options.always_confirm_butcher) )

    int old_weapon      = you.equip[EQ_WEAPON];
    int old_gloves      = you.equip[EQ_GLOVES];
    bool wpn_switch     = false;
    bool removed_gloves = false;
    bool new_cursed     = false;
    if (!can_butcher)

        corpse_id = -1;
        for (int o=igrd[you.x_pos][you.y_pos]; o != NON_ITEM; o = mitm[o].link)

        // Try to find a butchering implement.
        wpn_switch      = _find_butchering_implement(!gloved_butcher);
        removed_gloves  = gloved_butcher && !wpn_switch;
        if (wpn_switch)

            if ( (mitm[o].base_type != OBJ_CORPSES) ||
                 (mitm[o].sub_type != CORPSE_BODY) )
                continue;

            new_cursed = ( you.weapon() != NULL
                           && you.weapon()->base_type == OBJ_WEAPONS
                           && item_cursed(*you.weapon()) );
        }
    }

            // offer the possibility of butchering
            snprintf(info, INFO_SIZE, "%s %s?",
                     can_bottle_blood_from_corpse(mitm[o].plus)? "Bottle" : "Butcher",
                     mitm[o].name(DESC_NOCAP_A).c_str());

    // Butcher pre-chosen corpse, if found, or if there is only one corpse.
    bool success = false;
    if (prechosen && corpse_id == which_corpse
        || num_corpses == 1 && !Options.always_confirm_butcher)
    {
        if (!_prepare_butchery(can_butcher, barehand_butcher, wpn_switch,
                               removed_gloves, new_cursed))
        {
            return (false);
        }
        success = _butcher_corpse(corpse_id);
        _terminate_butchery(wpn_switch, removed_gloves, new_cursed,
                            old_weapon, old_gloves);

            const int result = yesnoquit(info, true, 'N', false, false, 'C', 'D');
            if ( result == -1 )
            {
                canceled_butcher = true;
                corpse_id = -1;
                break;
            }
            else if ( result == 1 )
            {
                corpse_id = o;
                break;
            }
            // continue loop for 0
        }

        return success;

    // Do the actual butchery, if we found a good corpse.
    if ( corpse_id != -1 )

    // Now pick what you want to butcher. This is only a problem
    // if there are several corpses on the square.
    bool butcher_all = false;
    for (int o = igrd[you.x_pos][you.y_pos]; o != NON_ITEM; o = mitm[o].link)

        const bool can_sac = you.duration[DUR_PRAYER]
            && god_likes_butchery(you.religion);
        bool removed_gloves = false;
        bool wpn_switch = false;

        if (mitm[o].base_type != OBJ_CORPSES
            || mitm[o].sub_type != CORPSE_BODY)
        {
            continue;
        }

        if ( Options.easy_butcher && !can_butcher )

        if (butcher_all)
            corpse_id = o;
        else

            // Try to find a butchering implement.
            // If you can butcher by taking off your gloves, don't prompt.
            wpn_switch = _find_butchering_implement(!gloved_butcher);
            removed_gloves = gloved_butcher && !wpn_switch;
            if ( removed_gloves )

            corpse_id = -1;
            // Shall we butcher this corpse?
            snprintf(info, INFO_SIZE, "%s %s?",
                     can_bottle_blood_from_corpse(mitm[o].plus) ? "Bottle"
                                                                : "Butcher",
                     mitm[o].name(DESC_NOCAP_A).c_str());
            const int result = yesnoquit(info, true, 'N', true, false,
                                         'C', 'D');
            if (result == -1) // (q)uit

                // Actually take off the gloves; this creates a
                // delay. We assume later on that gloves have a 1-turn
                // takeoff delay!
                takeoff_armour(old_gloves);
                barehand_butcher = true;

                canned_msg(MSG_OK);
                _terminate_butchery(wpn_switch, removed_gloves, new_cursed,
                                    old_weapon, old_gloves);
                return (false);

            if ( wpn_switch )

            else if (result == 0) // (n)o

                new_cursed =
                    (you.weapon() != NULL) &&
                    (you.weapon()->base_type == OBJ_WEAPONS) &&
                    item_cursed( *you.weapon() );

                continue;

            // note that if barehanded then the user selected '-' when
            // switching weapons
            if (!barehand_butcher && (!wpn_switch ||
                                      you.weapon() == NULL ||
                                      !can_cut_meat(*you.weapon())))

            else if (result == 1 || result == 2) // (y)es, (a)ll

                // still can't butcher. Early out
                if ( you.weapon() == NULL )

                if (!_prepare_butchery(can_butcher, barehand_butcher,
                                       wpn_switch, removed_gloves, new_cursed))

                    if (you.equip[EQ_GLOVES] == -1)
                        mpr("What, with your bare hands?");
                    else
                        mpr("Your gloves aren't that sharp!");

                    return (false);

                else
                    mpr("Maybe you should try using a sharper implement.");

                corpse_id = o;

                if ( !new_cursed && wpn_switch )
                    start_delay( DELAY_WEAPON_SWAP, 1, old_weapon );
                return false;

                if (result == 2) // (a)ll
                    butcher_all = true;

            // switched to a good butchering knife
            can_butcher = true;

        if ( can_butcher )

        if (corpse_id != -1)

            const bool rotten = food_is_rotten(mitm[corpse_id]);
            if (can_sac && !rotten)
                offer_corpse(corpse_id);
            else
            {
                if (can_sac && rotten)
                {
                    simple_god_message(coinflip() ?
                                       " refuses to accept that mouldy "
                                       "sacrifice!" :
                                       " demands fresh blood!", you.religion);
                }
                // If we didn't switch weapons, we get in one turn of butchery;
                // otherwise the work has to happen in the delay.
                if (!wpn_switch && !removed_gloves)
                    ++mitm[corpse_id].plus2;

            if (_butcher_corpse(corpse_id))
                success = true;

                int work_req = 4 - mitm[corpse_id].plus2;
                if (work_req < 0)
                    work_req = 0;
                start_delay(DELAY_BUTCHER, work_req, corpse_id,
                            mitm[corpse_id].special);
                if (you.duration[DUR_PRAYER]
                    && god_hates_butchery(you.religion))
                {
                    did_god_conduct(DID_DEDICATED_BUTCHERY, 10);
                }
            }

            if (!butcher_all)
                break;

        // switch weapon back
        if (!new_cursed && wpn_switch)
            start_delay( DELAY_WEAPON_SWAP, 1, old_weapon );
        // put on the removed gloves
        if ( removed_gloves )
            start_delay( DELAY_ARMOUR_ON, 1, old_gloves );
        you.turn_is_over = true;
        return true;

    if (canceled_butcher)
        canned_msg(MSG_OK);
    else

    if (!butcher_all && corpse_id == -1)
    {

               you.species == SP_VAMPIRE && you.experience_level >= 6 ?
               "bottle" : "butcher");

             you.species == SP_VAMPIRE && you.experience_level >= 6 ?
             "bottle" : "butcher");
    }
    else
    {
        _terminate_butchery(wpn_switch, removed_gloves, new_cursed,
                            old_weapon, old_gloves);
    }

    return false;

    return success;

                mpr(msg.c_str(), MSGCH_FOOD, less_hungry);

                mpr(msg.c_str(), MSGCH_FOOD, less_hungry);

                mpr(msg.c_str(), MSGCH_FOOD, less_hungry);

            mpr(msg.c_str(), MSGCH_FOOD, less_hungry);

        const int ans = yesnoquit( prompt.str().c_str(), true, 0, false, 'E' );

        const int ans = yesnoquit( prompt.str().c_str(), true, 0, false, false,
                                   'E' );

    DELAY_OFFER_CORPSE,

    delay.type = type;

    delay.type     = type;

    delay.parm1 = parm1;
    delay.parm2 = parm2;
    delay.started = false;

    delay.parm1    = parm1;
    delay.parm2    = parm2;
    delay.started  = false;

    if ( you.delay_queue.empty() )

    if (you.delay_queue.empty())

        (delay.type == DELAY_BUTCHER
         && you.delay_queue.size() >= 2
         && you.delay_queue[1].type == DELAY_WEAPON_SWAP);

                          ((delay.type == DELAY_BUTCHER
                              || delay.type == DELAY_OFFER_CORPSE)
                           && you.delay_queue.size() >= 2
                           && you.delay_queue[1].type == DELAY_WEAPON_SWAP);

        // FIXME: Also print this message for interruptions in chained
        //        butchery/sacrifice session.

            {

            }

    case DELAY_OFFER_CORPSE:      // one turn
#ifdef DEBUG_DIAGNOSTICS
        mpr("Stop sacrificing.");
#endif
        pop_delay();
        break;

    case DELAY_JEWELLERY_ON:      // one turn

    case DELAY_JEWELLERY_ON:      // one turn

    if (current_delay_action() == DELAY_BUTCHER)

    if (current_delay_action() == DELAY_BUTCHER
        || current_delay_action() == DELAY_OFFER_CORPSE)
    {

    }

    if ( !delay.started )

    if (!delay.started)

        switch ( delay.type )

        switch (delay.type)

            mprf(MSGCH_MULTITURN_ACTION, "You start %s the corpse.",
                 can_bottle_blood_from_corpse(mitm[delay.parm1].plus)?
                  "bottling blood from" : "butchering");

            mprf(MSGCH_MULTITURN_ACTION, "You start %s the %s.",
                 can_bottle_blood_from_corpse(mitm[delay.parm1].plus) ?
                 "bottling blood from" : "butchering",
                 mitm[delay.parm1].name(DESC_PLAIN).c_str());
            if (you.duration[DUR_PRAYER]
                && god_hates_butchery(you.religion))
            {
                did_god_conduct(DID_DEDICATED_BUTCHERY, 10);
            }

    if (delay.type == DELAY_BUTCHER)

    if (delay.type == DELAY_BUTCHER || delay.type == DELAY_OFFER_CORPSE)

        if (is_valid_item( mitm[ delay.parm1 ] )

        if (is_valid_item(mitm[ delay.parm1 ])

                if (player_mutation_level(MUT_SAPROVOROUS) == 3)
                    xom_check_corpse_waste();

                if (delay.type == DELAY_BUTCHER)
                {
                    if (player_mutation_level(MUT_SAPROVOROUS) == 3)
                        xom_check_corpse_waste();
                    else
                        xom_is_stimulated(32);
                    delay.duration = 0;
                }

                    xom_is_stimulated(32);
                delay.duration = 0;

                {
                    // don't attempt to offer a skeleton
                    pop_delay();
                    // Chain onto the next delay.
                    handle_delay();
                    return;
                }

                // special < 100 is the rottenness check
                if ( (mitm[delay.parm1].special < 100) &&
                     (delay.parm2 >= 100) )

                // Only give the rotting message if the corpse wasn't
                // previously rotten. (special < 100 is the rottenness check)
                if (food_is_rotten(mitm[delay.parm1]) && delay.parm2 >= 100)

                    if (delay.type == DELAY_OFFER_CORPSE)
                    {
                        // don't attempt to offer a rotten corpse
                        pop_delay();
                        // Chain onto the next delay.
                        handle_delay();
                        return;
                    }

        else if (delay.type == DELAY_OFFER_CORPSE)
        {
            mprf("Corpse %d no longer valid!", delay.parm1);
            // don't attempt to offer an invalid item
            pop_delay();
            // Chain onto the next delay.
            handle_delay();
            return;
        }

        if (delay.type == DELAY_OFFER_CORPSE && !you.duration[DUR_PRAYER]
            && do_autopray())
        {
            return;
        }

    if ( delay.type == DELAY_MULTIDROP )

    else if (delay.type == DELAY_MULTIDROP)

        {

        }

    if ( delay.type == DELAY_RECITE)

    else if (delay.type == DELAY_RECITE)

                break;

                return;

                mprf("You finish %s the corpse into pieces.",

                mprf("You finish %s the %s into pieces.",

                      || player_mutation_level(MUT_FANGS) == 3) ?
                     "ripping" : "chopping");

                      || player_mutation_level(MUT_FANGS) == 3) ? "ripping"
                                                                : "chopping",
                     mitm[delay.parm1].name(DESC_PLAIN).c_str());

                {

                }

                {

                }

    case DELAY_OFFER_CORPSE:
    {
        if (!you.duration[DUR_PRAYER] && !do_autopray())
        {
            stop_delay();
            return;
        }
        offer_corpse(delay.parm1);
        break;
    }

    "jewellery_on", "memorise", "butcher", "weapon_swap", "passwall",
    "drop_item", "multidrop", "ascending_stairs", "descending_stairs", "recite",
    "run", "rest", "travel", "macro", "interruptible", "uninterruptible",

    "jewellery_on", "memorise", "butcher", "offer_corpse", "weapon_swap",
    "passwall", "drop_item", "multidrop", "ascending_stairs",
    "descending_stairs", "recite", "run", "rest", "travel", "macro",
    "interruptible", "uninterruptible"