OSDN Git Service

通常のセーブ/ロード時以外でc_ptr->mimicに0以外の値を代入する際に, 最
[hengbandforosx/hengbandosx.git] / src / spells1.c
index e950028..9d04757 100644 (file)
@@ -391,7 +391,7 @@ sint project_path(u16b *gp, int range, int y1, int x1, int y2, int x2, int flg)
                        if (flg & (PROJECT_STOP))
                        {
                                if ((n > 0) &&
-                                   ((y == py && x == px) || cave[y][x].m_idx != 0))
+                                   (player_bold(y, x) || cave[y][x].m_idx != 0))
                                        break;
                        }
 
@@ -476,7 +476,7 @@ sint project_path(u16b *gp, int range, int y1, int x1, int y2, int x2, int flg)
                        if (flg & (PROJECT_STOP))
                        {
                                if ((n > 0) &&
-                                   ((y == py && x == px) || cave[y][x].m_idx != 0))
+                                   (player_bold(y, x) || cave[y][x].m_idx != 0))
                                        break;
                        }
 
@@ -543,7 +543,7 @@ sint project_path(u16b *gp, int range, int y1, int x1, int y2, int x2, int flg)
                        if (flg & (PROJECT_STOP))
                        {
                                if ((n > 0) &&
-                                   ((y == py && x == px) || cave[y][x].m_idx != 0))
+                                   (player_bold(y, x) || cave[y][x].m_idx != 0))
                                        break;
                        }
 
@@ -1011,7 +1011,7 @@ msg_print("
                        if (!cave_naked_bold(y, x)) break;
 
                        /* Not on the player */
-                       if ((y == py) && (x == px)) break;
+                       if (player_bold(y, x)) break;
 
                        /* Create a closed door */
                        cave_set_feat(y, x, FEAT_DOOR_HEAD + 0x00);
@@ -1049,7 +1049,7 @@ msg_print("
                        if (!cave_naked_bold(y, x)) break;
 
                        /* Not on the player */
-                       if ((y == py) && (x == px)) break;
+                       if (player_bold(y, x)) break;
 
                        /* Create a closed door */
                        cave_set_feat(y, x, FEAT_TREES);
@@ -1070,11 +1070,11 @@ msg_print("
 
                        /* Create a glyph */
                        cave[y][x].info |= CAVE_OBJECT;
-                       cave[y][x].mimic = FEAT_GLYPH;
+                       cave[y][x].mimic = f_info[FEAT_GLYPH].mimic;
 
                        /* Notice */
                        note_spot(y, x);
-       
+
                        /* Redraw */
                        lite_spot(y, x);
 
@@ -1087,7 +1087,7 @@ msg_print("
                        if (!cave_naked_bold(y, x)) break;
 
                        /* Not on the player */
-                       if ((y == py) && (x == px)) break;
+                       if (player_bold(y, x)) break;
 
                        /* Place a trap */
                        cave_set_feat(y, x, FEAT_WALL_EXTRA);
@@ -1756,7 +1756,7 @@ static bool project_m(int who, int r, int y, int x, int dam, int typ , int flg)
        bool get_angry = FALSE;
 
        /* Polymorph setting (true or false) */
-       int do_poly = 0;
+       bool do_poly = FALSE;
 
        /* Teleport setting (max distance) */
        int do_dist = 0;
@@ -1791,11 +1791,7 @@ static bool project_m(int who, int r, int y, int x, int dam, int typ , int flg)
        cptr note = NULL;
 
        /* Assume a default death */
-#ifdef JP
-       cptr note_dies = "¤Ï»à¤ó¤À¡£";
-#else
-       cptr note_dies = " dies.";
-#endif
+       cptr note_dies = extract_note_dies(real_r_ptr(m_ptr));
 
        int ty = m_ptr->fy;
        int tx = m_ptr->fx;
@@ -1827,32 +1823,6 @@ static bool project_m(int who, int r, int y, int x, int dam, int typ , int flg)
 #endif
 
 
-       /* Some monsters get "destroyed" */
-       if (!monster_living(r_ptr))
-       {
-               int i;
-               bool explode = FALSE;
-
-               for (i = 0; i < 4; i++)
-               {
-                       if (r_ptr->blow[i].method == RBM_EXPLODE) explode = TRUE;
-               }
-
-               /* Special note at death */
-               if (explode)
-#ifdef JP
-note_dies = "¤ÏÇúȯ¤·¤ÆÊ´¡¹¤Ë¤Ê¤Ã¤¿¡£";
-#else
-                       note_dies = " explodes into tiny shreds.";
-#endif
-               else
-#ifdef JP
-note_dies = "¤òÅݤ·¤¿¡£";
-#else
-                       note_dies = " is destroyed.";
-#endif
-       }
-
        if (p_ptr->riding && (c_ptr->m_idx == p_ptr->riding)) disturb(1, 0);
 
        /* Analyze the damage type */
@@ -1862,7 +1832,8 @@ note_dies = "
                case GF_MISSILE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1870,7 +1841,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -1880,7 +1851,8 @@ note_dies = "
                case GF_ACID:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1888,10 +1860,10 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_IM_ACID))
+                       if (r_ptr->flagsr & RFR_IM_ACID)
                        {
 #ifdef JP
 note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1900,7 +1872,7 @@ note = "
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_ACID);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_ACID);
                        }
                        break;
                }
@@ -1909,7 +1881,8 @@ note = "
                case GF_ELEC:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1917,10 +1890,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_IM_ELEC))
+                       if (r_ptr->flagsr & RFR_IM_ELEC)
                        {
 #ifdef JP
 note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1929,7 +1902,7 @@ note = "
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_ELEC);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_ELEC);
                        }
                        break;
                }
@@ -1938,7 +1911,8 @@ note = "
                case GF_FIRE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1946,10 +1920,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_IM_FIRE))
+                       if (r_ptr->flagsr & RFR_IM_FIRE)
                        {
 #ifdef JP
 note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1958,7 +1932,7 @@ note = "
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_FIRE);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_FIRE);
                        }
                        else if (r_ptr->flags3 & (RF3_HURT_FIRE))
                        {
@@ -1969,7 +1943,7 @@ note = "
 #endif
 
                                dam *= 2;
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_FIRE);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_FIRE);
                        }
                        break;
                }
@@ -1978,7 +1952,8 @@ note = "
                case GF_COLD:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1986,10 +1961,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_IM_COLD))
+                       if (r_ptr->flagsr & RFR_IM_COLD)
                        {
 #ifdef JP
 note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -1998,7 +1973,7 @@ note = "
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_COLD);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_COLD);
                        }
                        else if (r_ptr->flags3 & (RF3_HURT_COLD))
                        {
@@ -2009,7 +1984,7 @@ note = "
 #endif
 
                                dam *= 2;
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_COLD);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_COLD);
                        }
                        break;
                }
@@ -2018,7 +1993,8 @@ note = "
                case GF_POIS:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2026,10 +2002,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_IM_POIS)
+                       if (r_ptr->flagsr & RFR_IM_POIS)
                        {
 #ifdef JP
 note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2038,7 +2014,7 @@ note = "
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_POIS);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_POIS);
                        }
                        break;
                }
@@ -2048,7 +2024,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2056,10 +2032,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_IM_POIS)
+                       if (r_ptr->flagsr & RFR_IM_POIS)
                        {
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
@@ -2068,7 +2044,7 @@ note = "
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_POIS);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_POIS);
                        }
                        else if (one_in_(3)) do_poly = TRUE;
                        break;
@@ -2078,7 +2054,8 @@ note = "
                case GF_HELL_FIRE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2086,7 +2063,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags3 & RF3_GOOD)
@@ -2098,7 +2075,7 @@ note = "
                                note = " is hit hard.";
 #endif
 
-                               if (seen) r_ptr->r_flags3 |= (RF3_GOOD);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_GOOD);
                        }
                        break;
                }
@@ -2107,7 +2084,8 @@ note = "
                case GF_HOLY_FIRE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2115,7 +2093,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags3 & RF3_GOOD)
@@ -2127,7 +2105,7 @@ note = "
                                note = " is immune.";
 #endif
 
-                               if (seen) r_ptr->r_flags3 |= RF3_GOOD;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= RF3_GOOD;
                        }
                        else if (r_ptr->flags3 & RF3_EVIL)
                        {
@@ -2138,7 +2116,7 @@ note = "
                                note = " is hit hard.";
 #endif
 
-                               if (seen) r_ptr->r_flags3 |= RF3_EVIL;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= RF3_EVIL;
                        }
                        else
                        {
@@ -2157,7 +2135,8 @@ note = "
                case GF_ARROW:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2165,7 +2144,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -2175,7 +2154,8 @@ note = "
                case GF_PLASMA:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2183,10 +2163,10 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_RES_PLAS)
+                       if (r_ptr->flagsr & RFR_RES_PLAS)
                        {
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
@@ -2195,8 +2175,7 @@ note = "
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
-                               if (seen)
-                                       r_ptr->r_flags3 |= (RF3_RES_PLAS);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_PLAS);
                        }
                        break;
                }
@@ -2205,7 +2184,8 @@ note = "
                case GF_NETHER:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2213,42 +2193,44 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_UNDEAD)
+                       if (r_ptr->flagsr & RFR_RES_NETH)
                        {
+                               if (r_ptr->flags3 & RF3_UNDEAD)
+                               {
 #ifdef JP
-note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡£";
+                                       note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡£";
 #else
-                               note = " is immune.";
+                                       note = " is immune.";
 #endif
 
-                               dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
-                       }
-                       else if (r_ptr->flags3 & RF3_RES_NETH)
-                       {
+                                       dam = 0;
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                               }
+                               else
+                               {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                                       note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
-                               note = " resists.";
+                                       note = " resists.";
 #endif
 
-                               dam *= 3; dam /= randint1(6) + 6;
-
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_NETH);
+                                       dam *= 3; dam /= randint1(6) + 6;
+                               }
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_NETH);
                        }
                        else if (r_ptr->flags3 & RF3_EVIL)
                        {
                                dam /= 2;
 #ifdef JP
-note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
+                               note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
 #else
                                note = " resists somewhat.";
 #endif
 
-                               if (seen) r_ptr->r_flags3 |= (RF3_EVIL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_EVIL);
                        }
                        break;
                }
@@ -2257,7 +2239,8 @@ note = "
                case GF_WATER:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2265,29 +2248,32 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (m_ptr->r_idx == MON_WATER_ELEM || m_ptr->r_idx == MON_UNMAKER)
+                       if (r_ptr->flagsr & RFR_RES_WATE)
                        {
+                               if ((m_ptr->r_idx == MON_WATER_ELEM) || (m_ptr->r_idx == MON_UNMAKER))
+                               {
 #ifdef JP
-note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡£";
+                                       note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡£";
 #else
-                               note = " is immune.";
+                                       note = " is immune.";
 #endif
 
-                               dam = 0;
-                       }
-                       else if (r_ptr->flags3 & RF3_RES_WATE)
-                       {
+                                       dam = 0;
+                               }
+                               else
+                               {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                                       note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
-                               note = " resists.";
+                                       note = " resists.";
 #endif
 
-                               dam *= 3; dam /= randint1(6) + 6;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_WATE);
+                                       dam *= 3; dam /= randint1(6) + 6;
+                               }
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_WATE);
                        }
                        break;
                }
@@ -2296,7 +2282,8 @@ note = "
                case GF_CHAOS:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2304,23 +2291,35 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       do_poly = TRUE;
-                       do_conf = (5 + randint1(11) + r) / (r + 1);
-                       if ((r_ptr->flags4 & RF4_BR_CHAO) ||
-                           (m_ptr->r_idx == MON_STORMBRINGER) ||
-                           ((r_ptr->flags3 & RF3_DEMON) && one_in_(3)))
+                       if (r_ptr->flagsr & RFR_RES_CHAO)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
-                               do_poly = FALSE;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_CHAO);
+                       }
+                       else if ((r_ptr->flags3 & RF3_DEMON) && one_in_(3))
+                       {
+#ifdef JP
+                               note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
+#else
+                               note = " resists somewhat.";
+#endif
+
+                               dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_DEMON);
+                       }
+                       else
+                       {
+                               do_poly = TRUE;
+                               do_conf = (5 + randint1(11) + r) / (r + 1);
                        }
                        break;
                }
@@ -2329,7 +2328,8 @@ note = "
                case GF_SHARDS:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2337,18 +2337,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags4 & RF4_BR_SHAR)
+                       if (r_ptr->flagsr & RFR_RES_SHAR)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_SHAR);
                        }
                        break;
                }
@@ -2358,7 +2359,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2366,18 +2367,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags4 & RF4_BR_SHAR)
+                       if (r_ptr->flagsr & RFR_RES_SHAR)
                        {
 #ifdef JP
-note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
+                               note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
 #else
                                note = " resists somewhat.";
 #endif
 
                                dam /= 2;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_SHAR);
                        }
                        break;
                }
@@ -2387,7 +2389,8 @@ note = "
                case GF_SOUND:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2395,20 +2398,21 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       do_stun = (10 + randint1(15) + r) / (r + 1);
-                       if (r_ptr->flags4 & RF4_BR_SOUN)
+                       if (r_ptr->flagsr & RFR_RES_SOUN)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 2; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_SOUN);
                        }
+                       else do_stun = (10 + randint1(15) + r) / (r + 1);
                        break;
                }
 
@@ -2416,7 +2420,8 @@ note = "
                case GF_CONFUSION:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2424,30 +2429,21 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       do_conf = (10 + randint1(15) + r) / (r + 1);
-                       if (r_ptr->flags4 & RF4_BR_CONF)
+                       if (r_ptr->flags3 & RF3_NO_CONF)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
-                               dam *= 2; dam /= randint1(6) + 6;
-                       }
-                       else if (r_ptr->flags3 & RF3_NO_CONF)
-                       {
-#ifdef JP
-note = "¤Ï¤¤¤¯¤é¤«ÂÑÀ­¤ò¼¨¤·¤¿¡£";
-#else
-                               note = " resists somewhat.";
-#endif
-
-                               dam /= 2;
+                               dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                        }
+                       else do_conf = (10 + randint1(15) + r) / (r + 1);
                        break;
                }
 
@@ -2455,7 +2451,8 @@ note = "
                case GF_DISENCHANT:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2463,19 +2460,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_RES_DISE)
+                       if (r_ptr->flagsr & RFR_RES_DISE)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_DISE);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_DISE);
                        }
                        break;
                }
@@ -2484,7 +2481,8 @@ note = "
                case GF_NEXUS:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2492,19 +2490,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & RF3_RES_NEXU)
+                       if (r_ptr->flagsr & RFR_RES_NEXU)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_NEXU);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_NEXU);
                        }
                        break;
                }
@@ -2513,7 +2511,8 @@ note = "
                case GF_FORCE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2521,20 +2520,21 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       do_stun = (randint1(15) + r) / (r + 1);
-                       if (r_ptr->flags4 & RF4_BR_WALL)
+                       if (r_ptr->flagsr & RFR_RES_WALL)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_WALL);
                        }
+                       else do_stun = (randint1(15) + r) / (r + 1);
                        break;
                }
 
@@ -2542,7 +2542,8 @@ note = "
                case GF_INERTIA:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2550,18 +2551,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags4 & (RF4_BR_INER))
+                       if (r_ptr->flagsr & RFR_RES_INER)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_INER);
                        }
                        else
                        {
@@ -2577,7 +2579,7 @@ note = "
                                        if (!m_ptr->slow)
                                        {
 #ifdef JP
-note = "¤ÎÆ°¤­¤¬ÃÙ¤¯¤Ê¤Ã¤¿¡£";
+                                               note = "¤ÎÆ°¤­¤¬ÃÙ¤¯¤Ê¤Ã¤¿¡£";
 #else
                                                note = " starts moving slower.";
 #endif
@@ -2594,7 +2596,8 @@ note = "
                case GF_TIME:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2602,20 +2605,21 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags4 & (RF4_BR_TIME))
+                       if (r_ptr->flagsr & RFR_RES_TIME)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_TIME);
                        }
-                       else do_time = (dam+1)/2;
+                       else do_time = (dam + 1) / 2;
                        break;
                }
 
@@ -2626,7 +2630,7 @@ note = "
 
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2634,14 +2638,14 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_RES_TELE))
+                       if (r_ptr->flagsr & RFR_RES_TELE)
                        {
                                if (r_ptr->flags1 & (RF1_UNIQUE))
                                {
-                                       if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
 #else
@@ -2652,7 +2656,7 @@ note = "
                                }
                                else if (r_ptr->level > randint1(100))
                                {
-                                       if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
@@ -2667,16 +2671,17 @@ note = "
                        else do_dist = 0;
                        if (p_ptr->riding && (c_ptr->m_idx == p_ptr->riding)) do_dist = 0;
 
-                       if (r_ptr->flags4 & (RF4_BR_GRAV))
+                       if (r_ptr->flagsr & RFR_RES_GRAV)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 3; dam /= randint1(6) + 6;
                                do_dist = 0;
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_GRAV);
                        }
                        else
                        {
@@ -2714,7 +2719,7 @@ note = "
                                        do_stun = 0;
                                        /* No obvious effect */
 #ifdef JP
-note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
+                                       note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
 #else
                                        note = " is unaffected!";
 #endif
@@ -2731,7 +2736,8 @@ note = "
                case GF_SUPER_RAY:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2739,7 +2745,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -2750,7 +2756,8 @@ note = "
                case GF_DISINTEGRATE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2758,12 +2765,12 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags3 & RF3_HURT_ROCK)
                        {
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_ROCK);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_ROCK);
 #ifdef JP
 note = "¤ÎÈéÉ椬¤¿¤À¤ì¤¿¡ª";
 note_dies = "¤Ï¾øȯ¤·¤¿¡ª";
@@ -2793,7 +2800,7 @@ note_dies = "
                                break;
                        }
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2801,28 +2808,27 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags2 & RF2_EMPTY_MIND)
                        {
                                dam = 0;
 #ifdef JP
-note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
+                               note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
                                note = " is immune!";
 #endif
-                               if (seen) r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
 
                        }
-                       else if ((r_ptr->flags2 & RF2_STUPID) ||
-                                               (r_ptr->flags2 & RF2_WEIRD_MIND) ||
-                                               (r_ptr->flags3 & RF3_ANIMAL) ||
-                                               (r_ptr->level > randint1(3 * dam)))
+                       else if ((r_ptr->flags2 & (RF2_STUPID | RF2_WEIRD_MIND)) ||
+                                (r_ptr->flags3 & RF3_ANIMAL) ||
+                                (r_ptr->level > randint1(3 * dam)))
                        {
                                dam /= 3;
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
@@ -2832,15 +2838,13 @@ note = "
                                 * Powerful demons & undead can turn a mindcrafter's
                                 * attacks back on them
                                 */
-                               if (((r_ptr->flags3 & RF3_UNDEAD) ||
-                                         (r_ptr->flags3 & RF3_DEMON)) &&
-                                         (r_ptr->level > p_ptr->lev / 2) &&
-                                         one_in_(2))
+                               if ((r_ptr->flags3 & (RF3_UNDEAD | RF3_DEMON)) &&
+                                   (r_ptr->level > p_ptr->lev / 2) &&
+                                   one_in_(2))
                                {
                                        note = NULL;
 #ifdef JP
-msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª",
-    m_name);
+                                       msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª", m_name);
 #else
                                        msg_format("%^s%s corrupted mind backlashes your attack!",
                                            m_name, (seen ? "'s" : "s"));
@@ -2850,7 +2854,7 @@ msg_format("%^s
                                        if (randint0(100 + r_ptr->level/2) < p_ptr->skill_sav)
                                        {
 #ifdef JP
-msg_print("¤·¤«¤·¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
+                                               msg_print("¤·¤«¤·¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
 #else
                                                msg_print("You resist the effects!");
 #endif
@@ -2875,7 +2879,7 @@ msg_print("
                                                                {
                                                                        if (r_ptr->flags3 & RF3_NO_FEAR)
 #ifdef JP
-note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
+                                                                               note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
 #else
                                                                                note = " is unaffected.";
 #endif
@@ -2910,7 +2914,7 @@ note = "
                                                break;
                                        default:
 #ifdef JP
-note = "¤Ï̲¤ê¹þ¤ó¤Ç¤·¤Þ¤Ã¤¿¡ª";
+                                               note = "¤Ï̲¤ê¹þ¤ó¤Ç¤·¤Þ¤Ã¤¿¡ª";
 #else
                                                note = " falls asleep!";
 #endif
@@ -2921,7 +2925,7 @@ note = "
                        }
 
 #ifdef JP
-note_dies = "¤ÎÀº¿À¤ÏÊø²õ¤·¡¢ÆùÂΤÏÈ´¤±³Ì¤È¤Ê¤Ã¤¿¡£";
+                       note_dies = "¤ÎÀº¿À¤ÏÊø²õ¤·¡¢ÆùÂΤÏÈ´¤±³Ì¤È¤Ê¤Ã¤¿¡£";
 #else
                        note_dies = " collapses, a mindless husk.";
 #endif
@@ -2932,7 +2936,8 @@ note_dies = "
                case GF_PSI_DRAIN:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -2940,27 +2945,26 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags2 & RF2_EMPTY_MIND)
                        {
                                dam = 0;
 #ifdef JP
-note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
+                               note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
                                note = " is immune!";
 #endif
 
                        }
-                       else if ((r_ptr->flags2 & RF2_STUPID) ||
-                                (r_ptr->flags2 & RF2_WEIRD_MIND) ||
-                                (r_ptr->flags3 & RF3_ANIMAL) ||
-                                               (r_ptr->level > randint1(3 * dam)))
+                       else if ((r_ptr->flags2 & (RF2_STUPID | RF2_WEIRD_MIND)) ||
+                                (r_ptr->flags3 & RF3_ANIMAL) ||
+                                (r_ptr->level > randint1(3 * dam)))
                        {
                                dam /= 3;
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists.";
 #endif
@@ -2970,15 +2974,13 @@ note = "
                                 * Powerful demons & undead can turn a mindcrafter's
                                 * attacks back on them
                                 */
-                               if (((r_ptr->flags3 & RF3_UNDEAD) ||
-                                    (r_ptr->flags3 & RF3_DEMON)) &&
+                               if ((r_ptr->flags3 & (RF3_UNDEAD | RF3_DEMON)) &&
                                     (r_ptr->level > p_ptr->lev / 2) &&
                                     (one_in_(2)))
                                {
                                        note = NULL;
 #ifdef JP
-msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª",
-    m_name);
+                                       msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª", m_name);
 #else
                                        msg_format("%^s%s corrupted mind backlashes your attack!",
                                            m_name, (seen ? "'s" : "s"));
@@ -2988,7 +2990,7 @@ msg_format("%^s
                                        if (randint0(100 + r_ptr->level/2) < p_ptr->skill_sav)
                                        {
 #ifdef JP
-msg_print("¤¢¤Ê¤¿¤Ï¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
+                                               msg_print("¤¢¤Ê¤¿¤Ï¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
 #else
                                                msg_print("You resist the effects!");
 #endif
@@ -2999,7 +3001,7 @@ msg_print("
                                                /* Injure + mana drain */
                                                monster_desc(killer, m_ptr, MD_IGNORE_HALLU | MD_ASSUME_VISIBLE | MD_INDEF_VISIBLE);
 #ifdef JP
-msg_print("ĶǽÎϥѥ¤òµÛ¤¤¤È¤é¤ì¤¿¡ª");
+                                               msg_print("ĶǽÎϥѥ¤òµÛ¤¤¤È¤é¤ì¤¿¡ª");
 #else
                                                msg_print("Your psychic energy is drained!");
 #endif
@@ -3017,8 +3019,7 @@ msg_print("Ķǽ
                        {
                                int b = damroll(5, dam) / 4;
 #ifdef JP
-msg_format("¤¢¤Ê¤¿¤Ï%s¤Î¶ìÄˤòĶǽÎϥѥ¤ËÊÑ´¹¤·¤¿¡ª",
-    m_name);
+                               msg_format("¤¢¤Ê¤¿¤Ï%s¤Î¶ìÄˤòĶǽÎϥѥ¤ËÊÑ´¹¤·¤¿¡ª", m_name);
 #else
                                msg_format("You convert %s%s pain into psychic energy!",
                                    m_name, (seen ? "'s" : "s"));
@@ -3031,7 +3032,7 @@ msg_format("
                        }
 
 #ifdef JP
-note_dies = "¤ÎÀº¿À¤ÏÊø²õ¤·¡¢ÆùÂΤÏÈ´¤±³Ì¤È¤Ê¤Ã¤¿¡£";
+                       note_dies = "¤ÎÀº¿À¤ÏÊø²õ¤·¡¢ÆùÂΤÏÈ´¤±³Ì¤È¤Ê¤Ã¤¿¡£";
 #else
                        note_dies = " collapses, a mindless husk.";
 #endif
@@ -3042,7 +3043,8 @@ note_dies = "
                case GF_TELEKINESIS:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3050,7 +3052,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (one_in_(4))
@@ -3078,7 +3080,8 @@ note_dies = "
                case GF_PSY_SPEAR:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3086,7 +3089,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -3096,7 +3099,8 @@ note_dies = "
                case GF_METEOR:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3104,7 +3108,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -3113,9 +3117,10 @@ note_dies = "
                case GF_DOMINATION:
                {
                        if (!is_hostile(m_ptr)) break;
+
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3123,19 +3128,18 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Attempt a saving throw */
-                       if ((r_ptr->flags1 & RF1_UNIQUE) ||
-                           (r_ptr->flags1 & RF1_QUESTOR) ||
+                       if ((r_ptr->flags1 & (RF1_UNIQUE | RF1_QUESTOR)) ||
                            (r_ptr->flags3 & RF3_NO_CONF) ||
                            (r_ptr->level > randint1((dam - 10) < 1 ? 1 : (dam - 10)) + 10))
                        {
                                /* Memorize a flag */
                                if (r_ptr->flags3 & RF3_NO_CONF)
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 
                                /* Resist */
@@ -3145,15 +3149,13 @@ note_dies = "
                                 * Powerful demons & undead can turn a mindcrafter's
                                 * attacks back on them
                                 */
-                               if (((r_ptr->flags3 & RF3_UNDEAD) ||
-                                    (r_ptr->flags3 & RF3_DEMON)) &&
-                                    (r_ptr->level > p_ptr->lev / 2) &&
-                                    (one_in_(2)))
+                               if ((r_ptr->flags3 & (RF3_UNDEAD | RF3_DEMON)) &&
+                                   (r_ptr->level > p_ptr->lev / 2) &&
+                                   (one_in_(2)))
                                {
                                        note = NULL;
 #ifdef JP
-msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª",
-    m_name);
+                                       msg_format("%^s¤ÎÂÄÍ¤¿Àº¿À¤Ï¹¶·â¤òÄ·¤ÍÊÖ¤·¤¿¡ª", m_name);
 #else
                                        msg_format("%^s%s corrupted mind backlashes your attack!",
                                            m_name, (seen ? "'s" : "s"));
@@ -3163,7 +3165,7 @@ msg_format("%^s
                                        if (randint0(100 + r_ptr->level/2) < p_ptr->skill_sav)
                                        {
 #ifdef JP
-msg_print("¤·¤«¤·¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
+                                               msg_print("¤·¤«¤·¸úÎϤòÄ·¤ÍÊÖ¤·¤¿¡ª");
 #else
                                                msg_print("You resist the effects!");
 #endif
@@ -3184,7 +3186,7 @@ msg_print("
                                                        {
                                                                if (r_ptr->flags3 & RF3_NO_FEAR)
 #ifdef JP
-note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
+                                                                       note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
 #else
                                                                        note = " is unaffected.";
 #endif
@@ -3246,7 +3248,8 @@ note = "
                case GF_ICE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3254,31 +3257,31 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        do_stun = (randint1(15) + 1) / (r + 1);
-                       if (r_ptr->flags3 & RF3_IM_COLD)
+                       if (r_ptr->flagsr & RFR_IM_COLD)
                        {
 #ifdef JP
-note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡£";
+                               note = "¤Ë¤Ï¤«¤Ê¤êÂÑÀ­¤¬¤¢¤ë¡£";
 #else
                                note = " resists a lot.";
 #endif
 
                                dam /= 9;
-                               if (seen) r_ptr->r_flags3 |= (RF3_IM_COLD);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_IM_COLD);
                        }
                        else if (r_ptr->flags3 & (RF3_HURT_COLD))
                        {
 #ifdef JP
-note = "¤Ï¤Ò¤É¤¤Ä˼ê¤ò¤¦¤±¤¿¡£";
+                               note = "¤Ï¤Ò¤É¤¤Ä˼ê¤ò¤¦¤±¤¿¡£";
 #else
                                note = " is hit hard.";
 #endif
 
                                dam *= 2;
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_COLD);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_COLD);
                        }
                        break;
                }
@@ -3289,7 +3292,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3297,19 +3300,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (!monster_living(r_ptr))
                        {
-                               if (r_ptr->flags3 & RF3_UNDEAD)
-                               {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
-                               }
-
-                               if (r_ptr->flags3 & (RF3_DEMON))
+                               if (seen)
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_DEMON);
+                                       if (is_original_ap(m_ptr))
+                                       {
+                                               if (r_ptr->flags3 & RF3_DEMON) r_ptr->r_flags3 |= (RF3_DEMON);
+                                               if (r_ptr->flags3 & RF3_UNDEAD) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                                               if (r_ptr->flags3 & RF3_NONLIVING) r_ptr->r_flags3 |= (RF3_NONLIVING);
+                                       }
                                }
 
 #ifdef JP
@@ -3331,7 +3334,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -3339,15 +3342,19 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if ((r_ptr->flags3 & RF3_UNDEAD) ||
-                           (r_ptr->flags3 & RF3_NONLIVING))
+                       if (!monster_living(r_ptr))
                        {
-                               if (r_ptr->flags3 & RF3_UNDEAD)
+                               if (seen)
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                                       if (is_original_ap(m_ptr))
+                                       {
+                                               if (r_ptr->flags3 & RF3_DEMON) r_ptr->r_flags3 |= (RF3_DEMON);
+                                               if (r_ptr->flags3 & RF3_UNDEAD) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                                               if (r_ptr->flags3 & RF3_NONLIVING) r_ptr->r_flags3 |= (RF3_NONLIVING);
+                                       }
                                }
 
 #ifdef JP
@@ -3382,7 +3389,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3390,7 +3397,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Attempt to polymorph (see below) */
@@ -3463,6 +3470,8 @@ note = "
                        /* Wake up */
                        m_ptr->csleep = 0;
 
+                       if (r_ptr->flags7 & RF7_HAS_LD_MASK) p_ptr->update |= (PU_MON_LITE);
+
                        if (m_ptr->maxhp < m_ptr->max_maxhp)
                        {
 #ifdef JP
@@ -3481,6 +3490,8 @@ msg_format("%^s
                        /* Wake up */
                        m_ptr->csleep = 0;
 
+                       if (r_ptr->flags7 & RF7_HAS_LD_MASK) p_ptr->update |= (PU_MON_LITE);
+
                        if (m_ptr->stunned)
                        {
 #ifdef JP
@@ -3592,7 +3603,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3600,7 +3611,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Powerful monsters can resist */
@@ -3644,7 +3655,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3652,7 +3663,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Attempt a saving throw */
@@ -3663,7 +3674,7 @@ note = "
                                /* Memorize a flag */
                                if (r_ptr->flags3 & RF3_NO_SLEEP)
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_NO_SLEEP);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_SLEEP);
                                }
 
                                /* No obvious effect */
@@ -3698,7 +3709,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3706,7 +3717,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Attempt a saving throw */
@@ -3744,7 +3755,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3752,7 +3763,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Attempt a saving throw */
@@ -3803,7 +3814,7 @@ note = "
 
                        if (seen) obvious = TRUE;
 
-                       if ((r_ptr->flags3 & (RF3_RES_ALL)) || p_ptr->inside_arena)
+                       if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3811,7 +3822,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -3827,7 +3838,7 @@ note = "
                                /* Memorize a flag */
                                if (r_ptr->flags3 & RF3_NO_CONF)
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 
                                /* Resist */
@@ -3890,7 +3901,7 @@ note = "
                                dam -= p_ptr->virtues[vir-1]/20;
                        }
 
-                       if ((r_ptr->flags3 & (RF3_RES_ALL)) || p_ptr->inside_arena)
+                       if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3898,7 +3909,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -3965,7 +3976,7 @@ note = "
                                dam -= p_ptr->virtues[vir-1]/20;
                        }
 
-                       if ((r_ptr->flags3 & (RF3_RES_ALL)) || p_ptr->inside_arena)
+                       if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -3973,7 +3984,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -4041,7 +4052,7 @@ note = "
                                dam -= p_ptr->virtues[vir-1]/20;
                        }
 
-                       if ((r_ptr->flags3 & (RF3_RES_ALL)) || p_ptr->inside_arena)
+                       if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -4049,7 +4060,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -4066,7 +4077,7 @@ note = "
                                /* Memorize a flag */
                                if (r_ptr->flags3 & (RF3_NO_CONF))
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 
                                /* Resist */
@@ -4137,7 +4148,7 @@ msg_format("%s
 #else
                        msg_format("You stare into %s.", m_name);
 #endif
-                       if ((r_ptr->flags3 & (RF3_RES_ALL)) || p_ptr->inside_arena)
+                       if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -4145,7 +4156,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -4155,7 +4166,7 @@ msg_format("%s
                        /* Attempt a saving throw */
                        if ((r_ptr->flags1 & (RF1_QUESTOR)) ||
                            (m_ptr->mflag2 & MFLAG2_NOPET) ||
-                                (r_ptr->flags3 & (RF3_DEMON | RF3_UNDEAD | RF3_NONLIVING)) ||
+                                !monster_living(r_ptr) ||
                                 ((r_ptr->level+10) > randint1(dam)))
                        {
                                /* Resist */
@@ -4203,7 +4214,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -4211,7 +4222,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        /* Get confused later */
@@ -4225,7 +4236,7 @@ note = "
                                /* Memorize a flag */
                                if (r_ptr->flags3 & (RF3_NO_CONF))
                                {
-                                       if (seen) r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 
                                /* Resist */
@@ -4250,7 +4261,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -4258,7 +4269,7 @@ note = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        do_stun = damroll((caster_lev / 10) + 3 , (dam)) + 1;
@@ -4296,7 +4307,7 @@ note = "
                                skipped = TRUE;
                                break;
                        }
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                dam = 0;
                                break;
@@ -4304,11 +4315,14 @@ note = "
                        /* Hurt by light */
                        if (r_ptr->flags3 & (RF3_HURT_LITE))
                        {
-                               /* Obvious effect */
-                               if (seen) obvious = TRUE;
+                               if (seen)
+                               {
+                                       /* Obvious effect */
+                                       obvious = TRUE;
 
-                               /* Memorize the effects */
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_LITE);
+                                       /* Memorize the effects */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_LITE);
+                               }
 
                                /* Special effect */
 #ifdef JP
@@ -4337,7 +4351,8 @@ note_dies = "
                case GF_LITE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -4345,25 +4360,26 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       if (r_ptr->flags4 & (RF4_BR_LITE))
+                       if (r_ptr->flagsr & RFR_RES_LITE)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 2; dam /= (randint1(6)+6);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_LITE);
                        }
                        else if (r_ptr->flags3 & (RF3_HURT_LITE))
                        {
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_LITE);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_LITE);
 #ifdef JP
-note = "¤Ï¸÷¤Ë¿È¤ò¤¹¤¯¤á¤¿¡ª";
-note_dies = "¤Ï¸÷¤ò¼õ¤±¤Æ¤·¤Ü¤ó¤Ç¤·¤Þ¤Ã¤¿¡ª";
+                               note = "¤Ï¸÷¤Ë¿È¤ò¤¹¤¯¤á¤¿¡ª";
+                               note_dies = "¤Ï¸÷¤ò¼õ¤±¤Æ¤·¤Ü¤ó¤Ç¤·¤Þ¤Ã¤¿¡ª";
 #else
                                note = " cringes from the light!";
                                note_dies = " shrivels away in the light!";
@@ -4380,7 +4396,7 @@ note_dies = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -4388,21 +4404,19 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
-                       /* Likes darkness... */
-                       if ((r_ptr->flags4 & (RF4_BR_DARK)) ||
-                           (r_ptr->flags3 & RF3_ORC) ||
-                           (r_ptr->flags3 & RF3_HURT_LITE))
+                       if (r_ptr->flagsr & RFR_RES_DARK)
                        {
 #ifdef JP
-note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
+                               note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
                                note = " resists.";
 #endif
 
                                dam *= 2; dam /= (randint1(6)+6);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_DARK);
                        }
                        break;
                }
@@ -4411,7 +4425,7 @@ note = "
                /* Stone to Mud */
                case GF_KILL_WALL:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                dam = 0;
                                break;
@@ -4419,11 +4433,14 @@ note = "
                        /* Hurt by rock remover */
                        if (r_ptr->flags3 & (RF3_HURT_ROCK))
                        {
-                               /* Notice effect */
-                               if (seen) obvious = TRUE;
+                               if (seen)
+                               {
+                                       /* Notice effect */
+                                       obvious = TRUE;
 
-                               /* Memorize the effects */
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_ROCK);
+                                       /* Memorize the effects */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_ROCK);
+                               }
 
                                /* Cute little message */
 #ifdef JP
@@ -4455,11 +4472,11 @@ note_dies = "
                        {
                                bool resists_tele = FALSE;
 
-                               if (r_ptr->flags3 & (RF3_RES_TELE))
+                               if (r_ptr->flagsr & RFR_RES_TELE)
                                {
-                                       if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flags3 & (RF3_RES_ALL)))
+                                       if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flagsr & RFR_RES_ALL))
                                        {
-                                               if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
 #else
@@ -4470,7 +4487,7 @@ note = "
                                        }
                                        else if (r_ptr->level > randint1(100))
                                        {
-                                               if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
@@ -4483,8 +4500,11 @@ note = "
 
                                if (!resists_tele)
                                {
-                                       if (seen) obvious = TRUE;
-                                       if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                                       if (seen)
+                                       {
+                                               obvious = TRUE;
+                                               if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                                       }
                                        do_dist = dam;
                                }
                        }
@@ -4510,11 +4530,11 @@ note = "
                        {
                                bool resists_tele = FALSE;
 
-                               if (r_ptr->flags3 & (RF3_RES_TELE))
+                               if (r_ptr->flagsr & RFR_RES_TELE)
                                {
-                                       if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flags3 & (RF3_RES_ALL)))
+                                       if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flagsr & RFR_RES_ALL))
                                        {
-                                               if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
 #else
@@ -4525,7 +4545,7 @@ note = "
                                        }
                                        else if (r_ptr->level > randint1(100))
                                        {
-                                               if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
@@ -4538,8 +4558,11 @@ note = "
 
                                if (!resists_tele)
                                {
-                                       if (seen) obvious = TRUE;
-                                       if (seen) r_ptr->r_flags3 |= (RF3_EVIL);
+                                       if (seen)
+                                       {
+                                               obvious = TRUE;
+                                               if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_EVIL);
+                                       }
                                        do_dist = dam;
                                }
                        }
@@ -4561,11 +4584,11 @@ note = "
                case GF_AWAY_ALL:
                {
                        bool resists_tele = FALSE;
-                       if (r_ptr->flags3 & (RF3_RES_TELE))
+                       if (r_ptr->flagsr & RFR_RES_TELE)
                        {
-                               if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flags3 & (RF3_RES_ALL)))
+                               if ((r_ptr->flags1 & (RF1_UNIQUE)) || (r_ptr->flagsr & RFR_RES_ALL))
                                {
-                                       if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
 #else
@@ -4576,7 +4599,7 @@ note = "
                                }
                                else if (r_ptr->level > randint1(100))
                                {
-                                       if (seen) r_ptr->r_flags3 |= RF3_RES_TELE;
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= RFR_RES_TELE;
 #ifdef JP
 note = "¤Ë¤ÏÂÑÀ­¤¬¤¢¤ë¡ª";
 #else
@@ -4605,7 +4628,7 @@ note = "
                /* Turn undead (Use "dam" as "power") */
                case GF_TURN_UNDEAD:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                break;
@@ -4613,11 +4636,14 @@ note = "
                        /* Only affect undead */
                        if (r_ptr->flags3 & (RF3_UNDEAD))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_UNDEAD);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Apply some fear */
                                do_fear = damroll(3, (dam / 2)) + 1;
@@ -4653,7 +4679,7 @@ note = "
                /* Turn evil (Use "dam" as "power") */
                case GF_TURN_EVIL:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                break;
@@ -4661,11 +4687,14 @@ note = "
                        /* Only affect evil */
                        if (r_ptr->flags3 & (RF3_EVIL))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_EVIL);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_EVIL);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Apply some fear */
                                do_fear = damroll(3, (dam / 2)) + 1;
@@ -4701,7 +4730,7 @@ note = "
                /* Turn monster (Use "dam" as "power") */
                case GF_TURN_ALL:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                break;
@@ -4737,7 +4766,7 @@ note = "
                /* Dispel undead */
                case GF_DISP_UNDEAD:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4746,11 +4775,14 @@ note = "
                        /* Only affect undead */
                        if (r_ptr->flags3 & (RF3_UNDEAD))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_UNDEAD);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_UNDEAD);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Message */
 #ifdef JP
@@ -4780,7 +4812,7 @@ note_dies = "
                /* Dispel evil */
                case GF_DISP_EVIL:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4789,11 +4821,14 @@ note_dies = "
                        /* Only affect evil */
                        if (r_ptr->flags3 & (RF3_EVIL))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_EVIL);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_EVIL);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Message */
 #ifdef JP
@@ -4822,7 +4857,7 @@ note_dies = "
                /* Dispel good */
                case GF_DISP_GOOD:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4831,11 +4866,14 @@ note_dies = "
                        /* Only affect good */
                        if (r_ptr->flags3 & (RF3_GOOD))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_GOOD);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_GOOD);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Message */
 #ifdef JP
@@ -4864,7 +4902,7 @@ note_dies = "
                /* Dispel living */
                case GF_DISP_LIVING:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4903,7 +4941,7 @@ note_dies = "
                /* Dispel demons */
                case GF_DISP_DEMON:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4912,11 +4950,14 @@ note_dies = "
                        /* Only affect demons */
                        if (r_ptr->flags3 & (RF3_DEMON))
                        {
-                               /* Learn about type */
-                               if (seen) r_ptr->r_flags3 |= (RF3_DEMON);
+                               if (seen)
+                               {
+                                       /* Learn about type */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_DEMON);
 
-                               /* Obvious */
-                               if (seen) obvious = TRUE;
+                                       /* Obvious */
+                                       obvious = TRUE;
+                               }
 
                                /* Message */
 #ifdef JP
@@ -4945,7 +4986,7 @@ note_dies = "
                /* Dispel monster */
                case GF_DISP_ALL:
                {
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
                                skipped = TRUE;
                                dam = 0;
@@ -4971,7 +5012,8 @@ note_dies = "
                case GF_DRAIN_MANA:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -4979,7 +5021,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5017,7 +5059,7 @@ msg_format("%s
                        msg_format("You gaze intently at %s.", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5025,7 +5067,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5037,7 +5079,7 @@ msg_format("%s
                                /* Memorize a flag */
                                if (r_ptr->flags3 & (RF3_NO_CONF))
                                {
-                                       r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
@@ -5072,7 +5114,7 @@ msg_format("%s
                        msg_format("You gaze intently at %s.", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5080,7 +5122,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5092,7 +5134,7 @@ msg_format("%s
                                /* Memorize a flag */
                                if (r_ptr->flags3 & (RF3_NO_CONF))
                                {
-                                       r_ptr->r_flags3 |= (RF3_NO_CONF);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
                                }
 #ifdef JP
 note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£";
@@ -5131,7 +5173,7 @@ msg_format("%s
                        msg_format("You point at %s and curses.", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5139,7 +5181,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5168,7 +5210,7 @@ msg_format("%s
                        msg_format("You point at %s and curses horribly.", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5176,7 +5218,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5205,7 +5247,7 @@ msg_format("%s
                        msg_format("You point at %s, incanting terribly!", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5213,7 +5255,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5242,7 +5284,7 @@ msg_format("%s
                        msg_format("You point at %s, screaming th word, 'DIE!'.", m_name);
 #endif
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5250,7 +5292,7 @@ msg_format("%s
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5273,7 +5315,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5281,7 +5323,7 @@ note = "
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5333,11 +5375,11 @@ msg_format("%s
                        }
 
                        if (is_pet(m_ptr)) nokori_hp = m_ptr->maxhp*4L;
-                       else if ((p_ptr->pclass == CLASS_BEASTMASTER) && (r_ptr->flags3 & (RF3_DEMON | RF3_UNDEAD | RF3_NONLIVING)))
+                       else if ((p_ptr->pclass == CLASS_BEASTMASTER) && monster_living(r_ptr))
                                nokori_hp = m_ptr->maxhp * 3 / 10;
                        else
                                nokori_hp = m_ptr->maxhp * 3 / 20;
-                       
+
                        if (m_ptr->hp >= nokori_hp)
                        {
 #ifdef JP
@@ -5391,60 +5433,11 @@ msg_format("
                        break;
                }
 
+               /* Attack (Use "dam" as attack type) */
                case GF_ATTACK:
                {
-                       if (seen) obvious = TRUE;
-                       skipped = TRUE;
-                       if (dam == HISSATSU_NYUSIN)
-                       {
-                               int i;
-                               int ny = y, nx = x;
-                               bool success = FALSE;
-                               for (i = 0; i < 8; i++)
-                               {
-                                       if (cave_empty_bold(y+ddy[i], x+ddx[i]) || ((y+ddy[i] == py) && (x+ddx[i] == px)))
-                                       {
-                                               success = TRUE;
-                                               if (distance(py, px, ny, nx) > distance(py, px, y+ddy[i], x+ddx[i]))
-                                               {
-                                                       ny = y+ddy[i];
-                                                       nx = x+ddx[i];
-                                               }
-                                       }
-                               }
-                               if (success)
-                               {
-                                       if ((ny != py) || (nx != px))
-                                       {
-                                               teleport_player_to(ny, nx, FALSE);
-#ifdef JP
-                                               msg_print("ÁÇÁ᤯Áê¼ê¤Î²û¤ËÆþ¤ê¹þ¤ó¤À¡ª");
-#else
-                                               msg_format("You quickly jump in and attack %s!", m_name);
-#endif
-                                       }
-                               }
-                               else
-                               {
-#ifdef JP
-                                       msg_print("¼ºÇÔ¡ª");
-#else
-                                       msg_print("Failed!");
-#endif
-                                       dam = 0;
-                                       break;
-                               }
-                       }
-                       if (c_ptr->m_idx)
-                               return (py_attack(y, x, dam));
-                       else
-#ifdef JP
-                               msg_print("¹¶·â¤Ï¶õ¤òÀڤä¿¡£");
-#else
-                               msg_print("You attack the empty air.");
-#endif
-                       dam = 0;
-                       break;
+                       /* Return this monster's death */
+                       return py_attack(y, x, dam);
                }
 
                /* Sleep (Use "dam" as "power") */
@@ -5455,7 +5448,7 @@ msg_format("
 
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -5463,7 +5456,7 @@ msg_format("
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        if (r_ptr->flags2 & RF2_EMPTY_MIND)
@@ -5475,7 +5468,7 @@ note = "
 #endif
                                dam = 0;
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
                                break;
                        }
                        if (m_ptr->csleep)
@@ -5560,7 +5553,7 @@ note = "
                                        /* Memorize a flag */
                                        if (r_ptr->flags3 & RF3_NO_SLEEP)
                                        {
-                                               if (seen) r_ptr->r_flags3 |= (RF3_NO_SLEEP);
+                                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_SLEEP);
                                        }
 
                                        /* No obvious effect */
@@ -5605,7 +5598,7 @@ note = "
                        bool angry = FALSE;
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡ª";
@@ -5613,7 +5606,7 @@ note = "
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5680,11 +5673,14 @@ note = "
                        /* Hurt by light */
                        if (r_ptr->flags3 & (RF3_HURT_LITE))
                        {
-                               /* Obvious effect */
-                               if (seen) obvious = TRUE;
+                               if (seen)
+                               {
+                                       /* Obvious effect */
+                                       obvious = TRUE;
 
-                               /* Memorize the effects */
-                               if (seen) r_ptr->r_flags3 |= (RF3_HURT_LITE);
+                                       /* Memorize the effects */
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_HURT_LITE);
+                               }
 
                                /* Special effect */
 #ifdef JP
@@ -5714,7 +5710,8 @@ note_dies = "
                case GF_BLOOD_CURSE:
                {
                        if (seen) obvious = TRUE;
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5722,7 +5719,7 @@ note_dies = "
                                note = " is immune.";
 #endif
                                dam = 0;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
                        break;
@@ -5773,7 +5770,7 @@ note = "
                                        m_ptr->fast = MIN(200, m_ptr->fast + 100);
 
                                        /* Learn about type */
-                                       if (seen) r_ptr->r_flags3 |= (RF3_GOOD);
+                                       if (seen && is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_GOOD);
                                        success = TRUE;
                                }
                        }
@@ -5786,7 +5783,7 @@ note = "
                                }
                                else if (seen)
                                {
-                                       r_ptr->r_flags3 |= (RF3_NO_FEAR);
+                                       if (is_original_ap(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_FEAR);
                                }
                        }
 
@@ -5799,7 +5796,7 @@ note = "
                {
                        if (seen) obvious = TRUE;
 
-                       if (r_ptr->flags3 & (RF3_RES_ALL))
+                       if (r_ptr->flagsr & RFR_RES_ALL)
                        {
 #ifdef JP
                                note = "¤Ë¤Ï´°Á´¤ÊÂÑÀ­¤¬¤¢¤ë¡ª";
@@ -5807,7 +5804,7 @@ note = "
                                note = " is immune.";
 #endif
                                skipped = TRUE;
-                               if (seen) r_ptr->r_flags3 |= (RF3_RES_ALL);
+                               if (seen && is_original_ap(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
                                break;
                        }
 
@@ -5866,7 +5863,7 @@ note = "
        tmp = dam;
        dam = mon_damage_mod(m_ptr, dam, (bool)(typ == GF_PSY_SPEAR));
 #ifdef JP
-       if ((tmp > 0) && (dam == 0)) note = "¤Ï¥À¥á¡¼¥¸¤ò¼õ¤±¤Æ¤¤¤Ê¤¤";
+       if ((tmp > 0) && (dam == 0)) note = "¤Ï¥À¥á¡¼¥¸¤ò¼õ¤±¤Æ¤¤¤Ê¤¤¡£";
 #else
        if ((tmp > 0) && (dam == 0)) note = " is unharmed.";
 #endif
@@ -5888,7 +5885,7 @@ note = "
 
                        /* Monster polymorphs */
 #ifdef JP
-note = "¤¬ÊѿȤ·¤¿¡ª";
+                       note = "¤¬ÊѿȤ·¤¿¡ª";
 #else
                        note = " changes!";
 #endif
@@ -5923,7 +5920,7 @@ note = "
 
                /* Message */
 #ifdef JP
-note = "¤¬¾Ã¤¨µî¤Ã¤¿¡ª";
+               note = "¤¬¾Ã¤¨µî¤Ã¤¿¡ª";
 #else
                note = " disappears!";
 #endif
@@ -5941,20 +5938,19 @@ note = "
                c_ptr = &cave[y][x];
        }
 
-       /* Sound and Impact breathers never stun */
+       /* Sound and Impact resisters never stun */
        else if (do_stun &&
-           !(r_ptr->flags4 & (RF4_BR_SOUN)) &&
-           !(r_ptr->flags4 & (RF4_BR_WALL)) &&
-           !(r_ptr->flags3 & (RF3_NO_STUN)))
+           !(r_ptr->flagsr & (RFR_RES_SOUN | RFR_RES_WALL)) &&
+           !(r_ptr->flags3 & RF3_NO_STUN))
        {
                /* Obvious */
                if (seen) obvious = TRUE;
 
-               /* Get confused */
+               /* Get stunned */
                if (m_ptr->stunned)
                {
 #ifdef JP
-note = "¤Ï¤Ò¤É¤¯¤â¤¦¤í¤¦¤È¤·¤¿¡£";
+                       note = "¤Ï¤Ò¤É¤¯¤â¤¦¤í¤¦¤È¤·¤¿¡£";
 #else
                        note = " is more dazed.";
 #endif
@@ -5964,7 +5960,7 @@ note = "
                else
                {
 #ifdef JP
-note = "¤Ï¤â¤¦¤í¤¦¤È¤·¤¿¡£";
+                       note = "¤Ï¤â¤¦¤í¤¦¤È¤·¤¿¡£";
 #else
                        note = " is dazed.";
 #endif
@@ -5979,11 +5975,10 @@ note = "
                get_angry = TRUE;
        }
 
-       /* Confusion and Chaos breathers (and sleepers) never confuse */
+       /* Confusion and Chaos resisters (and sleepers) never confuse */
        else if (do_conf &&
-                !(r_ptr->flags3 & (RF3_NO_CONF)) &&
-                !(r_ptr->flags4 & (RF4_BR_CONF)) &&
-                !(r_ptr->flags4 & (RF4_BR_CHAO)))
+                !(r_ptr->flags3 & RF3_NO_CONF) &&
+                !(r_ptr->flagsr & RFR_EFF_RES_CHAO_MASK))
        {
                /* Obvious */
                if (seen) obvious = TRUE;
@@ -5992,7 +5987,7 @@ note = "
                if (m_ptr->confused)
                {
 #ifdef JP
-note = "¤Ï¤µ¤é¤Ëº®Í𤷤¿¤è¤¦¤À¡£";
+                       note = "¤Ï¤µ¤é¤Ëº®Í𤷤¿¤è¤¦¤À¡£";
 #else
                        note = " looks more confused.";
 #endif
@@ -6004,7 +5999,7 @@ note = "
                else
                {
 #ifdef JP
-note = "¤Ïº®Í𤷤¿¤è¤¦¤À¡£";
+                       note = "¤Ïº®Í𤷤¿¤è¤¦¤À¡£";
 #else
                        note = " looks confused.";
 #endif
@@ -6018,22 +6013,23 @@ note = "
                /* Get angry */
                get_angry = TRUE;
        }
+
        else if (do_time)
        {
                /* Obvious */
                if (seen) obvious = TRUE;
 
-               if (do_time >= m_ptr->maxhp) do_time = m_ptr->maxhp-1;
+               if (do_time >= m_ptr->maxhp) do_time = m_ptr->maxhp - 1;
 
                if (do_time)
                {
 #ifdef JP
-note = "¤Ï¼å¤¯¤Ê¤Ã¤¿¤è¤¦¤À¡£";
+                       note = "¤Ï¼å¤¯¤Ê¤Ã¤¿¤è¤¦¤À¡£";
 #else
                        note = " seems weakened.";
 #endif
                        m_ptr->maxhp -= do_time;
-                       if ((m_ptr->hp - dam) > m_ptr->maxhp) dam = m_ptr->hp-m_ptr->maxhp;
+                       if ((m_ptr->hp - dam) > m_ptr->maxhp) dam = m_ptr->hp - m_ptr->maxhp;
                }
                get_angry = TRUE;
        }
@@ -6063,6 +6059,8 @@ note = "
                /* Wake the monster up */
                m_ptr->csleep = 0;
 
+               if (r_ptr->flags7 & RF7_HAS_LD_MASK) p_ptr->update |= (PU_MON_LITE);
+
                /* Hurt the monster */
                m_ptr->hp -= dam;
 
@@ -6336,7 +6334,7 @@ msg_print("
                                set_target(m_ptr, monster_target_y, monster_target_x);
                        }
                }
-               else if (is_pet(&m_list[who]) && (m_ptr->target_y != py) && (m_ptr->target_x != px))
+               else if (is_pet(&m_list[who]) && !player_bold(m_ptr->target_y, m_ptr->target_x))
                {
                        set_target(m_ptr, m_list[who].fy, m_list[who].fx);
                }
@@ -6428,7 +6426,7 @@ static bool project_p(int who, cptr who_name, int r, int y, int x, int dam, int
 
 
        /* Player is not here */
-       if ((x != px) || (y != py)) return (FALSE);
+       if (!player_bold(y, x)) return (FALSE);
 
        if ((p_ptr->special_defense & NINJA_KAWARIMI) && dam && (randint0(55) < (p_ptr->lev*3/5+20)) && who && (who != p_ptr->riding))
        {
@@ -8711,11 +8709,6 @@ bool project(int who, int rad, int y, int x, int dam, int typ, int flg, int mons
                                Term_xtra(TERM_XTRA_DELAY, msec);
                        }
                }
-               if ((typ == GF_ATTACK) && (dam == HISSATSU_NYUSIN) && ((i+1) == path_n))
-               {
-                       if (cave_empty_bold(y, x)) teleport_player_to(ny, nx, FALSE);
-               }
-
        }
 
        /* Save the "blast epicenter" */
@@ -9014,7 +9007,7 @@ bool project(int who, int rad, int y, int x, int dam, int typ, int flg, int mons
                                                msg_print("The attack bounces!");
 #endif
 
-                                               ref_ptr->r_flags2 |= RF2_REFLECTING;
+                                               if (is_original_ap(m_ptr)) ref_ptr->r_flags2 |= RF2_REFLECTING;
                                        }
 
                                        /* Reflected bolts randomly target either one */
@@ -9040,10 +9033,10 @@ bool project(int who, int rad, int y, int x, int dam, int typ, int flg, int mons
                        {
                                effective_dist = dist;
                        }
-                       
-                       
+
+
                        /* There is the riding player on this monster */
-                       if (p_ptr->riding && (y == py) && (x == px))
+                       if (p_ptr->riding && player_bold(y, x))
                        {
                                /* Aimed on the player */
                                if (flg & PROJECT_PLAYER)
@@ -9112,12 +9105,12 @@ bool project(int who, int rad, int y, int x, int dam, int typ, int flg, int mons
                                        effective_dist++;
                                }
                        }
-                       
+
                        /* Affect the monster in the grid */
                        if (project_m(who, effective_dist, y, x, dam, typ,flg)) notice = TRUE;
                }
-               
-       
+
+
                /* Player affected one monster (without "jumping") */
                if (!who && (project_m_n == 1) && !jump)
                {
@@ -9159,7 +9152,7 @@ bool project(int who, int rad, int y, int x, int dam, int typ, int flg, int mons
                        x = gx[i];
 
                        /* Affect the player? */
-                       if (y != py || x != px) continue;
+                       if (!player_bold(y, x)) continue;
 
                        /* Find the closest point in the blast */
                        if (breath)