OSDN Git Service

Thrown torch's dice is changed
[hengband/hengband.git] / src / monster2.c
index 53866ef..fb10aa9 100644 (file)
@@ -1253,41 +1253,29 @@ static int mysqrt(int n)
 s16b get_mon_num(int level)
 {
        int                     i, j, p;
-
        int                     r_idx;
-
        long            value, total;
-
        monster_race    *r_ptr;
-
        alloc_entry             *table = alloc_race_table;
 
        int pls_kakuritu, pls_level;
-       int hoge=mysqrt(level*10000L);
+       int hoge = mysqrt(level*10000L);
 
        if (level > MAX_DEPTH - 1) level = MAX_DEPTH - 1;
 
-       if ((dungeon_turn > hoge*(TURNS_PER_TICK*500L)) && !level)
-       {
-               pls_kakuritu = MAX(2, NASTY_MON-((dungeon_turn/(TURNS_PER_TICK*2500L)-hoge/10)));
-               pls_level = MIN(8,3 + dungeon_turn/(TURNS_PER_TICK*20000L)-hoge/40);
-       }
-       else
-       {
-               pls_kakuritu = NASTY_MON;
-               pls_level = 2;
-       }
+       pls_kakuritu = MAX(NASTY_MON_MAX, NASTY_MON_BASE - ((dungeon_turn / (TURNS_PER_TICK * 2500L) - hoge / 10)));
+       pls_level    = MIN(NASTY_MON_PLUS_MAX, 3 + dungeon_turn / (TURNS_PER_TICK * 20000L) - hoge / 40 + MIN(5, level / 10)) ;
 
        if (d_info[dungeon_type].flags1 & DF1_MAZE)
        {
-               pls_kakuritu = MIN(pls_kakuritu/2, pls_kakuritu-10);
+               pls_kakuritu = MIN(pls_kakuritu / 2, pls_kakuritu - 10);
                if (pls_kakuritu < 2) pls_kakuritu = 2;
                pls_level += 2;
                level += 3;
        }
 
        /* Boost the level */
-       if ((level > 0) && !p_ptr->inside_battle && !(d_info[dungeon_type].flags1 & DF1_BEGINNER))
+       if (!p_ptr->inside_battle && !(d_info[dungeon_type].flags1 & DF1_BEGINNER))
        {
                /* Nightmare mode allows more out-of depth monsters */
                if (ironman_nightmare && !randint0(pls_kakuritu))
@@ -1301,25 +1289,11 @@ s16b get_mon_num(int level)
                        if (!randint0(pls_kakuritu))
                        {
                                /* Pick a level bonus */
-                               int d = MIN(5, level/10) + pls_level;
-
-                               /* Boost the level */
-                               level += d;
-                       }
-
-                       /* Occasional "nasty" monster */
-                       if (!randint0(pls_kakuritu))
-                       {
-                               /* Pick a level bonus */
-                               int d = MIN(5, level/10) + pls_level;
-
-                               /* Boost the level */
-                               level += d;
+                               level += pls_level;
                        }
                }
        }
 
-
        /* Reset total */
        total = 0L;
 
@@ -1371,7 +1345,6 @@ s16b get_mon_num(int level)
        /* No legal monsters */
        if (total <= 0) return (0);
 
-
        /* Pick a monster */
        value = randint0(total);
 
@@ -1385,7 +1358,6 @@ s16b get_mon_num(int level)
                value = value - table[i].prob3;
        }
 
-
        /* Power boost */
        p = randint0(100);
 
@@ -2392,7 +2364,7 @@ void update_mon(int m_idx, bool full)
 
                        /* Basic telepathy */
                        /* Snipers get telepathy when they concentrate deeper */
-                       else if ((p_ptr->telepathy) || (p_ptr->concent >= CONCENT_TELE_THRESHOLD))
+                       else if (p_ptr->telepathy)
                        {
                                /* Empty mind, no telepathy */
                                if (r_ptr->flags2 & (RF2_EMPTY_MIND))
@@ -2628,7 +2600,7 @@ void update_mon(int m_idx, bool full)
                        if (disturb_near && (projectable(m_ptr->fy, m_ptr->fx, py, px) && projectable(py, px, m_ptr->fy, m_ptr->fx)))
                        {
                                if (disturb_pets || is_hostile(m_ptr))
-                                       disturb(1, 0);
+                                       disturb(1, 1);
                        }
                }
        }
@@ -2653,7 +2625,7 @@ void update_mon(int m_idx, bool full)
                        if (do_disturb)
                        {
                                if (disturb_pets || is_hostile(m_ptr))
-                                       disturb(1, 0);
+                                       disturb(1, 1);
                        }
                }
        }
@@ -2672,7 +2644,7 @@ void update_mon(int m_idx, bool full)
                        if (do_disturb)
                        {
                                if (disturb_pets || is_hostile(m_ptr))
-                                       disturb(1, 0);
+                                       disturb(1, 1);
                        }
                }
        }
@@ -2690,7 +2662,7 @@ void update_mon(int m_idx, bool full)
                        if (do_disturb)
                        {
                                if (disturb_pets || is_hostile(m_ptr))
-                                       disturb(1, 0);
+                                       disturb(1, 1);
                        }
                }
        }
@@ -3397,7 +3369,7 @@ msg_print("
                        else
                        {
 #ifdef JP
-                               msg_format("s%¸÷¤ëʪ¤¬Æ¬¤ËÉ⤫¤ó¤À¡£", color);
+                               msg_format("%s¸÷¤ëʪ¤¬Æ¬¤ËÉ⤫¤ó¤À¡£", color);
 #else
                                msg_format("An %s image forms in your mind.");
 #endif
@@ -4142,19 +4114,16 @@ void message_pain(int m_idx, int dam)
 
        char m_name[80];
 
-
        /* Get the monster name */
        monster_desc(m_name, m_ptr, 0);
 
-       /* Notice non-damage */
-       if (dam == 0)
+       if(dam == 0) // Notice non-damage
        {
 #ifdef JP
                msg_format("%^s¤Ï¥À¥á¡¼¥¸¤ò¼õ¤±¤Æ¤¤¤Ê¤¤¡£", m_name);
 #else
                msg_format("%^s is unharmed.", m_name);
 #endif
-
                return;
        }
 
@@ -4164,678 +4133,302 @@ void message_pain(int m_idx, int dam)
        tmp = (newhp * 100L) / oldhp;
        percentage = (int)(tmp);
 
-
-       /* Mushrooms, Eyes, Jellies, Molds, Vortices, Worms, Quylthulgs */
-       if (my_strchr(",ejmvwQ", r_ptr->d_char))
+       if(my_strchr(",ejmvwQ", r_ptr->d_char)) // Mushrooms, Eyes, Jellies, Molds, Vortices, Worms, Quylthulgs
        {
 #ifdef JP
-               if (percentage > 95)
-                       msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s¤Ï½Ì¤³¤Þ¤Ã¤¿¡£", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s¤ÏÄˤߤ˿̤¨¤¿¡£", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
-               else
-                       msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ï½Ì¤³¤Þ¤Ã¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤ˿̤¨¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
 #else
-               if (percentage > 95)
-                       msg_format("%^s barely notices.", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s flinches.", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s squelches.", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s quivers in pain.", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s writhes about.", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s writhes in agony.", m_name);
-               else
-                       msg_format("%^s jerks limply.", m_name);
+               if(percentage > 95) msg_format("%^s barely notices.", m_name);
+               else if(percentage > 75) msg_format("%^s flinches.", m_name);
+               else if(percentage > 50) msg_format("%^s squelches.", m_name);
+               else if(percentage > 35) msg_format("%^s quivers in pain.", m_name);
+               else if(percentage > 20) msg_format("%^s writhes about.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s jerks limply.", m_name);
 #endif
-
        }
 
-
-       /* Fish */
-       else if (my_strchr("l", r_ptr->d_char))
+       else if(my_strchr("l", r_ptr->d_char)) // Fish
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s barely notices.", m_name);
-#endif
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s flinches.", m_name);
-#endif
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s hesitates.", m_name);
-#endif
-               else if (percentage > 35)
 #ifdef JP
-msg_format("%^s¤ÏÄˤߤ˿̤¨¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤ˿̤¨¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
 #else
-                       msg_format("%^s quivers in pain.", m_name);
-#endif
-               else if (percentage > 20)
+               if(percentage > 95) msg_format("%^s barely notices.", m_name);
+               else if(percentage > 75) msg_format("%^s flinches.", m_name);
+               else if(percentage > 50) msg_format("%^s hesitates.", m_name);
+               else if(percentage > 35) msg_format("%^s quivers in pain.", m_name);
+               else if(percentage > 20) msg_format("%^s writhes about.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s jerks limply.", m_name);
+#endif         
+       }
+
+       else if(my_strchr("g#+<>", r_ptr->d_char)) // Golems, Walls, Doors, Stairs
+       {       
 #ifdef JP
-msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÍëÌĤΤ褦¤ËËʤ¨¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤Ï¶ì¤·¤²¤ËËʤ¨¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤¯¤·¤ã¤¯¤·¤ã¤Ë¤Ê¤Ã¤¿¡£", m_name);
 #else
-                       msg_format("%^s writhes about.", m_name);
-#endif
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s writhes in agony.", m_name);
-#endif
-               else
-#ifdef JP
-msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s jerks limply.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 50) msg_format("%^s roars thunderously.", m_name);
+               else if(percentage > 35) msg_format("%^s rumbles.", m_name);
+               else if(percentage > 20) msg_format("%^s grunts.", m_name);
+               else if(percentage > 10) msg_format("%^s hesitates.", m_name);
+               else msg_format("%^s crumples.", m_name);
 #endif
        }
 
-
-       /* Golems, Walls, Doors, Stairs */
-       else if (my_strchr("g#+<>", r_ptr->d_char))
+       else if(my_strchr("JMR", r_ptr->d_char) || !isalpha(r_ptr->d_char)) // Snakes, Hydrae, Reptiles, Mimics
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s ignores the attack.", m_name);
-#endif
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-#else
-                       msg_format("%^s shrugs off the attack.", m_name);
-#endif
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤ÏÍëÌĤΤ褦¤ËËʤ¨¤¿¡£", m_name);
-#else
-                       msg_format("%^s roars thunderously.", m_name);
-#endif
-               else if (percentage > 35)
 #ifdef JP
-msg_format("%^s¤Ï¶ì¤·¤²¤ËËʤ¨¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¥·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÅܤäÆƬ¤ò¾å¤²¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÌÔÁ³¤È°Ò³Å¤·¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
 #else
-                       msg_format("%^s rumbles.", m_name);
-#endif
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s grunts.", m_name);
-#endif
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s hesitates.", m_name);
-#endif
-               else
-#ifdef JP
-msg_format("%^s¤Ï¤¯¤·¤ã¤¯¤·¤ã¤Ë¤Ê¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s crumples.", m_name);
+               if(percentage > 95) msg_format("%^s barely notices.", m_name);
+               else if(percentage > 75) msg_format("%^s hisses.", m_name);
+               else if(percentage > 50) msg_format("%^s rears up in anger.", m_name);
+               else if(percentage > 35) msg_format("%^s hisses furiously.", m_name);
+               else if(percentage > 20) msg_format("%^s writhes about.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s jerks limply.", m_name);
 #endif
        }
 
-
-       /* Snakes, Hydrae, Reptiles, Mimics */
-       else if (my_strchr("JMR", r_ptr->d_char) || !isalpha(r_ptr->d_char))
+       else if(my_strchr("f", r_ptr->d_char))
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%^s¤Ï¤Û¤È¤ó¤Éµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s barely notices.", m_name);
-#endif
-               else if (percentage > 75)
 #ifdef JP
-msg_format("%^s¤Ï¥·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤ÏËʤ¨¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÅܤäÆËʤ¨¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤǥ·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤ÏÄˤߤǼ塹¤·¤¯ÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤˤ¦¤á¤¤¤¿¡£", m_name);
+               else msg_format("%s¤Ï°¥¤ì¤ÊÌĤ­À¼¤ò½Ð¤·¤¿¡£", m_name);
 #else
-                       msg_format("%^s hisses.", m_name);
-#endif
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤ÏÅܤäÆƬ¤ò¾å¤²¤¿¡£", m_name);
-#else
-                       msg_format("%^s rears up in anger.", m_name);
-#endif
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤ÏÌÔÁ³¤È°Ò³Å¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s hisses furiously.", m_name);
-#endif
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤Ï¿È¤â¤À¤¨¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s writhes about.", m_name);
-#endif
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ï¶ìÄˤǿȤâ¤À¤¨¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s writhes in agony.", m_name);
-#endif
-               else
-#ifdef JP
-msg_format("%^s¤Ï¤°¤Ë¤ã¤°¤Ë¤ã¤ÈáÛÚ»¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s jerks limply.", m_name);
+               if(percentage > 95) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s roars.", m_name);
+               else if(percentage > 50) msg_format("%^s growls angrily.", m_name);
+               else if(percentage > 35) msg_format("%^s hisses with pain.", m_name);
+               else if(percentage > 20) msg_format("%^s mewls in pain.", m_name);
+               else if(percentage > 10) msg_format("%^s hisses in agony.", m_name);
+               else msg_format("%^s mewls pitifully.", m_name);
 #endif
        }
 
-
-       /* Felines */
-       else if (my_strchr("f", r_ptr->d_char))
+       else if(my_strchr("acFIKS", r_ptr->d_char)) // Ants, Centipedes, Flies, Insects, Beetles, Spiders
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-#else
-                       msg_format("%^s shrugs off the attack.", m_name);
-#endif
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%^s¤ÏËʤ¨¤¿¡£", m_name);
-#else
-                       msg_format("%^s roars.", m_name);
-#endif
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤ÏÅܤäÆËʤ¨¤¿¡£", m_name);
-#else
-                       msg_format("%^s growls angrily.", m_name);
-#endif
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤǥ·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s hisses with pain.", m_name);
-#endif
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤǼ塹¤·¤¯ÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s mewls in pain.", m_name);
-#endif
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ï¶ìÄˤˤ¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s hisses in agony.", m_name);
-#endif
-               else
 #ifdef JP
-msg_format("%s¤Ï°¥¤ì¤ÊÌĤ­À¼¤ò½Ð¤·¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¥­¡¼¥­¡¼ÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ï¥è¥í¥è¥íƨ¤²²ó¤Ã¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤Ï¤¦¤ë¤µ¤¯ÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤ÏÄˤߤËáÛÚ»¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤÇáÛÚ»¤·¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¥Ô¥¯¥Ô¥¯¤Ò¤­¤Ä¤Ã¤¿¡£", m_name);
 #else
-                       msg_format("%^s mewls pitifully.", m_name);
+               if(percentage > 95)     msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s chitters.", m_name);
+               else if(percentage > 50) msg_format("%^s scuttles about.", m_name);
+               else if(percentage > 35) msg_format("%^s twitters.", m_name);
+               else if(percentage > 20) msg_format("%^s jerks in pain.", m_name);
+               else if(percentage > 10) msg_format("%^s jerks in agony.", m_name);
+               else msg_format("%^s twitches.", m_name);
 #endif
        }
 
-
-       /* Ants, Centipedes, Flies, Insects, Beetles, Spiders */
-       else if (my_strchr("acFIKS", r_ptr->d_char))
-       {
-               if (percentage > 95)
+       else if(my_strchr("B", r_ptr->d_char)) // Birds
+       {               
 #ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¤µ¤¨¤º¤Ã¤¿¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¥Ô¡¼¥Ô¡¼ÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ï¥®¥ã¡¼¥®¥ã¡¼ÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤Ï¥®¥ã¡¼¥®¥ã¡¼ÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¶ì¤·¤ó¤À¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¤Î¤¿¤¦¤Á²ó¤Ã¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¥­¡¼¥­¡¼¤ÈÌĤ­¶«¤ó¤À¡£", m_name);
 #else
-                       msg_format("%^s ignores the attack.", m_name);
+               if(percentage > 95)     msg_format("%^s chirps.", m_name);
+               else if(percentage > 75) msg_format("%^s twitters.", m_name);
+               else if(percentage > 50) msg_format("%^s squawks.", m_name);
+               else if(percentage > 35) msg_format("%^s chatters.", m_name);
+               else if(percentage > 20) msg_format("%^s jeers.", m_name);
+               else if(percentage > 10) msg_format("%^s flutters about.", m_name);
+               else msg_format("%^s squeaks.", m_name);
 #endif
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%^s¤Ï¥­¡¼¥­¡¼ÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s chitters.", m_name);
-#endif
-
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤Ï¥è¥í¥è¥íƨ¤²²ó¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s scuttles about.", m_name);
-#endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤Ï¤¦¤ë¤µ¤¯ÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s twitters.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤËáÛÚ»¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s jerks in pain.", m_name);
-#endif
-
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ï¶ìÄˤÇáÛÚ»¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s jerks in agony.", m_name);
-#endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¥Ô¥¯¥Ô¥¯¤Ò¤­¤Ä¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s twitches.", m_name);
-#endif
-
        }
 
-
-       /* Birds */
-       else if (my_strchr("B", r_ptr->d_char))
-       {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%^s¤Ï¤µ¤¨¤º¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s chirps.", m_name);
-#endif
-
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%^s¤Ï¥Ô¡¼¥Ô¡¼ÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s twitters.", m_name);
-#endif
-
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤Ï¥®¥ã¡¼¥®¥ã¡¼ÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s squawks.", m_name);
-#endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤Ï¥®¥ã¡¼¥®¥ã¡¼ÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s chatters.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤Ï¶ì¤·¤ó¤À¡£", m_name);
-#else
-                       msg_format("%^s jeers.", m_name);
-#endif
-
-               else if (percentage > 10)
+       else if(my_strchr("duDLUW", r_ptr->d_char)) // Dragons, Demons, High Undead
+       {       
 #ifdef JP
-msg_format("%^s¤Ï¤Î¤¿¤¦¤Á²ó¤Ã¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÄˤߤǥ·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤ÏÄˤߤËËʤ¨¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ì¤·¤²¤Ë¶«¤ó¤À¡£", m_name);
+               else msg_format("%^s¤Ï¼å¡¹¤·¤¯¤¦¤Ê¤Ã¤¿¡£", m_name);
 #else
-                       msg_format("%^s flutters about.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s flinches.", m_name);
+               else if(percentage > 50) msg_format("%^s hisses in pain.", m_name);
+               else if(percentage > 35) msg_format("%^s snarls with pain.", m_name);
+               else if(percentage > 20) msg_format("%^s roars with pain.", m_name);
+               else if(percentage > 10) msg_format("%^s gasps.", m_name);
+               else msg_format("%^s snarls feebly.", m_name);
 #endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¥­¡¼¥­¡¼¤ÈÌĤ­¶«¤ó¤À¡£", m_name);
-#else
-                       msg_format("%^s squeaks.", m_name);
-#endif
-
        }
 
-
-       /* Dragons, Demons, High Undead */
-       else if (my_strchr("duDLUW", r_ptr->d_char))
+       else if(my_strchr("s", r_ptr->d_char)) // Skeletons
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s ignores the attack.", m_name);
-#endif
-
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%^s¤Ï¤·¤ê¹þ¤ß¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s flinches.", m_name);
-#endif
-
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤǥ·¡¼¥Ã¤ÈÌĤ¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s hisses in pain.", m_name);
-#endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s snarls with pain.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤ÏÄˤߤËËʤ¨¤¿¡£", m_name);
-#else
-                       msg_format("%^s roars with pain.", m_name);
-#endif
-
-               else if (percentage > 10)
 #ifdef JP
-msg_format("%^s¤Ï¶ì¤·¤²¤Ë¶«¤ó¤À¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ï¥«¥¿¥«¥¿¤È¾Ð¤Ã¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¥«¥¿¥«¥¿¸À¤Ã¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¥¬¥¿¥¬¥¿¸À¤Ã¤¿¡£", m_name);
 #else
-                       msg_format("%^s gasps.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 50) msg_format("%^s rattles.", m_name);
+               else if(percentage > 35) msg_format("%^s stumbles.", m_name);
+               else if(percentage > 20) msg_format("%^s rattles.", m_name);
+               else if(percentage > 10) msg_format("%^s staggers.", m_name);
+               else msg_format("%^s clatters.", m_name);
 #endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¼å¡¹¤·¤¯¤¦¤Ê¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s snarls feebly.", m_name);
-#endif
-
        }
 
-
-       /* Skeletons */
-       else if (my_strchr("s", r_ptr->d_char))
-       {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s ignores the attack.", m_name);
-#endif
-
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-#else
-                       msg_format("%^s shrugs off the attack.", m_name);
-#endif
-
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤Ï¥«¥¿¥«¥¿¤È¾Ð¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s rattles.", m_name);
-#endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s stumbles.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤Ï¥«¥¿¥«¥¿¸À¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s rattles.", m_name);
-#endif
-
-               else if (percentage > 10)
+       else if(my_strchr("z", r_ptr->d_char)) // Zombies
+       {               
 #ifdef JP
-msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%s¤Ï¶ì¤·¤²¤Ë¤¦¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¤¦¤Ê¤Ã¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
 #else
-                       msg_format("%^s staggers.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 50) msg_format("%^s groans.", m_name);
+               else if(percentage > 35) msg_format("%^s moans.", m_name);
+               else if(percentage > 20) msg_format("%^s hesitates.", m_name);
+               else if(percentage > 10) msg_format("%^s grunts.", m_name);
+               else msg_format("%^s staggers.", m_name);
 #endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¥¬¥¿¥¬¥¿¸À¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s clatters.", m_name);
-#endif
-
        }
 
-
-       /* Zombies */
-       else if (my_strchr("z", r_ptr->d_char))
+       else if(my_strchr("G", r_ptr->d_char)) // Ghosts
        {
-               if (percentage > 95)
 #ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               if(percentage > 95) msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤Ïµã¤­¤ï¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤ÏËʤ¨¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%s¤Ï¼å¡¹¤·¤¯¤¦¤á¤¤¤¿¡£", m_name);
+               else msg_format("%^s¤Ï¤«¤¹¤«¤Ë¤¦¤á¤¤¤¿¡£", m_name);
 #else
-                       msg_format("%^s ignores the attack.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 50)  msg_format("%^s moans.", m_name);
+               else if(percentage > 35) msg_format("%^s wails.", m_name);
+               else if(percentage > 20) msg_format("%^s howls.", m_name);
+               else if(percentage > 10) msg_format("%^s moans softly.", m_name);
+               else msg_format("%^s sighs.", m_name);
 #endif
-
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-#else
-                       msg_format("%^s shrugs off the attack.", m_name);
-#endif
-
-               else if (percentage > 50)
-#ifdef JP
-msg_format("%^s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s groans.", m_name);
-#endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%s¤Ï¶ì¤·¤²¤Ë¤¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s moans.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤Ïí´í°¤·¤¿¡£", m_name);
-#else
-                       msg_format("%^s hesitates.", m_name);
-#endif
-
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%^s¤Ï¤¦¤Ê¤Ã¤¿¡£", m_name);
-#else
-                       msg_format("%^s grunts.", m_name);
-#endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¤è¤í¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s staggers.", m_name);
-#endif
-
        }
 
-
-       /* Ghosts */
-       else if (my_strchr("G", r_ptr->d_char))
-
+       else if(my_strchr("CZ", r_ptr->d_char)) // Dogs and Hounds
        {
-               if (percentage > 95)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-#else
-                       msg_format("%^s ignores the attack.", m_name);
-#endif
-
-               else if (percentage > 75)
-#ifdef JP
-msg_format("%s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-#else
-                       msg_format("%^s shrugs off the attack.", m_name);
-#endif
-
-               else if (percentage > 50)
 #ifdef JP
-msg_format("%s¤Ï¤¦¤á¤¤¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÄˤߤǥ­¥ã¥ó¥­¥ã¥óËʤ¨¤¿¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤÇÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
+               else msg_format("%^s¤Ï¼å¡¹¤·¤¯Ëʤ¨¤¿¡£", m_name);
 #else
-                       msg_format("%^s moans.", m_name);
+               if(percentage > 95) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s snarls with pain.", m_name);
+               else if(percentage > 50) msg_format("%^s yelps in pain.", m_name);
+               else if(percentage > 35) msg_format("%^s howls in pain.", m_name);
+               else if(percentage > 20) msg_format("%^s howls in agony.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s yelps feebly.", m_name);
 #endif
-
-               else if (percentage > 35)
-#ifdef JP
-msg_format("%^s¤Ïµã¤­¤ï¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s wails.", m_name);
-#endif
-
-               else if (percentage > 20)
-#ifdef JP
-msg_format("%^s¤ÏËʤ¨¤¿¡£", m_name);
-#else
-                       msg_format("%^s howls.", m_name);
-#endif
-
-               else if (percentage > 10)
-#ifdef JP
-msg_format("%s¤Ï¼å¡¹¤·¤¯¤¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s moans softly.", m_name);
-#endif
-
-               else
-#ifdef JP
-msg_format("%^s¤Ï¤«¤¹¤«¤Ë¤¦¤á¤¤¤¿¡£", m_name);
-#else
-                       msg_format("%^s sighs.", m_name);
-#endif
-
        }
 
-
-       /* Dogs and Hounds */
-       else if (my_strchr("CZ", r_ptr->d_char))
+       else if(my_strchr("Xbilqrt", r_ptr->d_char)) // One type of creatures (ignore,squeal,shriek)
        {
 #ifdef JP
-               if (percentage > 95)
-                       msg_format("%^s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s¤ÏÄˤߤǥ­¥ã¥ó¥­¥ã¥óËʤ¨¤¿¡£", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s¤ÏÄˤߤÇÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÌĤ­¤ï¤á¤¤¤¿¡£", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
-               else
-                       msg_format("%^s¤Ï¼å¡¹¤·¤¯Ëʤ¨¤¿¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÄˤߤǶ«¤ó¤À¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤÇÀ䶫¤·¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÀ䶫¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
+               else msg_format("%^s¤Ï¼å¡¹¤·¤¯¶«¤ó¤À¡£", m_name);
 #else
-               if (percentage > 95)
-                       msg_format("%^s shrugs off the attack.", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s snarls with pain.", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s yelps in pain.", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s howls in pain.", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s howls in agony.", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s writhes in agony.", m_name);
-               else
-                       msg_format("%^s yelps feebly.", m_name);
+               if(percentage > 95) msg_format("%^s ignores the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s grunts with pain.", m_name);
+               else if(percentage > 50) msg_format("%^s squeals in pain.", m_name);
+               else if(percentage > 35) msg_format("%^s shrieks in pain.", m_name);
+               else if(percentage > 20) msg_format("%^s shrieks in agony.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s cries out feebly.", m_name);
 #endif
-
        }
 
-       /* One type of monsters (ignore,squeal,shriek) */
-       else if (my_strchr("Xbilqrt", r_ptr->d_char))
+       else // Another type of creatures (shrug,cry,scream)
        {
 #ifdef JP
-               if (percentage > 95)
-                       msg_format("%^s¤Ï¹¶·â¤òµ¤¤Ë¤È¤á¤Æ¤¤¤Ê¤¤¡£", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s¤ÏÄˤߤǶ«¤ó¤À¡£", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s¤ÏÄˤߤÇÀ䶫¤·¤¿¡£", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÀ䶫¤·¤¿¡£", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
-               else
-                       msg_format("%^s¤Ï¼å¡¹¤·¤¯¶«¤ó¤À¡£", m_name);
+               if(percentage > 95) msg_format("%^s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
+               else if(percentage > 75) msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
+               else if(percentage > 50) msg_format("%^s¤ÏÄˤߤǶ«¤ó¤À¡£", m_name);
+               else if(percentage > 35) msg_format("%^s¤ÏÄˤߤÇÀ䶫¤·¤¿¡£", m_name);
+               else if(percentage > 20) msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÀ䶫¤·¤¿¡£", m_name);
+               else if(percentage > 10) msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
+               else msg_format("%^s¤Ï¼å¡¹¤·¤¯¶«¤ó¤À¡£", m_name);
 #else
-               if (percentage > 95)
-                       msg_format("%^s ignores the attack.", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s grunts with pain.", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s squeals in pain.", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s shrieks in pain.", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s shrieks in agony.", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s writhes in agony.", m_name);
-               else
-                       msg_format("%^s cries out feebly.", m_name);
+               if(percentage > 95) msg_format("%^s shrugs off the attack.", m_name);
+               else if(percentage > 75) msg_format("%^s grunts with pain.", m_name);
+               else if(percentage > 50) msg_format("%^s cries out in pain.", m_name);
+               else if(percentage > 35) msg_format("%^s screams in pain.", m_name);
+               else if(percentage > 20) msg_format("%^s screams in agony.", m_name);
+               else if(percentage > 10) msg_format("%^s writhes in agony.", m_name);
+               else msg_format("%^s cries out feebly.", m_name);
 #endif
-
        }
+}
 
-       /* Another type of monsters (shrug,cry,scream) */
-       else
-       {
-#ifdef JP
-               if (percentage > 95)
-                       msg_format("%^s¤Ï¹¶·â¤Ë¸ª¤ò¤¹¤¯¤á¤¿¡£", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s¤ÏÄˤߤǤ¦¤Ê¤Ã¤¿¡£", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s¤ÏÄˤߤǶ«¤ó¤À¡£", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s¤ÏÄˤߤÇÀ䶫¤·¤¿¡£", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s¤Ï¶ìÄˤΤ¢¤Þ¤êÀ䶫¤·¤¿¡£", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s¤Ï¶ìÄˤǤâ¤À¤¨¶ì¤·¤ó¤À¡£", m_name);
-               else
-                       msg_format("%^s¤Ï¼å¡¹¤·¤¯¶«¤ó¤À¡£", m_name);
-#else
-               if (percentage > 95)
-                       msg_format("%^s shrugs off the attack.", m_name);
-               else if (percentage > 75)
-                       msg_format("%^s grunts with pain.", m_name);
-               else if (percentage > 50)
-                       msg_format("%^s cries out in pain.", m_name);
-               else if (percentage > 35)
-                       msg_format("%^s screams in pain.", m_name);
-               else if (percentage > 20)
-                       msg_format("%^s screams in agony.", m_name);
-               else if (percentage > 10)
-                       msg_format("%^s writhes in agony.", m_name);
-               else
-                       msg_format("%^s cries out feebly.", m_name);
-#endif
 
-       }
-}
 
 
 /*