Function light_hits_gremlin

src/uhitm.c:6424–6445

}

void
light_hits_gremlin(struct monst *mon, int dmg)
{
    if (!Deaf && mdistu(mon) <= 90) {
        /* cry of pain can be heard somewhat farther than the waking radius */
        pline_mon(mon, "%s %s!", Monnam(mon),
                  (dmg > mon->mhp / 2) ? "wails in agony"
                                       : "cries out in pain");
    } else if (canseemon(mon)) {
        pline_mon(mon, "%s recoils from the light!", Monnam(mon));
    }
    mon->mhp -= dmg;
    wake_nearto(mon->mx, mon->my, 30);
    if (DEADMONSTER(mon)) {
        if (svc.context.mon_moving)
            monkilled(mon, (char *) 0, AD_BLND);
        else
            killed(mon);
    } else if (cansee(mon->mx, mon->my) && !canspotmon(mon)) {
        map_invisible(mon->mx, mon->my);
    }
}

/*uhitm.c*/