/**
* Get input for the rest command
*/
void textui_cmd_rest(void)
{
const char *p = "Rest (0-9999, '!' for HP or SP, '*' for HP and SP, '&' as needed): ";
char out_val[5] = "& ";
/* Ask for duration */
if (!get_string(p, out_val, sizeof(out_val))) return;
/* Rest... */
if (out_val[0] == '&') {
/* ...until done */
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", REST_COMPLETE);
} else if (out_val[0] == '*') {
/* ...a lot */
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", REST_ALL_POINTS);
} else if (out_val[0] == '!') {
/* ...until HP or SP filled */
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", REST_SOME_POINTS);
} else {
/* ...some */
int turns = atoi(out_val);
if (turns <= 0) return;
if (turns > 9999) turns = 9999;
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", turns);
}
}
int test_newgame(void *state) {
/* Try making a new game */
cmdq_push(CMD_BIRTH_INIT);
cmdq_push(CMD_BIRTH_RESET);
cmdq_push(CMD_CHOOSE_RACE);
cmd_set_arg_choice(cmdq_peek(), "choice", 0);
cmdq_push(CMD_CHOOSE_CLASS);
cmd_set_arg_choice(cmdq_peek(), "choice", 0);
cmdq_push(CMD_ROLL_STATS);
cmdq_push(CMD_NAME_CHOICE);
cmd_set_arg_string(cmdq_peek(), "name", "Tester");
cmdq_push(CMD_ACCEPT_CHARACTER);
cmdq_execute(CMD_BIRTH);
eq(player->is_dead, FALSE);
cave_generate(&cave, player);
on_new_level();
noteq(cave, NULL);
eq(player->chp, player->mhp);
eq(player->food, PY_FOOD_FULL - 1);
/* Should be all set up to save properly now */
eq(savefile_save("Test1"), TRUE);
/* Make sure it saved properly */
eq(file_exists("Test1"), TRUE);
ok;
}
/**
* Rest (restores hit points and mana and such)
*/
void do_cmd_rest(struct command *cmd)
{
int n;
/* XXX-AS need to insert UI here */
if (cmd_get_arg_choice(cmd, "choice", &n) != CMD_OK)
return;
/*
* A little sanity checking on the input - only the specified negative
* values are valid.
*/
if (n < 0 && !player_resting_is_special(n))
return;
/* Do some upkeep on the first turn of rest */
if (!player_is_resting(player)) {
player->searching = false;
player->upkeep->update |= (PU_BONUS);
/* If a number of turns was entered, remember it */
if (n > 1)
player_set_resting_repeat_count(player, n);
else if (n == 1)
/* If we're repeating the command, use the same count */
n = player_get_resting_repeat_count(player);
}
/* Set the counter, and stop if told to */
player_resting_set_count(player, n);
if (!player_is_resting(player))
return;
/* Take a turn */
player_resting_step_turn(player);
/* Redraw the state if requested */
handle_stuff(player);
/* Prepare to continue, or cancel and clean up */
if (player_resting_count(player) > 0) {
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", n - 1);
} else if (player_resting_is_special(n)) {
cmdq_push(CMD_REST);
cmd_set_arg_choice(cmdq_peek(), "choice", n);
player_set_resting_repeat_count(player, 0);
} else {
player_resting_cancel(player, false);
}
}
static enum birth_stage point_based_command(void)
{
static int stat = 0;
struct keypress ch;
enum birth_stage next = BIRTH_POINTBASED;
/* Place cursor just after cost of current stat */
Term_gotoxy(COSTS_COL + 4, COSTS_ROW + stat);
/* Get key */
ch = inkey();
if (ch.code == KTRL('X')) {
quit(NULL);
} else if (ch.code == ESCAPE) {
/* Go back a step, or back to the start of this step */
next = BIRTH_BACK;
} else if (ch.code == 'r' || ch.code == 'R') {
cmdq_push(CMD_RESET_STATS);
cmd_set_arg_choice(cmdq_peek(), "choice", FALSE);
} else if (ch.code == KC_ENTER) {
/* Done */
next = BIRTH_NAME_CHOICE;
} else {
int dir = target_dir(ch);
/* Prev stat, looping round to the bottom when going off the top */
if (dir == 8)
stat = (stat + STAT_MAX - 1) % STAT_MAX;
/* Next stat, looping round to the top when going off the bottom */
if (dir == 2)
stat = (stat + 1) % STAT_MAX;
/* Decrease stat (if possible) */
if (dir == 4) {
cmdq_push(CMD_SELL_STAT);
cmd_set_arg_choice(cmdq_peek(), "choice", stat);
}
/* Increase stat (if possible) */
if (dir == 6) {
cmdq_push(CMD_BUY_STAT);
cmd_set_arg_choice(cmdq_peek(), "choice", stat);
}
}
return next;
}
/**
* Cast a spell from a book.
*/
void textui_obj_cast(void)
{
int item;
int spell;
const char *verb = magic_desc[mp_ptr->spell_realm][SPELL_VERB];
char q[80];
char s[80];
if (mp_ptr->spell_realm == REALM_NONE) {
msg("You cannot read books!");
return;
}
strnfmt(q, sizeof(q), "Use which %s?",
magic_desc[mp_ptr->spell_realm][BOOK_NOUN]);
strnfmt(s, sizeof(s), " You have no %ss that you can use.",
magic_desc[mp_ptr->spell_realm][BOOK_LACK]);
item_tester_hook = obj_can_cast_from;
if (!get_item(&item, q, s, CMD_CAST, (USE_INVEN | USE_FLOOR)))
return;
/* Track the object kind */
track_object(item);
/* Ask for a spell */
spell =
get_spell(object_from_item_idx(item), verb, spell_okay_to_cast);
if (spell >= 0) {
cmd_insert(CMD_CAST);
cmd_set_arg_choice(cmd_get_top(), 0, spell);
}
}
/**
* Study a book to gain a new spell
*/
void textui_obj_study(void)
{
int item;
char q[80];
char s[80];
if (mp_ptr->spell_realm == REALM_NONE) {
msg("You cannot read books!");
return;
}
strnfmt(q, sizeof(q), "Study which %s?",
magic_desc[mp_ptr->spell_realm][BOOK_NOUN]);
strnfmt(s, sizeof(s), " You have no %ss that you can study.",
magic_desc[mp_ptr->spell_realm][BOOK_LACK]);
item_tester_hook = obj_can_study;
if (!get_item(&item, q, s, CMD_STUDY_BOOK, (USE_INVEN | USE_FLOOR)))
return;
track_object(item);
handle_stuff(p_ptr);
if (mp_ptr->spell_book != TV_PRAYER_BOOK) {
int spell = get_spell(object_from_item_idx(item),
"study", spell_okay_to_study);
if (spell >= 0) {
cmd_insert(CMD_STUDY_SPELL);
cmd_set_arg_choice(cmd_get_top(), 0, spell);
}
} else {
cmd_insert(CMD_STUDY_BOOK);
cmd_set_arg_item(cmd_get_top(), 0, item);
}
}
void textui_cmd_rest(void)
{
/* Prompt for time if needed */
if (p_ptr->command_arg <= 0)
{
cptr p = "Rest (0-9999, '!' for HP or SP, '*' for HP and SP, '&' as needed): ";
char out_val[5] = "& ";
/* Ask for duration */
if (!get_string(p, out_val, sizeof(out_val))) return;
/* Rest until done */
if (out_val[0] == '&')
{
cmd_insert(CMD_REST);
cmd_set_arg_choice(cmd_get_top(), 0, REST_COMPLETE);
}
/* Rest a lot */
else if (out_val[0] == '*')
{
cmd_insert(CMD_REST);
cmd_set_arg_choice(cmd_get_top(), 0, REST_ALL_POINTS);
}
/* Rest until HP or SP filled */
else if (out_val[0] == '!')
{
cmd_insert(CMD_REST);
cmd_set_arg_choice(cmd_get_top(), 0, REST_SOME_POINTS);
}
/* Rest some */
else
{
int turns = atoi(out_val);
if (turns <= 0) return;
if (turns > 9999) turns = 9999;
cmd_insert(CMD_REST);
cmd_set_arg_choice(cmd_get_top(), 0, turns);
}
}
}
int test_magic_missile(void *state) {
/* Try making a new game */
cmdq_push(CMD_BIRTH_INIT);
cmdq_push(CMD_BIRTH_RESET);
cmdq_push(CMD_CHOOSE_RACE);
cmd_set_arg_choice(cmdq_peek(), "choice", 4);
cmdq_push(CMD_CHOOSE_CLASS);
cmd_set_arg_choice(cmdq_peek(), "choice", 1);
cmdq_push(CMD_ROLL_STATS);
cmdq_push(CMD_NAME_CHOICE);
cmd_set_arg_string(cmdq_peek(), "name", "Tyrion");
cmdq_push(CMD_ACCEPT_CHARACTER);
cmdq_execute(CMD_BIRTH);
eq(player->is_dead, FALSE);
cave_generate(&cave, player);
on_new_level();
notnull(cave);
eq(player->chp, player->mhp);
eq(player->food, PY_FOOD_FULL - 1);
cmdq_push(CMD_STUDY);
cmd_set_arg_choice(cmdq_peek(), "spell", 0);
run_game_loop();
cmdq_push(CMD_CAST);
cmd_set_arg_choice(cmdq_peek(), "spell", 0);
cmd_set_arg_target(cmdq_peek(), "target", 2);
run_game_loop();
noteq(player->csp, player->msp);
ok;
}
/* pick the context menu options appropiate for an item available in a store */
int context_menu_store_item(struct store *store, const int oid, int mx, int my)
{
menu_type *m;
rect_region r;
int selected;
char *labels;
object_type *o_ptr;
char header[120];
/* Get the actual object */
o_ptr = &store->stock[oid];
m = menu_dynamic_new();
if (!m || !store) {
return 0;
}
object_desc(header, sizeof(header), o_ptr, ODESC_PREFIX | ODESC_BASE);
labels = string_make(lower_case);
m->selections = labels;
menu_dynamic_add_label(m, "Examine", 'x', 4, labels);
if (store->sidx == STORE_HOME) {
menu_dynamic_add_label(m, "Take", 'p', 6, labels);
if (o_ptr->number > 1) {
menu_dynamic_add_label(m, "Take One", 'o', 5, labels);
}
} else {
menu_dynamic_add_label(m, "Buy", 'p', 6, labels);
if (o_ptr->number > 1) {
menu_dynamic_add_label(m, "Buy One", 'o', 5, labels);
}
}
/* work out display region */
r.width = menu_dynamic_longest_entry(m) + 3 + 2; /* +3 for tag, 2 for pad */
if (mx > Term->wid - r.width - 1) {
r.col = Term->wid - r.width - 1;
} else {
r.col = mx + 1;
}
r.page_rows = m->count;
if (my > Term->hgt - r.page_rows - 1) {
if (my - r.page_rows - 1 <= 0) {
/* menu has too many items, so put in upper right corner */
r.row = 1;
r.col = Term->wid - r.width - 1;
} else {
r.row = Term->hgt - r.page_rows - 1;
}
} else {
r.row = my + 1;
}
/* Hack -- no flush needed */
msg_flag = FALSE;
screen_save();
button_backup_all(TRUE);
menu_layout(m, &r);
region_erase_bordered(&r);
prt(format("(Enter to select, ESC) Command for %s:", header), 0, 0);
selected = menu_dynamic_select(m);
menu_dynamic_free(m);
string_free(labels);
button_restore();
screen_load();
if (selected == 4) {
Term_keypress('x', 0);
} else
if (selected == 5) {
if (store->sidx == STORE_HOME) {
cmd_insert(CMD_RETRIEVE);
} else {
cmd_insert(CMD_BUY);
}
cmd_set_arg_choice(cmd_get_top(), 0, oid);
cmd_set_arg_number(cmd_get_top(), 1, 1);
} else
if (selected == 6) {
Term_keypress('p', 0);
}
return 1;
}
/* pick the context menu options appropiate for a store */
int context_menu_store(struct store *store, const int oid, int mx, int my)
{
menu_type *m;
rect_region r;
int selected;
char *labels;
object_type *o_ptr;
m = menu_dynamic_new();
if (!m || !store) {
return 0;
}
/* Get the actual object */
o_ptr = &store->stock[oid];
labels = string_make(lower_case);
m->selections = labels;
menu_dynamic_add_label(m, "Inspect Inventory", 'I', 1, labels);
if (store->sidx == STORE_HOME) {
/*menu_dynamic_add(m, "Stash One", 2);*/
menu_dynamic_add_label(m, "Stash", 'd', 3, labels);
menu_dynamic_add_label(m, "Examine", 'x', 4, labels);
menu_dynamic_add_label(m, "Take", 'p', 6, labels);
if (o_ptr->number > 1) {
menu_dynamic_add_label(m, "Take One", 'o', 5, labels);
}
} else {
/*menu_dynamic_add(m, "Sell One", 2);*/
menu_dynamic_add_label(m, "Sell", 'd', 3, labels);
menu_dynamic_add_label(m, "Examine", 'x', 4, labels);
menu_dynamic_add_label(m, "Buy", 'p', 6, labels);
if (o_ptr->number > 1) {
menu_dynamic_add_label(m, "Buy One", 'o', 5, labels);
}
}
menu_dynamic_add_label(m, "Exit", '`', 7, labels);
/* work out display region */
r.width = menu_dynamic_longest_entry(m) + 3 + 2; /* +3 for tag, 2 for pad */
if (mx > Term->wid - r.width - 1) {
r.col = Term->wid - r.width - 1;
} else {
r.col = mx + 1;
}
r.page_rows = m->count;
if (my > Term->hgt - r.page_rows - 1) {
if (my - r.page_rows - 1 <= 0) {
/* menu has too many items, so put in upper right corner */
r.row = 1;
r.col = Term->wid - r.width - 1;
} else {
r.row = Term->hgt - r.page_rows - 1;
}
} else {
r.row = my + 1;
}
/* Hack -- no flush needed */
msg_flag = FALSE;
screen_save();
button_backup_all(TRUE);
menu_layout(m, &r);
region_erase_bordered(&r);
prt("(Enter to select, ESC) Command:", 0, 0);
selected = menu_dynamic_select(m);
menu_dynamic_free(m);
string_free(labels);
button_restore();
screen_load();
if (selected == 1) {
Term_keypress('I', 0);
} else
if (selected == 2) {
Term_keypress('s', 0);
/* oid is store item we do not know item we want to sell here */
/*if (store->sidx == STORE_HOME) {
cmd_insert(CMD_STASH);
} else {
cmd_insert(CMD_SELL);
}
cmd_set_arg_item(cmd_get_top(), 0, oid);
cmd_set_arg_number(cmd_get_top(), 1, 1);*/
} else
if (selected == 3) {
Term_keypress('s', 0);
} else
if (selected == 4) {
Term_keypress('x', 0);
} else
if (selected == 5) {
if (store->sidx == STORE_HOME) {
cmd_insert(CMD_RETRIEVE);
} else {
cmd_insert(CMD_BUY);
}
cmd_set_arg_choice(cmd_get_top(), 0, oid);
cmd_set_arg_number(cmd_get_top(), 1, 1);
} else
if (selected == 6) {
Term_keypress('p', 0);
} else
if (selected == 7) {
Term_keypress(ESCAPE, 0);
}
return 1;
}
/* Allow the user to select from the current menu, and return the
corresponding command to the game. Some actions are handled entirely
by the UI (displaying help text, for instance). */
static enum birth_stage menu_question(enum birth_stage current, menu_type *current_menu, cmd_code choice_command)
{
struct birthmenu_data *menu_data = menu_priv(current_menu);
ui_event cx;
enum birth_stage next = BIRTH_RESET;
/* Print the question currently being asked. */
clear_question();
Term_putstr(QUESTION_COL, QUESTION_ROW, -1, TERM_YELLOW, menu_data->hint);
current_menu->cmd_keys = "?=*\x18"; /* ?, =, *, <ctl-X> */
while (next == BIRTH_RESET)
{
/* Display the menu, wait for a selection of some sort to be made. */
cx = menu_select(current_menu, EVT_KBRD, FALSE);
/* As all the menus are displayed in "hierarchical" style, we allow
use of "back" (left arrow key or equivalent) to step back in
the proces as well as "escape". */
if (cx.type == EVT_ESCAPE)
{
next = BIRTH_BACK;
}
else if (cx.type == EVT_SELECT)
{
if (current == BIRTH_ROLLER_CHOICE)
{
cmd_insert(CMD_FINALIZE_OPTIONS);
if (current_menu->cursor)
{
/* Do a first roll of the stats */
cmd_insert(CMD_ROLL_STATS);
next = current + 2;
}
else
{
/*
* Make sure we've got a point-based char to play with.
* We call point_based_start here to make sure we get
* an update on the points totals before trying to
* display the screen. The call to CMD_RESET_STATS
* forces a rebuying of the stats to give us up-to-date
* totals. This is, it should go without saying, a hack.
*/
point_based_start();
cmd_insert(CMD_RESET_STATS);
cmd_set_arg_choice(cmd_get_top(), 0, TRUE);
next = current + 1;
}
}
else
{
cmd_insert(choice_command);
cmd_set_arg_choice(cmd_get_top(), 0, current_menu->cursor);
next = current + 1;
}
}
else if (cx.type == EVT_KBRD)
{
/* '*' chooses an option at random from those the game's provided. */
if (cx.key.code == '*' && menu_data->allow_random)
{
current_menu->cursor = randint0(current_menu->count);
cmd_insert(choice_command);
cmd_set_arg_choice(cmd_get_top(), 0, current_menu->cursor);
menu_refresh(current_menu, FALSE);
next = current + 1;
}
else if (cx.key.code == '=')
{
do_cmd_options_birth();
next = current;
}
else if (cx.key.code == KTRL('X'))
{
cmd_insert(CMD_QUIT);
next = BIRTH_COMPLETE;
}
else if (cx.key.code == '?')
{
do_cmd_help();
}
}
}
return next;
}
/* pick the context menu options appropiate for the item */
int context_menu_object(const object_type *o_ptr, const int slot)
{
menu_type *m;
region r;
int selected;
char *labels;
char header[120];
textblock *tb;
region area = { 0, 0, 0, 0 };
bool allowed = TRUE;
int mode = OPT(rogue_like_commands) ? KEYMAP_MODE_ROGUE : KEYMAP_MODE_ORIG;
unsigned char cmdkey;
m = menu_dynamic_new();
if (!m || !o_ptr) {
return 0;
}
object_desc(header, sizeof(header), o_ptr, ODESC_PREFIX | ODESC_BASE);
labels = string_make(lower_case);
m->selections = labels;
/* 'I' is used for inspect in both keymaps. */
menu_dynamic_add_label(m, "Inspect", 'I', MENU_VALUE_INSPECT, labels);
if (obj_can_browse(o_ptr)) {
if (obj_can_cast_from(o_ptr) && player_can_cast(p_ptr, FALSE)) {
ADD_LABEL("Cast", CMD_CAST, MN_ROW_VALID);
}
if (obj_can_study(o_ptr) && player_can_study(p_ptr, FALSE)) {
cmd_code study_cmd = player_has(PF_CHOOSE_SPELLS) ? CMD_STUDY_SPELL : CMD_STUDY_BOOK;
/* Hack - Use the STUDY_BOOK command key so that we get the correct command key. */
cmdkey = cmd_lookup_key_unktrl(CMD_STUDY_BOOK, mode);
menu_dynamic_add_label(m, "Study", cmdkey, study_cmd, labels);
}
if (player_can_read(p_ptr, FALSE)) {
ADD_LABEL("Browse", CMD_BROWSE_SPELL, MN_ROW_VALID);
}
}
else if (obj_is_useable(o_ptr)) {
if (obj_is_wand(o_ptr)) {
menu_row_validity_t valid = (obj_has_charges(o_ptr)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Aim", CMD_USE_WAND, valid);
}
else if (obj_is_rod(o_ptr)) {
menu_row_validity_t valid = (obj_can_zap(o_ptr)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Zap", CMD_USE_ROD, valid);
}
else if (obj_is_staff(o_ptr)) {
menu_row_validity_t valid = (obj_has_charges(o_ptr)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Use", CMD_USE_STAFF, valid);
}
else if (obj_is_scroll(o_ptr)) {
menu_row_validity_t valid = (player_can_read(p_ptr, FALSE)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Read", CMD_READ_SCROLL, valid);
}
else if (obj_is_potion(o_ptr)) {
ADD_LABEL("Quaff", CMD_QUAFF, MN_ROW_VALID);
}
else if (obj_is_food(o_ptr)) {
ADD_LABEL("Eat", CMD_EAT, MN_ROW_VALID);
}
else if (obj_is_activatable(o_ptr)) {
menu_row_validity_t valid = (slot >= INVEN_WIELD && obj_can_activate(o_ptr)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Activate", CMD_ACTIVATE, valid);
}
else if (obj_can_fire(o_ptr)) {
ADD_LABEL("Fire", CMD_FIRE, MN_ROW_VALID);
}
else {
ADD_LABEL("Use", CMD_USE_ANY, MN_ROW_VALID);
}
}
if (obj_can_refill(o_ptr)) {
ADD_LABEL("Refill", CMD_REFILL, MN_ROW_VALID);
}
if (slot >= INVEN_WIELD && obj_can_takeoff(o_ptr)) {
ADD_LABEL("Take off", CMD_TAKEOFF, MN_ROW_VALID);
}
else if (slot < INVEN_WIELD && obj_can_wear(o_ptr)) {
//if (obj_is_armor(o_ptr)) {
// menu_dynamic_add(m, "Wear", 2);
//} else {
// menu_dynamic_add(m, "Wield", 2);
//}
ADD_LABEL("Equip", CMD_WIELD, MN_ROW_VALID);
}
if (slot >= 0) {
if (!store_in_store || cave_shopnum(cave, p_ptr->py, p_ptr->px) == STORE_HOME) {
ADD_LABEL("Drop", CMD_DROP, MN_ROW_VALID);
if (o_ptr->number > 1) {
/* 'D' is used for squelch in rogue keymap, so we'll just swap letters. */
cmdkey = (mode == KEYMAP_MODE_ORIG) ? 'D' : 'k';
menu_dynamic_add_label(m, "Drop All", cmdkey, MENU_VALUE_DROP_ALL, labels);
}
}
}
else {
menu_row_validity_t valid = (inven_carry_okay(o_ptr)) ? MN_ROW_VALID : MN_ROW_INVALID;
ADD_LABEL("Pick up", CMD_PICKUP, valid);
}
ADD_LABEL("Throw", CMD_THROW, MN_ROW_VALID);
ADD_LABEL("Inscribe", CMD_INSCRIBE, MN_ROW_VALID);
if (obj_has_inscrip(o_ptr)) {
ADD_LABEL("Uninscribe", CMD_UNINSCRIBE, MN_ROW_VALID);
}
ADD_LABEL( (object_is_squelched(o_ptr) ? "Unignore" : "Ignore"), CMD_DESTROY, MN_ROW_VALID);
/* work out display region */
r.width = (int)menu_dynamic_longest_entry(m) + 3 + 2; /* +3 for tag, 2 for pad */
r.col = Term->wid - r.width - 1;
r.row = 1;
r.page_rows = m->count;
area.width = -(r.width + 2);
/* Hack -- no flush needed */
msg_flag = FALSE;
screen_save();
/* Display info */
tb = object_info(o_ptr, OINFO_NONE);
object_desc(header, sizeof(header), o_ptr, ODESC_PREFIX | ODESC_FULL);
textui_textblock_place(tb, area, format("%s", header));
textblock_free(tb);
menu_layout(m, &r);
region_erase_bordered(&r);
prt(format("(Enter to select, ESC) Command for %s:", header), 0, 0);
selected = menu_dynamic_select(m);
menu_dynamic_free(m);
string_free(labels);
screen_load();
cmdkey = cmd_lookup_key(selected, mode);
switch (selected) {
case -1:
/* User cancelled the menu. */
return 3;
case MENU_VALUE_INSPECT:
/* copied from textui_obj_examine */
/* Display info */
tb = object_info(o_ptr, OINFO_NONE);
object_desc(header, sizeof(header), o_ptr, ODESC_PREFIX | ODESC_FULL);
textui_textblock_show(tb, area, format("%s", header));
textblock_free(tb);
return 2;
case MENU_VALUE_DROP_ALL:
/* Drop entire stack with confirmation. */
if (get_check(format("Drop %s? ", header))) {
cmd_insert(store_in_store ? CMD_STASH : CMD_DROP);
cmd_set_arg_item(cmd_get_top(), 0, slot);
cmd_set_arg_number(cmd_get_top(), 1, o_ptr->number);
}
return 1;
case CMD_STUDY_SPELL:
/* Hack - Use the STUDY_BOOK command key so that get_item_allow() works properly. */
cmdkey = cmd_lookup_key(CMD_STUDY_BOOK, mode);
/* Fall through. */
case CMD_BROWSE_SPELL:
case CMD_STUDY_BOOK:
case CMD_CAST:
case CMD_DESTROY:
case CMD_WIELD:
case CMD_TAKEOFF:
case CMD_INSCRIBE:
case CMD_UNINSCRIBE:
case CMD_PICKUP:
case CMD_DROP:
case CMD_REFILL:
case CMD_THROW:
case CMD_USE_WAND:
case CMD_USE_ROD:
case CMD_USE_STAFF:
case CMD_READ_SCROLL:
case CMD_QUAFF:
case CMD_EAT:
case CMD_ACTIVATE:
case CMD_FIRE:
case CMD_USE_ANY:
/* Check for inscriptions that trigger confirmation. */
allowed = key_confirm_command(cmdkey) && get_item_allow(slot, cmdkey, selected, FALSE);
break;
default:
/* Invalid command; prevent anything from happening. */
bell("Invalid context menu command.");
allowed = FALSE;
break;
}
if (!allowed)
return 1;
if (selected == CMD_DESTROY) {
/* squelch or unsquelch the item */
textui_cmd_destroy_menu(slot);
}
else if (selected == CMD_BROWSE_SPELL) {
/* browse a spellbook */
/* copied from textui_spell_browse */
textui_book_browse(o_ptr);
return 2;
}
else if (selected == CMD_STUDY_SPELL) {
/* study a spell book */
/* copied from textui_obj_study */
int spell = get_spell(o_ptr, "study", spell_okay_to_study);
if (spell >= 0) {
cmd_insert(CMD_STUDY_SPELL);
cmd_set_arg_choice(cmd_get_top(), 0, spell);
}
}
else if (selected == CMD_CAST) {
if (obj_can_browse(o_ptr)) {
/* copied from textui_obj_cast */
const char *verb = ((p_ptr->class->spell_book == TV_MAGIC_BOOK) ? "cast" : "recite");
int spell = get_spell(o_ptr, verb, spell_okay_to_cast);
if (spell >= 0) {
cmd_insert(CMD_CAST);
cmd_set_arg_choice(cmd_get_top(), 0, spell);
}
}
}
else {
