![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to hack.do_wear.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / games / hack|
Return to hack.do_wear.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / games / hack |
1.1 root 1: /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
2: /* hack.do_wear.c - version 1.0.3 */
3:
4: #include "hack.h"
5: #include <stdio.h>
6: extern char *nomovemsg;
7: extern char quitchars[];
8: extern char *Doname();
9:
10: off_msg(otmp) register struct obj *otmp; {
11: pline("You were wearing %s.", doname(otmp));
12: }
13:
14: doremarm() {
15: register struct obj *otmp;
16: if(!uarm && !uarmh && !uarms && !uarmg) {
17: pline("Not wearing any armor.");
18: return(0);
19: }
20: otmp = (!uarmh && !uarms && !uarmg) ? uarm :
21: (!uarms && !uarm && !uarmg) ? uarmh :
22: (!uarmh && !uarm && !uarmg) ? uarms :
23: (!uarmh && !uarm && !uarms) ? uarmg :
24: getobj("[", "take off");
25: if(!otmp) return(0);
26: if(!(otmp->owornmask & (W_ARMOR - W_ARM2))) {
27: pline("You can't take that off.");
28: return(0);
29: }
30: if( otmp == uarmg && uwep && uwep->cursed ) { /* myers@uwmacc */
31: pline("You seem not able to take off the gloves while holding your weapon.");
32: return(0);
33: }
34: (void) armoroff(otmp);
35: return(1);
36: }
37:
38: doremring() {
39: if(!uleft && !uright){
40: pline("Not wearing any ring.");
41: return(0);
42: }
43: if(!uleft)
44: return(dorr(uright));
45: if(!uright)
46: return(dorr(uleft));
47: if(uleft && uright) while(1) {
48: char answer;
49:
50: pline("What ring, Right or Left? [ rl?]");
51: if(index(quitchars, (answer = readchar())))
52: return(0);
53: switch(answer) {
54: case 'l':
55: case 'L':
56: return(dorr(uleft));
57: case 'r':
58: case 'R':
59: return(dorr(uright));
60: case '?':
61: (void) doprring();
62: /* might look at morc here %% */
63: }
64: }
65: /* NOTREACHED */
66: #ifdef lint
67: return(0);
68: #endif lint
69: }
70:
71: dorr(otmp) register struct obj *otmp; {
72: if(cursed(otmp)) return(0);
73: ringoff(otmp);
74: off_msg(otmp);
75: return(1);
76: }
77:
78: cursed(otmp) register struct obj *otmp; {
79: if(otmp->cursed){
80: pline("You can't. It appears to be cursed.");
81: return(1);
82: }
83: return(0);
84: }
85:
86: armoroff(otmp) register struct obj *otmp; {
87: register int delay = -objects[otmp->otyp].oc_delay;
88: if(cursed(otmp)) return(0);
89: setworn((struct obj *) 0, otmp->owornmask & W_ARMOR);
90: if(delay) {
91: nomul(delay);
92: switch(otmp->otyp) {
93: case HELMET:
94: nomovemsg = "You finished taking off your helmet.";
95: break;
96: case PAIR_OF_GLOVES:
97: nomovemsg = "You finished taking off your gloves";
98: break;
99: default:
100: nomovemsg = "You finished taking off your suit.";
101: }
102: } else {
103: off_msg(otmp);
104: }
105: return(1);
106: }
107:
108: doweararm() {
109: register struct obj *otmp;
110: register int delay;
111: register int err = 0;
112: long mask = 0;
113:
114: otmp = getobj("[", "wear");
115: if(!otmp) return(0);
116: if(otmp->owornmask & W_ARMOR) {
117: pline("You are already wearing that!");
118: return(0);
119: }
120: if(otmp->otyp == HELMET){
121: if(uarmh) {
122: pline("You are already wearing a helmet.");
123: err++;
124: } else
125: mask = W_ARMH;
126: } else if(otmp->otyp == SHIELD){
127: if(uarms) pline("You are already wearing a shield."), err++;
128: if(uwep && uwep->otyp == TWO_HANDED_SWORD)
129: pline("You cannot wear a shield and wield a two-handed sword."), err++;
130: if(!err) mask = W_ARMS;
131: } else if(otmp->otyp == PAIR_OF_GLOVES) {
132: if(uarmg) {
133: pline("You are already wearing gloves.");
134: err++;
135: } else
136: if(uwep && uwep->cursed) {
137: pline("You cannot wear gloves over your weapon.");
138: err++;
139: } else
140: mask = W_ARMG;
141: } else {
142: if(uarm) {
143: if(otmp->otyp != ELVEN_CLOAK || uarm2) {
144: pline("You are already wearing some armor.");
145: err++;
146: }
147: }
148: if(!err) mask = W_ARM;
149: }
150: if(otmp == uwep && uwep->cursed) {
151: if(!err++)
152: pline("%s is welded to your hand.", Doname(uwep));
153: }
154: if(err) return(0);
155: setworn(otmp, mask);
156: if(otmp == uwep)
157: setuwep((struct obj *) 0);
158: delay = -objects[otmp->otyp].oc_delay;
159: if(delay){
160: nomul(delay);
161: nomovemsg = "You finished your dressing manoeuvre.";
162: }
163: otmp->known = 1;
164: return(1);
165: }
166:
167: dowearring() {
168: register struct obj *otmp;
169: long mask = 0;
170: long oldprop;
171:
172: if(uleft && uright){
173: pline("There are no more ring-fingers to fill.");
174: return(0);
175: }
176: otmp = getobj("=", "wear");
177: if(!otmp) return(0);
178: if(otmp->owornmask & W_RING) {
179: pline("You are already wearing that!");
180: return(0);
181: }
182: if(otmp == uleft || otmp == uright) {
183: pline("You are already wearing that.");
184: return(0);
185: }
186: if(otmp == uwep && uwep->cursed) {
187: pline("%s is welded to your hand.", Doname(uwep));
188: return(0);
189: }
190: if(uleft) mask = RIGHT_RING;
191: else if(uright) mask = LEFT_RING;
192: else do {
193: char answer;
194:
195: pline("What ring-finger, Right or Left? ");
196: if(index(quitchars, (answer = readchar())))
197: return(0);
198: switch(answer){
199: case 'l':
200: case 'L':
201: mask = LEFT_RING;
202: break;
203: case 'r':
204: case 'R':
205: mask = RIGHT_RING;
206: break;
207: }
208: } while(!mask);
209: setworn(otmp, mask);
210: if(otmp == uwep)
211: setuwep((struct obj *) 0);
212: oldprop = u.uprops[PROP(otmp->otyp)].p_flgs;
213: u.uprops[PROP(otmp->otyp)].p_flgs |= mask;
214: switch(otmp->otyp){
215: case RIN_LEVITATION:
216: if(!oldprop) float_up();
217: break;
218: case RIN_PROTECTION_FROM_SHAPE_CHANGERS:
219: rescham();
220: break;
221: case RIN_GAIN_STRENGTH:
222: u.ustr += otmp->spe;
223: u.ustrmax += otmp->spe;
224: if(u.ustr > 118) u.ustr = 118;
225: if(u.ustrmax > 118) u.ustrmax = 118;
226: flags.botl = 1;
227: break;
228: case RIN_INCREASE_DAMAGE:
229: u.udaminc += otmp->spe;
230: break;
231: }
232: prinv(otmp);
233: return(1);
234: }
235:
236: ringoff(obj)
237: register struct obj *obj;
238: {
239: register long mask;
240: mask = obj->owornmask & W_RING;
241: setworn((struct obj *) 0, obj->owornmask);
242: if(!(u.uprops[PROP(obj->otyp)].p_flgs & mask))
243: impossible("Strange... I didnt know you had that ring.");
244: u.uprops[PROP(obj->otyp)].p_flgs &= ~mask;
245: switch(obj->otyp) {
246: case RIN_FIRE_RESISTANCE:
247: /* Bad luck if the player is in hell... --jgm */
248: if (!Fire_resistance && dlevel >= 30) {
249: pline("The flames of Hell burn you to a crisp.");
250: killer = "stupidity in hell";
251: done("burned");
252: }
253: break;
254: case RIN_LEVITATION:
255: if(!Levitation) { /* no longer floating */
256: float_down();
257: }
258: break;
259: case RIN_GAIN_STRENGTH:
260: u.ustr -= obj->spe;
261: u.ustrmax -= obj->spe;
262: if(u.ustr > 118) u.ustr = 118;
263: if(u.ustrmax > 118) u.ustrmax = 118;
264: flags.botl = 1;
265: break;
266: case RIN_INCREASE_DAMAGE:
267: u.udaminc -= obj->spe;
268: break;
269: }
270: }
271:
272: find_ac(){
273: register int uac = 10;
274: if(uarm) uac -= ARM_BONUS(uarm);
275: if(uarm2) uac -= ARM_BONUS(uarm2);
276: if(uarmh) uac -= ARM_BONUS(uarmh);
277: if(uarms) uac -= ARM_BONUS(uarms);
278: if(uarmg) uac -= ARM_BONUS(uarmg);
279: if(uleft && uleft->otyp == RIN_PROTECTION) uac -= uleft->spe;
280: if(uright && uright->otyp == RIN_PROTECTION) uac -= uright->spe;
281: if(uac != u.uac){
282: u.uac = uac;
283: flags.botl = 1;
284: }
285: }
286:
287: glibr(){
288: register struct obj *otmp;
289: int xfl = 0;
290: if(!uarmg) if(uleft || uright) {
291: /* Note: at present also cursed rings fall off */
292: pline("Your %s off your fingers.",
293: (uleft && uright) ? "rings slip" : "ring slips");
294: xfl++;
295: if((otmp = uleft) != Null(obj)){
296: ringoff(uleft);
297: dropx(otmp);
298: }
299: if((otmp = uright) != Null(obj)){
300: ringoff(uright);
301: dropx(otmp);
302: }
303: }
304: if((otmp = uwep) != Null(obj)){
305: /* Note: at present also cursed weapons fall */
306: setuwep((struct obj *) 0);
307: dropx(otmp);
308: pline("Your weapon %sslips from your hands.",
309: xfl ? "also " : "");
310: }
311: }
312:
313: struct obj *
314: some_armor(){
315: register struct obj *otmph = uarm;
316: if(uarmh && (!otmph || !rn2(4))) otmph = uarmh;
317: if(uarmg && (!otmph || !rn2(4))) otmph = uarmg;
318: if(uarms && (!otmph || !rn2(4))) otmph = uarms;
319: return(otmph);
320: }
321:
322: corrode_armor(){
323: register struct obj *otmph = some_armor();
324: if(otmph){
325: if(otmph->rustfree ||
326: otmph->otyp == ELVEN_CLOAK ||
327: otmph->otyp == LEATHER_ARMOR ||
328: otmph->otyp == STUDDED_LEATHER_ARMOR) {
329: pline("Your %s not affected!",
330: aobjnam(otmph, "are"));
331: return;
332: }
333: pline("Your %s!", aobjnam(otmph, "corrode"));
334: otmph->spe--;
335: }
336: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.