NetBSD/games/hack/hack.wield.c

117 lines
2.6 KiB
C
Raw Normal View History

/* $NetBSD: hack.wield.c,v 1.5 2001/03/25 20:44:03 jsm Exp $ */
1997-10-19 20:56:41 +04:00
/*
* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985.
*/
1997-10-19 20:56:41 +04:00
#include <sys/cdefs.h>
#ifndef lint
__RCSID("$NetBSD: hack.wield.c,v 1.5 2001/03/25 20:44:03 jsm Exp $");
1997-10-19 20:56:41 +04:00
#endif /* not lint */
1993-03-21 12:45:37 +03:00
1997-10-19 20:56:41 +04:00
#include "hack.h"
#include "extern.h"
1993-03-21 12:45:37 +03:00
1997-10-19 20:56:41 +04:00
void
setuwep(obj)
struct obj *obj;
{
1993-03-21 12:45:37 +03:00
setworn(obj, W_WEP);
}
1997-10-19 20:56:41 +04:00
int
1993-03-21 12:45:37 +03:00
dowield()
{
1997-10-19 20:56:41 +04:00
struct obj *wep;
int res = 0;
1993-03-21 12:45:37 +03:00
multi = 0;
1997-10-19 20:56:41 +04:00
if (!(wep = getobj("#-)", "wield"))) /* nothing */
;
else if (uwep == wep)
1993-03-21 12:45:37 +03:00
pline("You are already wielding that!");
1997-10-19 20:56:41 +04:00
else if (uwep && uwep->cursed)
1993-03-21 12:45:37 +03:00
pline("The %s welded to your hand!",
1997-10-19 20:56:41 +04:00
aobjnam(uwep, "are"));
else if (wep == &zeroobj) {
if (uwep == 0) {
1993-03-21 12:45:37 +03:00
pline("You are already empty handed.");
} else {
setuwep((struct obj *) 0);
res++;
pline("You are empty handed.");
}
1997-10-19 20:56:41 +04:00
} else if (uarms && wep->otyp == TWO_HANDED_SWORD)
pline("You cannot wield a two-handed sword and wear a shield.");
else if (wep->owornmask & (W_ARMOR | W_RING))
1993-03-21 12:45:37 +03:00
pline("You cannot wield that!");
else {
setuwep(wep);
res++;
1997-10-19 20:56:41 +04:00
if (uwep->cursed)
pline("The %s %s to your hand!",
aobjnam(uwep, "weld"),
(uwep->quan == 1) ? "itself" : "themselves"); /* a3 */
else
prinv(uwep);
1993-03-21 12:45:37 +03:00
}
1997-10-19 20:56:41 +04:00
return (res);
1993-03-21 12:45:37 +03:00
}
1997-10-19 20:56:41 +04:00
void
corrode_weapon()
{
if (!uwep || uwep->olet != WEAPON_SYM)
return; /* %% */
if (uwep->rustfree)
1993-03-21 12:45:37 +03:00
pline("Your %s not affected.", aobjnam(uwep, "are"));
else {
pline("Your %s!", aobjnam(uwep, "corrode"));
uwep->spe--;
}
}
1997-10-19 20:56:41 +04:00
int
chwepon(otmp, amount)
struct obj *otmp;
int amount;
1993-03-21 12:45:37 +03:00
{
const char *color = (amount < 0) ? "black" : "green";
const char *time;
1997-10-19 20:56:41 +04:00
if (!uwep || uwep->olet != WEAPON_SYM) {
1993-03-21 12:45:37 +03:00
strange_feeling(otmp,
1997-10-19 20:56:41 +04:00
(amount > 0) ? "Your hands twitch."
: "Your hands itch.");
return (0);
1993-03-21 12:45:37 +03:00
}
1997-10-19 20:56:41 +04:00
if (uwep->otyp == WORM_TOOTH && amount > 0) {
1993-03-21 12:45:37 +03:00
uwep->otyp = CRYSKNIFE;
pline("Your weapon seems sharper now.");
uwep->cursed = 0;
1997-10-19 20:56:41 +04:00
return (1);
1993-03-21 12:45:37 +03:00
}
1997-10-19 20:56:41 +04:00
if (uwep->otyp == CRYSKNIFE && amount < 0) {
1993-03-21 12:45:37 +03:00
uwep->otyp = WORM_TOOTH;
pline("Your weapon looks duller now.");
1997-10-19 20:56:41 +04:00
return (1);
1993-03-21 12:45:37 +03:00
}
/* there is a (soft) upper limit to uwep->spe */
1997-10-19 20:56:41 +04:00
if (amount > 0 && uwep->spe > 5 && rn2(3)) {
pline("Your %s violently green for a while and then evaporate%s.",
aobjnam(uwep, "glow"), plur(uwep->quan));
while (uwep) /* let all of them disappear */
/* note: uwep->quan = 1 is nogood if unpaid */
useup(uwep);
return (1);
1993-03-21 12:45:37 +03:00
}
1997-10-19 20:56:41 +04:00
if (!rn2(6))
amount *= 2;
time = (amount * amount == 1) ? "moment" : "while";
1993-03-21 12:45:37 +03:00
pline("Your %s %s for a %s.",
1997-10-19 20:56:41 +04:00
aobjnam(uwep, "glow"), color, time);
1993-03-21 12:45:37 +03:00
uwep->spe += amount;
1997-10-19 20:56:41 +04:00
if (amount > 0)
uwep->cursed = 0;
return (1);
1993-03-21 12:45:37 +03:00
}