+/* $NetBSD: hack.eat.c,v 1.4 1997/10/19 16:57:53 christos Exp $ */
+
/*
* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985.
*/
+#include <sys/cdefs.h>
#ifndef lint
-static char rcsid[] = "$NetBSD: hack.eat.c,v 1.3 1995/03/23 08:30:01 cgd Exp $";
-#endif /* not lint */
+__RCSID("$NetBSD: hack.eat.c,v 1.4 1997/10/19 16:57:53 christos Exp $");
+#endif /* not lint */
-#include "hack.h"
-char POISONOUS[] = "ADKSVabhks";
-extern char *nomovemsg;
-extern int (*afternmv)();
-extern int (*occupation)();
-extern char *occtxt;
-extern struct obj *splitobj(), *addinv();
+#include "hack.h"
+#include "extern.h"
+char POISONOUS[] = "ADKSVabhks";
/* hunger texts used on bottom line (each 8 chars long) */
#define SATIATED 0
#define FAINTED 5
#define STARVED 6
-char *hu_stat[] = {
+char *hu_stat[] = {
"Satiated",
" ",
"Hungry ",
"Starved "
};
-init_uhunger(){
+void
+init_uhunger()
+{
u.uhunger = 900;
u.uhs = NOT_HUNGRY;
}
#define TTSZ SIZE(tintxts)
-struct { char *txt; int nut; } tintxts[] = {
- "It contains first quality peaches - what a surprise!", 40,
- "It contains salmon - not bad!", 60,
- "It contains apple juice - perhaps not what you hoped for.", 20,
- "It contains some nondescript substance, tasting awfully.", 500,
- "It contains rotten meat. You vomit.", -50,
- "It turns out to be empty.", 0
+struct {
+ char *txt;
+ int nut;
+} tintxts[] = {
+ { "It contains first quality peaches - what a surprise!", 40 },
+ { "It contains salmon - not bad!", 60 },
+ { "It contains apple juice - perhaps not what you hoped for.", 20 },
+ { "It contains some nondescript substance, tasting awfully.", 500 },
+ { "It contains rotten meat. You vomit.", -50 },
+ { "It turns out to be empty.", 0 }
};
static struct {
- struct obj *tin;
- int usedtime, reqtime;
-} tin;
+ struct obj *tin;
+ int usedtime, reqtime;
+} tin;
-opentin(){
- register int r;
+int
+opentin()
+{
+ int r;
- if(!carried(tin.tin)) /* perhaps it was stolen? */
- return(0); /* %% probably we should use tinoid */
- if(tin.usedtime++ >= 50) {
+ if (!carried(tin.tin)) /* perhaps it was stolen? */
+ return (0); /* %% probably we should use tinoid */
+ if (tin.usedtime++ >= 50) {
pline("You give up your attempt to open the tin.");
- return(0);
+ return (0);
}
- if(tin.usedtime < tin.reqtime)
- return(1); /* still busy */
+ if (tin.usedtime < tin.reqtime)
+ return (1); /* still busy */
pline("You succeed in opening the tin.");
useup(tin.tin);
- r = rn2(2*TTSZ);
- if(r < TTSZ){
- pline(tintxts[r].txt);
- lesshungry(tintxts[r].nut);
- if(r == 1) /* SALMON */ {
- Glib = rnd(15);
- pline("Eating salmon made your fingers very slippery.");
- }
+ r = rn2(2 * TTSZ);
+ if (r < TTSZ) {
+ pline(tintxts[r].txt);
+ lesshungry(tintxts[r].nut);
+ if (r == 1) { /* SALMON */
+ Glib = rnd(15);
+ pline("Eating salmon made your fingers very slippery.");
+ }
} else {
- pline("It contains spinach - this makes you feel like Popeye!");
- lesshungry(600);
- if(u.ustr < 118)
- u.ustr += rnd( ((u.ustr < 17) ? 19 : 118) - u.ustr);
- if(u.ustr > u.ustrmax) u.ustrmax = u.ustr;
- flags.botl = 1;
+ pline("It contains spinach - this makes you feel like Popeye!");
+ lesshungry(600);
+ if (u.ustr < 118)
+ u.ustr += rnd(((u.ustr < 17) ? 19 : 118) - u.ustr);
+ if (u.ustr > u.ustrmax)
+ u.ustrmax = u.ustr;
+ flags.botl = 1;
}
- return(0);
+ return (0);
}
-Meatdone(){
+int
+Meatdone()
+{
u.usym = '@';
prme();
+ return 0;
}
-doeat(){
- register struct obj *otmp;
- register struct objclass *ftmp;
- register tmp;
+int
+doeat()
+{
+ struct obj *otmp;
+ struct objclass *ftmp;
+ int tmp;
/* Is there some food (probably a heavy corpse) here on the ground? */
- if(!Levitation)
- for(otmp = fobj; otmp; otmp = otmp->nobj) {
- if(otmp->ox == u.ux && otmp->oy == u.uy &&
- otmp->olet == FOOD_SYM) {
- pline("There %s %s here; eat %s? [ny] ",
- (otmp->quan == 1) ? "is" : "are",
- doname(otmp),
- (otmp->quan == 1) ? "it" : "one");
- if(readchar() == 'y') {
- if(otmp->quan != 1)
- (void) splitobj(otmp, 1);
- freeobj(otmp);
- otmp = addinv(otmp);
- addtobill(otmp);
- goto gotit;
+ if (!Levitation)
+ for (otmp = fobj; otmp; otmp = otmp->nobj) {
+ if (otmp->ox == u.ux && otmp->oy == u.uy &&
+ otmp->olet == FOOD_SYM) {
+ pline("There %s %s here; eat %s? [ny] ",
+ (otmp->quan == 1) ? "is" : "are",
+ doname(otmp),
+ (otmp->quan == 1) ? "it" : "one");
+ if (readchar() == 'y') {
+ if (otmp->quan != 1)
+ (void) splitobj(otmp, 1);
+ freeobj(otmp);
+ otmp = addinv(otmp);
+ addtobill(otmp);
+ goto gotit;
+ }
}
}
- }
otmp = getobj("%", "eat");
- if(!otmp) return(0);
+ if (!otmp)
+ return (0);
gotit:
- if(otmp->otyp == TIN){
- if(uwep) {
- switch(uwep->otyp) {
+ if (otmp->otyp == TIN) {
+ if (uwep) {
+ switch (uwep->otyp) {
case CAN_OPENER:
tmp = 1;
break;
goto no_opener;
}
pline("Using your %s you try to open the tin.",
- aobjnam(uwep, (char *) 0));
+ aobjnam(uwep, (char *) 0));
} else {
- no_opener:
+ no_opener:
pline("It is not so easy to open this tin.");
- if(Glib) {
+ if (Glib) {
pline("The tin slips out of your hands.");
- if(otmp->quan > 1) {
- register struct obj *obj;
- extern struct obj *splitobj();
+ if (otmp->quan > 1) {
+ struct obj *obj;
obj = splitobj(otmp, 1);
- if(otmp == uwep) setuwep(obj);
+ if (otmp == uwep)
+ setuwep(obj);
}
dropx(otmp);
- return(1);
+ return (1);
}
- tmp = 10 + rn2(1 + 500/((int)(u.ulevel + u.ustr)));
+ tmp = 10 + rn2(1 + 500 / ((int) (u.ulevel + u.ustr)));
}
tin.reqtime = tmp;
tin.usedtime = 0;
tin.tin = otmp;
occupation = opentin;
occtxt = "opening the tin";
- return(1);
+ return (1);
}
ftmp = &objects[otmp->otyp];
multi = -ftmp->oc_delay;
- if(otmp->otyp >= CORPSE && eatcorpse(otmp)) goto eatx;
- if(!rn2(7) && otmp->otyp != FORTUNE_COOKIE) {
+ if (otmp->otyp >= CORPSE && eatcorpse(otmp))
+ goto eatx;
+ if (!rn2(7) && otmp->otyp != FORTUNE_COOKIE) {
pline("Blecch! Rotten food!");
- if(!rn2(4)) {
+ if (!rn2(4)) {
pline("You feel rather light headed.");
- Confusion += d(2,4);
- } else if(!rn2(4)&& !Blind) {
+ Confusion += d(2, 4);
+ } else if (!rn2(4) && !Blind) {
pline("Everything suddenly goes dark.");
- Blind = d(2,10);
+ Blind = d(2, 10);
seeoff(0);
- } else if(!rn2(3)) {
- if(Blind)
- pline("The world spins and you slap against the floor.");
+ } else if (!rn2(3)) {
+ if (Blind)
+ pline("The world spins and you slap against the floor.");
else
- pline("The world spins and goes dark.");
+ pline("The world spins and goes dark.");
nomul(-rnd(10));
nomovemsg = "You are conscious again.";
}
lesshungry(ftmp->nutrition / 4);
} else {
- if(u.uhunger >= 1500) {
+ if (u.uhunger >= 1500) {
pline("You choke over your food.");
pline("You die...");
killer = ftmp->oc_name;
done("choked");
}
- switch(otmp->otyp){
+ switch (otmp->otyp) {
case FOOD_RATION:
- if(u.uhunger <= 200)
+ if (u.uhunger <= 200)
pline("That food really hit the spot!");
- else if(u.uhunger <= 700)
+ else if (u.uhunger <= 700)
pline("That satiated your stomach!");
else {
- pline("You're having a hard time getting all that food down.");
+ pline("You're having a hard time getting all that food down.");
multi -= 2;
}
lesshungry(ftmp->nutrition);
- if(multi < 0) nomovemsg = "You finished your meal.";
+ if (multi < 0)
+ nomovemsg = "You finished your meal.";
break;
case TRIPE_RATION:
pline("Yak - dog food!");
- more_experienced(1,0);
+ more_experienced(1, 0);
flags.botl = 1;
- if(rn2(2)){
+ if (rn2(2)) {
pline("You vomit.");
morehungry(20);
- if(Sick) {
+ if (Sick) {
Sick = 0; /* David Neves */
pline("What a relief!");
}
- } else lesshungry(ftmp->nutrition);
+ } else
+ lesshungry(ftmp->nutrition);
break;
default:
- if(otmp->otyp >= CORPSE)
- pline("That %s tasted terrible!",ftmp->oc_name);
+ if (otmp->otyp >= CORPSE)
+ pline("That %s tasted terrible!", ftmp->oc_name);
else
- pline("That %s was delicious!",ftmp->oc_name);
+ pline("That %s was delicious!", ftmp->oc_name);
lesshungry(ftmp->nutrition);
- if(otmp->otyp == DEAD_LIZARD && (Confusion > 2))
+ if (otmp->otyp == DEAD_LIZARD && (Confusion > 2))
Confusion = 2;
else
#ifdef QUEST
- if(otmp->otyp == CARROT && !Blind){
+ if (otmp->otyp == CARROT && !Blind) {
u.uhorizon++;
setsee();
pline("Your vision improves.");
} else
-#endif QUEST
- if(otmp->otyp == FORTUNE_COOKIE) {
- if(Blind) {
- pline("This cookie has a scrap of paper inside!");
- pline("What a pity, that you cannot read it!");
- } else
- outrumor();
- } else
- if(otmp->otyp == LUMP_OF_ROYAL_JELLY) {
+#endif /* QUEST */
+ if (otmp->otyp == FORTUNE_COOKIE) {
+ if (Blind) {
+ pline("This cookie has a scrap of paper inside!");
+ pline("What a pity, that you cannot read it!");
+ } else
+ outrumor();
+ } else if (otmp->otyp == LUMP_OF_ROYAL_JELLY) {
/* This stuff seems to be VERY healthy! */
- if(u.ustrmax < 118) u.ustrmax++;
- if(u.ustr < u.ustrmax) u.ustr++;
+ if (u.ustrmax < 118)
+ u.ustrmax++;
+ if (u.ustr < u.ustrmax)
+ u.ustr++;
u.uhp += rnd(20);
- if(u.uhp > u.uhpmax) {
- if(!rn2(17)) u.uhpmax++;
+ if (u.uhp > u.uhpmax) {
+ if (!rn2(17))
+ u.uhpmax++;
u.uhp = u.uhpmax;
}
heal_legs();
}
}
eatx:
- if(multi<0 && !nomovemsg){
- static char msgbuf[BUFSZ];
+ if (multi < 0 && !nomovemsg) {
+ static char msgbuf[BUFSZ];
(void) sprintf(msgbuf, "You finished eating the %s.",
- ftmp->oc_name);
+ ftmp->oc_name);
nomovemsg = msgbuf;
}
useup(otmp);
- return(1);
+ return (1);
}
/* called in hack.main.c */
-gethungry(){
+void
+gethungry()
+{
--u.uhunger;
- if(moves % 2) {
- if(Regeneration) u.uhunger--;
- if(Hunger) u.uhunger--;
- /* a3: if(Hunger & LEFT_RING) u.uhunger--;
- if(Hunger & RIGHT_RING) u.uhunger--;
- etc. */
+ if (moves % 2) {
+ if (Regeneration)
+ u.uhunger--;
+ if (Hunger)
+ u.uhunger--;
+ /*
+ * a3: if(Hunger & LEFT_RING) u.uhunger--; if(Hunger &
+ * RIGHT_RING) u.uhunger--; etc.
+ */
}
- if(moves % 20 == 0) { /* jimt@asgb */
- if(uleft) u.uhunger--;
- if(uright) u.uhunger--;
+ if (moves % 20 == 0) { /* jimt@asgb */
+ if (uleft)
+ u.uhunger--;
+ if (uright)
+ u.uhunger--;
}
newuhs(TRUE);
}
/* called after vomiting and after performing feats of magic */
-morehungry(num) register num; {
+void
+morehungry(num)
+ int num;
+{
u.uhunger -= num;
newuhs(TRUE);
}
/* called after eating something (and after drinking fruit juice) */
-lesshungry(num) register num; {
+void
+lesshungry(num)
+ int num;
+{
u.uhunger += num;
newuhs(FALSE);
}
-unfaint(){
+int
+unfaint()
+{
u.uhs = FAINTING;
flags.botl = 1;
+ return 0;
}
-newuhs(incr) boolean incr; {
- register int newhs, h = u.uhunger;
+void
+newuhs(incr)
+ boolean incr;
+{
+ int newhs, h = u.uhunger;
newhs = (h > 1000) ? SATIATED :
(h > 150) ? NOT_HUNGRY :
(h > 50) ? HUNGRY :
(h > 0) ? WEAK : FAINTING;
- if(newhs == FAINTING) {
- if(u.uhs == FAINTED)
+ if (newhs == FAINTING) {
+ if (u.uhs == FAINTED)
newhs = FAINTED;
- if(u.uhs <= WEAK || rn2(20-u.uhunger/10) >= 19) {
- if(u.uhs != FAINTED && multi >= 0 /* %% */) {
+ if (u.uhs <= WEAK || rn2(20 - u.uhunger / 10) >= 19) {
+ if (u.uhs != FAINTED && multi >= 0 /* %% */ ) {
pline("You faint from lack of food.");
- nomul(-10+(u.uhunger/10));
+ nomul(-10 + (u.uhunger / 10));
nomovemsg = "You regain consciousness.";
afternmv = unfaint;
newhs = FAINTED;
}
- } else
- if(u.uhunger < -(int)(200 + 25*u.ulevel)) {
+ } else if (u.uhunger < -(int) (200 + 25 * u.ulevel)) {
u.uhs = STARVED;
flags.botl = 1;
bot();
done("starved");
}
}
-
- if(newhs != u.uhs) {
- if(newhs >= WEAK && u.uhs < WEAK)
+ if (newhs != u.uhs) {
+ if (newhs >= WEAK && u.uhs < WEAK)
losestr(1); /* this may kill you -- see below */
- else
- if(newhs < WEAK && u.uhs >= WEAK && u.ustr < u.ustrmax)
+ else if (newhs < WEAK && u.uhs >= WEAK && u.ustr < u.ustrmax)
losestr(-1);
- switch(newhs){
+ switch (newhs) {
case HUNGRY:
pline((!incr) ? "You only feel hungry now." :
(u.uhunger < 145) ? "You feel hungry." :
- "You are beginning to feel hungry.");
+ "You are beginning to feel hungry.");
break;
case WEAK:
pline((!incr) ? "You feel weak now." :
(u.uhunger < 45) ? "You feel weak." :
- "You are beginning to feel weak.");
+ "You are beginning to feel weak.");
break;
}
u.uhs = newhs;
flags.botl = 1;
- if(u.uhp < 1) {
+ if (u.uhp < 1) {
pline("You die from hunger and exhaustion.");
killer = "exhaustion";
done("starved");
#define CORPSE_I_TO_C(otyp) (char) ((otyp >= DEAD_ACID_BLOB)\
? 'a' + (otyp - DEAD_ACID_BLOB)\
: '@' + (otyp - DEAD_HUMAN))
+int
poisonous(otmp)
-register struct obj *otmp;
+ struct obj *otmp;
{
- return(index(POISONOUS, CORPSE_I_TO_C(otmp->otyp)) != 0);
+ return (strchr(POISONOUS, CORPSE_I_TO_C(otmp->otyp)) != 0);
}
/* returns 1 if some text was printed */
-eatcorpse(otmp) register struct obj *otmp; {
-register char let = CORPSE_I_TO_C(otmp->otyp);
-register tp = 0;
- if(let != 'a' && moves > otmp->age + 50 + rn2(100)) {
+int
+eatcorpse(otmp)
+ struct obj *otmp;
+{
+ char let = CORPSE_I_TO_C(otmp->otyp);
+ int tp = 0;
+ if (let != 'a' && moves > otmp->age + 50 + rn2(100)) {
tp++;
pline("Ulch -- that meat was tainted!");
pline("You get very sick.");
Sick = 10 + rn2(10);
u.usick_cause = objects[otmp->otyp].oc_name;
- } else if(index(POISONOUS, let) && rn2(5)){
+ } else if (strchr(POISONOUS, let) && rn2(5)) {
tp++;
pline("Ecch -- that must have been poisonous!");
- if(!Poison_resistance){
+ if (!Poison_resistance) {
losestr(rnd(4));
losehp(rnd(15), "poisonous corpse");
} else
pline("You don't seem affected by the poison.");
- } else if(index("ELNOPQRUuxz", let) && rn2(5)){
+ } else if (strchr("ELNOPQRUuxz", let) && rn2(5)) {
tp++;
pline("You feel sick.");
losehp(rnd(8), "cadaver");
}
- switch(let) {
+ switch (let) {
case 'L':
case 'N':
case 't':
Aggravate_monster |= INTRINSIC;
break;
case 'I':
- if(!Invis) {
- Invis = 50+rn2(100);
- if(!See_invisible)
+ if (!Invis) {
+ Invis = 50 + rn2(100);
+ if (!See_invisible)
newsym(u.ux, u.uy);
} else {
Invis |= INTRINSIC;
case 'y':
#ifdef QUEST
u.uhorizon++;
-#endif QUEST
+#endif /* QUEST */
/* fall into next case */
case 'B':
Confusion = 50;
done("died");
/* NOTREACHED */
case 'a':
- if(Stoned) {
- pline("What a pity - you just destroyed a future piece of art!");
- tp++;
- Stoned = 0;
- }
- break;
+ if (Stoned) {
+ pline("What a pity - you just destroyed a future piece of art!");
+ tp++;
+ Stoned = 0;
+ }
+ break;
case 'M':
- pline("You cannot resist the temptation to mimic a treasure chest.");
- tp++;
- nomul(-30);
- afternmv = Meatdone;
- nomovemsg = "You now again prefer mimicking a human.";
- u.usym = '$';
- prme();
- break;
+ pline("You cannot resist the temptation to mimic a treasure chest.");
+ tp++;
+ nomul(-30);
+ afternmv = Meatdone;
+ nomovemsg = "You now again prefer mimicking a human.";
+ u.usym = '$';
+ prme();
+ break;
}
- return(tp);
+ return (tp);
}
git.ckatri.com / bsdgames-darwin.git / blobdiff