We used to have the contents of chests and large boxes be immune to water damage, oilskin sacks immune unless the sack was cursed, other containers be vulnerable. Some reddit discussion about ice boxes in unnethack indicates that they are treated like oilskin sacks, which makes sense. This adds that to nethack and also makes chests and large boxes behave similarly. So it's now: nothing is immune even when cursed (except statues); oilskin sacks, ice boxes, and other boxes are immune to water damage unless cursed; all other containers vulnerable even when not cursed. | | Old New |immune all statues, statues | the time chests, large boxes | |immune when BU, oilskin sacks oilskin sacks, | vulnerable if C ice boxes, | chests, large boxes | |vulnerable ordinary sacks, ordinary sacks, | all the time bags of holding, bags of holding | ice boxes | I suspect that the old ice box classification might have been an accident caused by the Is_box() predicate yielding False for it. The changes won't make much difference to actual play. Chests and large boxes are rarely carried and never start out cursed, ice boxes even more so, and sacks/bags haven't been changed. However, players might intentionally curse a container to keep strong pets from picking it up, or be carrying a box because they haven't found a bag yet and then muck about with fountains or thrones and get it cursed.
451 lines
21 KiB
C
451 lines
21 KiB
C
/* NetHack 3.7 obj.h $NHDT-Date: 1611097668 2021/01/19 23:07:48 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.85 $ */
|
|
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
|
|
/*-Copyright (c) Michael Allison, 2006. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#ifndef OBJ_H
|
|
#define OBJ_H
|
|
|
|
/* #define obj obj_nh */ /* uncomment for SCO UNIX, which has a conflicting
|
|
* typedef for "obj" in <sys/types.h> */
|
|
|
|
union vptrs {
|
|
struct obj *v_nexthere; /* floor location lists */
|
|
struct obj *v_ocontainer; /* point back to container */
|
|
struct monst *v_ocarry; /* point back to carrying monst */
|
|
};
|
|
|
|
/****
|
|
*** oextra -- collection of all object extensions
|
|
** (see the note at the bottom of this file before adding oextra fields)
|
|
*/
|
|
struct oextra {
|
|
char *oname; /* ptr to name of object */
|
|
struct monst *omonst; /* ptr to attached monst struct */
|
|
char *omailcmd; /* response_cmd for mail delivery */
|
|
unsigned omid; /* for corpse; m_id of corpse's ghost */
|
|
};
|
|
|
|
struct obj {
|
|
struct obj *nobj;
|
|
union vptrs v;
|
|
#define nexthere v.v_nexthere
|
|
#define ocontainer v.v_ocontainer
|
|
#define ocarry v.v_ocarry
|
|
|
|
struct obj *cobj; /* contents list for containers */
|
|
unsigned o_id;
|
|
xchar ox, oy;
|
|
short otyp; /* object class number */
|
|
unsigned owt;
|
|
long quan; /* number of items */
|
|
|
|
#define SPE_LIM 99 /* abs(obj->spe) <= 99, cap for enchanted and charged
|
|
* objects (and others; named fruit index excepted) */
|
|
schar spe; /* quality of weapon, weptool, armor, or some rings (+ or -);
|
|
* number of charges for wand or charged tool ( >= -1 );
|
|
* number of candles attached to candelabrum (0..7);
|
|
* magic lamp (1 iff djinni inside => lamp is lightable);
|
|
* oil lamp, tallow/wax candle (1 for no apparent reason?);
|
|
* marks spinach tins (1 iff corpsenm==NON_PM);
|
|
* marks tin variety (various: homemade, stir fried, &c);
|
|
* eggs laid by you (1), eggs upgraded with rojal jelly (2);
|
|
* Schroedinger's Box (1) or royal coffers for a court (2);
|
|
* named fruit index;
|
|
* candy bar wrapper index;
|
|
* scroll of mail (normal==0, bones or wishing==1, written==2);
|
|
* splash of venom (normal==0, wishing==1);
|
|
* historic flag and gender for statues */
|
|
#define STATUE_HISTORIC 0x01
|
|
#define STATUE_MALE 0x02
|
|
#define STATUE_FEMALE 0x04
|
|
char oclass; /* object class */
|
|
char invlet; /* designation in inventory */
|
|
char oartifact; /* artifact array index */
|
|
|
|
xchar where; /* where the object thinks it is */
|
|
#define OBJ_FREE 0 /* object not attached to anything */
|
|
#define OBJ_FLOOR 1 /* object on floor */
|
|
#define OBJ_CONTAINED 2 /* object in a container */
|
|
#define OBJ_INVENT 3 /* object in the hero's inventory */
|
|
#define OBJ_MINVENT 4 /* object in a monster inventory */
|
|
#define OBJ_MIGRATING 5 /* object sent off to another level */
|
|
#define OBJ_BURIED 6 /* object buried */
|
|
#define OBJ_ONBILL 7 /* object on shk bill */
|
|
#define OBJ_LUAFREE 8 /* object has been dealloc'd, but is ref'd by lua */
|
|
#define NOBJ_STATES 9
|
|
xchar timed; /* # of fuses (timers) attached to this obj */
|
|
|
|
Bitfield(cursed, 1);
|
|
Bitfield(blessed, 1);
|
|
Bitfield(unpaid, 1); /* on some bill */
|
|
Bitfield(no_charge, 1); /* if shk shouldn't charge for this */
|
|
Bitfield(known, 1); /* exact nature known */
|
|
Bitfield(dknown, 1); /* color or text known */
|
|
Bitfield(bknown, 1); /* blessing or curse known */
|
|
Bitfield(rknown, 1); /* rustproof or not known */
|
|
|
|
Bitfield(oeroded, 2); /* rusted/burnt weapon/armor */
|
|
Bitfield(oeroded2, 2); /* corroded/rotted weapon/armor */
|
|
#define greatest_erosion(otmp) \
|
|
(int)((otmp)->oeroded > (otmp)->oeroded2 ? (otmp)->oeroded \
|
|
: (otmp)->oeroded2)
|
|
#define MAX_ERODE 3
|
|
#define orotten oeroded /* rotten food */
|
|
#define odiluted oeroded /* diluted potions */
|
|
#define norevive oeroded2 /* frozen corpse */
|
|
Bitfield(oerodeproof, 1); /* erodeproof weapon/armor */
|
|
Bitfield(olocked, 1); /* object is locked */
|
|
Bitfield(obroken, 1); /* lock has been broken */
|
|
#define degraded_horn obroken /* unicorn horn will poly to non-magic */
|
|
Bitfield(otrapped, 1); /* container is trapped */
|
|
/* or accidental tripped rolling boulder trap */
|
|
#define opoisoned otrapped /* object (weapon) is coated with poison */
|
|
|
|
Bitfield(recharged, 3); /* number of times it's been recharged */
|
|
#define on_ice recharged /* corpse on ice */
|
|
Bitfield(lamplit, 1); /* a light-source -- can be lit */
|
|
Bitfield(globby, 1); /* combines with like types on adjacent squares */
|
|
Bitfield(greased, 1); /* covered with grease */
|
|
Bitfield(nomerge, 1); /* set temporarily to prevent merging */
|
|
Bitfield(was_thrown, 1); /* thrown by hero since last picked up */
|
|
|
|
Bitfield(in_use, 1); /* for magic items before useup items */
|
|
Bitfield(bypass, 1); /* mark this as an object to be skipped by bhito() */
|
|
Bitfield(cknown, 1); /* for containers (including statues): the contents
|
|
* are known; also applicable to tins */
|
|
Bitfield(lknown, 1); /* locked/unlocked status is known */
|
|
/* 4 free bits */
|
|
|
|
int corpsenm; /* type of corpse is mons[corpsenm] */
|
|
#define leashmon corpsenm /* gets m_id of attached pet */
|
|
#define fromsink corpsenm /* a potion from a sink */
|
|
#define novelidx corpsenm /* 3.6 tribute - the index of the novel title */
|
|
#define migr_species corpsenm /* species to endow for MIGR_TO_SPECIES */
|
|
int usecount; /* overloaded for various things that tally */
|
|
#define spestudied usecount /* # of times a spellbook has been studied */
|
|
unsigned oeaten; /* nutrition left in food, if partly eaten */
|
|
long age; /* creation date */
|
|
long owornmask;
|
|
unsigned lua_ref_cnt; /* # of lua script references for this object */
|
|
xchar omigr_from_dnum; /* where obj is migrating from */
|
|
xchar omigr_from_dlevel; /* where obj is migrating from */
|
|
struct oextra *oextra; /* pointer to oextra struct */
|
|
};
|
|
|
|
#define newobj() (struct obj *) alloc(sizeof(struct obj))
|
|
|
|
/***
|
|
** oextra referencing and testing macros
|
|
*/
|
|
|
|
#define ONAME(o) ((o)->oextra->oname)
|
|
#define OMONST(o) ((o)->oextra->omonst)
|
|
#define OMAILCMD(o) ((o)->oextra->omailcmd)
|
|
#define OMID(o) ((o)->oextra->omid) /* non-zero => set, zero => not set */
|
|
|
|
#define has_oname(o) ((o)->oextra && ONAME(o))
|
|
#define has_omonst(o) ((o)->oextra && OMONST(o))
|
|
#define has_omailcmd(o) ((o)->oextra && OMAILCMD(o))
|
|
#define has_omid(o) ((o)->oextra && OMID(o))
|
|
|
|
/* Weapons and weapon-tools */
|
|
/* KMH -- now based on skill categories. Formerly:
|
|
* #define is_sword(otmp) (otmp->oclass == WEAPON_CLASS && \
|
|
* objects[otmp->otyp].oc_wepcat == WEP_SWORD)
|
|
* #define is_blade(otmp) (otmp->oclass == WEAPON_CLASS && \
|
|
* (objects[otmp->otyp].oc_wepcat == WEP_BLADE || \
|
|
* objects[otmp->otyp].oc_wepcat == WEP_SWORD))
|
|
* #define is_weptool(o) ((o)->oclass == TOOL_CLASS && \
|
|
* objects[(o)->otyp].oc_weptool)
|
|
* #define is_multigen(otyp) (otyp <= SHURIKEN)
|
|
* #define is_poisonable(otyp) (otyp <= BEC_DE_CORBIN)
|
|
*/
|
|
#define is_blade(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS \
|
|
&& objects[otmp->otyp].oc_skill >= P_DAGGER \
|
|
&& objects[otmp->otyp].oc_skill <= P_SABER)
|
|
#define is_axe(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == TOOL_CLASS) \
|
|
&& objects[otmp->otyp].oc_skill == P_AXE)
|
|
#define is_pick(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == TOOL_CLASS) \
|
|
&& objects[otmp->otyp].oc_skill == P_PICK_AXE)
|
|
#define is_sword(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS \
|
|
&& objects[otmp->otyp].oc_skill >= P_SHORT_SWORD \
|
|
&& objects[otmp->otyp].oc_skill <= P_SABER)
|
|
#define is_pole(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == TOOL_CLASS) \
|
|
&& (objects[otmp->otyp].oc_skill == P_POLEARMS \
|
|
|| objects[otmp->otyp].oc_skill == P_LANCE))
|
|
#define is_spear(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS && objects[otmp->otyp].oc_skill == P_SPEAR)
|
|
#define is_launcher(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS && objects[otmp->otyp].oc_skill >= P_BOW \
|
|
&& objects[otmp->otyp].oc_skill <= P_CROSSBOW)
|
|
#define is_ammo(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == GEM_CLASS) \
|
|
&& objects[otmp->otyp].oc_skill >= -P_CROSSBOW \
|
|
&& objects[otmp->otyp].oc_skill <= -P_BOW)
|
|
#define matching_launcher(a, l) \
|
|
((l) && objects[(a)->otyp].oc_skill == -objects[(l)->otyp].oc_skill)
|
|
#define ammo_and_launcher(a, l) (is_ammo(a) && matching_launcher(a, l))
|
|
#define is_missile(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == TOOL_CLASS) \
|
|
&& objects[otmp->otyp].oc_skill >= -P_BOOMERANG \
|
|
&& objects[otmp->otyp].oc_skill <= -P_DART)
|
|
#define is_weptool(o) \
|
|
((o)->oclass == TOOL_CLASS && objects[(o)->otyp].oc_skill != P_NONE)
|
|
/* towel is not a weptool: spe isn't an enchantment, cursed towel
|
|
doesn't weld to hand, and twoweapon won't work with one */
|
|
#define is_wet_towel(o) ((o)->otyp == TOWEL && (o)->spe > 0)
|
|
#define bimanual(otmp) \
|
|
((otmp->oclass == WEAPON_CLASS || otmp->oclass == TOOL_CLASS) \
|
|
&& objects[otmp->otyp].oc_bimanual)
|
|
#define is_multigen(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS \
|
|
&& objects[otmp->otyp].oc_skill >= -P_SHURIKEN \
|
|
&& objects[otmp->otyp].oc_skill <= -P_BOW)
|
|
#define is_poisonable(otmp) \
|
|
(otmp->oclass == WEAPON_CLASS \
|
|
&& objects[otmp->otyp].oc_skill >= -P_SHURIKEN \
|
|
&& objects[otmp->otyp].oc_skill <= -P_BOW)
|
|
#define uslinging() (uwep && objects[uwep->otyp].oc_skill == P_SLING)
|
|
/* 'is_quest_artifact()' only applies to the current role's artifact */
|
|
#define any_quest_artifact(o) ((o)->oartifact >= ART_ORB_OF_DETECTION)
|
|
|
|
/* Armor */
|
|
#define is_shield(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS \
|
|
&& objects[otmp->otyp].oc_armcat == ARM_SHIELD)
|
|
#define is_helmet(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS && objects[otmp->otyp].oc_armcat == ARM_HELM)
|
|
#define is_boots(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS \
|
|
&& objects[otmp->otyp].oc_armcat == ARM_BOOTS)
|
|
#define is_gloves(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS \
|
|
&& objects[otmp->otyp].oc_armcat == ARM_GLOVES)
|
|
#define is_cloak(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS \
|
|
&& objects[otmp->otyp].oc_armcat == ARM_CLOAK)
|
|
#define is_shirt(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS \
|
|
&& objects[otmp->otyp].oc_armcat == ARM_SHIRT)
|
|
#define is_suit(otmp) \
|
|
(otmp->oclass == ARMOR_CLASS && objects[otmp->otyp].oc_armcat == ARM_SUIT)
|
|
#define is_elven_armor(otmp) \
|
|
((otmp)->otyp == ELVEN_LEATHER_HELM \
|
|
|| (otmp)->otyp == ELVEN_MITHRIL_COAT || (otmp)->otyp == ELVEN_CLOAK \
|
|
|| (otmp)->otyp == ELVEN_SHIELD || (otmp)->otyp == ELVEN_BOOTS)
|
|
#define is_orcish_armor(otmp) \
|
|
((otmp)->otyp == ORCISH_HELM || (otmp)->otyp == ORCISH_CHAIN_MAIL \
|
|
|| (otmp)->otyp == ORCISH_RING_MAIL || (otmp)->otyp == ORCISH_CLOAK \
|
|
|| (otmp)->otyp == URUK_HAI_SHIELD || (otmp)->otyp == ORCISH_SHIELD)
|
|
#define is_dwarvish_armor(otmp) \
|
|
((otmp)->otyp == DWARVISH_IRON_HELM \
|
|
|| (otmp)->otyp == DWARVISH_MITHRIL_COAT \
|
|
|| (otmp)->otyp == DWARVISH_CLOAK \
|
|
|| (otmp)->otyp == DWARVISH_ROUNDSHIELD)
|
|
#define is_gnomish_armor(otmp) (FALSE)
|
|
|
|
/* Eggs and other food */
|
|
#define MAX_EGG_HATCH_TIME 200 /* longest an egg can remain unhatched */
|
|
#define stale_egg(egg) \
|
|
((g.monstermoves - (egg)->age) > (2 * MAX_EGG_HATCH_TIME))
|
|
#define ofood(o) ((o)->otyp == CORPSE || (o)->otyp == EGG || (o)->otyp == TIN)
|
|
/* note: sometimes eggs and tins have special corpsenm values that
|
|
shouldn't be used as an index into mons[] */
|
|
#define polyfodder(obj) \
|
|
(ofood(obj) && (obj)->corpsenm >= LOW_PM \
|
|
&& (pm_to_cham((obj)->corpsenm) != NON_PM \
|
|
|| dmgtype(&mons[(obj)->corpsenm], AD_POLY)))
|
|
#define mlevelgain(obj) (ofood(obj) && (obj)->corpsenm == PM_WRAITH)
|
|
#define mhealup(obj) (ofood(obj) && (obj)->corpsenm == PM_NURSE)
|
|
#define Is_pudding(o) \
|
|
(o->otyp == GLOB_OF_GRAY_OOZE || o->otyp == GLOB_OF_BROWN_PUDDING \
|
|
|| o->otyp == GLOB_OF_GREEN_SLIME || o->otyp == GLOB_OF_BLACK_PUDDING)
|
|
|
|
/* Containers */
|
|
#define carried(o) ((o)->where == OBJ_INVENT)
|
|
#define mcarried(o) ((o)->where == OBJ_MINVENT)
|
|
#define Has_contents(o) \
|
|
(/* (Is_container(o) || (o)->otyp == STATUE) && */ \
|
|
(o)->cobj != (struct obj *) 0)
|
|
#define Is_container(o) ((o)->otyp >= LARGE_BOX && (o)->otyp <= BAG_OF_TRICKS)
|
|
#define Is_box(o) ((o)->otyp == LARGE_BOX || (o)->otyp == CHEST)
|
|
#define Is_mbag(o) ((o)->otyp == BAG_OF_HOLDING || (o)->otyp == BAG_OF_TRICKS)
|
|
#define SchroedingersBox(o) ((o)->otyp == LARGE_BOX && (o)->spe == 1)
|
|
/* usually waterproof; random chance to be subjected to leakage if cursed;
|
|
excludes statues, which aren't vulernable to water even when cursed */
|
|
#define Waterproof_container(o) \
|
|
((o)->otyp == OILSKIN_SACK || (o)->otyp == ICE_BOX || Is_box(o))
|
|
|
|
/* dragon gear */
|
|
#define Is_dragon_scales(obj) \
|
|
((obj)->otyp >= GRAY_DRAGON_SCALES && (obj)->otyp <= YELLOW_DRAGON_SCALES)
|
|
#define Is_dragon_mail(obj) \
|
|
((obj)->otyp >= GRAY_DRAGON_SCALE_MAIL \
|
|
&& (obj)->otyp <= YELLOW_DRAGON_SCALE_MAIL)
|
|
#define Is_dragon_armor(obj) (Is_dragon_scales(obj) || Is_dragon_mail(obj))
|
|
#define Dragon_scales_to_pm(obj) \
|
|
&mons[PM_GRAY_DRAGON + (obj)->otyp - GRAY_DRAGON_SCALES]
|
|
#define Dragon_mail_to_pm(obj) \
|
|
&mons[PM_GRAY_DRAGON + (obj)->otyp - GRAY_DRAGON_SCALE_MAIL]
|
|
#define Dragon_to_scales(pm) (GRAY_DRAGON_SCALES + (pm - mons))
|
|
|
|
/* Elven gear */
|
|
#define is_elven_weapon(otmp) \
|
|
((otmp)->otyp == ELVEN_ARROW || (otmp)->otyp == ELVEN_SPEAR \
|
|
|| (otmp)->otyp == ELVEN_DAGGER || (otmp)->otyp == ELVEN_SHORT_SWORD \
|
|
|| (otmp)->otyp == ELVEN_BROADSWORD || (otmp)->otyp == ELVEN_BOW)
|
|
#define is_elven_obj(otmp) (is_elven_armor(otmp) || is_elven_weapon(otmp))
|
|
|
|
/* Orcish gear */
|
|
#define is_orcish_obj(otmp) \
|
|
(is_orcish_armor(otmp) || (otmp)->otyp == ORCISH_ARROW \
|
|
|| (otmp)->otyp == ORCISH_SPEAR || (otmp)->otyp == ORCISH_DAGGER \
|
|
|| (otmp)->otyp == ORCISH_SHORT_SWORD || (otmp)->otyp == ORCISH_BOW)
|
|
|
|
/* Dwarvish gear */
|
|
#define is_dwarvish_obj(otmp) \
|
|
(is_dwarvish_armor(otmp) || (otmp)->otyp == DWARVISH_SPEAR \
|
|
|| (otmp)->otyp == DWARVISH_SHORT_SWORD \
|
|
|| (otmp)->otyp == DWARVISH_MATTOCK)
|
|
|
|
/* Gnomish gear */
|
|
#define is_gnomish_obj(otmp) (is_gnomish_armor(otmp))
|
|
|
|
/* Light sources */
|
|
#define Is_candle(otmp) \
|
|
(otmp->otyp == TALLOW_CANDLE || otmp->otyp == WAX_CANDLE)
|
|
#define MAX_OIL_IN_FLASK 400 /* maximum amount of oil in a potion of oil */
|
|
|
|
/* age field of this is relative age rather than absolute; does not include
|
|
magic lamp */
|
|
#define age_is_relative(otmp) \
|
|
((otmp)->otyp == BRASS_LANTERN || (otmp)->otyp == OIL_LAMP \
|
|
|| (otmp)->otyp == CANDELABRUM_OF_INVOCATION \
|
|
|| (otmp)->otyp == TALLOW_CANDLE || (otmp)->otyp == WAX_CANDLE \
|
|
|| (otmp)->otyp == POT_OIL)
|
|
/* object can be ignited; magic lamp used to excluded here too but all
|
|
usage of this macro ended up testing
|
|
(ignitable(obj) || obj->otyp == MAGIC_LAMP)
|
|
so include it; brass lantern can be lit but not by fire */
|
|
#define ignitable(otmp) \
|
|
((otmp)->otyp == BRASS_LANTERN || (otmp)->otyp == OIL_LAMP \
|
|
|| ((otmp)->otyp == MAGIC_LAMP && (otmp)->spe > 0) \
|
|
|| (otmp)->otyp == CANDELABRUM_OF_INVOCATION \
|
|
|| (otmp)->otyp == TALLOW_CANDLE || (otmp)->otyp == WAX_CANDLE \
|
|
|| (otmp)->otyp == POT_OIL)
|
|
|
|
/* things that can be read */
|
|
#define is_readable(otmp) \
|
|
((otmp)->otyp == FORTUNE_COOKIE || (otmp)->otyp == T_SHIRT \
|
|
|| (otmp)->otyp == ALCHEMY_SMOCK || (otmp)->otyp == CREDIT_CARD \
|
|
|| (otmp)->otyp == CAN_OF_GREASE || (otmp)->otyp == MAGIC_MARKER \
|
|
|| (otmp)->oclass == COIN_CLASS || (otmp)->oartifact == ART_ORB_OF_FATE \
|
|
|| (otmp)->otyp == CANDY_BAR)
|
|
|
|
/* special stones */
|
|
#define is_graystone(obj) \
|
|
((obj)->otyp == LUCKSTONE || (obj)->otyp == LOADSTONE \
|
|
|| (obj)->otyp == FLINT || (obj)->otyp == TOUCHSTONE)
|
|
|
|
/* misc helpers, simple enough to be macros */
|
|
#define is_flimsy(otmp) \
|
|
(objects[(otmp)->otyp].oc_material <= LEATHER \
|
|
|| (otmp)->otyp == RUBBER_HOSE)
|
|
#define is_plural(o) \
|
|
((o)->quan != 1L \
|
|
/* "the Eyes of the Overworld" are plural, but \
|
|
"a pair of lenses named the Eyes of the Overworld" is not */ \
|
|
|| ((o)->oartifact == ART_EYES_OF_THE_OVERWORLD \
|
|
&& !undiscovered_artifact(ART_EYES_OF_THE_OVERWORLD)))
|
|
#define pair_of(o) ((o)->otyp == LENSES || is_gloves(o) || is_boots(o))
|
|
|
|
#define unpolyable(o) ((o)->otyp == WAN_POLYMORPH \
|
|
|| (o)->otyp == SPE_POLYMORPH \
|
|
|| (o)->otyp == POT_POLYMORPH)
|
|
|
|
/* achievement tracking; 3.6.x did this differently */
|
|
#define is_mines_prize(o) ((o)->o_id == g.context.achieveo.mines_prize_oid)
|
|
#define is_soko_prize(o) ((o)->o_id == g.context.achieveo.soko_prize_oid)
|
|
|
|
/* Flags for get_obj_location(). */
|
|
#define CONTAINED_TOO 0x1
|
|
#define BURIED_TOO 0x2
|
|
|
|
/* object erosion types */
|
|
#define ERODE_BURN 0
|
|
#define ERODE_RUST 1
|
|
#define ERODE_ROT 2
|
|
#define ERODE_CORRODE 3
|
|
|
|
/* erosion flags for erode_obj() */
|
|
#define EF_NONE 0
|
|
#define EF_GREASE 0x1 /* check for a greased object */
|
|
#define EF_DESTROY 0x2 /* potentially destroy the object */
|
|
#define EF_VERBOSE 0x4 /* print extra messages */
|
|
#define EF_PAY 0x8 /* it's the player's fault */
|
|
|
|
/* erosion return values for erode_obj(), water_damage() */
|
|
#define ER_NOTHING 0 /* nothing happened */
|
|
#define ER_GREASED 1 /* protected by grease */
|
|
#define ER_DAMAGED 2 /* object was damaged in some way */
|
|
#define ER_DESTROYED 3 /* object was destroyed */
|
|
|
|
/* propeller method for potionhit() */
|
|
#define POTHIT_HERO_BASH 0 /* wielded by hero */
|
|
#define POTHIT_HERO_THROW 1 /* thrown by hero */
|
|
#define POTHIT_MONST_THROW 2 /* thrown by a monster */
|
|
#define POTHIT_OTHER_THROW 3 /* propelled by some other means [scatter()] */
|
|
|
|
/*
|
|
* Notes for adding new oextra structures:
|
|
*
|
|
* 1. Add the structure definition and any required macros in an
|
|
* appropriate header file that precedes this one.
|
|
* 2. Add a pointer to your new struct to oextra struct in this file.
|
|
* 3. Add a referencing macro to this file after the newobj macro above
|
|
* (see ONAME, OMONST, OMAILCMD, or OMIN for examples).
|
|
* 4. Add a testing macro after the set of referencing macros
|
|
* (see has_oname(), has_omonst(), has_omailcmd(), and has_omin(),
|
|
* for examples).
|
|
* 5. If your new field isn't a pointer and requires a non-zero value
|
|
* on initialization, add code to init_oextra() in src/mkobj.c.
|
|
* 6. Create newXX(otmp) function and possibly free_XX(otmp) function
|
|
* in an appropriate new or existing source file and add a prototype
|
|
* for it to include/extern.h. The majority of these are currently
|
|
* located in mkobj.c for convenience.
|
|
*
|
|
* void newXX(struct obj *);
|
|
* void free_XX(struct obj *);
|
|
*
|
|
* void
|
|
* newxx(otmp)
|
|
* struct obj *otmp;
|
|
* {
|
|
* if (!otmp->oextra)
|
|
* otmp->oextra = newoextra();
|
|
* if (!XX(otmp)) {
|
|
* XX(otmp) = (struct XX *) alloc(sizeof (struct xx));
|
|
* (void) memset((genericptr_t) XX(otmp),
|
|
* 0, sizeof (struct xx));
|
|
* }
|
|
* }
|
|
*
|
|
* 7. Adjust size_obj() in src/cmd.c appropriately.
|
|
* 8. Adjust dealloc_oextra() in src/mkobj.c to clean up
|
|
* properly during obj deallocation.
|
|
* 9. Adjust copy_oextra() in src/mkobj.c to make duplicate
|
|
* copies of your struct or data onto another obj struct.
|
|
* 10. Adjust restobj() in src/restore.c to deal with your
|
|
* struct or data during a restore.
|
|
* 11. Adjust saveobj() in src/save.c to deal with your
|
|
* struct or data during a save.
|
|
*/
|
|
|
|
#endif /* OBJ_H */
|