p_ptr->redraw |= (PR_HP);
p_ptr->window |= (PW_PLAYER);
-
- /* Handle stuff */
handle_stuff();
if (display)
/* {.} and {$} effect p_ptr->warning and TRC_TELEPORT_SELF */
p_ptr->update |= (PU_BONUS | PU_HP | PU_MANA | PU_SPELLS);
- update_stuff();
+ handle_stuff();
}
/* Query the stats */
- for (i = 0; i < 6; i++)
+ for (i = 0; i < A_MAX; i++)
{
/* Prompt */
sprintf(ppp, "%s (3-%d): ", stat_names[i], p_ptr->stat_max_max[i]);
{
/* Interact */
do_cmd_wiz_change_aux();
-
- /* Redraw everything */
do_cmd_redraw();
}
char buf[160];
-
- /* Clear screen */
Term_clear();
/* Print all tval's and their descriptions */
/*** And now we go for k_idx ***/
-
- /* Clear screen */
Term_clear();
/* We have to search the whole itemlist. */
/* Hack -- leave artifacts alone */
if (object_is_artifact(o_ptr)) return;
-
- /* Get local object */
q_ptr = &forge;
/* Copy the object */
{
/* Apply changes */
object_copy(o_ptr, q_ptr);
-
- /* Recalculate bonuses */
p_ptr->update |= (PU_BONUS);
/* Combine / Reorder the pack (later) */
- p_ptr->notice |= (PN_COMBINE | PN_REORDER);
+ p_ptr->update |= (PU_COMBINE | PU_REORDER);
p_ptr->window |= (PW_INVEN | PW_EQUIP | PW_SPELL | PW_PLAYER);
}
prt(format(q, i, correct, matches, better, worse, other), 0, 0);
Term_fresh();
}
-
- /* Get local object */
q_ptr = &forge;
object_wipe(q_ptr);
*/
static void do_cmd_wiz_blue_mage(void)
{
+ int i = 0;
+ int j = 0;
+ BIT_FLAGS f4 = 0L, f5 = 0L, f6 = 0L;
- int i = 0;
- int j = 0;
- s32b f4 = 0, f5 = 0, f6 = 0;
-
- for (j=1; j<6; j++)
+ for (j = 1; j < A_MAX; j++)
{
-
set_rf_masks(&f4, &f5, &f6, j);
for (i = 0; i < 32; i++)
static void do_cmd_wiz_play(void)
{
OBJECT_IDX item;
-
object_type forge;
object_type *q_ptr;
-
object_type *o_ptr;
-
char ch;
-
bool changed;
-
cptr q, s;
- item_tester_no_ryoute = TRUE;
q = "Play with which object? ";
s = "You have nothing to play with.";
- if (!get_item(&item, q, s, (USE_EQUIP | USE_INVEN | USE_FLOOR))) return;
- /* Get the item (in the pack) */
- if (item >= 0)
- {
- o_ptr = &inventory[item];
- }
+ o_ptr = choose_object(&item, q, s, (USE_EQUIP | USE_INVEN | USE_FLOOR | IGNORE_BOTHHAND_SLOT));
- /* Get the item (on the floor) */
- else
- {
- o_ptr = &o_list[0 - item];
- }
+ if (!o_ptr) return;
/* The item was not changed */
changed = FALSE;
-
- /* Save the screen */
screen_save();
-
- /* Get local object */
q_ptr = &forge;
/* Copy object */
}
}
-
- /* Restore the screen */
screen_load();
/* Change */
object_copy(o_ptr, q_ptr);
-
- /* Recalculate bonuses */
p_ptr->update |= (PU_BONUS);
/* Combine / Reorder the pack (later) */
- p_ptr->notice |= (PN_COMBINE | PN_REORDER);
+ p_ptr->update |= (PU_COMBINE | PU_REORDER);
p_ptr->window |= (PW_INVEN | PW_EQUIP | PW_SPELL | PW_PLAYER);
}
object_type *q_ptr;
OBJECT_IDX k_idx;
-
- /* Save the screen */
screen_save();
/* Get object base type */
k_idx = wiz_create_itemtype();
- /* Restore the screen */
screen_load();
/* Return if failed */
return;
}
}
-
- /* Get local object */
q_ptr = &forge;
-
- /* Create the item */
object_prep(q_ptr, k_idx);
- /* Apply magic */
apply_magic(q_ptr, dun_level, AM_NO_FIXED_ART);
/* Drop the object from heaven */
/* Paranoia */
if (command_arg < d_info[dungeon_type].mindepth) command_arg = 0;
-
- /* Paranoia */
if (command_arg > d_info[dungeon_type].maxdepth) command_arg = (COMMAND_ARG)d_info[dungeon_type].maxdepth;
/* Accept request */
*/
static void do_cmd_wiz_learn(void)
{
- IDX i;
+ KIND_OBJECT_IDX i;
object_type forge;
object_type *q_ptr;
/* Induce awareness */
if (k_ptr->level <= command_arg)
{
- /* Get local object */
q_ptr = &forge;
-
- /* Prepare object */
object_prep(q_ptr, i);
-
- /* Awareness */
object_aware(q_ptr);
}
}
int i;
for (i = 0; i < num; i++)
{
- (void)summon_specific(0, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE));
+ (void)summon_specific(0, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE), '\0');
}
}
{
MONSTER_IDX i;
-
/* Genocide everyone nearby */
for (i = 1; i < m_max; i++)
{
{
if (record_named_pet && is_pet(m_ptr) && m_ptr->nickname)
{
- char m_name[80];
+ GAME_TEXT m_name[MAX_NLEN];
monster_desc(m_name, m_ptr, MD_INDEF_VISIBLE);
do_cmd_write_nikki(NIKKI_NAMED_PET, RECORD_NAMED_PET_WIZ_ZAP, m_name);
if (record_named_pet && is_pet(m_ptr) && m_ptr->nickname)
{
- char m_name[80];
+ GAME_TEXT m_name[MAX_NLEN];
monster_desc(m_name, m_ptr, MD_INDEF_VISIBLE);
do_cmd_write_nikki(NIKKI_NAMED_PET, RECORD_NAMED_PET_WIZ_ZAP, m_name);
c_ptr->info |= (CAVE_GLOW | CAVE_OBJECT);
note_spot(y, x);
-
- /* Redraw */
lite_spot(y, x);
/* Update some things */
teleport_player(10, 0L);
break;
+ /* Take a Quests */
+ case 'Q':
+ {
+ char ppp[30];
+ char tmp_val[5];
+ int tmp_int;
+ sprintf(ppp, "QuestID (0-%d):", max_q_idx - 1);
+ sprintf(tmp_val, "%d", 0);
+
+ if (!get_string(ppp, tmp_val, 3)) return;
+ tmp_int = atoi(tmp_val);
+
+ if(tmp_int < 0) break;
+ if(tmp_int >= max_q_idx) break;
+
+ p_ptr->inside_quest = (QUEST_IDX)tmp_int;
+ process_dungeon_file("q_info.txt", 0, 0, 0, 0);
+ quest[tmp_int].status = QUEST_STATUS_TAKEN;
+ p_ptr->inside_quest = 0;
+ }
+ break;
+
/* Complete a Quest -KMW- */
case 'q':
if(p_ptr->inside_quest)
do_cmd_wiz_hack_ben();
break;
+ /* For temporary test. */
+ case 'X':
+ {
+ INVENTORY_IDX i;
+ for(i = INVEN_TOTAL - 1; i >= 0; i--)
+ {
+ if(inventory[i].k_idx) inven_drop(i, 999);
+ }
+ player_outfit();
+ break;
+ }
+
/* Not a Wizard Command */
default:
msg_print("That is not a valid debug command.");