Function hmon_hitmon

src/uhitm.c:1753–1935

guts of hmon(); returns True if 'mon' survives */

/* guts of hmon(); returns True if 'mon' survives */
staticfn boolean
hmon_hitmon(
    struct monst *mon,
    struct obj *obj,
    int thrown, /* HMON_xxx (0 => hand-to-hand, other => ranged) */
    int dieroll)
{
    struct _hitmon_data hmd;
    boolean maybe_knockback = FALSE;

    hmd.dmg = 0;
    hmd.thrown = thrown;
    hmd.twohits = thrown ? 0 : gt.twohits;
    hmd.dieroll = dieroll;
    hmd.mdat = mon->data;
    hmd.use_weapon_skill = FALSE;
    hmd.train_weapon_skill = FALSE;
    hmd.barehand_silver_rings = 0;
    hmd.silvermsg = FALSE;
    hmd.silverobj = FALSE;
    hmd.lightobj = FALSE;
    hmd.material = obj ? objects[obj->otyp].oc_material
                       : NO_MATERIAL;
    hmd.jousting = 0;
    hmd.hittxt = FALSE;
    hmd.get_dmg_bonus = TRUE;
    hmd.unarmed = !uwep && !uarm && !uarms;
    hmd.hand_to_hand = (thrown == HMON_MELEE
                        /* not grapnels; applied implies uwep */
                        || (thrown == HMON_APPLIED && is_pole(uwep)));
    hmd.ispoisoned = FALSE;
    hmd.unpoisonmsg = FALSE;
    hmd.needpoismsg = FALSE;
    hmd.poiskilled = FALSE;
    hmd.already_killed = FALSE;
    hmd.offmap = FALSE;
    hmd.destroyed = FALSE;
    hmd.dryit = FALSE;
    hmd.doreturn = FALSE;
    hmd.retval = FALSE;
    hmd.saved_oname[0] = '\0';

    hmon_hitmon_do_hit(&hmd, mon, obj);
    if (hmd.doreturn)
        return hmd.retval;

    /*
     ***** NOTE: perhaps obj is undefined! (if !thrown && BOOMERANG)
     *      *OR* if attacking bare-handed!
     * Note too: the cases where obj might get destroyed do not
     *      set 'use_weapon_skill', bare-handed does.
     */

    if (hmd.dmg > 0)
        hmon_hitmon_dmg_recalc(&hmd, obj);

    if (hmd.ispoisoned)
        hmon_hitmon_poison(&hmd, mon, obj);