OSDN Git Service

[Refactor] #37353 minus_ac() を acid_minus_ac()に改名、処理時メッセージを修正。 / Rename minus_ac...
[hengband/hengband.git] / src / mind.c
index 75322d0..fe87e89 100644 (file)
@@ -14,9 +14,8 @@
  * 特殊技能を揃えて実装している。
  */
 
-
-
 #include "angband.h"
+#include "melee.h"
 
 /*! 特殊技能の一覧テーブル */
 mind_power const mind_powers[5] =
@@ -289,7 +288,7 @@ mind_power const mind_powers[5] =
 };
 
 /*! 特殊能力の解説文字列 */
-static cptr const mind_tips[5][MAX_MIND_POWERS] =
+static concptr const mind_tips[5][MAX_MIND_POWERS] =
 {
 #ifdef JP
 {
@@ -537,13 +536,13 @@ static cptr const mind_tips[5][MAX_MIND_POWERS] =
 void mindcraft_info(char *p, int use_mind, int power)
 {
 #ifdef JP
-       cptr s_dam = "損傷:";
-       cptr s_dur = "期間:";
-       cptr s_range = "範囲:";
+       concptr s_dam = "損傷:";
+       concptr s_dur = "期間:";
+       concptr s_range = "範囲:";
 #else
-       cptr s_dam = "dam ";
-       cptr s_dur = "dur ";
-       cptr s_range = "range ";
+       concptr s_dam = "dam ";
+       concptr s_dur = "dur ";
+       concptr s_range = "range ";
 #endif
        PLAYER_LEVEL plev = p_ptr->lev;
 
@@ -679,16 +678,16 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
 {
        SPELL_IDX i;
        int             num = 0;
-       int             y = 1;
-       int             x = 10;
+       TERM_LEN y = 1;
+       TERM_LEN x = 10;
        int             minfail = 0;
-       int             plev = p_ptr->lev;
+       PLAYER_LEVEL plev = p_ptr->lev;
        int             chance = 0;
        int             ask = TRUE;
        char            choice;
        char            out_val[160];
        char            comment[80];
-       cptr            p;
+       concptr            p;
        COMMAND_CODE code;
        mind_type       spell;
        const mind_power      *mind_ptr;
@@ -740,8 +739,6 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
        /* Assume cancelled */
        *sn = (-1);
 
-#ifdef ALLOW_REPEAT /* TNB */
-
        /* Get the spell, if available */
 
        if (repeat_pull(&code))
@@ -759,8 +756,6 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
                }
        }
 
-#endif /* ALLOW_REPEAT -- TNB */
-
     /* Nothing chosen yet */
     flag = FALSE;
 
@@ -847,8 +842,6 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
 
                                /* Show list */
                                redraw = TRUE;
-
-                               /* Save the screen */
                                if (!only_browse && !use_menu) screen_save();
 
                                /* Display a list of spells */
@@ -954,8 +947,6 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
                        {
                                /* Hide list */
                                redraw = FALSE;
-
-                               /* Restore the screen */
                                screen_load();
                        }
 
@@ -1000,15 +991,10 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
                /* Stop the loop */
                flag = TRUE;
        }
-
-       /* Restore the screen */
        if (redraw && !only_browse) screen_load();
 
-       /* Show choices */
        p_ptr->window |= (PW_SPELL);
-
-       /* Window stuff */
-       window_stuff();
+       handle_stuff();
 
        /* Abort if needed */
        if (!flag) return (FALSE);
@@ -1016,12 +1002,8 @@ static bool_hack get_mind_power(SPELL_IDX *sn, bool only_browse)
        /* Save the choice */
        (*sn) = i;
 
-#ifdef ALLOW_REPEAT /* TNB */
-
        repeat_push((COMMAND_CODE)i);
 
-#endif /* ALLOW_REPEAT -- TNB */
-
        /* Success */
        return (TRUE);
 }
@@ -1190,13 +1172,9 @@ static bool cast_mindcrafter_spell(int spell)
                /* Hack */
                p_ptr->energy_need -= 1000 + (100 + p_ptr->csp - 50)*TURNS_PER_TICK/10;
 
-               /* Redraw map */
                p_ptr->redraw |= (PR_MAP);
-
-               /* Update monsters */
                p_ptr->update |= (PU_MONSTERS);
 
-               /* Window stuff */
                p_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
 
                handle_stuff();
@@ -1261,63 +1239,8 @@ static bool cast_force_spell(int spell)
                set_tim_sh_touki(randint1(plev / 2) + 15 + boost / 7, FALSE);
                break;
        case 7:
-       {
-               int y, x, dam;
-               project_length = 1;
-               if (!get_aim_dir(&dir)) return FALSE;
-
-               y = p_ptr->y + ddy[dir];
-               x = p_ptr->x + ddx[dir];
-               dam = damroll(8 + ((plev - 5) / 4) + boost / 12, 8);
-               fire_beam(GF_MISSILE, dir, dam);
-               if (cave[y][x].m_idx)
-               {
-                       int i;
-                       int ty = y, tx = x;
-                       int oy = y, ox = x;
-                       MONSTER_IDX m_idx = cave[y][x].m_idx;
-                       monster_type *m_ptr = &m_list[m_idx];
-                       monster_race *r_ptr = &r_info[m_ptr->r_idx];
-                       char m_name[80];
-
-                       monster_desc(m_name, m_ptr, 0);
-
-                       if (randint1(r_ptr->level * 3 / 2) > randint0(dam / 2) + dam/2)
-                       {
-                               msg_format(_("%sは飛ばされなかった。", "%^s was not blown away."), m_name);
-                       }
-                       else
-                       {
-                               for (i = 0; i < 5; i++)
-                               {
-                                       y += ddy[dir];
-                                       x += ddx[dir];
-                                       if (cave_empty_bold(y, x))
-                                       {
-                                               ty = y;
-                                               tx = x;
-                                       }
-                                       else break;
-                               }
-                               if ((ty != oy) || (tx != ox))
-                               {
-                                       msg_format(_("%sを吹き飛ばした!", "You blow %s away!"), m_name);
-                                       cave[oy][ox].m_idx = 0;
-                                       cave[ty][tx].m_idx = (s16b)m_idx;
-                                       m_ptr->fy = (byte_hack)ty;
-                                       m_ptr->fx = (byte_hack)tx;
-
-                                       update_mon(m_idx, TRUE);
-                                       lite_spot(oy, ox);
-                                       lite_spot(ty, tx);
-
-                                       if (r_ptr->flags7 & (RF7_LITE_MASK | RF7_DARK_MASK))
-                                               p_ptr->update |= (PU_MON_LITE);
-                               }
-                       }
-               }
+               return shock_power();
                break;
-       }
        case 8:
                if (!get_aim_dir(&dir)) return FALSE;
                fire_ball(GF_MISSILE, dir, damroll(10, 6) + plev * 3 / 2 + boost * 3 / 5, (plev < 30) ? 2 : 3);
@@ -1340,7 +1263,7 @@ static bool cast_force_spell(int spell)
                bool success = FALSE;
 
                for (i = 0; i < 1 + boost/100; i++)
-                       if (summon_specific(-1, p_ptr->y, p_ptr->x, plev, SUMMON_PHANTOM, PM_FORCE_PET))
+                       if (summon_specific(-1, p_ptr->y, p_ptr->x, plev, SUMMON_PHANTOM, PM_FORCE_PET, '\0'))
                                success = TRUE;
                if (success)
                {
@@ -1518,7 +1441,7 @@ static bool cast_mirror_spell(int spell)
 
                /* mirror of recall */
        case 17:
-               return word_of_recall();
+               return recall_player(p_ptr, randint0(21) + 15);
                /* multi-shadow */
        case 18:
                set_multishadow(6 + randint1(6), FALSE);
@@ -1565,7 +1488,7 @@ static bool cast_berserk_spell(int spell)
                        return FALSE;
                }
 
-               if (!get_rep_dir2(&dir)) return FALSE;
+               if (!get_direction(&dir, FALSE, FALSE)) return FALSE;
 
                if (dir == 5) return FALSE;
                y = p_ptr->y + ddy[dir];
@@ -1596,7 +1519,7 @@ static bool cast_berserk_spell(int spell)
        }
        case 2:
        {
-               if (!get_rep_dir2(&dir)) return FALSE;
+               if (!get_direction(&dir, FALSE, FALSE)) return FALSE;
                y = p_ptr->y + ddy[dir];
                x = p_ptr->x + ddx[dir];
                move_player(dir, easy_disarm, TRUE);
@@ -1623,7 +1546,7 @@ static bool cast_berserk_spell(int spell)
  */
 static bool cast_ninja_spell(int spell)
 {
-       POSITION x, y;
+       POSITION x = 0, y = 0;
        DIRECTION dir;
        PLAYER_LEVEL plev = p_ptr->lev;
 
@@ -1706,13 +1629,8 @@ static bool cast_ninja_spell(int spell)
                        }
                        if (slot == INVEN_PACK)
                        {
-#ifdef JP
-                               if (!i) msg_print("くさびを持っていない。");
-                               else msg_print("くさびがなくなった。");
-#else
-                               if (!i) msg_print("You have no Iron Spikes.");
-                               else msg_print("You have no more Iron Spikes.");
-#endif
+                               if (!i) msg_print(_("くさびを持っていない。", "You have no Iron Spikes."));
+                               else msg_print(_("くさびがなくなった。", "You have no more Iron Spikes."));
                                return FALSE;
                        }
 
@@ -1727,7 +1645,7 @@ static bool cast_ninja_spell(int spell)
        {
                monster_type *m_ptr;
                MONSTER_IDX m_idx;
-               char m_name[80];
+               GAME_TEXT m_name[MAX_NLEN];
                int i;
                int path_n;
                u16b path_g[512];
@@ -1746,8 +1664,8 @@ static bool cast_ninja_spell(int spell)
                ty = target_row, tx = target_col;
                for (i = 1; i < path_n; i++)
                {
-                       int ny = GRID_Y(path_g[i]);
-                       int nx = GRID_X(path_g[i]);
+                       POSITION ny = GRID_Y(path_g[i]);
+                       POSITION nx = GRID_X(path_g[i]);
                        cave_type *c_ptr = &cave[ny][nx];
 
                        if (in_bounds(ny, nx) && cave_empty_bold(ny, nx) &&
@@ -1771,13 +1689,8 @@ static bool cast_ninja_spell(int spell)
                /* Wake the monster up */
                (void)set_monster_csleep(m_idx, 0);
 
-               /* Update the monster (new location) */
-               update_mon(m_idx, TRUE);
-
-               /* Redraw the old grid */
+               update_monster(m_idx, TRUE);
                lite_spot(target_row, target_col);
-
-               /* Redraw the new grid */
                lite_spot(ty, tx);
 
                if (r_info[m_ptr->r_idx].flags7 & (RF7_LITE_MASK | RF7_DARK_MASK))
@@ -1863,12 +1776,12 @@ void do_cmd_mind(void)
        int b = 0;
        int             chance;
        int             minfail = 0;
-       int             plev = p_ptr->lev;
+       PLAYER_LEVEL plev = p_ptr->lev;
        int             old_csp = p_ptr->csp;
        mind_type       spell;
        bool            cast;
        int             use_mind, mana_cost;
-       cptr            p;
+       concptr            p;
        bool            on_mirror = FALSE;
 
        /* not if confused */
@@ -1884,22 +1797,22 @@ void do_cmd_mind(void)
 #ifdef JP
        switch(p_ptr->pclass)
        {
-               case CLASS_MINDCRAFTER: use_mind = MIND_MINDCRAFTER;p = "精神";break;
-               case CLASS_FORCETRAINER:          use_mind = MIND_KI;p = "気";break;
-               case CLASS_BERSERKER:   use_mind = MIND_BERSERKER;p = "怒り";break;
-               case CLASS_MIRROR_MASTER:   use_mind = MIND_MIRROR_MASTER;p = "鏡魔法";break;
-               case CLASS_NINJA:       use_mind = MIND_NINJUTSU;p = "精神";break;
-               default:                use_mind = 0;p = "超能力";break;
+               case CLASS_MINDCRAFTER: use_mind = MIND_MINDCRAFTER; p = "精神";break;
+               case CLASS_FORCETRAINER:          use_mind = MIND_KI; p = "気";break;
+               case CLASS_BERSERKER:   use_mind = MIND_BERSERKER; p = "怒り";break;
+               case CLASS_MIRROR_MASTER:   use_mind = MIND_MIRROR_MASTER; p = "鏡魔法";break;
+               case CLASS_NINJA:       use_mind = MIND_NINJUTSU; p = "精神";break;
+               default:                use_mind = 0 ;p = "超能力"; break;
        }
 #else
        switch(p_ptr->pclass)
        {
-               case CLASS_MINDCRAFTER: use_mind = MIND_MINDCRAFTER;break;
-               case CLASS_FORCETRAINER:          use_mind = MIND_KI;break;
-               case CLASS_BERSERKER:   use_mind = MIND_BERSERKER;break;
-               case CLASS_MIRROR_MASTER:   use_mind = MIND_MIRROR_MASTER;break;
-               case CLASS_NINJA:       use_mind = MIND_NINJUTSU;break;
-               default:                use_mind = 0;break;
+               case CLASS_MINDCRAFTER: use_mind = MIND_MINDCRAFTER; break;
+               case CLASS_FORCETRAINER:          use_mind = MIND_KI; break;
+               case CLASS_BERSERKER:   use_mind = MIND_BERSERKER; break;
+               case CLASS_MIRROR_MASTER:   use_mind = MIND_MIRROR_MASTER; break;
+               case CLASS_NINJA:       use_mind = MIND_NINJUTSU; break;
+               default:                use_mind = 0; break;
        }
 #endif
        spell = mind_powers[use_mind].info[n];
@@ -2136,7 +2049,6 @@ void do_cmd_mind(void)
                if ((p_ptr->csp - mana_cost) < 0) p_ptr->csp_frac = 0;
                p_ptr->csp = MAX(0, p_ptr->csp - mana_cost);
 
-               /* Message */
                msg_format(_("%sを集中しすぎて気を失ってしまった!", "You faint from the effort!"),p);
 
                /* Hack -- Bypass free action */
@@ -2147,18 +2059,13 @@ void do_cmd_mind(void)
                {
                        bool perm = (randint0(100) < 25);
 
-                       /* Message */
                        msg_print(_("自分の精神を攻撃してしまった!", "You have damaged your mind!"));
 
                        /* Reduce constitution */
                        (void)dec_stat(A_WIS, 15 + randint1(10), perm);
                }
        }
-
-       /* Redraw mana */
        p_ptr->redraw |= (PR_MANA);
-
-       /* Window stuff */
        p_ptr->window |= (PW_PLAYER);
        p_ptr->window |= (PW_SPELL);
 }