Function flash_hits_mon

src/uhitm.c:6340–6422

returns 1 if light flash has noticeable effect on 'mtmp', 0 otherwise */

/* returns 1 if light flash has noticeable effect on 'mtmp', 0 otherwise */
int
flash_hits_mon(
    struct monst *mtmp,
    struct obj *otmp) /* source of flash */
{
    struct rm *lev;
    coordxy mx = mtmp->mx, my = mtmp->my;
    int tmp, amt, useeit, res = 0;

    if (gn.notonhead)
        return 0;
    lev = &levl[mx][my];
    useeit = canseemon(mtmp);

    if (M_AP_TYPE(mtmp) != M_AP_NOTHING) {
        char whatbuf[BUFSZ];
        int oldglyph = glyph_at(mx, my);

        /* 'altmon' probably doesn't matter here because 'whatbuf' will
           only be shown if the glyph changes and wakeup() doesn't call
           seemimic() for M_AP_MONSTER */
        mhidden_description(mtmp, MHID_ALTMON, whatbuf);

        wakeup(mtmp, FALSE); /* -> seemimic() -> newsym(); also calls
                              * finish_meating() to end quickmimic */

        /* if glyph has changed then hero saw something happen */
        if (glyph_at(mx, my) != oldglyph) {
            pline("That %s is really %s%c", whatbuf,
                  /* y_monnam()+a_monnam() */
                  x_monnam(mtmp, mtmp->mtame ? ARTICLE_YOUR : ARTICLE_A,
                           (char *) 0, 0, FALSE),
                  mtmp->mtame ? '.' : '!');
            res = 1;
        }
    }

    if (mtmp->msleeping && haseyes(mtmp->data)) {
        mtmp->msleeping = 0;
        if (useeit) {
            pline_The("flash awakens %s.", mon_nam(mtmp));
            res = 1;
        }
    } else if (mtmp->data->mlet != S_LIGHT) {
        if (!resists_blnd(mtmp)) {
            tmp = dist2(otmp->ox, otmp->oy, mx, my);
            if (useeit) {
                pline("%s is blinded by the flash!", Monnam(mtmp));
                res = 1;
            }
            if (mtmp->data == &mons[PM_GREMLIN]) {
                /* Rule #1: Keep them out of the light. */
                amt = (otmp->otyp == WAN_LIGHT) ? d(1 + otmp->spe, 4)
                                                : rnd(min(mtmp->mhp, 4));
                light_hits_gremlin(mtmp, amt);
            }
            if (!DEADMONSTER(mtmp)) {
                if (!svc.context.mon_moving)