/**
* Attempt to disarm the chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns true if repeated commands may continue
*/
bool do_cmd_disarm_chest(int y, int x, struct object *obj)
{
int i, j;
bool more = false;
/* Get the "disarm" factor */
if (obj->pval > 0 && (chest_traps[obj->pval] & CHEST_SUMMON))
i = player->state.skills[SKILL_DISARM_MAGIC];
else
i = player->state.skills[SKILL_DISARM_PHYS];
/* Penalize some conditions */
if (player->timed[TMD_BLIND] || no_light()) i = i / 10;
if (player->timed[TMD_CONFUSED] || player->timed[TMD_IMAGE]) i = i / 10;
/* Extract the difficulty */
j = i - obj->pval;
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Must find the trap first. */
if (!obj->known->pval) {
msg("I don't see any traps.");
} else if (!is_trapped_chest(obj)) {
/* Already disarmed/unlocked or no traps */
msg("The chest is not trapped.");
} else if (randint0(100) < j) {
/* Success (get a lot of experience) */
msgt(MSG_DISARM, "You have disarmed the chest.");
player_exp_gain(player, obj->pval);
obj->pval = (0 - obj->pval);
} else if (randint0(100) < j) {
/* Failure -- Keep trying */
more = true;
event_signal(EVENT_INPUT_FLUSH);
msg("You failed to disarm the chest.");
} else {
/* Failure -- Set off the trap */
msg("You set off a trap!");
chest_trap(y, x, obj);
}
/* Result */
return (more);
}
/*
* Attempt to disarm the chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns TRUE if repeated commands may continue
*/
bool do_cmd_disarm_chest(int y, int x, s16b o_idx)
{
int i, j;
bool more = FALSE;
object_type *o_ptr = object_byid(o_idx);
/* Get the "disarm" factor */
i = p_ptr->state.skills[SKILL_DISARM];
/* Penalize some conditions */
if (p_ptr->timed[TMD_BLIND] || no_light()) i = i / 10;
if (p_ptr->timed[TMD_CONFUSED] || p_ptr->timed[TMD_IMAGE]) i = i / 10;
/* Extract the difficulty */
j = i - o_ptr->pval[DEFAULT_PVAL];
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Must find the trap first. */
if (!object_is_known(o_ptr))
{
msg("I don't see any traps.");
}
/* Already disarmed/unlocked or no traps */
else if (!is_trapped_chest(o_ptr))
{
msg("The chest is not trapped.");
}
/* Success (get a lot of experience) */
else if (randint0(100) < j)
{
msgt(MSG_DISARM, "You have disarmed the chest.");
player_exp_gain(p_ptr, o_ptr->pval[DEFAULT_PVAL]);
o_ptr->pval[DEFAULT_PVAL] = (0 - o_ptr->pval[DEFAULT_PVAL]);
}
/* Failure -- Keep trying */
else if ((i > 5) && (randint1(i) > 5))
{
/* We may keep trying */
more = TRUE;
flush();
msg("You failed to disarm the chest.");
}
/* Failure -- Set off the trap */
else
{
msg("You set off a trap!");
chest_trap(y, x, o_idx);
}
/* Result */
return (more);
}
/*
* Attempt to open the given chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns TRUE if repeated commands may continue
*/
bool do_cmd_open_chest(int y, int x, s16b o_idx)
{
int i, j;
bool flag = TRUE;
bool more = FALSE;
object_type *o_ptr = object_byid(o_idx);
/* Attempt to unlock it */
if (o_ptr->pval[DEFAULT_PVAL] > 0)
{
/* Assume locked, and thus not open */
flag = FALSE;
/* Get the "disarm" factor */
i = p_ptr->state.skills[SKILL_DISARM];
/* Penalize some conditions */
if (p_ptr->timed[TMD_BLIND] || no_light()) i = i / 10;
if (p_ptr->timed[TMD_CONFUSED] || p_ptr->timed[TMD_IMAGE]) i = i / 10;
/* Extract the difficulty */
j = i - o_ptr->pval[DEFAULT_PVAL];
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Success -- May still have traps */
if (randint0(100) < j)
{
msgt(MSG_LOCKPICK, "You have picked the lock.");
player_exp_gain(p_ptr, 1);
flag = TRUE;
}
/* Failure -- Keep trying */
else
{
/* We may continue repeating */
more = TRUE;
flush();
msgt(MSG_LOCKPICK_FAIL, "You failed to pick the lock.");
}
}
/* Allowed to open */
if (flag)
{
/* Apply chest traps, if any */
chest_trap(y, x, o_idx);
/* Let the Chest drop items */
chest_death(y, x, o_idx);
/* Squelch chest if autosquelch calls for it */
p_ptr->notice |= PN_SQUELCH;
}
/*
* empty chests were always squelched in squelch_item_okay so we
* might as well squelch it here
*/
if (o_ptr->pval[DEFAULT_PVAL] == 0) {
o_ptr->ignore = TRUE;
}
/* Redraw chest, to be on the safe side (it may have been squelched) */
cave_light_spot(cave, y, x);
/* Refresh */
Term_fresh();
/* Result */
return (more);
}
/**
* Attempt to open the given chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns TRUE if repeated commands may continue
*/
bool do_cmd_open_chest(int y, int x, struct object *obj)
{
int i, j;
bool flag = TRUE;
bool more = FALSE;
/* Attempt to unlock it */
if (obj->pval > 0) {
/* Assume locked, and thus not open */
flag = FALSE;
/* Get the "disarm" factor */
i = player->state.skills[SKILL_DISARM];
/* Penalize some conditions */
if (player->timed[TMD_BLIND] || no_light()) i = i / 10;
if (player->timed[TMD_CONFUSED] || player->timed[TMD_IMAGE]) i = i / 10;
/* Extract the difficulty */
j = i - obj->pval;
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Success -- May still have traps */
if (randint0(100) < j) {
msgt(MSG_LOCKPICK, "You have picked the lock.");
player_exp_gain(player, 1);
flag = TRUE;
} else {
/* We may continue repeating */
more = TRUE;
event_signal(EVENT_INPUT_FLUSH);
msgt(MSG_LOCKPICK_FAIL, "You failed to pick the lock.");
}
}
/* Allowed to open */
if (flag) {
/* Apply chest traps, if any */
chest_trap(y, x, obj);
/* Let the Chest drop items */
chest_death(y, x, obj);
/* Ignore chest if autoignore calls for it */
player->upkeep->notice |= PN_IGNORE;
}
/* Empty chests were always ignored in ignore_item_okay so we
* might as well ignore it here
*/
if (obj->pval == 0)
obj->ignore = TRUE;
/* Redraw chest, to be on the safe side (it may have been ignored) */
square_light_spot(cave, y, x);
/* Result */
return (more);
}
/* Called every turn during lock-picking. The caller must set
u.utracked[tos_lock] appropriately: &zeroobj for a door, an object for a
box. For a door, u.utracked_location[tl_lock] must also be set. */
static int
picklock(void)
{
int chance = get_unlock_chance();
int x = u.utracked_location[tl_lock].x;
int y = u.utracked_location[tl_lock].y;
struct rm *door = NULL;
if (u.utracked[tos_lock] != &zeroobj) {
if (!obj_with_u(u.utracked[tos_lock]))
return reset_pick();
} else { /* door */
door = &(level->locations[x][y]);
switch (door->doormask) {
case D_NODOOR:
pline(msgc_cancelled, "This doorway has no door.");
return reset_pick();
case D_ISOPEN:
pline(msgc_cancelled, "You cannot lock an open door.");
return reset_pick();
case D_BROKEN:
pline(msgc_cancelled, "This door is broken.");
return reset_pick();
}
}
if (!chance) {
pline(msgc_interrupted, "You seem to have lost your unlocking tools.");
return reset_pick();
}
if (u.uoccupation_progress[tos_lock]++ >= 50 || nohands(youmonst.data)) {
pline(msgc_failrandom, "You give up your attempt at %s.",
lock_action());
if (!nohands(youmonst.data))
exercise(A_DEX, TRUE); /* even if you don't succeed */
return reset_pick();
}
if (rn2(100) >= chance)
return 1; /* still busy */
pline(msgc_actionok, "You succeed in %s.", lock_action());
if (door) {
if (door->doormask & D_TRAPPED) {
b_trapped("door", FINGER);
door->doormask = D_NODOOR;
unblock_point(x, y);
if (*in_rooms(level, x, y, SHOPBASE))
add_damage(x, y, 0L);
} else if (door->doormask & D_LOCKED)
door->doormask = D_CLOSED;
else
door->doormask = D_LOCKED;
/* player now knows the door's open/closed status, and its
locked/unlocked status, and also that it isn't trapped (it would have
exploded otherwise); thus, we can safely fully spoil the door's stats
(the door is the background of the door's location) */
magic_map_background(x, y, TRUE);
} else {
u.utracked[tos_lock]->olocked = !u.utracked[tos_lock]->olocked;
if (u.utracked[tos_lock]->otrapped)
chest_trap(&youmonst, u.utracked[tos_lock], FINGER, FALSE);
}
exercise(A_DEX, TRUE);
return reset_pick();
}
/*
* Attempt to disarm the chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns TRUE if repeated commands may continue
*/
static bool do_cmd_disarm_chest(int y, int x, s16b o_idx)
{
int i, j;
bool more = FALSE;
object_type *o_ptr = &o_list[o_idx];
/* Get the "disarm" factor */
i = p_ptr->skill_dis;
/* Penalize some conditions */
if (p_ptr->blind || no_lite()) i = i / 10;
if (p_ptr->confused || p_ptr->image) i = i / 10;
/* Difficulty rating. */
j = i - (5 + o_ptr->pval / 2);
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Must find the trap first. */
if (!object_known_p(o_ptr))
{
msg_print("I don't see any traps.");
}
/* Already disarmed/unlocked */
else if (o_ptr->pval <= 0)
{
msg_print("The chest is not trapped.");
}
/* No traps to find. */
else if (!chest_traps[o_ptr->pval])
{
msg_print("The chest is not trapped.");
}
/* Success (get a fair amount of experience) */
else if (randint0(100) < j)
{
msg_print("You have disarmed the chest.");
gain_exp(o_ptr->pval * o_ptr->pval / 10);
o_ptr->pval = (0 - o_ptr->pval);
}
/* Failure -- Keep trying */
else if ((i > 5) && (randint1(i) > 5))
{
/* We may keep trying */
more = TRUE;
if (flush_failure) flush();
msg_print("You failed to disarm the chest.");
}
/* Failure -- Set off the trap */
else
{
msg_print("You set off a trap!");
chest_trap(y, x, o_idx);
}
/* Result */
return (more);
}
/*
* Attempt to open the given chest at the given location
*
* Assume there is no monster blocking the destination
*
* Returns TRUE if repeated commands may continue
*/
static bool do_cmd_open_chest(int y, int x, s16b o_idx)
{
int i, j;
bool flag = TRUE;
bool more = FALSE;
object_type *o_ptr = &o_list[o_idx];
/* Attempt to unlock it */
if (o_ptr->pval > 0)
{
/* Assume locked, and thus not open */
flag = FALSE;
/* Get the "disarm" factor */
i = p_ptr->skill_dis;
/* Penalize some conditions */
if (p_ptr->blind || no_lite()) i = i / 10;
if (p_ptr->confused || p_ptr->image) i = i / 10;
/* Difficulty rating. Tweaked to compensate for higher pvals. */
j = i - 2 * o_ptr->pval / 3;
/* Always have a small chance of success */
if (j < 2) j = 2;
/* Success -- May still have traps */
if (randint0(100) < j)
{
msg_print("You have picked the lock.");
gain_exp(o_ptr->pval);
flag = TRUE;
}
/* Failure -- Keep trying */
else
{
/* We may continue repeating */
more = TRUE;
if (flush_failure) flush();
msgt(MSG_LOCKPICK_FAIL, "You failed to pick the lock.");
}
}
/* Allowed to open */
if (flag)
{
/* Apply chest traps, if any */
chest_trap(y, x, o_idx);
/* Let the Chest drop items */
chest_death(FALSE, y, x, o_idx);
}
/* Result */
return (more);
}
