* @param item 飲む薬オブジェクトの所持品ID\r
* @return なし\r
*/\r
-void do_cmd_quaff_potion_aux(int item)\r
+void do_cmd_quaff_potion_aux(INVENTORY_IDX item)\r
{\r
- int ident, lev;\r
+ bool ident;\r
+ DEPTH lev;\r
object_type *o_ptr;\r
object_type forge;\r
object_type *q_ptr;\r
\r
\r
- /* Take a turn */\r
- p_ptr->energy_use = 100;\r
-\r
if (world_player)\r
{\r
if (flush_failure) flush();\r
floor_item_optimize(0 - item);\r
}\r
\r
- /* Sound */\r
sound(SOUND_QUAFF);\r
\r
\r
break;\r
\r
case SV_POTION_BESERK_STRENGTH:\r
- if (set_afraid(0)) ident = TRUE;\r
- if (set_shero(p_ptr->shero + randint1(25) + 25, FALSE)) ident = TRUE;\r
- if (hp_player(30)) ident = TRUE;\r
+ ident = berserk(randint1(25) + 25);\r
break;\r
\r
case SV_POTION_CURE_LIGHT:\r
gain_exp((lev + (p_ptr->lev >> 1)) / p_ptr->lev);\r
}\r
\r
- /* Window stuff */\r
p_ptr->window |= (PW_INVEN | PW_EQUIP | PW_PLAYER);\r
\r
/* Potions can feed the player */\r
/* Restrict choices to potions */\r
item_tester_hook = item_tester_hook_quaff;\r
\r
- /* Get an item */\r
q = _("どの薬を飲みますか? ", "Quaff which potion? ");\r
s = _("飲める薬がない。", "You have no potions to quaff.");\r
\r