1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
/* hack.wield.c - version 1.0.3 */
/* $FreeBSD: src/games/hack/hack.wield.c,v 1.4 1999/11/16 10:26:38 marcel Exp $ */
/* $DragonFly: src/games/hack/hack.wield.c,v 1.4 2006/08/21 19:45:32 pavalos Exp $ */
#include "hack.h"
extern struct obj zeroobj;
void
setuwep(struct obj *obj)
{
setworn(obj, W_WEP);
}
int
dowield(void)
{
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(NULL);
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(void)
{
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--;
}
}
bool
chwepon(struct obj *otmp, int amount)
{
const char *color = (amount < 0) ? "black" : "green";
const char *ltime;
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;
ltime = (amount * amount == 1) ? "moment" : "while";
pline("Your %s %s for a %s.",
aobjnam(uwep, "glow"), color, ltime);
uwep->spe += amount;
if (amount > 0)
uwep->cursed = 0;
return (1);
}
|