6c3cd116ff
There should only be two changes in behavior: arogue7/fight.c, arogue7/fight.c: a to-hit bonus is now correctly applied to characters who are not monks instead of monks who are not empty-handed. urogue/fight.c: fixed an interaction with the "debug" macro that could cause the wrong message to be displayed.
1518 lines
43 KiB
C
1518 lines
43 KiB
C
/*
|
|
potions.c - Functions for dealing with potions
|
|
|
|
UltraRogue: The Ultimate Adventure in the Dungeons of Doom
|
|
Copyright (C) 1985, 1986, 1992, 1993, 1995 Herb Chong
|
|
All rights reserved.
|
|
|
|
Based on "Advanced Rogue"
|
|
Copyright (C) 1984, 1985 Michael Morgan, Ken Dalka
|
|
All rights reserved.
|
|
|
|
Based on "Rogue: Exploring the Dungeons of Doom"
|
|
Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman
|
|
All rights reserved.
|
|
|
|
See the file LICENSE.TXT for full copyright and licensing information.
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include "rogue.h"
|
|
|
|
/*
|
|
quaff - drink a potion (or effect a potion-like spell)
|
|
|
|
quaffer: who does it
|
|
which: which P_POTION (-1 means ask from pack)
|
|
flags: ISBLESSED, ISCURSED
|
|
*/
|
|
|
|
void
|
|
quaff(struct thing *quaffer, int which, int flags)
|
|
{
|
|
struct object *obj;
|
|
struct thing *th;
|
|
struct stats *curp = &(quaffer->t_stats);
|
|
struct stats *maxp = &(quaffer->maxstats);
|
|
int blessed = flags & ISBLESSED;
|
|
int cursed = flags & ISCURSED;
|
|
int is_potion = (which < 0 ? TRUE : FALSE);
|
|
|
|
struct linked_list *item, *titem;
|
|
char buf[2 * LINELEN];
|
|
|
|
if (quaffer != &player)
|
|
{
|
|
monquaff(quaffer, which, flags);
|
|
return;
|
|
}
|
|
|
|
if (is_potion) /* A regular potion */
|
|
{
|
|
if ((item = get_item("quaff", POTION)) == NULL)
|
|
return;
|
|
|
|
obj = OBJPTR(item);
|
|
|
|
if (obj->o_type != POTION)
|
|
{
|
|
msg("You can't drink that!");
|
|
return;
|
|
}
|
|
|
|
/* Calculate its effect */
|
|
|
|
flags = obj->o_flags;
|
|
cursed = obj->o_flags & ISCURSED;
|
|
blessed = obj->o_flags & ISBLESSED;
|
|
which = obj->o_which;
|
|
|
|
/* remove it from the pack */
|
|
|
|
rem_pack(obj);
|
|
discard(item);
|
|
updpack();
|
|
}
|
|
|
|
switch(which)
|
|
{
|
|
case P_CLEAR:
|
|
if (cursed)
|
|
{
|
|
if (off(player, ISCLEAR))
|
|
{
|
|
msg("Wait, what's going on here. Huh? What? Who?");
|
|
|
|
if (on(player, ISHUH))
|
|
lengthen_fuse(FUSE_UNCONFUSE, rnd(8) + HUHDURATION);
|
|
else
|
|
light_fuse(FUSE_UNCONFUSE, 0, rnd(8) + HUHDURATION, AFTER);
|
|
|
|
turn_on(player, ISHUH);
|
|
}
|
|
else
|
|
msg("You feel dizzy for a moment, but it passes.");
|
|
}
|
|
else
|
|
{
|
|
if (blessed) /* Make player immune for the whole game */
|
|
{
|
|
extinguish_fuse(FUSE_UNCLRHEAD); /* If we have a fuse, put it out */
|
|
msg("A strong blue aura surrounds your head.");
|
|
}
|
|
else /* Just light a fuse for how long player is safe */
|
|
{
|
|
if (off(player, ISCLEAR))
|
|
{
|
|
light_fuse(FUSE_UNCLRHEAD, 0, CLRDURATION, AFTER);
|
|
msg("A faint blue aura surrounds your head.");
|
|
}
|
|
else /* If have fuse lengthen, else permanently clear */
|
|
{
|
|
if (find_slot(FUSE_UNCLRHEAD,FUSE) == NULL)
|
|
msg("Your blue aura continues to glow strongly.");
|
|
else
|
|
{
|
|
lengthen_fuse(FUSE_UNCLRHEAD, CLRDURATION);
|
|
msg("Your blue aura brightens for a moment.");
|
|
}
|
|
}
|
|
}
|
|
|
|
turn_on(player, ISCLEAR);
|
|
|
|
/* If player is confused, unconfuse him */
|
|
|
|
if (on(player, ISHUH))
|
|
{
|
|
extinguish_fuse(FUSE_UNCONFUSE);
|
|
unconfuse(NULL);
|
|
}
|
|
}
|
|
break;
|
|
|
|
case P_HEALING:
|
|
if (cursed)
|
|
{
|
|
if (player.t_ctype != C_PALADIN
|
|
&& !(player.t_ctype == C_NINJA
|
|
&& curp->s_lvl > 12)
|
|
&& !save(VS_POISON))
|
|
{
|
|
feel_message();
|
|
curp->s_hpt /= 2;
|
|
curp->s_power /= 2;
|
|
|
|
if ((curp->s_hpt -= 1) <= 0)
|
|
{
|
|
death(D_POISON);
|
|
return;
|
|
}
|
|
}
|
|
else
|
|
msg("You feel momentarily sick.");
|
|
}
|
|
else
|
|
{
|
|
int nsides = (blessed ? 8 : 4);
|
|
int hpt_gain = roll(curp->s_lvl, nsides);
|
|
int power_gain = roll(curp->s_lvl, nsides);
|
|
|
|
if (blessed && on(player, ISHUH))
|
|
{
|
|
extinguish_fuse(FUSE_UNCONFUSE);
|
|
unconfuse(NULL);
|
|
}
|
|
|
|
curp->s_hpt = min(curp->s_hpt + hpt_gain, maxp->s_hpt);
|
|
|
|
if (is_potion) /* Do not bump power or maximums if spell */
|
|
{
|
|
know_items[TYP_POTION][P_HEALING] = TRUE;
|
|
curp->s_power = min(curp->s_power + power_gain, maxp->s_power);
|
|
|
|
if (maxp->s_hpt == curp->s_hpt)
|
|
maxp->s_hpt = curp->s_hpt += roll(1, nsides);
|
|
|
|
if (maxp->s_power == curp->s_power)
|
|
maxp->s_power = curp->s_power += roll(1, nsides);
|
|
}
|
|
|
|
msg("You begin to feel %sbetter.", blessed ? "much " : "");
|
|
|
|
if (off(player, PERMBLIND))
|
|
sight(NULL);
|
|
}
|
|
break;
|
|
|
|
case P_GAINABIL:
|
|
{
|
|
int ctype;
|
|
|
|
if (!is_potion || pstats.s_arm <= 0)
|
|
feel_message();
|
|
else
|
|
{
|
|
if (blessed) /* add to all attributes */
|
|
{
|
|
add_intelligence(FALSE);
|
|
add_dexterity(FALSE);
|
|
add_strength(FALSE);
|
|
add_wisdom(FALSE);
|
|
add_const(FALSE);
|
|
}
|
|
else
|
|
{
|
|
if (rnd(100) < 70)
|
|
/* probably change own ability */
|
|
ctype = player.t_ctype;
|
|
else
|
|
switch(rnd(4))
|
|
{
|
|
case 0: ctype = C_FIGHTER; break;
|
|
case 1: ctype = C_MAGICIAN; break;
|
|
case 2: ctype = C_CLERIC; break;
|
|
case 3: ctype = C_THIEF; break;
|
|
}
|
|
switch (ctype)
|
|
{
|
|
case C_FIGHTER:add_strength(cursed); break;
|
|
case C_PALADIN:add_strength(cursed); break;
|
|
case C_RANGER:add_strength(cursed); break;
|
|
case C_MAGICIAN:add_intelligence(cursed); break;
|
|
case C_ILLUSION:add_intelligence(cursed); break;
|
|
case C_CLERIC:add_wisdom(cursed); break;
|
|
case C_DRUID:add_wisdom(cursed); break;
|
|
case C_THIEF:add_dexterity(cursed); break;
|
|
case C_ASSASIN:add_dexterity(cursed); break;
|
|
case C_NINJA:add_dexterity(cursed); break;
|
|
default: msg("You're a strange type!"); break;
|
|
}
|
|
}
|
|
|
|
if (rnd(100) < 10)
|
|
add_const(cursed);
|
|
|
|
if (rnd(100) < 60)
|
|
curp->s_arm += (cursed ? 1 : -1);
|
|
|
|
if (!cursed)
|
|
know_items[TYP_POTION][P_GAINABIL] = TRUE;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case P_MONSTDET:
|
|
|
|
/*
|
|
* Potion of monster detection, if there are monsters,
|
|
* detect them
|
|
*/
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_MONSTDET] = TRUE;
|
|
|
|
if (cursed)
|
|
{
|
|
int nm = roll(3, 6);
|
|
int i;
|
|
char ch;
|
|
struct room *rp;
|
|
coord pos;
|
|
|
|
msg("You begin to sense the presence of monsters.");
|
|
wclear(hw);
|
|
|
|
for (i = 1; i < nm; i++)
|
|
{
|
|
rp = &rooms[rnd_room()];
|
|
rnd_pos(rp, &pos);
|
|
|
|
if (rnd(2))
|
|
ch = 'a' + ucrnd(26);
|
|
else
|
|
ch = 'A' + ucrnd(26);
|
|
|
|
mvwaddch(hw, pos.y, pos.x, ch);
|
|
}
|
|
waddstr(cw, morestr);
|
|
overlay(hw, cw);
|
|
wrefresh(cw);
|
|
wait_for(' ');
|
|
msg("");
|
|
}
|
|
else if (mlist != NULL)
|
|
{
|
|
msg("You begin to sense the presence of monsters.");
|
|
waddstr(cw, morestr);
|
|
overlay(mw, cw);
|
|
wrefresh(cw);
|
|
wait_for(' ');
|
|
msg("");
|
|
|
|
if (blessed)
|
|
turn_on(player, BLESSMONS);
|
|
}
|
|
else
|
|
nothing_message(flags);
|
|
break;
|
|
|
|
case P_TREASDET:
|
|
|
|
/* Potion of magic detection. Show the potions and scrolls */
|
|
|
|
if (cursed)
|
|
{
|
|
int nm = roll(3, 3);
|
|
int i;
|
|
char ch;
|
|
struct room *rp;
|
|
coord pos;
|
|
|
|
msg("You sense the presence of magic on this level.");
|
|
wclear(hw);
|
|
|
|
for (i = 1; i < nm; i++)
|
|
{
|
|
rp = &rooms[rnd_room()];
|
|
rnd_pos(rp, &pos);
|
|
|
|
if (rnd(9) == 0)
|
|
ch = BMAGIC;
|
|
else if (rnd(9) == 0)
|
|
ch = CMAGIC;
|
|
else
|
|
ch = MAGIC;
|
|
|
|
mvwaddch(hw, pos.y, pos.x, ch);
|
|
}
|
|
waddstr(cw, morestr);
|
|
|
|
overlay(hw, cw);
|
|
wrefresh(cw);
|
|
wait_for(' ');
|
|
msg("");
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_TREASDET] = TRUE;
|
|
|
|
break;
|
|
}
|
|
|
|
if (blessed)
|
|
turn_on(player, BLESSMAGIC);
|
|
|
|
if (lvl_obj != NULL)
|
|
{
|
|
struct linked_list *mobj;
|
|
struct object *tp;
|
|
int showit;
|
|
|
|
showit = FALSE;
|
|
wclear(hw);
|
|
|
|
for (mobj = lvl_obj; mobj != NULL; mobj = next(mobj))
|
|
{
|
|
tp = OBJPTR(mobj);
|
|
|
|
if (is_magic(tp))
|
|
{
|
|
char mag_type = MAGIC;
|
|
|
|
if (blessed)
|
|
{
|
|
if (tp->o_flags & ISCURSED)
|
|
mag_type = CMAGIC;
|
|
else if (tp->o_flags & ISBLESSED)
|
|
mag_type = BMAGIC;
|
|
}
|
|
|
|
showit = TRUE;
|
|
mvwaddch(hw, tp->o_pos.y, tp->o_pos.x, mag_type);
|
|
}
|
|
}
|
|
|
|
for (titem = mlist; titem != NULL; titem = next(titem))
|
|
{
|
|
struct linked_list *pitem;
|
|
|
|
th = THINGPTR(titem);
|
|
|
|
for (pitem = th->t_pack; pitem != NULL; pitem = next(pitem))
|
|
{
|
|
if (is_magic(OBJPTR(pitem)))
|
|
{
|
|
showit = TRUE;
|
|
mvwaddch(hw, th->t_pos.y, th->t_pos.x,MAGIC);
|
|
}
|
|
}
|
|
}
|
|
|
|
if (showit)
|
|
{
|
|
msg("You sense the presence of magic on this level.");
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_TREASDET] = TRUE;
|
|
|
|
waddstr(cw, morestr);
|
|
overlay(hw, cw);
|
|
wrefresh(cw);
|
|
wait_for(' ');
|
|
msg("");
|
|
break;
|
|
}
|
|
}
|
|
nothing_message(flags);
|
|
break;
|
|
|
|
case P_SEEINVIS:
|
|
if (cursed)
|
|
{
|
|
if (off(player, ISBLIND) && !is_wearing(R_SEEINVIS))
|
|
{
|
|
msg("A cloak of darkness falls around you.");
|
|
turn_on(player, ISBLIND);
|
|
light_fuse(FUSE_SIGHT, 0, SEEDURATION, AFTER);
|
|
look(FALSE);
|
|
}
|
|
else
|
|
msg("Your eyes stop tingling for a moment.");
|
|
}
|
|
else if (off(player, PERMBLIND))
|
|
{
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_SEEINVIS] = TRUE;
|
|
|
|
if (off(player, CANSEE))
|
|
{
|
|
turn_on(player, CANSEE);
|
|
msg("Your eyes begin to tingle.");
|
|
light_fuse(FUSE_UNSEE, 0, blessed ? SEEDURATION * 3 : SEEDURATION, AFTER);
|
|
light(&hero);
|
|
}
|
|
else if (find_slot(FUSE_UNSEE,FUSE) != NULL)
|
|
{
|
|
nothing_message(ISNORMAL);
|
|
lengthen_fuse(FUSE_UNSEE, blessed ? SEEDURATION * 3 : SEEDURATION);
|
|
}
|
|
sight(NULL);
|
|
}
|
|
break;
|
|
|
|
case P_PHASE:
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You can't move.");
|
|
no_command = HOLDTIME;
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_PHASE] = TRUE;
|
|
|
|
if (on(player, CANINWALL))
|
|
lengthen_fuse(FUSE_UNPHASE, duration * PHASEDURATION);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNPHASE, 0, duration * PHASEDURATION, AFTER);
|
|
turn_on(player, CANINWALL);
|
|
}
|
|
msg("You feel %slight-headed!", blessed ? "very " : "");
|
|
}
|
|
break;
|
|
|
|
case P_RAISELEVEL:
|
|
|
|
if (cursed || (!is_potion && pstats.s_lvl > 20))
|
|
lower_level(D_POTION);
|
|
else
|
|
{
|
|
msg("You suddenly feel %smore skillful.", blessed ? "much " : "");
|
|
know_items[TYP_POTION][P_RAISELEVEL] = TRUE;
|
|
raise_level();
|
|
|
|
if (blessed)
|
|
raise_level();
|
|
}
|
|
break;
|
|
|
|
case P_HASTE:
|
|
if (cursed) /* Slow player down */
|
|
{
|
|
if (on(player, ISHASTE))
|
|
{
|
|
extinguish_fuse(FUSE_NOHASTE);
|
|
nohaste(NULL);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel yourself moving %sslower.",
|
|
on(player, ISSLOW) ? "even " : "");
|
|
|
|
if (on(player, ISSLOW))
|
|
lengthen_fuse(FUSE_NOSLOW, rnd(4) + 4);
|
|
else if (!is_wearing(R_FREEDOM))
|
|
{
|
|
turn_on(player, ISSLOW);
|
|
player.t_turn = TRUE;
|
|
light_fuse(FUSE_NOSLOW, 0, rnd(4) + 4, AFTER);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (off(player, ISSLOW))
|
|
msg("You feel yourself moving %sfaster.",
|
|
blessed ? "much " : "");
|
|
|
|
add_haste(blessed);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_HASTE] = TRUE;
|
|
}
|
|
break;
|
|
|
|
case P_RESTORE:
|
|
{
|
|
int i;
|
|
|
|
msg("You are surrounded by an orange mist.");
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_RESTORE] = TRUE;
|
|
|
|
if (lost_str)
|
|
{
|
|
for (i = 0; i < lost_str; i++)
|
|
extinguish_fuse(FUSE_RES_STRENGTH);
|
|
|
|
lost_str = 0;
|
|
}
|
|
res_strength(NULL);
|
|
|
|
if (lost_dext)
|
|
{
|
|
for (i = 0; i < lost_dext; i++)
|
|
extinguish_fuse(FUSE_UNITCH);
|
|
|
|
lost_dext = 0;
|
|
}
|
|
|
|
res_dexterity();
|
|
res_wisdom();
|
|
res_intelligence();
|
|
curp->s_const = maxp->s_const;
|
|
}
|
|
break;
|
|
|
|
case P_INVIS:
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel very noticable.");
|
|
quaff(&player, P_SHIELD, ISCURSED);
|
|
}
|
|
else if (off(player, ISINVIS))
|
|
{
|
|
turn_on(player, ISINVIS);
|
|
|
|
if (on(player, ISDISGUISE))
|
|
{
|
|
turn_off(player, ISDISGUISE);
|
|
extinguish_fuse(FUSE_UNDISGUISE);
|
|
msg("Your skin feels itchy for a moment.");
|
|
}
|
|
msg("You have a tingling feeling all over your body.");
|
|
light_fuse(FUSE_APPEAR, 0, blessed ? WANDERTIME * 3 : WANDERTIME, AFTER);
|
|
PLAYER = IPLAYER;
|
|
light(&hero);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_INVIS] = TRUE;
|
|
}
|
|
else
|
|
lengthen_fuse(FUSE_APPEAR, blessed ? WANDERTIME * 3 : WANDERTIME);
|
|
|
|
break;
|
|
|
|
case P_SMELL:
|
|
|
|
if (cursed)
|
|
{
|
|
if (on(player, CANSCENT))
|
|
{
|
|
turn_off(player, CANSCENT);
|
|
extinguish_fuse(FUSE_UNSCENT);
|
|
msg("You no longer smell monsters around you.");
|
|
}
|
|
else if (on(player, ISUNSMELL))
|
|
{
|
|
lengthen_fuse(FUSE_UNSCENT, PHASEDURATION);
|
|
msg("You feel your nose tingle.");
|
|
}
|
|
else
|
|
{
|
|
turn_on(player, ISUNSMELL);
|
|
light_fuse(FUSE_SCENT, 0, PHASEDURATION, AFTER);
|
|
msg("You can't smell anything now.");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_SMELL] = TRUE;
|
|
|
|
if (on(player, CANSCENT))
|
|
lengthen_fuse(FUSE_UNSCENT, duration * PHASEDURATION);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNSCENT, 0, duration * PHASEDURATION, AFTER);
|
|
turn_on(player, CANSCENT);
|
|
}
|
|
msg("You begin to smell monsters all around you.");
|
|
}
|
|
break;
|
|
|
|
case P_HEAR:
|
|
|
|
if (cursed)
|
|
{
|
|
if (on(player, CANHEAR))
|
|
{
|
|
turn_off(player, CANHEAR);
|
|
extinguish_fuse(FUSE_HEAR);
|
|
msg("You no longer hear monsters around you.");
|
|
}
|
|
else if (on(player, ISDEAF))
|
|
{
|
|
lengthen_fuse(FUSE_HEAR, PHASEDURATION);
|
|
msg("You feel your ears burn.");
|
|
}
|
|
else
|
|
{
|
|
light_fuse(FUSE_HEAR, 0, PHASEDURATION, AFTER);
|
|
turn_on(player, ISDEAF);
|
|
msg("You are surrounded by a sudden silence.");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_HEAR] = TRUE;
|
|
|
|
if (on(player, CANHEAR))
|
|
lengthen_fuse(FUSE_UNHEAR, duration * PHASEDURATION);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNHEAR, 0, duration * PHASEDURATION, AFTER);
|
|
turn_on(player, CANHEAR);
|
|
}
|
|
msg("You begin to hear monsters all around you.");
|
|
}
|
|
break;
|
|
|
|
case P_SHERO:
|
|
if (cursed)
|
|
{
|
|
if (on(player, SUPERHERO))
|
|
{
|
|
msg("You feel ordinary again.");
|
|
turn_off(player, SUPERHERO);
|
|
extinguish_fuse(FUSE_UNSHERO);
|
|
extinguish_fuse(FUSE_UNBHERO);
|
|
}
|
|
else if (on(player, ISUNHERO))
|
|
{
|
|
msg("Your feeling of vulnerability increases.");
|
|
lengthen_fuse(FUSE_SHERO, 5 + rnd(5));
|
|
}
|
|
else
|
|
{
|
|
msg("You feel suddenly vulnerable.");
|
|
|
|
if (curp->s_hpt == 1)
|
|
{
|
|
death(D_POTION);
|
|
return;
|
|
}
|
|
|
|
curp->s_hpt /= 2;
|
|
chg_str(-2, FALSE, TRUE);
|
|
chg_dext(-2, FALSE, TRUE);
|
|
no_command = 3 + rnd(HEROTIME);
|
|
turn_on(player, ISUNHERO);
|
|
light_fuse(FUSE_SHERO, 0, HEROTIME + rnd(HEROTIME), AFTER);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (on(player, ISFLEE))
|
|
{
|
|
turn_off(player, ISFLEE);
|
|
msg("You regain your composure.");
|
|
}
|
|
|
|
if (on(player, ISUNHERO))
|
|
{
|
|
extinguish_fuse(FUSE_SHERO);
|
|
shero(NULL);
|
|
}
|
|
else if (on(player, SUPERHERO))
|
|
{
|
|
if (find_slot(FUSE_UNBHERO,FUSE))
|
|
lengthen_fuse(FUSE_UNBHERO, HEROTIME+2*rnd(HEROTIME));
|
|
else if (find_slot(FUSE_UNSHERO,FUSE) && !blessed)
|
|
lengthen_fuse(FUSE_UNSHERO,HEROTIME+2*rnd(HEROTIME));
|
|
else
|
|
{
|
|
extinguish_fuse(FUSE_UNSHERO);
|
|
unshero(NULL);
|
|
light_fuse(FUSE_UNBHERO,0, 2 * (HEROTIME + rnd(HEROTIME)), AFTER);
|
|
}
|
|
msg("Your feeling of invulnerablity grows stronger.");
|
|
}
|
|
else
|
|
{
|
|
turn_on(player, SUPERHERO);
|
|
chg_str(10, FALSE, FALSE);
|
|
chg_dext(5, FALSE, FALSE);
|
|
quaff(quaffer, P_HASTE, ISBLESSED);
|
|
quaff(quaffer, P_CLEAR, ISNORMAL);
|
|
|
|
if (blessed)
|
|
{
|
|
light_fuse(FUSE_UNBHERO, 0, HEROTIME + rnd(HEROTIME), AFTER);
|
|
msg("You suddenly feel invincible.");
|
|
}
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNSHERO, 0, HEROTIME + rnd(HEROTIME), AFTER);
|
|
msg("You suddenly feel invulnerable.");
|
|
}
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_SHERO] = TRUE;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case P_DISGUISE:
|
|
if (off(player, ISDISGUISE) && off(player, ISINVIS))
|
|
{
|
|
turn_on(player, ISDISGUISE);
|
|
msg("Your body shimmers a moment and then changes.");
|
|
light_fuse(FUSE_UNDISGUISE, 0, blessed ? GONETIME * 3 : GONETIME, AFTER);
|
|
|
|
if (rnd(2))
|
|
PLAYER = 'a' + ucrnd(26);
|
|
else
|
|
PLAYER = 'A' + ucrnd(26);
|
|
|
|
light(&hero);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_DISGUISE] = TRUE;
|
|
}
|
|
else if (off(player, ISINVIS))
|
|
lengthen_fuse(FUSE_UNDISGUISE,blessed?GONETIME * 3 : GONETIME);
|
|
else
|
|
msg("You have an itchy feeling under your skin.");
|
|
|
|
break;
|
|
|
|
case P_FIRERESIST:
|
|
if (cursed)
|
|
{
|
|
if (!is_wearing(R_FIRERESIST))
|
|
{
|
|
msg("Your teeth start clattering.");
|
|
|
|
if (on(player, ISHASTE))
|
|
{
|
|
extinguish_fuse(FUSE_NOHASTE);
|
|
nohaste(NULL);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel yourself moving %sslower.",
|
|
on(player, ISSLOW) ? "even " : "");
|
|
|
|
if (on(player, ISSLOW))
|
|
lengthen_fuse(FUSE_NOSLOW, rnd(4) + 4);
|
|
else if (!is_wearing(R_FREEDOM))
|
|
{
|
|
turn_on(player, ISSLOW);
|
|
player.t_turn = TRUE;
|
|
light_fuse(FUSE_NOSLOW, 0, rnd(4) + 4, AFTER);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
msg("You feel a brief chill.");
|
|
}
|
|
else
|
|
{
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_FIRERESIST] = TRUE;
|
|
|
|
if (blessed)
|
|
{
|
|
extinguish_fuse(FUSE_UNHOT);
|
|
msg("You feel a strong continuous warm glow.");
|
|
}
|
|
else
|
|
{
|
|
if (off(player, NOFIRE))
|
|
{
|
|
light_fuse(FUSE_UNHOT, 0, PHASEDURATION, AFTER);
|
|
msg("You feel a warm glow.");
|
|
}
|
|
else
|
|
{
|
|
if (find_slot(FUSE_UNHOT,FUSE) == NULL)
|
|
msg("Your warm glow continues.");
|
|
else
|
|
{
|
|
lengthen_fuse(FUSE_UNHOT, PHASEDURATION);
|
|
msg("Your feel a hot flush.");
|
|
}
|
|
}
|
|
}
|
|
|
|
turn_on(player, NOFIRE);
|
|
|
|
if (on(player, NOCOLD))
|
|
{
|
|
turn_off(player, NOCOLD);
|
|
extinguish_fuse(FUSE_UNCOLD);
|
|
}
|
|
}
|
|
break;
|
|
|
|
case P_COLDRESIST:
|
|
if (cursed)
|
|
{
|
|
if (!is_wearing(R_COLDRESIST))
|
|
{
|
|
msg("Your feel feverishly hot.");
|
|
|
|
if (on(player, ISHASTE))
|
|
{
|
|
extinguish_fuse(FUSE_NOHASTE);
|
|
nohaste(NULL);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel yourself moving %sslower.",
|
|
on(player, ISSLOW) ? "even " : "");
|
|
|
|
if (on(player, ISSLOW))
|
|
lengthen_fuse(FUSE_NOSLOW, rnd(4) + 4);
|
|
else if (!is_wearing(R_FREEDOM))
|
|
{
|
|
turn_on(player, ISSLOW);
|
|
player.t_turn = TRUE;
|
|
light_fuse(FUSE_NOSLOW, 0, rnd(4) + 4, AFTER);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
msg("You feel a brief touch of heat rash.");
|
|
}
|
|
else
|
|
{
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_COLDRESIST] = TRUE;
|
|
|
|
if (blessed)
|
|
{
|
|
extinguish_fuse(FUSE_UNCOLD);
|
|
msg("You feel a strong continuous cool breeze.");
|
|
}
|
|
else
|
|
{
|
|
if (off(player, NOCOLD))
|
|
{
|
|
light_fuse(FUSE_UNCOLD, 0, PHASEDURATION, AFTER);
|
|
msg("You feel a cool breeze.");
|
|
}
|
|
else
|
|
{
|
|
if (find_slot(FUSE_UNCOLD,FUSE) == NULL)
|
|
msg("Your cool feeling continues.");
|
|
else
|
|
{
|
|
lengthen_fuse(FUSE_UNCOLD, PHASEDURATION);
|
|
msg("The cool breeze blows more strongly.");
|
|
}
|
|
}
|
|
}
|
|
|
|
turn_on(player, NOCOLD);
|
|
|
|
if (on(player, NOFIRE))
|
|
{
|
|
extinguish_fuse(FUSE_UNHOT);
|
|
turn_off(player, NOFIRE);
|
|
}
|
|
}
|
|
break;
|
|
|
|
case P_HASOXYGEN:
|
|
if (cursed)
|
|
{
|
|
if (!is_wearing(R_BREATHE))
|
|
{
|
|
msg("You can't breathe.");
|
|
no_command = HOLDTIME;
|
|
}
|
|
else
|
|
{
|
|
msg("You feel a momentary shortness of breath.");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_HASOXYGEN] = TRUE;
|
|
|
|
if (on(player, HASOXYGEN))
|
|
lengthen_fuse(FUSE_UNBREATHE, duration * PHASEDURATION);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNBREATHE, 0, duration * PHASEDURATION, AFTER);
|
|
turn_on(player, HASOXYGEN);
|
|
}
|
|
|
|
if (!is_wearing(R_BREATHE))
|
|
msg("The air seems %sless polluted.",
|
|
blessed ? "much " : "");
|
|
}
|
|
break;
|
|
|
|
case P_LEVITATION:
|
|
if (cursed)
|
|
{
|
|
msg("You can't move.");
|
|
no_command = HOLDTIME;
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_LEVITATION] = TRUE;
|
|
|
|
if (on(player, CANFLY))
|
|
lengthen_fuse(FUSE_UNFLY, duration * WANDERTIME);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNFLY, 0, duration * WANDERTIME, AFTER);
|
|
turn_on(player, CANFLY);
|
|
}
|
|
|
|
if (!is_wearing(R_LEVITATION))
|
|
msg("You %sbegin to float in the air!",
|
|
blessed ? "quickly " : "");
|
|
}
|
|
break;
|
|
|
|
case P_REGENERATE:
|
|
if (cursed)
|
|
{
|
|
quaff(quaffer, P_HEALING, ISCURSED);
|
|
quaff(quaffer, P_HASTE, ISCURSED);
|
|
}
|
|
else
|
|
{
|
|
short duration = (blessed ? 3 : 1) * HUHDURATION;
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_REGENERATE] = TRUE;
|
|
|
|
if (on(player, SUPEREAT))
|
|
lengthen_fuse(FUSE_UNSUPEREAT, duration);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNSUPEREAT, 0, duration, AFTER);
|
|
turn_on(player, SUPEREAT);
|
|
}
|
|
|
|
if (on(player, ISREGEN))
|
|
lengthen_fuse(FUSE_UNREGEN, duration);
|
|
else
|
|
{
|
|
light_fuse(FUSE_UNREGEN, 0, duration, AFTER);
|
|
turn_on(player, ISREGEN);
|
|
}
|
|
|
|
if (!is_wearing(R_REGEN))
|
|
msg("You feel %shealthier!", blessed ? "much " : "");
|
|
}
|
|
|
|
case P_SHIELD:
|
|
{
|
|
int adjustment = 0;
|
|
|
|
if (on(player, HASSHIELD)) /* cancel old spell */
|
|
{
|
|
extinguish_fuse(FUSE_UNSHIELD);
|
|
unshield(NULL);
|
|
}
|
|
|
|
if (cursed)
|
|
adjustment = 2;
|
|
else if (blessed)
|
|
{
|
|
msg("Your skin feels very rigid.");
|
|
|
|
switch (player.t_ctype)
|
|
{
|
|
case C_FIGHTER:
|
|
case C_PALADIN:
|
|
case C_RANGER:
|
|
adjustment = -3;
|
|
break;
|
|
default:
|
|
adjustment = -5;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
msg("Your skin hardens.");
|
|
adjustment = -2;
|
|
}
|
|
|
|
pstats.s_arm += adjustment;
|
|
pstats.s_acmod += adjustment;
|
|
turn_on(player, HASSHIELD);
|
|
light_fuse(FUSE_UNSHIELD,0,(blessed ? 3 : 1) * SEEDURATION, AFTER);
|
|
|
|
if (is_potion)
|
|
know_items[TYP_POTION][P_SHIELD] = TRUE;
|
|
}
|
|
break;
|
|
|
|
case P_TRUESEE:
|
|
if (cursed)
|
|
{
|
|
turn_on(player, PERMBLIND);
|
|
|
|
if (on(player, ISBLIND))
|
|
{
|
|
msg("The gloom around you thickens.");
|
|
lengthen_fuse(FUSE_SIGHT, SEEDURATION);
|
|
}
|
|
else
|
|
{
|
|
msg("A mantle of darkness falls around you.");
|
|
turn_on(player, ISBLIND);
|
|
light_fuse(FUSE_SIGHT, 0, SEEDURATION, AFTER);
|
|
look(FALSE);
|
|
}
|
|
look(FALSE);
|
|
}
|
|
else if (on(player, PERMBLIND))
|
|
{
|
|
if (blessed || is_potion)
|
|
{
|
|
turn_off(player, PERMBLIND);
|
|
sight(NULL);
|
|
goto let_there_be_light;
|
|
}
|
|
else
|
|
nothing_message(ISBLESSED);
|
|
}
|
|
else
|
|
let_there_be_light:
|
|
if (off(player, CANSEE))
|
|
{
|
|
turn_on(player, CANSEE);
|
|
msg("You feel especially perceptive.");
|
|
light_fuse(FUSE_UNTRUESEE, 0, blessed ? SEEDURATION * 3
|
|
: SEEDURATION, AFTER);
|
|
light(&hero);
|
|
}
|
|
else if (find_slot(FUSE_UNSEE,FUSE) != NULL)
|
|
{
|
|
nothing_message(ISNORMAL);
|
|
lengthen_fuse(FUSE_UNTRUESEE, blessed ? SEEDURATION * 3
|
|
: SEEDURATION);
|
|
}
|
|
|
|
break;
|
|
|
|
default:
|
|
msg("What an odd tasting potion!");
|
|
return;
|
|
}
|
|
|
|
status(FALSE);
|
|
|
|
if (is_potion)
|
|
{
|
|
if (!cursed && know_items[TYP_POTION][which] &&
|
|
guess_items[TYP_POTION][which])
|
|
{
|
|
ur_free(guess_items[TYP_POTION][which]);
|
|
guess_items[TYP_POTION][which] = NULL;
|
|
}
|
|
else if (askme && !know_items[TYP_POTION][which] &&
|
|
guess_items[TYP_POTION][which] == NULL)
|
|
{
|
|
msg(terse ? "Call it: " : "What do you want to call it? ");
|
|
|
|
if (get_string(buf, cw) == NORM)
|
|
{
|
|
guess_items[TYP_POTION][which] =
|
|
new_alloc(strlen(buf) + 1);
|
|
strcpy(guess_items[TYP_POTION][which], buf);
|
|
}
|
|
}
|
|
food_left += (blessed ? rnd(100) : (cursed ? -rnd(100) : rnd(50)));
|
|
}
|
|
}
|
|
|
|
/*
|
|
lower_level()
|
|
Lower a level of experience
|
|
*/
|
|
|
|
void
|
|
lower_level(int who)
|
|
{
|
|
int fewer, nsides = 0, i;
|
|
|
|
if (--pstats.s_lvl == 0)
|
|
{
|
|
death(who); /* All levels gone */
|
|
return;
|
|
}
|
|
|
|
msg("You suddenly feel less skillful.");
|
|
pstats.s_exp = 1L;
|
|
init_exp();
|
|
|
|
for (i = 2; i <= pstats.s_lvl; i++)
|
|
{
|
|
if (max_stats.s_exp < 0x3fffffffL) /* 2^30 - 1 */
|
|
max_stats.s_exp *= 2L; /* twice as many for next */
|
|
}
|
|
|
|
switch (player.t_ctype)
|
|
{
|
|
case C_FIGHTER: nsides = 12;break;
|
|
case C_PALADIN: nsides = 12;break;
|
|
case C_RANGER: nsides = 12; break;
|
|
case C_MAGICIAN: nsides = 4;break;
|
|
case C_ILLUSION: nsides = 4;break;
|
|
case C_CLERIC: nsides = 8; break;
|
|
case C_DRUID: nsides = 8; break;
|
|
case C_THIEF: nsides = 6; break;
|
|
case C_ASSASIN: nsides = 6; break;
|
|
case C_NINJA: nsides = 6; break;
|
|
}
|
|
|
|
fewer = max(1, roll(1, 16 - nsides) + int_wis_bonus());
|
|
pstats.s_power -= fewer;
|
|
max_stats.s_power -= fewer;
|
|
|
|
fewer = max(1, roll(1, nsides) + const_bonus());
|
|
pstats.s_hpt -= fewer;
|
|
max_stats.s_hpt -= fewer;
|
|
|
|
if (pstats.s_hpt < 1)
|
|
pstats.s_hpt = 1;
|
|
|
|
if (max_stats.s_hpt < 1)
|
|
{
|
|
death(who);
|
|
return;
|
|
}
|
|
}
|
|
|
|
void
|
|
res_dexterity(void)
|
|
{
|
|
if (lost_dext)
|
|
{
|
|
chg_dext(lost_dext, FALSE, FALSE);
|
|
lost_dext = 0;
|
|
}
|
|
else
|
|
{
|
|
pstats.s_dext = max_stats.s_dext + ring_value(R_ADDHIT) +
|
|
(on(player, POWERDEXT) ? 10 : 0) +
|
|
(on(player, SUPERHERO) ? 5 : 0);
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/*
|
|
res_wisdom()
|
|
Restore player's wisdom
|
|
*/
|
|
|
|
void
|
|
res_wisdom(void)
|
|
{
|
|
int ring_str;
|
|
|
|
/* Discount the ring value */
|
|
|
|
ring_str = ring_value(R_ADDWISDOM) + (on(player, POWERWISDOM) ? 10 : 0);
|
|
pstats.s_wisdom -= ring_str;
|
|
|
|
if (pstats.s_wisdom < max_stats.s_wisdom)
|
|
pstats.s_wisdom = max_stats.s_wisdom;
|
|
|
|
/* Redo the rings */
|
|
|
|
pstats.s_wisdom += ring_str;
|
|
}
|
|
|
|
/*
|
|
res_intelligence()
|
|
Restore player's intelligence
|
|
*/
|
|
|
|
void
|
|
res_intelligence(void)
|
|
{
|
|
int ring_str;
|
|
|
|
/* Discount the ring value */
|
|
|
|
ring_str = ring_value(R_ADDINTEL) + (on(player, POWERINTEL) ? 10 : 0);
|
|
pstats.s_intel -= ring_str;
|
|
|
|
if (pstats.s_intel < max_stats.s_intel)
|
|
pstats.s_intel = max_stats.s_intel;
|
|
|
|
/* Redo the rings */
|
|
|
|
pstats.s_intel += ring_str;
|
|
}
|
|
|
|
|
|
/*
|
|
add_strength()
|
|
Increase player's strength
|
|
*/
|
|
|
|
void
|
|
add_strength(int cursed)
|
|
{
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel slightly weaker now.");
|
|
chg_str(-1, FALSE, FALSE);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel stronger now. What bulging muscles!");
|
|
|
|
if (lost_str != 0)
|
|
{
|
|
lost_str--;
|
|
chg_str(1, FALSE, FALSE);
|
|
}
|
|
else
|
|
chg_str(1, TRUE, FALSE);
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
add_intelligence()
|
|
Increase player's intelligence
|
|
*/
|
|
|
|
void
|
|
add_intelligence(int cursed)
|
|
{
|
|
int ring_str; /* Value of ring strengths */
|
|
|
|
/* Undo any ring changes */
|
|
|
|
ring_str = ring_value(R_ADDINTEL) + (on(player, POWERINTEL) ? 10 : 0);
|
|
pstats.s_intel -= ring_str;
|
|
|
|
/* Now do the potion */
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel slightly less intelligent now.");
|
|
pstats.s_intel = max(pstats.s_intel - 1, 3);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel more intelligent now. What a mind!");
|
|
pstats.s_intel = min(pstats.s_intel + 1, 25);
|
|
}
|
|
|
|
/* Adjust the maximum */
|
|
|
|
if (max_stats.s_intel < pstats.s_intel)
|
|
max_stats.s_intel = pstats.s_intel;
|
|
|
|
/* Now put back the ring changes */
|
|
pstats.s_intel += ring_str;
|
|
}
|
|
|
|
|
|
/*
|
|
add_wisdom()
|
|
Increase player's wisdom
|
|
*/
|
|
|
|
void
|
|
add_wisdom(int cursed)
|
|
{
|
|
int ring_str; /* Value of ring strengths */
|
|
|
|
/* Undo any ring changes */
|
|
|
|
ring_str = ring_value(R_ADDWISDOM) + (on(player, POWERWISDOM) ? 10 : 0);
|
|
pstats.s_wisdom -= ring_str;
|
|
|
|
/* Now do the potion */
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel slightly less wise now.");
|
|
pstats.s_wisdom = max(pstats.s_wisdom - 1, 3);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel wiser now. What a sage!");
|
|
pstats.s_wisdom = min(pstats.s_wisdom + 1, 25);
|
|
}
|
|
|
|
/* Adjust the maximum */
|
|
|
|
if (max_stats.s_wisdom < pstats.s_wisdom)
|
|
max_stats.s_wisdom = pstats.s_wisdom;
|
|
|
|
/* Now put back the ring changes */
|
|
pstats.s_wisdom += ring_str;
|
|
}
|
|
|
|
|
|
/*
|
|
add_dexterity()
|
|
Increase player's dexterity
|
|
*/
|
|
|
|
void
|
|
add_dexterity(int cursed)
|
|
{
|
|
/* Now do the potion */
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel less dextrous now.");
|
|
chg_dext(-1, FALSE, TRUE);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel more dextrous now. Watch those hands!");
|
|
|
|
if (lost_dext != 0)
|
|
{
|
|
lost_dext--;
|
|
chg_dext(1, FALSE, FALSE);
|
|
}
|
|
else
|
|
chg_dext(1, TRUE, FALSE);
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
Increase player's constitution
|
|
*/
|
|
|
|
void
|
|
add_const(int cursed)
|
|
{
|
|
/* Do the potion */
|
|
|
|
if (cursed)
|
|
{
|
|
msg("You feel slightly less healthy now.");
|
|
pstats.s_const = max(pstats.s_const - 1, 3) +
|
|
(on(player, POWERCONST) ? 10 : 0);
|
|
}
|
|
else
|
|
{
|
|
msg("You feel healthier now.");
|
|
pstats.s_const = min(pstats.s_const + 1, 25) +
|
|
(on(player, POWERCONST) ? 10 : 0);
|
|
}
|
|
|
|
/* Adjust the maximum */
|
|
|
|
if (max_stats.s_const < pstats.s_const - (on(player, POWERCONST) ? 10 : 0))
|
|
max_stats.s_const = pstats.s_const;
|
|
}
|
|
|
|
/*
|
|
monquaff()
|
|
monster gets the effect
|
|
*/
|
|
|
|
void
|
|
monquaff(struct thing *quaffer, int which, int flags)
|
|
{
|
|
struct stats *curp = &(quaffer->t_stats);
|
|
struct stats *maxp = &(quaffer->maxstats);
|
|
int blessed = flags & ISBLESSED;
|
|
int cursed = flags & ISCURSED;
|
|
|
|
switch(which)
|
|
{
|
|
case P_SEEINVIS:
|
|
if (cursed)
|
|
turn_on(*quaffer, ISHUH);
|
|
else
|
|
turn_on(*quaffer, CANSEE);
|
|
break;
|
|
|
|
case P_GAINABIL:
|
|
if (cursed)
|
|
curp->s_intel /= 2;
|
|
else
|
|
curp->s_power = maxp->s_power;
|
|
break;
|
|
|
|
case P_CLEAR:
|
|
if (cursed)
|
|
turn_on(*quaffer, ISHUH);
|
|
else
|
|
turn_on(*quaffer, ISHUH);
|
|
break;
|
|
|
|
case P_HEALING:
|
|
if (cursed)
|
|
{
|
|
curp->s_hpt /= 2;
|
|
curp->s_power /= 2;
|
|
}
|
|
else
|
|
{
|
|
int nsides = (blessed ? 8 : 4);
|
|
int hpt_gain = roll(curp->s_lvl, nsides);
|
|
int power_gain = roll(curp->s_lvl, nsides);
|
|
|
|
curp->s_hpt = min(curp->s_hpt + hpt_gain, maxp->s_hpt);
|
|
curp->s_power = min(curp->s_power + power_gain, maxp->s_power);
|
|
}
|
|
break;
|
|
|
|
case P_HASTE:
|
|
if (cursed)
|
|
{
|
|
if (on(*quaffer, ISHASTE))
|
|
turn_off(*quaffer, ISHASTE);
|
|
else
|
|
turn_on(*quaffer, ISSLOW);
|
|
}
|
|
else
|
|
turn_on(*quaffer, ISHASTE);
|
|
break;
|
|
|
|
case P_INVIS:
|
|
turn_on(*quaffer, ISINVIS);
|
|
|
|
if (cansee(quaffer->t_pos.y, quaffer->t_pos.x))
|
|
seemsg("The monster dissappears!");
|
|
|
|
break;
|
|
|
|
case P_REGENERATE:
|
|
if (cursed)
|
|
{
|
|
quaff(quaffer, P_HEALING, ISCURSED);
|
|
quaff(quaffer, P_HASTE, ISCURSED);
|
|
}
|
|
else
|
|
turn_on(*quaffer, ISREGEN);
|
|
break;
|
|
|
|
case P_SHERO:
|
|
if (on(*quaffer, ISFLEE))
|
|
turn_off(*quaffer, ISFLEE);
|
|
else
|
|
{
|
|
turn_on(*quaffer, SUPERHERO);
|
|
quaff(quaffer, P_HASTE, ISBLESSED);
|
|
quaff(quaffer, P_CLEAR, ISNORMAL);
|
|
}
|
|
break;
|
|
|
|
case P_PHASE:
|
|
if (cursed)
|
|
quaffer->t_no_move += HOLDTIME;
|
|
else
|
|
turn_on(*quaffer, CANINWALL);
|
|
break;
|
|
|
|
default:
|
|
debug("'%s' is a strange potion for a monster to quaff!",
|
|
p_magic[which].mi_name);
|
|
}
|
|
}
|