/*
* Wield or wear a single item from the pack or floor
*/
void wield_item(object_type *o_ptr, int item, int slot)
{
object_type object_type_body;
object_type *i_ptr = &object_type_body;
const char *fmt;
char o_name[80];
bool combined_ammo = FALSE;
bool track_wielded_item = FALSE;
int num = 1;
/* If we are stacking ammo in the quiver */
if (obj_is_ammo(o_ptr))
{
num = o_ptr->number;
combined_ammo = object_similar(o_ptr, &p_ptr->inventory[slot],
OSTACK_QUIVER);
}
/* Take a turn */
p_ptr->energy_use = 100;
/* Obtain local object */
object_copy(i_ptr, o_ptr);
/* Modify quantity */
i_ptr->number = num;
/* Update object_idx if necessary, once object is in slot */
if (p_ptr->object_idx == item)
{
track_wielded_item = TRUE;
}
/* Decrease the item (from the pack) */
if (item >= 0)
{
inven_item_increase(item, -num);
inven_item_optimize(item);
}
/* Decrease the item (from the floor) */
else
{
floor_item_increase(0 - item, -num);
floor_item_optimize(0 - item);
}
/* Get the wield slot */
o_ptr = &p_ptr->inventory[slot];
if (combined_ammo)
{
/* Add the new ammo to the already-quiver-ed ammo */
object_absorb(o_ptr, i_ptr);
}
else
{
/* Take off existing item */
if (o_ptr->kind)
(void)inven_takeoff(slot, 255);
/* If we are wielding ammo we may need to "open" the slot by shifting
* later ammo up the quiver; this is because we already called the
* inven_item_optimize() function. */
if (slot >= QUIVER_START)
open_quiver_slot(slot);
/* Wear the new stuff */
object_copy(o_ptr, i_ptr);
/* Increment the equip counter by hand */
p_ptr->equip_cnt++;
}
/* Increase the weight */
p_ptr->total_weight += i_ptr->weight * num;
/* Track object if necessary */
if (track_wielded_item)
{
track_object(slot);
}
/* Do any ID-on-wield */
object_notice_on_wield(o_ptr);
/* Where is the item now */
if (slot == INVEN_WIELD)
fmt = "You are wielding %s (%c).";
else if (slot == INVEN_BOW)
fmt = "You are shooting with %s (%c).";
else if (slot == INVEN_LIGHT)
fmt = "Your light source is %s (%c).";
else if (combined_ammo)
fmt = "You combine %s in your quiver (%c).";
else if (slot >= QUIVER_START && slot < QUIVER_END)
fmt = "You add %s to your quiver (%c).";
else
fmt = "You are wearing %s (%c).";
/* Describe the result */
object_desc(o_name, sizeof(o_name), o_ptr, ODESC_PREFIX | ODESC_FULL);
/* Message */
msgt(MSG_WIELD, fmt, o_name, index_to_label(slot));
/* Cursed! */
if (cursed_p(o_ptr->flags))
{
/* Warn the player */
msgt(MSG_CURSED, "Oops! It feels deathly cold!");
/* Sense the object */
object_notice_curses(o_ptr);
}
/* Save quiver size */
save_quiver_size(p_ptr);
/* See if we have to overflow the pack */
pack_overflow();
/* Recalculate bonuses, torch, mana */
p_ptr->notice |= PN_SORT_QUIVER;
p_ptr->update |= (PU_BONUS | PU_TORCH | PU_MANA);
p_ptr->redraw |= (PR_INVEN | PR_EQUIP);
}
/*
* Read the player inventory
*
* Note that the inventory is "re-sorted" later by "dungeon()".
*/
static errr rd_inventory(void)
{
int slot = 0;
object_type *i_ptr;
object_type object_type_body;
/* Read until done */
while (1)
{
u16b n;
/* Get the next item index */
rd_u16b(&n);
/* Nope, we reached the end */
if (n == 0xFFFF) break;
/* Get local object */
i_ptr = &object_type_body;
/* Wipe the object */
object_wipe(i_ptr);
/* Read the item */
if (rd_item(i_ptr))
{
note("Error reading item");
return (-1);
}
/* Hack -- verify item */
if (!i_ptr->k_idx) return (-1);
/* Verify slot */
if (n >= ALL_INVEN_TOTAL) return (-1);
/* Wield equipment */
if (n >= INVEN_WIELD)
{
/* Copy object */
object_copy(&inventory[n], i_ptr);
/* One more item */
if (!IS_QUIVER_SLOT(n)) p_ptr->equip_cnt++;
}
/* Warning -- backpack is full */
else if (p_ptr->inven_cnt == INVEN_PACK)
{
/* Oops */
note("Too many items in the inventory!");
/* Fail */
return (-1);
}
/* Carry inventory */
else
{
/* Get a slot */
n = slot++;
/* Copy object */
object_copy(&inventory[n], i_ptr);
/* One more item */
p_ptr->inven_cnt++;
}
/* Update "p_ptr->pack_size_reduce" */
save_quiver_size();
}
/* Success */
return (0);
}
