/*
* Return a "feeling" (or NULL) about an item. Method 1 (Heavy).
*/
static int value_check_aux1(object_type *o_ptr)
{
/* Artifacts */
if (artifact_p(o_ptr))
{
/* Cursed/Broken */
if (cursed_p(o_ptr) || broken_p(o_ptr)) return (FEEL_TERRIBLE);
/* Normal */
return (FEEL_SPECIAL);
}
/* Ego-Items */
if (ego_item_p(o_ptr))
{
/* Cursed/Broken */
if (cursed_p(o_ptr) || broken_p(o_ptr)) return (FEEL_WORTHLESS);
/* Normal */
return (FEEL_EXCELLENT);
}
/* Cursed items */
if (cursed_p(o_ptr)) return (FEEL_CURSED);
/* Broken items */
if (broken_p(o_ptr)) return (FEEL_BROKEN);
/* Good "armor" bonus */
if (o_ptr->to_a > 0) return (FEEL_GOOD);
/* Good "weapon" bonus */
if (o_ptr->to_h + o_ptr->to_d > 0) return (FEEL_GOOD);
/* Default to "average" */
return (FEEL_AVERAGE);
}
/*
* Destroy an item
*/
void do_cmd_destroy(void)
{
int item, amt;
int old_number;
object_type *o_ptr;
char o_name[80];
char out_val[160];
cptr q, s;
/* Get an item */
q = "Destroy which item? ";
s = "You have nothing to destroy.";
if (!get_item(&item, q, s, (USE_INVEN | USE_FLOOR))) return;
/* Get the item (in the pack) */
if (item >= 0)
{
o_ptr = &inventory[item];
}
/* Get the item (on the floor) */
else
{
o_ptr = &o_list[0 - item];
}
/* Get a quantity */
amt = get_quantity(NULL, o_ptr->number);
/* Allow user abort */
if (amt <= 0) return;
/* Describe the object */
old_number = o_ptr->number;
o_ptr->number = amt;
object_desc(o_name, o_ptr, TRUE, 3);
o_ptr->number = old_number;
/* Verify destruction */
if (verify_destroy)
{
sprintf(out_val, "Really destroy %s? ", o_name);
if (!get_check(out_val)) return;
}
/* Take a turn */
p_ptr->energy_use = 100;
/* Artifacts cannot be destroyed */
if (artifact_p(o_ptr))
{
/* Message */
msg_format("You cannot destroy %s.", o_name);
/* Don't mark id'ed objects */
if (object_known_p(o_ptr)) return;
/* It has already been sensed */
if (o_ptr->ident & (IDENT_SENSE))
{
/* Already sensed objects always get improved feelings */
if (cursed_p(o_ptr) || broken_p(o_ptr))
o_ptr->discount = INSCRIP_TERRIBLE;
else
o_ptr->discount = INSCRIP_SPECIAL;
}
else
{
/* Mark the object as indestructible */
o_ptr->discount = INSCRIP_INDESTRUCTIBLE;
}
/* Combine the pack */
p_ptr->notice |= (PN_COMBINE);
/* Window stuff */
p_ptr->window |= (PW_INVEN | PW_EQUIP);
p_ptr->redraw |= (PR_EQUIPPY);
/* Done */
return;
}
/* Message */
msg_format("You destroy %s.", o_name);
/* Eliminate the item (from the pack) */
if (item >= 0)
{
inven_item_increase(item, -amt);
inven_item_describe(item);
inven_item_optimize(item);
}
/* Eliminate the item (from the floor) */
else
{
floor_item_increase(0 - item, -amt);
floor_item_describe(0 - item);
floor_item_optimize(0 - item);
}
}
