src/effect/effect-monster-switcher.c

   1 /*!
   2  * @brief 魔法種別による各種処理切り替え
   3  * @date 2020/04/29
   4  * @author Hourier
   5  */
   6
   7 #include "angband.h"
   8 #include "effect-monster-util.h"
   9 #include "effect/effect-monster-switcher.h"
  10 #include "player-damage.h"
  11 #include "avatar.h"
  12 #include "monster-spell.h"
  13 #include "quest.h"
  14 #include "monster-status.h"
  15 #include "effect/spells-effect-util.h"
  16 #include "player-effects.h"
  17 #include "monsterrace-hook.h"
  18 #include "combat/melee.h"
  19 #include "cmd/cmd-pet.h" // 暫定、後で消すかも.
  20 #include "spell/spells-type.h"
  21 #include "effect/effect-monster-resist-hurt.h"
  22 #include "effect/effect-monster-psi.h"
  23 #include "effect/effect-monster-domination.h"
  24 #include "effect/effect-monster-oldies.h"
  25 #include "effect/effect-monster-charm.h"
  26
  27 gf_switch_result effect_monster_hypodynamia(player_type *caster_ptr, effect_monster_type *em_ptr)
  28 {
  29         if (em_ptr->seen) em_ptr->obvious = TRUE;
  30         if (monster_living(em_ptr->m_ptr->r_idx))
  31         {
  32                 em_ptr->do_time = (em_ptr->dam + 7) / 8;
  33                 return GF_SWITCH_CONTINUE;
  34         }
  35
  36         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr))
  37         {
  38                 if (em_ptr->r_ptr->flags3 & RF3_DEMON) em_ptr->r_ptr->r_flags3 |= (RF3_DEMON);
  39                 if (em_ptr->r_ptr->flags3 & RF3_UNDEAD) em_ptr->r_ptr->r_flags3 |= (RF3_UNDEAD);
  40                 if (em_ptr->r_ptr->flags3 & RF3_NONLIVING) em_ptr->r_ptr->r_flags3 |= (RF3_NONLIVING);
  41         }
  42
  43         em_ptr->note = _("には効果がなかった。", " is unaffected.");
  44         em_ptr->obvious = FALSE;
  45         em_ptr->dam = 0;
  46         return GF_SWITCH_CONTINUE;
  47 }
  48
  49
  50 // todo リファクタリング前のコード時点で、単に耐性があるだけでもダメージ0だった.
  51 gf_switch_result effect_monster_death_ray(player_type *caster_ptr, effect_monster_type *em_ptr)
  52 {
  53         if (em_ptr->seen) em_ptr->obvious = TRUE;
  54
  55         if (!monster_living(em_ptr->m_ptr->r_idx))
  56         {
  57                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr))
  58                 {
  59                         if (em_ptr->r_ptr->flags3 & RF3_DEMON) em_ptr->r_ptr->r_flags3 |= (RF3_DEMON);
  60                         if (em_ptr->r_ptr->flags3 & RF3_UNDEAD) em_ptr->r_ptr->r_flags3 |= (RF3_UNDEAD);
  61                         if (em_ptr->r_ptr->flags3 & RF3_NONLIVING) em_ptr->r_ptr->r_flags3 |= (RF3_NONLIVING);
  62                 }
  63
  64                 em_ptr->note = _("には完全な耐性がある！", " is immune.");
  65                 em_ptr->obvious = FALSE;
  66                 em_ptr->dam = 0;
  67                 return GF_SWITCH_CONTINUE;
  68         }
  69
  70         if (((em_ptr->r_ptr->flags1 & RF1_UNIQUE) &&
  71                 (randint1(888) != 666)) ||
  72                 (((em_ptr->r_ptr->level + randint1(20)) > randint1((em_ptr->caster_lev / 2) + randint1(10))) &&
  73                         randint1(100) != 66))
  74         {
  75                 em_ptr->note = _("には耐性がある！", " resists!");
  76                 em_ptr->obvious = FALSE;
  77                 em_ptr->dam = 0;
  78         }
  79
  80         return GF_SWITCH_CONTINUE;
  81 }
  82
  83
  84 gf_switch_result effect_monster_stasis(effect_monster_type *em_ptr, bool to_evil)
  85 {
  86         if (em_ptr->seen) em_ptr->obvious = TRUE;
  87
  88         int stasis_damage = (em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10);
  89         bool has_resistance = (em_ptr->r_ptr->flags1 & RF1_UNIQUE) != 0;
  90         has_resistance |= em_ptr->r_ptr->level > randint1(stasis_damage) + 10;
  91         if (to_evil) has_resistance |= (em_ptr->r_ptr->flags3 & RF3_EVIL) == 0;
  92
  93         if (has_resistance)
  94         {
  95                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
  96                 em_ptr->obvious = FALSE;
  97         }
  98         else
  99         {
 100                 em_ptr->note = _("は動けなくなった！", " is suspended!");
 101                 em_ptr->do_sleep = 500;
 102         }
 103
 104         em_ptr->dam = 0;
 105         return GF_SWITCH_CONTINUE;
 106 }
 107
 108
 109 gf_switch_result effect_monster_stun(effect_monster_type *em_ptr)
 110 {
 111         if (em_ptr->seen) em_ptr->obvious = TRUE;
 112
 113         em_ptr->do_stun = damroll((em_ptr->caster_lev / 20) + 3, (em_ptr->dam)) + 1;
 114         if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) ||
 115                 (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10))
 116         {
 117                 em_ptr->do_stun = 0;
 118                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 119                 em_ptr->obvious = FALSE;
 120         }
 121
 122         em_ptr->dam = 0;
 123         return GF_SWITCH_CONTINUE;
 124 }
 125
 126
 127 gf_switch_result effect_monster_lite_weak(player_type *caster_ptr, effect_monster_type *em_ptr)
 128 {
 129         if (!em_ptr->dam)
 130         {
 131                 em_ptr->skipped = TRUE;
 132                 return GF_SWITCH_CONTINUE;
 133         }
 134
 135         if ((em_ptr->r_ptr->flags3 & RF3_HURT_LITE) == 0)
 136         {
 137                 em_ptr->dam = 0;
 138                 return GF_SWITCH_CONTINUE;
 139         }
 140
 141         if (em_ptr->seen) em_ptr->obvious = TRUE;
 142
 143         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr))
 144                 em_ptr->r_ptr->r_flags3 |= (RF3_HURT_LITE);
 145
 146         em_ptr->note = _("は光に身をすくめた！", " cringes from the light!");
 147         em_ptr->note_dies = _("は光を受けてしぼんでしまった！", " shrivels away in the light!");
 148         return GF_SWITCH_CONTINUE;
 149 }
 150
 151
 152 /*!
 153  * @brief 魔法の効果によって様々なメッセーを出力したり与えるダメージの増減を行ったりする
 154  * @param em_ptr モンスター効果構造体への参照ポインタ
 155  * @return ここのスイッチングで終るならTRUEかFALSE、後続処理を実行するならCONTINUE
 156  */
 157 gf_switch_result switch_effects_monster(player_type *caster_ptr, effect_monster_type *em_ptr)
 158 {
 159         floor_type *floor_ptr = caster_ptr->current_floor_ptr;
 160         switch (em_ptr->effect_type)
 161         {
 162         case GF_PSY_SPEAR:
 163         case GF_MISSILE:
 164         case GF_ARROW:
 165         case GF_MANA:
 166         case GF_METEOR:
 167         case GF_BLOOD_CURSE:
 168         case GF_SEEKER:
 169         case GF_SUPER_RAY:
 170                 return effect_monster_void(em_ptr);
 171         case GF_ACID:
 172                 return effect_monster_acid(caster_ptr, em_ptr);
 173         case GF_ELEC:
 174                 return effect_monster_elec(caster_ptr, em_ptr);
 175         case GF_FIRE:
 176                 return effect_monster_fire(caster_ptr, em_ptr);
 177         case GF_COLD:
 178                 return effect_monster_cold(caster_ptr, em_ptr);
 179         case GF_POIS:
 180                 return effect_monster_pois(caster_ptr, em_ptr);
 181         case GF_NUKE:
 182                 return effect_monster_nuke(caster_ptr, em_ptr);
 183         case GF_HELL_FIRE:
 184                 return effect_monster_hell_fire(caster_ptr, em_ptr);
 185         case GF_HOLY_FIRE:
 186                 return effect_monster_holy_fire(caster_ptr, em_ptr);
 187         case GF_PLASMA:
 188                 return effect_monster_plasma(caster_ptr, em_ptr);
 189         case GF_NETHER:
 190                 return effect_monster_nether(caster_ptr, em_ptr);
 191         case GF_WATER:
 192                 return effect_monster_water(caster_ptr, em_ptr);
 193         case GF_CHAOS:
 194                 return effect_monster_chaos(caster_ptr, em_ptr);
 195         case GF_SHARDS:
 196                 return effect_monster_shards(caster_ptr, em_ptr);
 197         case GF_ROCKET:
 198                 return effect_monster_rocket(caster_ptr, em_ptr);
 199         case GF_SOUND:
 200                 return effect_monster_sound(caster_ptr, em_ptr);
 201         case GF_CONFUSION:
 202                 return effect_monster_confusion(caster_ptr, em_ptr);
 203         case GF_DISENCHANT:
 204                 return effect_monster_disenchant(caster_ptr, em_ptr);
 205         case GF_NEXUS:
 206                 return effect_monster_nexus(caster_ptr, em_ptr);
 207         case GF_FORCE:
 208                 return effect_monster_force(caster_ptr, em_ptr);
 209         case GF_INERTIAL:
 210                 return effect_monster_inertial(caster_ptr, em_ptr);
 211         case GF_TIME:
 212                 return effect_monster_time(caster_ptr, em_ptr);
 213         case GF_GRAVITY:
 214                 return effect_monster_gravity(caster_ptr, em_ptr);
 215         case GF_DISINTEGRATE:
 216                 return effect_monster_disintegration(caster_ptr, em_ptr);
 217         case GF_PSI:
 218                 return effect_monster_psi(caster_ptr, em_ptr);
 219         case GF_PSI_DRAIN:
 220                 return effect_monster_psi_drain(caster_ptr, em_ptr);
 221         case GF_TELEKINESIS:
 222                 return effect_monster_telekinesis(caster_ptr, em_ptr);
 223         case GF_DOMINATION:
 224                 return effect_monster_domination(caster_ptr, em_ptr);
 225         case GF_ICE:
 226                 return effect_monster_icee_bolt(caster_ptr, em_ptr);
 227         case GF_HYPODYNAMIA:
 228                 return effect_monster_hypodynamia(caster_ptr, em_ptr);
 229         case GF_DEATH_RAY:
 230                 return effect_monster_death_ray(caster_ptr, em_ptr);
 231         case GF_OLD_POLY:
 232                 return effect_monster_old_poly(em_ptr);
 233         case GF_OLD_CLONE:
 234                 return effect_monster_old_clone(caster_ptr, em_ptr);
 235         case GF_STAR_HEAL:
 236                 if (effect_monster_old_clone(caster_ptr, em_ptr) == GF_SWITCH_TRUE)
 237                         return GF_SWITCH_CONTINUE;
 238         /* Fall through */
 239         case GF_OLD_HEAL:
 240                 return effect_monster_old_heal(caster_ptr, em_ptr);
 241         case GF_OLD_SPEED:
 242                 return effect_monster_old_speed(caster_ptr, em_ptr);
 243         case GF_OLD_SLOW:
 244                 return effect_monster_old_slow(caster_ptr, em_ptr);
 245         case GF_OLD_SLEEP:
 246                 return effect_monster_old_sleep(caster_ptr, em_ptr);
 247         case GF_STASIS_EVIL:
 248                 return effect_monster_stasis(em_ptr, TRUE);
 249         case GF_STASIS:
 250                 return effect_monster_stasis(em_ptr, FALSE);
 251         case GF_CHARM:
 252                 return effect_monster_charm(caster_ptr, em_ptr);
 253         case GF_CONTROL_UNDEAD:
 254                 return effect_monster_control_undead(caster_ptr, em_ptr);
 255         case GF_CONTROL_DEMON:
 256                 return effect_monster_control_demon(caster_ptr, em_ptr);
 257         case GF_CONTROL_ANIMAL:
 258                 return effect_monster_control_animal(caster_ptr, em_ptr);
 259         case GF_CHARM_LIVING:
 260                 return effect_monster_charm_living(caster_ptr, em_ptr);
 261         case GF_OLD_CONF:
 262                 return effect_monster_old_conf(caster_ptr, em_ptr);
 263         case GF_STUN:
 264                 return effect_monster_stun(em_ptr);
 265         case GF_LITE_WEAK:
 266                 return effect_monster_lite_weak(caster_ptr, em_ptr);
 267         case GF_LITE:
 268         {
 269                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 270
 271                 if (em_ptr->r_ptr->flagsr & RFR_RES_LITE)
 272                 {
 273                         em_ptr->note = _("には耐性がある！", " resists!");
 274                         em_ptr->dam *= 2; em_ptr->dam /= (randint1(6) + 6);
 275                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= (RFR_RES_LITE);
 276                 }
 277                 else if (em_ptr->r_ptr->flags3 & (RF3_HURT_LITE))
 278                 {
 279                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_HURT_LITE);
 280                         em_ptr->note = _("は光に身をすくめた！", " cringes from the light!");
 281                         em_ptr->note_dies = _("は光を受けてしぼんでしまった！", " shrivels away in the light!");
 282                         em_ptr->dam *= 2;
 283                 }
 284                 break;
 285         }
 286         case GF_DARK:
 287         {
 288                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 289
 290                 if (em_ptr->r_ptr->flagsr & RFR_RES_DARK)
 291                 {
 292                         em_ptr->note = _("には耐性がある！", " resists!");
 293                         em_ptr->dam *= 2; em_ptr->dam /= (randint1(6) + 6);
 294                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= (RFR_RES_DARK);
 295                 }
 296
 297                 break;
 298         }
 299         case GF_KILL_WALL:
 300         {
 301                 if (em_ptr->r_ptr->flags3 & (RF3_HURT_ROCK))
 302                 {
 303                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 304
 305                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_HURT_ROCK);
 306
 307                         em_ptr->note = _("の皮膚がただれた！", " loses some skin!");
 308                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 309                 }
 310                 else
 311                 {
 312                         em_ptr->dam = 0;
 313                 }
 314
 315                 break;
 316         }
 317         case GF_AWAY_UNDEAD:
 318         {
 319                 if (em_ptr->r_ptr->flags3 & (RF3_UNDEAD))
 320                 {
 321                         bool resists_tele = FALSE;
 322
 323                         if (em_ptr->r_ptr->flagsr & RFR_RES_TELE)
 324                         {
 325                                 if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) || (em_ptr->r_ptr->flagsr & RFR_RES_ALL))
 326                                 {
 327                                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 328                                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 329                                         resists_tele = TRUE;
 330                                 }
 331                                 else if (em_ptr->r_ptr->level > randint1(100))
 332                                 {
 333                                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 334                                         em_ptr->note = _("には耐性がある！", " resists!");
 335                                         resists_tele = TRUE;
 336                                 }
 337                         }
 338
 339                         if (!resists_tele)
 340                         {
 341                                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 342                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_UNDEAD);
 343                                 em_ptr->do_dist = em_ptr->dam;
 344                         }
 345                 }
 346                 else
 347                 {
 348                         em_ptr->skipped = TRUE;
 349                 }
 350
 351                 em_ptr->dam = 0;
 352                 break;
 353         }
 354         case GF_AWAY_EVIL:
 355         {
 356                 if (em_ptr->r_ptr->flags3 & (RF3_EVIL))
 357                 {
 358                         bool resists_tele = FALSE;
 359
 360                         if (em_ptr->r_ptr->flagsr & RFR_RES_TELE)
 361                         {
 362                                 if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) || (em_ptr->r_ptr->flagsr & RFR_RES_ALL))
 363                                 {
 364                                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 365                                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 366                                         resists_tele = TRUE;
 367                                 }
 368                                 else if (em_ptr->r_ptr->level > randint1(100))
 369                                 {
 370                                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 371                                         em_ptr->note = _("には耐性がある！", " resists!");
 372                                         resists_tele = TRUE;
 373                                 }
 374                         }
 375
 376                         if (!resists_tele)
 377                         {
 378                                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 379                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_EVIL);
 380                                 em_ptr->do_dist = em_ptr->dam;
 381                         }
 382                 }
 383                 else
 384                 {
 385                         em_ptr->skipped = TRUE;
 386                 }
 387
 388                 em_ptr->dam = 0;
 389                 break;
 390         }
 391         case GF_AWAY_ALL:
 392         {
 393                 bool resists_tele = FALSE;
 394                 if (em_ptr->r_ptr->flagsr & RFR_RES_TELE)
 395                 {
 396                         if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) || (em_ptr->r_ptr->flagsr & RFR_RES_ALL))
 397                         {
 398                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 399                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 400                                 resists_tele = TRUE;
 401                         }
 402                         else if (em_ptr->r_ptr->level > randint1(100))
 403                         {
 404                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flagsr |= RFR_RES_TELE;
 405                                 em_ptr->note = _("には耐性がある！", " resists!");
 406                                 resists_tele = TRUE;
 407                         }
 408                 }
 409
 410                 if (!resists_tele)
 411                 {
 412                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 413
 414                         em_ptr->do_dist = em_ptr->dam;
 415                 }
 416
 417                 em_ptr->dam = 0;
 418                 break;
 419         }
 420         case GF_TURN_UNDEAD:
 421         {
 422                 if (em_ptr->r_ptr->flags3 & (RF3_UNDEAD))
 423                 {
 424                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 425
 426                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_UNDEAD);
 427
 428                         em_ptr->do_fear = damroll(3, (em_ptr->dam / 2)) + 1;
 429                         if (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10)
 430                         {
 431                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 432                                 em_ptr->obvious = FALSE;
 433                                 em_ptr->do_fear = 0;
 434                         }
 435                 }
 436                 else
 437                 {
 438                         em_ptr->skipped = TRUE;
 439                 }
 440
 441                 em_ptr->dam = 0;
 442                 break;
 443         }
 444         case GF_TURN_EVIL:
 445         {
 446                 if (em_ptr->r_ptr->flags3 & (RF3_EVIL))
 447                 {
 448                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 449
 450                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_EVIL);
 451
 452                         em_ptr->do_fear = damroll(3, (em_ptr->dam / 2)) + 1;
 453                         if (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10)
 454                         {
 455                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 456                                 em_ptr->obvious = FALSE;
 457                                 em_ptr->do_fear = 0;
 458                         }
 459                 }
 460                 else
 461                 {
 462                         em_ptr->skipped = TRUE;
 463                 }
 464
 465                 em_ptr->dam = 0;
 466                 break;
 467         }
 468         case GF_TURN_ALL:
 469         {
 470                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 471
 472                 em_ptr->do_fear = damroll(3, (em_ptr->dam / 2)) + 1;
 473                 if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) ||
 474                         (em_ptr->r_ptr->flags3 & (RF3_NO_FEAR)) ||
 475                         (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10))
 476                 {
 477                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 478                         em_ptr->obvious = FALSE;
 479                         em_ptr->do_fear = 0;
 480                 }
 481
 482                 em_ptr->dam = 0;
 483                 break;
 484         }
 485         case GF_DISP_UNDEAD:
 486         {
 487                 if (em_ptr->r_ptr->flags3 & (RF3_UNDEAD))
 488                 {
 489                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 490
 491                         /* Learn about em_ptr->effect_type */
 492                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_UNDEAD);
 493
 494                         em_ptr->note = _("は身震いした。", " shudders.");
 495                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 496                 }
 497                 else
 498                 {
 499                         em_ptr->skipped = TRUE;
 500                         em_ptr->dam = 0;
 501                 }
 502
 503                 break;
 504         }
 505         case GF_DISP_EVIL:
 506         {
 507                 if (em_ptr->r_ptr->flags3 & (RF3_EVIL))
 508                 {
 509                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 510
 511                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_EVIL);
 512
 513                         em_ptr->note = _("は身震いした。", " shudders.");
 514                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 515                 }
 516                 else
 517                 {
 518                         em_ptr->skipped = TRUE;
 519                         em_ptr->dam = 0;
 520                 }
 521
 522                 break;
 523         }
 524         case GF_DISP_GOOD:
 525         {
 526                 if (em_ptr->r_ptr->flags3 & (RF3_GOOD))
 527                 {
 528                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 529
 530                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_GOOD);
 531
 532                         em_ptr->note = _("は身震いした。", " shudders.");
 533                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 534                 }
 535                 else
 536                 {
 537                         em_ptr->skipped = TRUE;
 538                         em_ptr->dam = 0;
 539                 }
 540
 541                 break;
 542         }
 543         case GF_DISP_LIVING:
 544         {
 545                 if (monster_living(em_ptr->m_ptr->r_idx))
 546                 {
 547                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 548
 549                         em_ptr->note = _("は身震いした。", " shudders.");
 550                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 551                 }
 552                 else
 553                 {
 554                         em_ptr->skipped = TRUE;
 555                         em_ptr->dam = 0;
 556                 }
 557
 558                 break;
 559         }
 560         case GF_DISP_DEMON:
 561         {
 562                 if (em_ptr->r_ptr->flags3 & (RF3_DEMON))
 563                 {
 564                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 565
 566                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_DEMON);
 567
 568                         em_ptr->note = _("は身震いした。", " shudders.");
 569                         em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 570                 }
 571                 else
 572                 {
 573                         em_ptr->skipped = TRUE;
 574                         em_ptr->dam = 0;
 575                 }
 576
 577                 break;
 578         }
 579         case GF_DISP_ALL:
 580         {
 581                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 582                 em_ptr->note = _("は身震いした。", " shudders.");
 583                 em_ptr->note_dies = _("はドロドロに溶けた！", " dissolves!");
 584                 break;
 585         }
 586         case GF_DRAIN_MANA:
 587         {
 588                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 589                 if ((em_ptr->r_ptr->flags4 & ~(RF4_NOMAGIC_MASK)) || (em_ptr->r_ptr->a_ability_flags1 & ~(RF5_NOMAGIC_MASK)) || (em_ptr->r_ptr->a_ability_flags2 & ~(RF6_NOMAGIC_MASK)))
 590                 {
 591                         if (em_ptr->who > 0)
 592                         {
 593                                 if (em_ptr->m_caster_ptr->hp < em_ptr->m_caster_ptr->maxhp)
 594                                 {
 595                                         em_ptr->m_caster_ptr->hp += em_ptr->dam;
 596                                         if (em_ptr->m_caster_ptr->hp > em_ptr->m_caster_ptr->maxhp) em_ptr->m_caster_ptr->hp = em_ptr->m_caster_ptr->maxhp;
 597                                         if (caster_ptr->health_who == em_ptr->who) caster_ptr->redraw |= (PR_HEALTH);
 598                                         if (caster_ptr->riding == em_ptr->who) caster_ptr->redraw |= (PR_UHEALTH);
 599
 600                                         if (em_ptr->see_s_msg)
 601                                         {
 602                                                 monster_desc(caster_ptr, em_ptr->killer, em_ptr->m_caster_ptr, 0);
 603                                                 msg_format(_("%^sは気分が良さそうだ。", "%^s appears healthier."), em_ptr->killer);
 604                                         }
 605                                 }
 606                         }
 607                         else
 608                         {
 609                                 msg_format(_("%sから精神エネルギーを吸いとった。", "You draw psychic energy from %s."), em_ptr->m_name);
 610                                 (void)hp_player(caster_ptr, em_ptr->dam);
 611                         }
 612                 }
 613                 else
 614                 {
 615                         if (em_ptr->see_s_msg) msg_format(_("%sには効果がなかった。", "%s is unaffected."), em_ptr->m_name);
 616                 }
 617
 618                 em_ptr->dam = 0;
 619                 break;
 620         }
 621         case GF_MIND_BLAST:
 622         {
 623                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 624                 if (!em_ptr->who) msg_format(_("%sをじっと睨んだ。", "You gaze intently at %s."), em_ptr->m_name);
 625
 626                 if ((em_ptr->r_ptr->flags1 & RF1_UNIQUE) ||
 627                         (em_ptr->r_ptr->flags3 & RF3_NO_CONF) ||
 628                         (em_ptr->r_ptr->level > randint1((em_ptr->caster_lev - 10) < 1 ? 1 : (em_ptr->caster_lev - 10)) + 10))
 629                 {
 630                         if (em_ptr->r_ptr->flags3 & (RF3_NO_CONF))
 631                         {
 632                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_NO_CONF);
 633                         }
 634
 635                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 636                         em_ptr->dam = 0;
 637                 }
 638                 else if (em_ptr->r_ptr->flags2 & RF2_EMPTY_MIND)
 639                 {
 640                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
 641                         em_ptr->note = _("には完全な耐性がある！", " is immune.");
 642                         em_ptr->dam = 0;
 643                 }
 644                 else if (em_ptr->r_ptr->flags2 & RF2_WEIRD_MIND)
 645                 {
 646                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags2 |= (RF2_WEIRD_MIND);
 647                         em_ptr->note = _("には耐性がある。", " resists.");
 648                         em_ptr->dam /= 3;
 649                 }
 650                 else
 651                 {
 652                         em_ptr->note = _("は精神攻撃を食らった。", " is blasted by psionic energy.");
 653                         em_ptr->note_dies = _("の精神は崩壊し、肉体は抜け殻となった。", " collapses, a mindless husk.");
 654
 655                         if (em_ptr->who > 0) em_ptr->do_conf = randint0(4) + 4;
 656                         else em_ptr->do_conf = randint0(8) + 8;
 657                 }
 658
 659                 break;
 660         }
 661         case GF_BRAIN_SMASH:
 662         {
 663                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 664                 if (!em_ptr->who) msg_format(_("%sをじっと睨んだ。", "You gaze intently at %s."), em_ptr->m_name);
 665
 666                 if ((em_ptr->r_ptr->flags1 & RF1_UNIQUE) ||
 667                         (em_ptr->r_ptr->flags3 & RF3_NO_CONF) ||
 668                         (em_ptr->r_ptr->level > randint1((em_ptr->caster_lev - 10) < 1 ? 1 : (em_ptr->caster_lev - 10)) + 10))
 669                 {
 670                         if (em_ptr->r_ptr->flags3 & (RF3_NO_CONF))
 671                         {
 672                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_NO_CONF);
 673                         }
 674
 675                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 676                         em_ptr->dam = 0;
 677                 }
 678                 else if (em_ptr->r_ptr->flags2 & RF2_EMPTY_MIND)
 679                 {
 680                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
 681                         em_ptr->note = _("には完全な耐性がある！", " is immune.");
 682                         em_ptr->dam = 0;
 683                 }
 684                 else if (em_ptr->r_ptr->flags2 & RF2_WEIRD_MIND)
 685                 {
 686                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags2 |= (RF2_WEIRD_MIND);
 687                         em_ptr->note = _("には耐性がある！", " resists!");
 688                         em_ptr->dam /= 3;
 689                 }
 690                 else
 691                 {
 692                         em_ptr->note = _("は精神攻撃を食らった。", " is blasted by psionic energy.");
 693                         em_ptr->note_dies = _("の精神は崩壊し、肉体は抜け殻となった。", " collapses, a mindless husk.");
 694                         if (em_ptr->who > 0)
 695                         {
 696                                 em_ptr->do_conf = randint0(4) + 4;
 697                                 em_ptr->do_stun = randint0(4) + 4;
 698                         }
 699                         else
 700                         {
 701                                 em_ptr->do_conf = randint0(8) + 8;
 702                                 em_ptr->do_stun = randint0(8) + 8;
 703                         }
 704                         (void)set_monster_slow(caster_ptr, em_ptr->g_ptr->m_idx, MON_SLOW(em_ptr->m_ptr) + 10);
 705                 }
 706
 707                 break;
 708         }
 709         case GF_CAUSE_1:
 710         {
 711                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 712                 if (!em_ptr->who) msg_format(_("%sを指差して呪いをかけた。", "You point at %s and curse."), em_ptr->m_name);
 713                 if (randint0(100 + (em_ptr->caster_lev / 2)) < (em_ptr->r_ptr->level + 35))
 714                 {
 715                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 716                         em_ptr->dam = 0;
 717                 }
 718
 719                 break;
 720         }
 721         case GF_CAUSE_2:
 722         {
 723                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 724                 if (!em_ptr->who) msg_format(_("%sを指差して恐ろしげに呪いをかけた。", "You point at %s and curse horribly."), em_ptr->m_name);
 725
 726                 if (randint0(100 + (em_ptr->caster_lev / 2)) < (em_ptr->r_ptr->level + 35))
 727                 {
 728                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 729                         em_ptr->dam = 0;
 730                 }
 731
 732                 break;
 733         }
 734         case GF_CAUSE_3:
 735         {
 736                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 737                 if (!em_ptr->who) msg_format(_("%sを指差し、恐ろしげに呪文を唱えた！", "You point at %s, incanting terribly!"), em_ptr->m_name);
 738
 739                 if (randint0(100 + (em_ptr->caster_lev / 2)) < (em_ptr->r_ptr->level + 35))
 740                 {
 741                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 742                         em_ptr->dam = 0;
 743                 }
 744
 745                 break;
 746         }
 747         case GF_CAUSE_4:
 748         {
 749                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 750                 if (!em_ptr->who)
 751                         msg_format(_("%sの秘孔を突いて、「お前は既に死んでいる」と叫んだ。",
 752                                 "You point at %s, screaming the word, 'DIE!'."), em_ptr->m_name);
 753
 754                 if ((randint0(100 + (em_ptr->caster_lev / 2)) < (em_ptr->r_ptr->level + 35)) && ((em_ptr->who <= 0) || (em_ptr->m_caster_ptr->r_idx != MON_KENSHIROU)))
 755                 {
 756                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 757                         em_ptr->dam = 0;
 758                 }
 759                 break;
 760         }
 761         case GF_HAND_DOOM:
 762         {
 763                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 764                 if (em_ptr->r_ptr->flags1 & RF1_UNIQUE)
 765                 {
 766                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 767                         em_ptr->dam = 0;
 768                 }
 769                 else
 770                 {
 771                         if ((em_ptr->who > 0) ? ((em_ptr->caster_lev + randint1(em_ptr->dam)) > (em_ptr->r_ptr->level + 10 + randint1(20))) :
 772                                 (((em_ptr->caster_lev / 2) + randint1(em_ptr->dam)) > (em_ptr->r_ptr->level + randint1(200))))
 773                         {
 774                                 em_ptr->dam = ((40 + randint1(20)) * em_ptr->m_ptr->hp) / 100;
 775
 776                                 if (em_ptr->m_ptr->hp < em_ptr->dam) em_ptr->dam = em_ptr->m_ptr->hp - 1;
 777                         }
 778                         else
 779                         {
 780                                 em_ptr->note = _("は破滅の手に耐え切った！", "resists!");
 781                                 em_ptr->dam = 0;
 782                         }
 783                 }
 784
 785                 break;
 786         }
 787         case GF_CAPTURE:
 788         {
 789                 int nokori_hp;
 790                 if ((floor_ptr->inside_quest && (quest[floor_ptr->inside_quest].type == QUEST_TYPE_KILL_ALL) && !is_pet(em_ptr->m_ptr)) ||
 791                         (em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) || (em_ptr->r_ptr->flags7 & (RF7_NAZGUL)) || (em_ptr->r_ptr->flags7 & (RF7_UNIQUE2)) || (em_ptr->r_ptr->flags1 & RF1_QUESTOR) || em_ptr->m_ptr->parent_m_idx)
 792                 {
 793                         msg_format(_("%sには効果がなかった。", "%s is unaffected."), em_ptr->m_name);
 794                         em_ptr->skipped = TRUE;
 795                         break;
 796                 }
 797
 798                 if (is_pet(em_ptr->m_ptr)) nokori_hp = em_ptr->m_ptr->maxhp * 4L;
 799                 else if ((caster_ptr->pclass == CLASS_BEASTMASTER) && monster_living(em_ptr->m_ptr->r_idx))
 800                         nokori_hp = em_ptr->m_ptr->maxhp * 3 / 10;
 801                 else
 802                         nokori_hp = em_ptr->m_ptr->maxhp * 3 / 20;
 803
 804                 if (em_ptr->m_ptr->hp >= nokori_hp)
 805                 {
 806                         msg_format(_("もっと弱らせないと。", "You need to weaken %s more."), em_ptr->m_name);
 807                         em_ptr->skipped = TRUE;
 808                 }
 809                 else if (em_ptr->m_ptr->hp < randint0(nokori_hp))
 810                 {
 811                         if (em_ptr->m_ptr->mflag2 & MFLAG2_CHAMELEON) choose_new_monster(caster_ptr, em_ptr->g_ptr->m_idx, FALSE, MON_CHAMELEON);
 812                         msg_format(_("%sを捕えた！", "You capture %^s!"), em_ptr->m_name);
 813                         cap_mon = em_ptr->m_ptr->r_idx;
 814                         cap_mspeed = em_ptr->m_ptr->mspeed;
 815                         cap_hp = em_ptr->m_ptr->hp;
 816                         cap_maxhp = em_ptr->m_ptr->max_maxhp;
 817                         cap_nickname = em_ptr->m_ptr->nickname;
 818                         if (em_ptr->g_ptr->m_idx == caster_ptr->riding)
 819                         {
 820                                 if (rakuba(caster_ptr, -1, FALSE))
 821                                 {
 822                                         msg_format(_("地面に落とされた。", "You have fallen from %s."), em_ptr->m_name);
 823                                 }
 824                         }
 825
 826                         delete_monster_idx(caster_ptr, em_ptr->g_ptr->m_idx);
 827
 828                         return GF_SWITCH_TRUE;
 829                 }
 830                 else
 831                 {
 832                         msg_format(_("うまく捕まえられなかった。", "You failed to capture %s."), em_ptr->m_name);
 833                         em_ptr->skipped = TRUE;
 834                 }
 835
 836                 break;
 837         }
 838         case GF_ATTACK:
 839         {
 840                 return (gf_switch_result)py_attack(caster_ptr, em_ptr->y, em_ptr->x, em_ptr->dam);
 841         }
 842         case GF_ENGETSU:
 843         {
 844                 int effect = 0;
 845                 bool done = TRUE;
 846
 847                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 848                 if (em_ptr->r_ptr->flags2 & RF2_EMPTY_MIND)
 849                 {
 850                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 851                         em_ptr->dam = 0;
 852                         em_ptr->skipped = TRUE;
 853                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags2 |= (RF2_EMPTY_MIND);
 854                         break;
 855                 }
 856                 if (MON_CSLEEP(em_ptr->m_ptr))
 857                 {
 858                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 859                         em_ptr->dam = 0;
 860                         em_ptr->skipped = TRUE;
 861                         break;
 862                 }
 863
 864                 if (one_in_(5)) effect = 1;
 865                 else if (one_in_(4)) effect = 2;
 866                 else if (one_in_(3)) effect = 3;
 867                 else done = FALSE;
 868
 869                 if (effect == 1)
 870                 {
 871                         if ((em_ptr->r_ptr->flags1 & RF1_UNIQUE) ||
 872                                 (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10))
 873                         {
 874                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 875                                 em_ptr->obvious = FALSE;
 876                         }
 877                         else
 878                         {
 879                                 if (set_monster_slow(caster_ptr, em_ptr->g_ptr->m_idx, MON_SLOW(em_ptr->m_ptr) + 50))
 880                                 {
 881                                         em_ptr->note = _("の動きが遅くなった。", " starts moving slower.");
 882                                 }
 883                         }
 884                 }
 885                 else if (effect == 2)
 886                 {
 887                         em_ptr->do_stun = damroll((caster_ptr->lev / 10) + 3, (em_ptr->dam)) + 1;
 888                         if ((em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) ||
 889                                 (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10))
 890                         {
 891                                 em_ptr->do_stun = 0;
 892                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 893                                 em_ptr->obvious = FALSE;
 894                         }
 895                 }
 896                 else if (effect == 3)
 897                 {
 898                         if ((em_ptr->r_ptr->flags1 & RF1_UNIQUE) ||
 899                                 (em_ptr->r_ptr->flags3 & RF3_NO_SLEEP) ||
 900                                 (em_ptr->r_ptr->level > randint1((em_ptr->dam - 10) < 1 ? 1 : (em_ptr->dam - 10)) + 10))
 901                         {
 902                                 if (em_ptr->r_ptr->flags3 & RF3_NO_SLEEP)
 903                                 {
 904                                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_NO_SLEEP);
 905                                 }
 906
 907                                 em_ptr->note = _("には効果がなかった。", " is unaffected.");
 908                                 em_ptr->obvious = FALSE;
 909                         }
 910                         else
 911                         {
 912                                 /* Go to sleep (much) later */
 913                                 em_ptr->note = _("は眠り込んでしまった！", " falls asleep!");
 914                                 em_ptr->do_sleep = 500;
 915                         }
 916                 }
 917
 918                 if (!done)
 919                 {
 920                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
 921                 }
 922
 923                 em_ptr->dam = 0;
 924                 break;
 925         }
 926         case GF_GENOCIDE:
 927         {
 928                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 929                 if (genocide_aux(caster_ptr, em_ptr->g_ptr->m_idx, em_ptr->dam, !em_ptr->who, (em_ptr->r_ptr->level + 1) / 2, _("モンスター消滅", "Genocide One")))
 930                 {
 931                         if (em_ptr->seen_msg) msg_format(_("%sは消滅した！", "%^s disappeared!"), em_ptr->m_name);
 932                         chg_virtue(caster_ptr, V_VITALITY, -1);
 933                         return GF_SWITCH_TRUE;
 934                 }
 935
 936                 em_ptr->skipped = TRUE;
 937                 break;
 938         }
 939         case GF_PHOTO:
 940         {
 941                 if (!em_ptr->who)
 942                         msg_format(_("%sを写真に撮った。", "You take a photograph of %s."), em_ptr->m_name);
 943
 944                 if (em_ptr->r_ptr->flags3 & (RF3_HURT_LITE))
 945                 {
 946                         if (em_ptr->seen) em_ptr->obvious = TRUE;
 947
 948                         if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_HURT_LITE);
 949
 950                         em_ptr->note = _("は光に身をすくめた！", " cringes from the light!");
 951                         em_ptr->note_dies = _("は光を受けてしぼんでしまった！", " shrivels away in the light!");
 952                 }
 953                 else
 954                 {
 955                         em_ptr->dam = 0;
 956                 }
 957
 958                 em_ptr->photo = em_ptr->m_ptr->r_idx;
 959                 break;
 960         }
 961         case GF_CRUSADE:
 962         {
 963                 bool success = FALSE;
 964                 if (em_ptr->seen) em_ptr->obvious = TRUE;
 965
 966                 if ((em_ptr->r_ptr->flags3 & (RF3_GOOD)) && !floor_ptr->inside_arena)
 967                 {
 968                         if (em_ptr->r_ptr->flags3 & (RF3_NO_CONF)) em_ptr->dam -= 50;
 969                         if (em_ptr->dam < 1) em_ptr->dam = 1;
 970
 971                         if (is_pet(em_ptr->m_ptr))
 972                         {
 973                                 em_ptr->note = _("の動きが速くなった。", " starts moving faster.");
 974                                 (void)set_monster_fast(caster_ptr, em_ptr->g_ptr->m_idx, MON_FAST(em_ptr->m_ptr) + 100);
 975                                 success = TRUE;
 976                         }
 977                         else if ((em_ptr->r_ptr->flags1 & (RF1_QUESTOR)) ||
 978                                 (em_ptr->r_ptr->flags1 & (RF1_UNIQUE)) ||
 979                                 (em_ptr->m_ptr->mflag2 & MFLAG2_NOPET) ||
 980                                 (caster_ptr->cursed & TRC_AGGRAVATE) ||
 981                                 ((em_ptr->r_ptr->level + 10) > randint1(em_ptr->dam)))
 982                         {
 983                                 if (one_in_(4)) em_ptr->m_ptr->mflag2 |= MFLAG2_NOPET;
 984                         }
 985                         else
 986                         {
 987                                 em_ptr->note = _("を支配した。", " is tamed!");
 988                                 set_pet(caster_ptr, em_ptr->m_ptr);
 989                                 (void)set_monster_fast(caster_ptr, em_ptr->g_ptr->m_idx, MON_FAST(em_ptr->m_ptr) + 100);
 990
 991                                 if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr)) em_ptr->r_ptr->r_flags3 |= (RF3_GOOD);
 992                                 success = TRUE;
 993                         }
 994                 }
 995
 996                 if (!success)
 997                 {
 998                         if (!(em_ptr->r_ptr->flags3 & RF3_NO_FEAR))
 999                         {
1000                                 em_ptr->do_fear = randint1(90) + 10;
1001                         }
1002                         else if (is_original_ap_and_seen(caster_ptr, em_ptr->m_ptr))
1003                                 em_ptr->r_ptr->r_flags3 |= (RF3_NO_FEAR);
1004                 }
1005
1006                 em_ptr->dam = 0;
1007                 break;
1008         }
1009         case GF_WOUNDS:
1010         {
1011                 if (em_ptr->seen) em_ptr->obvious = TRUE;
1012
1013                 if (randint0(100 + em_ptr->dam) < (em_ptr->r_ptr->level + 50))
1014                 {
1015                         em_ptr->note = _("には効果がなかった。", " is unaffected.");
1016                         em_ptr->dam = 0;
1017                 }
1018                 break;
1019         }
1020         default:
1021         {
1022                 em_ptr->skipped = TRUE;
1023                 em_ptr->dam = 0;
1024                 break;
1025         }
1026         }
1027
1028         return GF_SWITCH_CONTINUE;
1029 }