[Refactor] #37353 型の置換(C_MAKE)。 / Type replacement(C_MAKE).

[hengband/hengband.git] / src / cmd-read.c

diff --git a/src/cmd-read.c b/src/cmd-read.c
index 36ab68e..c408a3d 100644 (file)
--- a/src/cmd-read.c
+++ b/src/cmd-read.c
@@ -8,6 +8,7 @@
 \r
 #include "angband.h"\r
 #include "object-hook.h"\r
+#include "spells-summon.h"\r
 \r
 /*!\r
  * @brief 巻物を読むコマンドのサブルーチン\r
@@ -117,7 +118,7 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
                {\r
                        for (k = 0; k < randint1(3); k++)\r
                        {\r
-                               if (summon_specific(0, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE | PM_NO_PET)))\r
+                               if (summon_specific(0, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE | PM_NO_PET), '\0'))\r
                                {\r
                                        ident = TRUE;\r
                                }\r
@@ -129,7 +130,7 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
                {\r
                        for (k = 0; k < randint1(3); k++)\r
                        {\r
-                               if (summon_specific(0, p_ptr->y, p_ptr->x, dun_level, SUMMON_UNDEAD, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE | PM_NO_PET)))\r
+                               if (summon_specific(0, p_ptr->y, p_ptr->x, dun_level, SUMMON_UNDEAD, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE | PM_NO_PET), '\0'))\r
                                {\r
                                        ident = TRUE;\r
                                }\r
@@ -139,7 +140,7 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
 \r
                case SV_SCROLL_SUMMON_PET:\r
                {\r
-                       if (summon_specific(-1, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_FORCE_PET)))\r
+                       if (summon_specific(-1, p_ptr->y, p_ptr->x, dun_level, 0, (PM_ALLOW_GROUP | PM_FORCE_PET), '\0'))\r
                        {\r
                                ident = TRUE;\r
                        }\r
@@ -184,7 +185,7 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
 \r
                case SV_SCROLL_WORD_OF_RECALL:\r
                {\r
-                       if (!word_of_recall()) used_up = FALSE;\r
+                       if (!recall_player(p_ptr, randint0(21) + 15)) used_up = FALSE;\r
                        ident = TRUE;\r
                        break;\r
                }\r
@@ -531,11 +532,9 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
        }\r
        else if (o_ptr->tval==TV_PARCHMENT)\r
        {\r
-               cptr q;\r
-               char o_name[MAX_NLEN];\r
+               concptr q;\r
+               GAME_TEXT o_name[MAX_NLEN];\r
                char buf[1024];\r
-\r
-               /* Save screen */\r
                screen_save();\r
 \r
                q=format("book-%d_jp.txt",o_ptr->sval);\r
@@ -548,8 +547,6 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
 \r
                /* Peruse the help file */\r
                (void)show_file(TRUE, buf, o_name, 0, 0);\r
-\r
-               /* Load screen */\r
                screen_load();\r
 \r
                used_up=FALSE;\r
@@ -557,7 +554,7 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
 \r
 \r
        /* Combine / Reorder the pack (later) */\r
-       p_ptr->notice |= (PN_COMBINE | PN_REORDER);\r
+       p_ptr->update |= (PU_COMBINE | PU_REORDER);\r
 \r
        if (!(object_is_aware(o_ptr)))\r
        {\r
@@ -576,7 +573,6 @@ void do_cmd_read_scroll_aux(INVENTORY_IDX item, bool known)
                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
 \r
@@ -614,7 +610,19 @@ void do_cmd_read_scroll(void)
 {\r
        object_type *o_ptr;\r
        OBJECT_IDX item;\r
-       cptr q, s;\r
+       concptr q, s;\r
+\r
+       if (p_ptr->wild_mode)\r
+       {\r
+               return;\r
+       }\r
+\r
+       if (p_ptr->inside_arena)\r
+       {\r
+               msg_print(_("アリーナが魔法を吸収した！", "The arena absorbs all attempted magic!"));\r
+               msg_print(NULL);\r
+               return;\r
+       }\r
 \r
        if (p_ptr->special_defense & (KATA_MUSOU | KATA_KOUKIJIN))\r
        {\r
@@ -642,23 +650,11 @@ void do_cmd_read_scroll(void)
        /* Restrict choices to scrolls */\r
        item_tester_hook = item_tester_hook_readable;\r
 \r
-       /* Get an item */\r
        q = _("どの巻物を読みますか? ", "Read which scroll? ");\r
        s = _("読める巻物がない。", "You have no scrolls to read.");\r
 \r
-       if (!get_item(&item, q, s, (USE_INVEN | USE_FLOOR))) return;\r
-\r
-       /* Get the item (in the pack) */\r
-       if (item >= 0)\r
-       {\r
-               o_ptr = &inventory[item];\r
-       }\r
-\r
-       /* Get the item (on the floor) */\r
-       else\r
-       {\r
-               o_ptr = &o_list[0 - item];\r
-       }\r
+       o_ptr = choose_object(&item, q, s, (USE_INVEN | USE_FLOOR));\r
+       if (!o_ptr) return;\r
 \r
        /* Read the scroll */\r
        do_cmd_read_scroll_aux(item, object_is_aware(o_ptr));\r