/**
* Remove an amount of an object from the inventory or quiver, returning
* a detached object which can be used.
*
* Optionally describe what remains.
*/
struct object *gear_object_for_use(struct object *obj, int num, bool message)
{
struct object *usable;
char name[80];
char label = gear_to_label(obj);
bool artifact = obj->artifact &&
(object_is_known(obj) || object_name_is_visible(obj));
/* Bounds check */
num = MIN(num, obj->number);
/* Prepare a name if necessary */
if (message) {
/* Artifacts */
if (artifact)
object_desc(name, sizeof(name), obj, ODESC_FULL | ODESC_SINGULAR);
else {
/* Describe as if it's already reduced */
obj->number -= num;
object_desc(name, sizeof(name), obj, ODESC_PREFIX | ODESC_FULL);
obj->number += num;
}
}
/* Split off a usable object if necessary */
if (obj->number > num) {
usable = object_split(obj, num);
} else {
/* We're using the entire stack */
usable = obj;
gear_excise_object(usable);
/* Stop tracking item */
if (tracked_object_is(player->upkeep, obj))
track_object(player->upkeep, NULL);
/* Inventory has changed, so disable repeat command */
cmd_disable_repeat();
}
/* Change the weight */
player->upkeep->total_weight -= (num * obj->weight);
/* Housekeeping */
player->upkeep->update |= (PU_BONUS);
player->upkeep->notice |= (PN_COMBINE);
player->upkeep->redraw |= (PR_INVEN | PR_EQUIP);
/* Print a message if desired */
if (message) {
if (artifact)
msg("You no longer have the %s (%c).", name, label);
else
msg("You have %s (%c).", name, label);
}
return usable;
}
/**
* Remove an amount of an object from the floor, returning a detached object
* which can be used - it is assumed that the object is on the player grid.
*
* Optionally describe what remains.
*/
struct object *floor_object_for_use(struct object *obj, int num, bool message,
bool *none_left)
{
struct object *usable;
char name[80];
/* Bounds check */
num = MIN(num, obj->number);
/* Split off a usable object if necessary */
if (obj->number > num) {
usable = object_split(obj, num);
} else {
usable = obj;
square_excise_object(player->cave, usable->iy, usable->ix,
usable->known);
delist_object(player->cave, usable->known);
square_excise_object(cave, usable->iy, usable->ix, usable);
delist_object(cave, usable);
*none_left = true;
/* Stop tracking item */
if (tracked_object_is(player->upkeep, obj))
track_object(player->upkeep, NULL);
/* Inventory has changed, so disable repeat command */
cmd_disable_repeat();
}
/* Object no longer has a location */
usable->known->iy = 0;
usable->known->ix = 0;
usable->iy = 0;
usable->ix = 0;
/* Housekeeping */
player->upkeep->update |= (PU_BONUS | PU_INVEN);
player->upkeep->notice |= (PN_COMBINE);
player->upkeep->redraw |= (PR_INVEN | PR_EQUIP);
/* Print a message if requested and there is anything left */
if (message) {
if (usable == obj)
obj->number = 0;
/* Get a description */
object_desc(name, sizeof(name), obj, ODESC_PREFIX | ODESC_FULL);
if (usable == obj)
obj->number = num;
/* Print a message */
msg("You see %s.", name);
}
return usable;
}
/*
* Carry an object and delete it.
*/
static void py_pickup_aux(int o_idx, bool domsg)
{
int slot, quiver_slot = 0;
char o_name[80];
object_type *o_ptr = object_byid(o_idx);
/* Carry the object */
slot = inven_carry(p_ptr, o_ptr);
/* Handle errors (paranoia) */
if (slot < 0) return;
/* If we have picked up ammo which matches something in the quiver, note
* that it so that we can wield it later (and suppress pick up message) */
if (obj_is_ammo(o_ptr))
{
int i;
for (i = QUIVER_START; i < QUIVER_END; i++)
{
if (!p_ptr->inventory[i].kind) continue;
if (!object_similar(&p_ptr->inventory[i], o_ptr,
OSTACK_QUIVER)) continue;
quiver_slot = i;
break;
}
}
/* Get the new object */
o_ptr = &p_ptr->inventory[slot];
/* Set squelch status */
p_ptr->notice |= PN_SQUELCH;
/* Automatically sense artifacts */
object_sense_artifact(o_ptr);
/* Log artifacts if found */
if (o_ptr->artifact)
history_add_artifact(o_ptr->artifact, object_is_known(o_ptr), TRUE);
/* Optionally, display a message */
if (domsg && !quiver_slot)
{
/* Describe the object */
object_desc(o_name, sizeof(o_name), o_ptr, ODESC_PREFIX | ODESC_FULL);
/* Message */
msg("You have %s (%c).", o_name, index_to_label(slot));
}
/* Update object_idx if necessary */
if (tracked_object_is(0 - o_idx))
{
track_object(slot);
}
/* Delete the object */
delete_object_idx(o_idx);
/* If we have a quiver slot that this ammo matches, use it */
if (quiver_slot) wield_item(o_ptr, slot, quiver_slot);
}
