117 lines
2.6 KiB
C
117 lines
2.6 KiB
C
/* $NetBSD: hack.wield.c,v 1.4 1997/10/19 16:59:27 christos Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#ifndef lint
|
|
__RCSID("$NetBSD: hack.wield.c,v 1.4 1997/10/19 16:59:27 christos Exp $");
|
|
#endif /* not lint */
|
|
|
|
#include "hack.h"
|
|
#include "extern.h"
|
|
|
|
void
|
|
setuwep(obj)
|
|
struct obj *obj;
|
|
{
|
|
setworn(obj, W_WEP);
|
|
}
|
|
|
|
int
|
|
dowield()
|
|
{
|
|
struct obj *wep;
|
|
int res = 0;
|
|
|
|
multi = 0;
|
|
if (!(wep = getobj("#-)", "wield"))) /* nothing */
|
|
;
|
|
else if (uwep == wep)
|
|
pline("You are already wielding that!");
|
|
else if (uwep && uwep->cursed)
|
|
pline("The %s welded to your hand!",
|
|
aobjnam(uwep, "are"));
|
|
else if (wep == &zeroobj) {
|
|
if (uwep == 0) {
|
|
pline("You are already empty handed.");
|
|
} else {
|
|
setuwep((struct obj *) 0);
|
|
res++;
|
|
pline("You are empty handed.");
|
|
}
|
|
} 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))
|
|
pline("You cannot wield that!");
|
|
else {
|
|
setuwep(wep);
|
|
res++;
|
|
if (uwep->cursed)
|
|
pline("The %s %s to your hand!",
|
|
aobjnam(uwep, "weld"),
|
|
(uwep->quan == 1) ? "itself" : "themselves"); /* a3 */
|
|
else
|
|
prinv(uwep);
|
|
}
|
|
return (res);
|
|
}
|
|
|
|
void
|
|
corrode_weapon()
|
|
{
|
|
if (!uwep || uwep->olet != WEAPON_SYM)
|
|
return; /* %% */
|
|
if (uwep->rustfree)
|
|
pline("Your %s not affected.", aobjnam(uwep, "are"));
|
|
else {
|
|
pline("Your %s!", aobjnam(uwep, "corrode"));
|
|
uwep->spe--;
|
|
}
|
|
}
|
|
|
|
int
|
|
chwepon(otmp, amount)
|
|
struct obj *otmp;
|
|
int amount;
|
|
{
|
|
char *color = (amount < 0) ? "black" : "green";
|
|
char *time;
|
|
if (!uwep || uwep->olet != WEAPON_SYM) {
|
|
strange_feeling(otmp,
|
|
(amount > 0) ? "Your hands twitch."
|
|
: "Your hands itch.");
|
|
return (0);
|
|
}
|
|
if (uwep->otyp == WORM_TOOTH && amount > 0) {
|
|
uwep->otyp = CRYSKNIFE;
|
|
pline("Your weapon seems sharper now.");
|
|
uwep->cursed = 0;
|
|
return (1);
|
|
}
|
|
if (uwep->otyp == CRYSKNIFE && amount < 0) {
|
|
uwep->otyp = WORM_TOOTH;
|
|
pline("Your weapon looks duller now.");
|
|
return (1);
|
|
}
|
|
/* there is a (soft) upper limit to uwep->spe */
|
|
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);
|
|
}
|
|
if (!rn2(6))
|
|
amount *= 2;
|
|
time = (amount * amount == 1) ? "moment" : "while";
|
|
pline("Your %s %s for a %s.",
|
|
aobjnam(uwep, "glow"), color, time);
|
|
uwep->spe += amount;
|
|
if (amount > 0)
|
|
uwep->cursed = 0;
|
|
return (1);
|
|
}
|