/*
* Notice the ego on an ego item.
*/
void object_notice_ego(object_type *o_ptr)
{
ego_item_type *e_ptr;
bitflag learned_flags[OF_SIZE];
bitflag xtra_flags[OF_SIZE];
if (!o_ptr->name2)
return;
e_ptr = &e_info[o_ptr->name2];
/* XXX Eddie print a message on notice ego if not already noticed? */
/* XXX Eddie should we do something about everseen of egos here? */
/* Learn ego flags */
of_union(o_ptr->known_flags, e_ptr->flags);
/* Learn all flags except random abilities */
of_setall(learned_flags);
switch (e_ptr->xtra)
{
case OBJECT_XTRA_TYPE_NONE:
break;
case OBJECT_XTRA_TYPE_SUSTAIN:
set_ego_xtra_sustain(xtra_flags);
of_diff(learned_flags, xtra_flags);
break;
case OBJECT_XTRA_TYPE_RESIST:
set_ego_xtra_resist(xtra_flags);
of_diff(learned_flags, xtra_flags);
break;
case OBJECT_XTRA_TYPE_POWER:
set_ego_xtra_power(xtra_flags);
of_diff(learned_flags, xtra_flags);
break;
default:
assert(0);
}
of_union(o_ptr->known_flags, learned_flags);
if (object_add_ident_flags(o_ptr, IDENT_NAME))
{
/* if you know the ego, you know which it is of excellent or splendid */
object_notice_sensing(o_ptr);
object_check_for_ident(o_ptr);
}
}
/**
* Apply generation magic to an ego-item.
*/
void ego_apply_magic(struct object *obj, int level)
{
int i, x, resist = 0;
bitflag newf[OF_SIZE];
/* Extra powers */
if (kf_has(obj->ego->kind_flags, KF_RAND_SUSTAIN)) {
create_mask(newf, false, OFT_SUST, OFT_MAX);
of_on(obj->flags, get_new_attr(obj->flags, newf));
}
else if (kf_has(obj->ego->kind_flags, KF_RAND_POWER)) {
create_mask(newf, false, OFT_PROT, OFT_MISC, OFT_MAX);
of_on(obj->flags, get_new_attr(obj->flags, newf));
}
else if (kf_has(obj->ego->kind_flags, KF_RAND_HI_RES))
/* Get a high resist if available, mark it as random */
if (random_high_resist(obj, &resist)) {
obj->el_info[resist].res_level = 1;
obj->el_info[resist].flags |= EL_INFO_RANDOM;
}
/* Apply extra obj->ego bonuses */
obj->to_h += randcalc(obj->ego->to_h, level, RANDOMISE);
obj->to_d += randcalc(obj->ego->to_d, level, RANDOMISE);
obj->to_a += randcalc(obj->ego->to_a, level, RANDOMISE);
/* Apply modifiers */
for (i = 0; i < OBJ_MOD_MAX; i++) {
x = randcalc(obj->ego->modifiers[i], level, RANDOMISE);
obj->modifiers[i] += x;
}
/* Apply flags */
of_union(obj->flags, obj->ego->flags);
of_diff(obj->flags, obj->ego->flags_off);
/* Add slays and brands */
copy_slay(&obj->slays, obj->ego->slays);
copy_brand(&obj->brands, obj->ego->brands);
/* Add resists */
for (i = 0; i < ELEM_MAX; i++) {
/* Take the larger of ego and base object resist levels */
obj->el_info[i].res_level =
MAX(obj->ego->el_info[i].res_level, obj->el_info[i].res_level);
/* Union of flags so as to know when ignoring is notable */
obj->el_info[i].flags |= obj->ego->el_info[i].flags;
}
/* Add effect (ego effect will trump object effect, when there are any) */
if (obj->ego->effect) {
obj->effect = obj->ego->effect;
obj->time = obj->ego->time;
}
return;
}
/**
* Get the object flags the player should know about for the given object/
* viewing mode combination.
*/
static void get_known_flags(const struct object *obj, const oinfo_detail_t mode,
bitflag flags[OF_SIZE])
{
/* Grab the object flags */
if (mode & OINFO_EGO) {
object_flags(obj, flags);
} else {
object_flags_known(obj, flags);
/* Don't include base flags when terse */
if (mode & OINFO_TERSE)
of_diff(flags, obj->kind->base->flags);
}
}
/**
* Tweak the cursed status of an object.
*
* \param o_ptr is the object to curse or decurse
*/
static void wiz_tweak_curse(object_type *o_ptr)
{
if (cursed_p(o_ptr->flags))
{
bitflag f[OF_SIZE];
msg("Resetting existing curses.");
create_mask(f, FALSE, OFT_CURSE, OFT_MAX);
of_diff(o_ptr->flags, f);
}
if (get_check("Set light curse? "))
flags_set(o_ptr->flags, OF_SIZE, OF_LIGHT_CURSE, FLAG_END);
else if (get_check("Set heavy curse? "))
flags_set(o_ptr->flags, OF_SIZE, OF_LIGHT_CURSE, OF_HEAVY_CURSE, FLAG_END);
else if (get_check("Set permanent curse? "))
flags_set(o_ptr->flags, OF_SIZE, OF_LIGHT_CURSE, OF_HEAVY_CURSE, OF_PERMA_CURSE, FLAG_END);
}
/*
* Given an object, return a short identifier which gives some idea of what
* the item is.
*/
obj_pseudo_t object_pseudo(const object_type *o_ptr)
{
object_kind *k_ptr = &k_info[o_ptr->k_idx];
bitflag flags[OF_SIZE];
/* Get the known and obvious flags on the object,
* not including curses or properties of the kind
*/
object_flags_known(o_ptr, flags);
/* MEGA-hack : there needs to be a table of what is obvious in each slot perhaps for each class */
/* FA on gloves is obvious to mage casters */
if (object_FA_would_be_obvious(o_ptr))
flags_mask(flags, OF_SIZE, OF_OBVIOUS_MASK, OF_FREE_ACT, FLAG_END);
else
flags_mask(flags, OF_SIZE, OF_OBVIOUS_MASK, FLAG_END);
flags_clear(flags, OF_SIZE, OF_CURSE_MASK, FLAG_END);
of_diff(flags, k_ptr->flags);
if (o_ptr->ident & IDENT_INDESTRUCT)
return INSCRIP_SPECIAL;
if ((object_was_sensed(o_ptr) || object_was_worn(o_ptr)) && artifact_p(o_ptr))
return INSCRIP_SPECIAL;
/* jewelry does not pseudo */
if (object_is_jewelry(o_ptr))
return INSCRIP_NULL;
/* XXX Eddie should also check for flags with pvals where the pval exceeds
* the base pval for things like picks of digging, though for now acid brand gets those
*/
if (!of_is_empty(flags))
return INSCRIP_SPLENDID;
if (!object_is_known(o_ptr) && !object_was_sensed(o_ptr))
return INSCRIP_NULL;
if (ego_item_p(o_ptr))
{
/* uncursed bad egos are not excellent */
if (flags_test(e_info[o_ptr->name2].flags, OF_SIZE, OF_CURSE_MASK, FLAG_END))
return INSCRIP_STRANGE; /* XXX Eddie need something worse */
else
return INSCRIP_EXCELLENT;
}
if (o_ptr->to_a == randcalc(k_ptr->to_a, 0, MINIMISE) &&
o_ptr->to_h == randcalc(k_ptr->to_h, 0, MINIMISE) &&
o_ptr->to_d == randcalc(k_ptr->to_d, 0, MINIMISE))
return INSCRIP_AVERAGE;
if (o_ptr->to_a >= randcalc(k_ptr->to_a, 0, MINIMISE) &&
o_ptr->to_h >= randcalc(k_ptr->to_h, 0, MINIMISE) &&
o_ptr->to_d >= randcalc(k_ptr->to_d, 0, MINIMISE))
return INSCRIP_MAGICAL;
if (o_ptr->to_a <= randcalc(k_ptr->to_a, 0, MINIMISE) &&
o_ptr->to_h <= randcalc(k_ptr->to_h, 0, MINIMISE) &&
o_ptr->to_d <= randcalc(k_ptr->to_d, 0, MINIMISE))
return INSCRIP_MAGICAL;
return INSCRIP_STRANGE;
}