46 ◾ Game Magic
ca se 7:/* Hecate’s Radiance (weak light
damage+ medium charm/confuse/fear spell) */
(vo id)lite_area_hecate(damroll(plev, 2),
(plev/10) + 1);
break;
case 8:/* Abaddon’s Rage */
(vo id)set_timed_effect(TIMED_SHERO,
p_ptr->shero + randint(25) + 25);
(vo id)set_timed_effect(TIMED_BLESSED,
p_ptr->blessed + randint(25) + 25);
break;
case 9:/* Mind Leech */
(void)mind_leech();
break;
case 10:/* Body Leech*/
(void)body_leech();
break;
case 11:/* Glyph of Warding */
warding_glyph();
break;
case 12:/* Protection from Evil */
(vo id)set_timed_effect(TIMED_PROTEVIL,
p_ptr->protevil + randint(25) + 3 *
p_ptr->lev);
break;
case 13:/* Summon Demons */
if (!(summon_specific_friendly(py, px,
plev, FILTER_DEMON, TRUE))) ...