src/object/warning.cpp

   1 #include "object/warning.h"
   2 #include "artifact/fixed-art-types.h"
   3 #include "core/asking-player.h"
   4 #include "core/disturbance.h"
   5 #include "dungeon/dungeon-flag-types.h"
   6 #include "dungeon/dungeon.h"
   7 #include "flavor/flavor-describer.h"
   8 #include "flavor/object-flavor-types.h"
   9 #include "floor/cave.h"
  10 #include "floor/geometry.h"
  11 #include "game-option/input-options.h"
  12 #include "grid/feature.h"
  13 #include "inventory/inventory-slot-types.h"
  14 #include "monster-attack/monster-attack-effect.h"
  15 #include "monster-attack/monster-attack-table.h"
  16 #include "monster-race/monster-race.h"
  17 #include "monster-race/race-ability-flags.h"
  18 #include "monster-race/race-flags1.h"
  19 #include "monster-race/race-indice-types.h"
  20 #include "monster/monster-info.h"
  21 #include "monster/monster-status.h"
  22 #include "mspell/mspell-damage-calculator.h"
  23 #include "mutation/mutation-flag-types.h"
  24 #include "object-enchant/tr-types.h"
  25 #include "object/object-flags.h"
  26 #include "player-base/player-race.h"
  27 #include "player/player-status-flags.h"
  28 #include "player/player-status-resist.h"
  29 #include "player/special-defense-types.h"
  30 #include "status/element-resistance.h"
  31 #include "system/floor-type-definition.h"
  32 #include "system/grid-type-definition.h"
  33 #include "system/monster-race-definition.h"
  34 #include "system/monster-type-definition.h"
  35 #include "system/object-type-definition.h"
  36 #include "system/player-type-definition.h"
  37 #include "target/projection-path-calculator.h"
  38 #include "timed-effect/player-blindness.h"
  39 #include "timed-effect/timed-effects.h"
  40 #include "util/bit-flags-calculator.h"
  41 #include "view/display-messages.h"
  42
  43 /*!
  44  * @brief 警告を放つアイテムを選択する /
  45  * Choose one of items that have warning flag
  46  * Calculate spell damages
  47  * @return 警告を行う
  48  */
  49 ObjectType *choose_warning_item(PlayerType *player_ptr)
  50 {
  51     int choices[INVEN_TOTAL - INVEN_MAIN_HAND];
  52
  53     /* Paranoia -- Player has no warning ability */
  54     if (!player_ptr->warning) {
  55         return nullptr;
  56     }
  57
  58     /* Search Inventory */
  59     int number = 0;
  60     for (int i = INVEN_MAIN_HAND; i < INVEN_TOTAL; i++) {
  61         auto *o_ptr = &player_ptr->inventory_list[i];
  62
  63         auto flgs = object_flags(o_ptr);
  64         if (flgs.has(TR_WARNING)) {
  65             choices[number] = i;
  66             number++;
  67         }
  68     }
  69
  70     /* Choice one of them */
  71     return number ? &player_ptr->inventory_list[choices[randint0(number)]] : nullptr;
  72 }
  73
  74 /*!
  75  * @brief 警告基準を定めるために魔法の効果属性に基づいて最大魔法ダメージを計算する /
  76  * Calculate spell damages
  77  * @param m_ptr 魔法を行使するモンスターの構造体参照ポインタ
  78  * @param typ 効果属性のID
  79  * @param dam 基本ダメージ
  80  * @param max 算出した最大ダメージを返すポインタ
  81  */
  82 static void spell_damcalc(PlayerType *player_ptr, monster_type *m_ptr, AttributeType typ, int dam, int *max)
  83 {
  84     auto *r_ptr = &r_info[m_ptr->r_idx];
  85     int rlev = r_ptr->level;
  86     bool ignore_wraith_form = false;
  87
  88     /* Vulnerability, resistance and immunity */
  89     switch (typ) {
  90     case AttributeType::ELEC:
  91         if (has_immune_elec(player_ptr)) {
  92             ignore_wraith_form = true;
  93         }
  94         dam = dam * calc_elec_damage_rate(player_ptr) / 100;
  95         break;
  96
  97     case AttributeType::POIS:
  98         dam = dam * calc_pois_damage_rate(player_ptr) / 100;
  99         break;
 100
 101     case AttributeType::ACID:
 102         if (has_immune_acid(player_ptr)) {
 103             ignore_wraith_form = true;
 104         }
 105         dam = dam * calc_acid_damage_rate(player_ptr) / 100;
 106         break;
 107
 108     case AttributeType::COLD:
 109     case AttributeType::ICE:
 110         if (has_immune_cold(player_ptr)) {
 111             ignore_wraith_form = true;
 112         }
 113         dam = dam * calc_cold_damage_rate(player_ptr) / 100;
 114         break;
 115
 116     case AttributeType::FIRE:
 117         if (has_immune_fire(player_ptr)) {
 118             ignore_wraith_form = true;
 119         }
 120         dam = dam * calc_fire_damage_rate(player_ptr) / 100;
 121         break;
 122
 123     case AttributeType::PSY_SPEAR:
 124         ignore_wraith_form = true;
 125         break;
 126
 127     case AttributeType::MONSTER_SHOOT:
 128         if (!player_ptr->effects()->blindness()->is_blind() && (has_invuln_arrow(player_ptr))) {
 129             dam = 0;
 130             ignore_wraith_form = true;
 131         }
 132         break;
 133
 134     case AttributeType::LITE:
 135         dam = dam * calc_lite_damage_rate(player_ptr, CALC_MAX) / 100;
 136         break;
 137
 138     case AttributeType::DARK:
 139         dam = dam * calc_dark_damage_rate(player_ptr, CALC_MAX) / 100;
 140         if (has_immune_dark(player_ptr) || player_ptr->wraith_form) {
 141             ignore_wraith_form = true;
 142         }
 143         break;
 144
 145     case AttributeType::SHARDS:
 146         dam = dam * calc_shards_damage_rate(player_ptr, CALC_MAX) / 100;
 147         break;
 148
 149     case AttributeType::SOUND:
 150         dam = dam * calc_sound_damage_rate(player_ptr, CALC_MAX) / 100;
 151         break;
 152
 153     case AttributeType::CONFUSION:
 154         dam = dam * calc_conf_damage_rate(player_ptr, CALC_MAX) / 100;
 155         break;
 156
 157     case AttributeType::CHAOS:
 158         dam = dam * calc_chaos_damage_rate(player_ptr, CALC_MAX) / 100;
 159         break;
 160
 161     case AttributeType::NETHER:
 162         dam = dam * calc_nether_damage_rate(player_ptr, CALC_MAX) / 100;
 163         if (PlayerRace(player_ptr).equals(PlayerRaceType::SPECTRE)) {
 164             ignore_wraith_form = true;
 165             dam = 0;
 166         }
 167         break;
 168
 169     case AttributeType::DISENCHANT:
 170         dam = dam * calc_disenchant_damage_rate(player_ptr, CALC_MAX) / 100;
 171         break;
 172
 173     case AttributeType::NEXUS:
 174         dam = dam * calc_nexus_damage_rate(player_ptr, CALC_MAX) / 100;
 175         break;
 176
 177     case AttributeType::TIME:
 178         dam = dam * calc_time_damage_rate(player_ptr, CALC_MAX) / 100;
 179         break;
 180
 181     case AttributeType::GRAVITY:
 182         dam = dam * calc_gravity_damage_rate(player_ptr, CALC_MAX) / 100;
 183         break;
 184
 185     case AttributeType::ROCKET:
 186         dam = dam * calc_rocket_damage_rate(player_ptr, CALC_MAX) / 100;
 187         break;
 188
 189     case AttributeType::NUKE:
 190         dam = dam * calc_nuke_damage_rate(player_ptr) / 100;
 191         break;
 192
 193     case AttributeType::DEATH_RAY:
 194         dam = dam * calc_deathray_damage_rate(player_ptr, CALC_MAX) / 100;
 195         if (dam == 0) {
 196             ignore_wraith_form = true;
 197         }
 198         break;
 199
 200     case AttributeType::HOLY_FIRE:
 201         dam = dam * calc_holy_fire_damage_rate(player_ptr, CALC_MAX) / 100;
 202         break;
 203
 204     case AttributeType::HELL_FIRE:
 205         dam = dam * calc_hell_fire_damage_rate(player_ptr, CALC_MAX) / 100;
 206         break;
 207
 208     case AttributeType::ABYSS:
 209         dam = dam * calc_abyss_damage_rate(player_ptr, CALC_MAX) / 100;
 210         break;
 211
 212     case AttributeType::VOID_MAGIC:
 213         dam = dam * calc_void_damage_rate(player_ptr, CALC_MAX) / 100;
 214         break;
 215
 216     case AttributeType::MIND_BLAST:
 217     case AttributeType::BRAIN_SMASH:
 218         if (100 + rlev / 2 <= std::max<short>(5, player_ptr->skill_sav)) {
 219             dam = 0;
 220             ignore_wraith_form = true;
 221         }
 222
 223         break;
 224
 225     case AttributeType::CAUSE_1:
 226     case AttributeType::CAUSE_2:
 227     case AttributeType::CAUSE_3:
 228     case AttributeType::HAND_DOOM:
 229         if (100 + rlev / 2 <= player_ptr->skill_sav) {
 230             dam = 0;
 231             ignore_wraith_form = true;
 232         }
 233
 234         break;
 235
 236     case AttributeType::CAUSE_4:
 237         if ((100 + rlev / 2 <= player_ptr->skill_sav) && (m_ptr->r_idx != MonsterRaceId::KENSHIROU)) {
 238             dam = 0;
 239             ignore_wraith_form = true;
 240         }
 241
 242         break;
 243     default:
 244         break;
 245     }
 246
 247     if (player_ptr->wraith_form && !ignore_wraith_form) {
 248         dam /= 2;
 249         if (!dam) {
 250             dam = 1;
 251         }
 252     }
 253
 254     if (dam > *max) {
 255         *max = dam;
 256     }
 257 }
 258
 259 /*!
 260  * @brief 警告基準を定めるために魔法の効果属性に基づいて最大魔法ダメージを計算する。 /
 261  * Calculate spell damages
 262  * @param spell_num RF4ならRF_ABILITY::SPELL_STARTのように32区切りのベースとなる数値
 263  * @param typ 効果属性のID
 264  * @param m_idx 魔法を行使するモンスターのID
 265  * @param max 算出した最大ダメージを返すポインタ
 266  */
 267 static void spell_damcalc_by_spellnum(PlayerType *player_ptr, MonsterAbilityType ms_type, AttributeType typ, MONSTER_IDX m_idx, int *max)
 268 {
 269     auto *m_ptr = &player_ptr->current_floor_ptr->m_list[m_idx];
 270     int dam = monspell_damage(player_ptr, ms_type, m_idx, DAM_MAX);
 271     spell_damcalc(player_ptr, m_ptr, typ, dam, max);
 272 }
 273
 274 /*!
 275  * @brief 警告基準を定めるためにモンスターの打撃最大ダメージを算出する /
 276  * Calculate blow damages
 277  * @param m_ptr 打撃を行使するモンスターの構造体参照ポインタ
 278  * @param blow_ptr モンスターの打撃能力の構造体参照ポインタ
 279  * @return 算出された最大ダメージを返す。
 280  */
 281 static int blow_damcalc(monster_type *m_ptr, PlayerType *player_ptr, MonsterBlow *blow_ptr)
 282 {
 283     int dam = blow_ptr->d_dice * blow_ptr->d_side;
 284     int dummy_max = 0;
 285
 286     if (blow_ptr->method == RaceBlowMethodType::EXPLODE) {
 287         dam = (dam + 1) / 2;
 288         spell_damcalc(player_ptr, m_ptr, mbe_info[enum2i(blow_ptr->effect)].explode_type, dam, &dummy_max);
 289         dam = dummy_max;
 290         return dam;
 291     }
 292
 293     ARMOUR_CLASS ac = player_ptr->ac + player_ptr->to_a;
 294     bool check_wraith_form = true;
 295     switch (blow_ptr->effect) {
 296     case RaceBlowEffectType::SUPERHURT: {
 297         int tmp_dam = dam - (dam * ((ac < 150) ? ac : 150) / 250);
 298         dam = std::max(dam, tmp_dam * 2);
 299         break;
 300     }
 301
 302     case RaceBlowEffectType::HURT:
 303     case RaceBlowEffectType::SHATTER:
 304         dam -= (dam * ((ac < 150) ? ac : 150) / 250);
 305         break;
 306
 307     case RaceBlowEffectType::ACID:
 308         spell_damcalc(player_ptr, m_ptr, AttributeType::ACID, dam, &dummy_max);
 309         dam = dummy_max;
 310         check_wraith_form = false;
 311         break;
 312
 313     case RaceBlowEffectType::ELEC:
 314         spell_damcalc(player_ptr, m_ptr, AttributeType::ELEC, dam, &dummy_max);
 315         dam = dummy_max;
 316         check_wraith_form = false;
 317         break;
 318
 319     case RaceBlowEffectType::FIRE:
 320         spell_damcalc(player_ptr, m_ptr, AttributeType::FIRE, dam, &dummy_max);
 321         dam = dummy_max;
 322         check_wraith_form = false;
 323         break;
 324
 325     case RaceBlowEffectType::COLD:
 326         spell_damcalc(player_ptr, m_ptr, AttributeType::COLD, dam, &dummy_max);
 327         dam = dummy_max;
 328         check_wraith_form = false;
 329         break;
 330
 331     case RaceBlowEffectType::DR_MANA:
 332         dam = 0;
 333         check_wraith_form = false;
 334         break;
 335
 336     default:
 337         break;
 338     }
 339
 340     if (check_wraith_form && player_ptr->wraith_form) {
 341         dam /= 2;
 342         if (!dam) {
 343             dam = 1;
 344         }
 345     }
 346
 347     return dam;
 348 }
 349
 350 /*!
 351  * @brief プレイヤーが特定地点へ移動した場合に警告を発する処理 /
 352  * Examine the grid (xx,yy) and warn the player if there are any danger
 353  * @param xx 危険性を調査するマスのX座標
 354  * @param yy 危険性を調査するマスのY座標
 355  * @return 警告を無視して進むことを選択するかか問題が無ければTRUE、警告に従ったならFALSEを返す。
 356  */
 357 bool process_warning(PlayerType *player_ptr, POSITION xx, POSITION yy)
 358 {
 359     POSITION mx, my;
 360     grid_type *g_ptr;
 361     GAME_TEXT o_name[MAX_NLEN];
 362
 363 #define WARNING_AWARE_RANGE 12
 364     int dam_max = 0;
 365     static int old_damage = 0;
 366
 367     for (mx = xx - WARNING_AWARE_RANGE; mx < xx + WARNING_AWARE_RANGE + 1; mx++) {
 368         for (my = yy - WARNING_AWARE_RANGE; my < yy + WARNING_AWARE_RANGE + 1; my++) {
 369             int dam_max0 = 0;
 370             monster_type *m_ptr;
 371             monster_race *r_ptr;
 372
 373             if (!in_bounds(player_ptr->current_floor_ptr, my, mx) || (distance(my, mx, yy, xx) > WARNING_AWARE_RANGE)) {
 374                 continue;
 375             }
 376
 377             g_ptr = &player_ptr->current_floor_ptr->grid_array[my][mx];
 378
 379             if (!g_ptr->m_idx) {
 380                 continue;
 381             }
 382
 383             m_ptr = &player_ptr->current_floor_ptr->m_list[g_ptr->m_idx];
 384
 385             if (monster_csleep_remaining(m_ptr)) {
 386                 continue;
 387             }
 388             if (!is_hostile(m_ptr)) {
 389                 continue;
 390             }
 391
 392             r_ptr = &r_info[m_ptr->r_idx];
 393
 394             /* Monster spells (only powerful ones)*/
 395             if (projectable(player_ptr, my, mx, yy, xx)) {
 396                 const auto flags = r_ptr->ability_flags;
 397
 398                 if (d_info[player_ptr->dungeon_idx].flags.has_not(DungeonFeatureType::NO_MAGIC)) {
 399                     if (flags.has(MonsterAbilityType::BA_CHAO)) {
 400                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_CHAO, AttributeType::CHAOS, g_ptr->m_idx, &dam_max0);
 401                     }
 402                     if (flags.has(MonsterAbilityType::BA_MANA)) {
 403                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_MANA, AttributeType::MANA, g_ptr->m_idx, &dam_max0);
 404                     }
 405                     if (flags.has(MonsterAbilityType::BA_DARK)) {
 406                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_DARK, AttributeType::DARK, g_ptr->m_idx, &dam_max0);
 407                     }
 408                     if (flags.has(MonsterAbilityType::BA_LITE)) {
 409                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_LITE, AttributeType::LITE, g_ptr->m_idx, &dam_max0);
 410                     }
 411                     if (flags.has(MonsterAbilityType::HAND_DOOM)) {
 412                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::HAND_DOOM, AttributeType::HAND_DOOM, g_ptr->m_idx, &dam_max0);
 413                     }
 414                     if (flags.has(MonsterAbilityType::PSY_SPEAR)) {
 415                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::PSY_SPEAR, AttributeType::PSY_SPEAR, g_ptr->m_idx, &dam_max0);
 416                     }
 417                     if (flags.has(MonsterAbilityType::BA_VOID)) {
 418                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_VOID, AttributeType::VOID_MAGIC, g_ptr->m_idx, &dam_max0);
 419                     }
 420                     if (flags.has(MonsterAbilityType::BA_ABYSS)) {
 421                         spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BA_ABYSS, AttributeType::ABYSS, g_ptr->m_idx, &dam_max0);
 422                     }
 423                 }
 424
 425                 if (flags.has(MonsterAbilityType::ROCKET)) {
 426                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::ROCKET, AttributeType::ROCKET, g_ptr->m_idx, &dam_max0);
 427                 }
 428                 if (flags.has(MonsterAbilityType::BR_ACID)) {
 429                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_ACID, AttributeType::ACID, g_ptr->m_idx, &dam_max0);
 430                 }
 431                 if (flags.has(MonsterAbilityType::BR_ELEC)) {
 432                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_ELEC, AttributeType::ELEC, g_ptr->m_idx, &dam_max0);
 433                 }
 434                 if (flags.has(MonsterAbilityType::BR_FIRE)) {
 435                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_FIRE, AttributeType::FIRE, g_ptr->m_idx, &dam_max0);
 436                 }
 437                 if (flags.has(MonsterAbilityType::BR_COLD)) {
 438                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_COLD, AttributeType::COLD, g_ptr->m_idx, &dam_max0);
 439                 }
 440                 if (flags.has(MonsterAbilityType::BR_POIS)) {
 441                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_POIS, AttributeType::POIS, g_ptr->m_idx, &dam_max0);
 442                 }
 443                 if (flags.has(MonsterAbilityType::BR_NETH)) {
 444                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_NETH, AttributeType::NETHER, g_ptr->m_idx, &dam_max0);
 445                 }
 446                 if (flags.has(MonsterAbilityType::BR_LITE)) {
 447                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_LITE, AttributeType::LITE, g_ptr->m_idx, &dam_max0);
 448                 }
 449                 if (flags.has(MonsterAbilityType::BR_DARK)) {
 450                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_DARK, AttributeType::DARK, g_ptr->m_idx, &dam_max0);
 451                 }
 452                 if (flags.has(MonsterAbilityType::BR_CONF)) {
 453                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_CONF, AttributeType::CONFUSION, g_ptr->m_idx, &dam_max0);
 454                 }
 455                 if (flags.has(MonsterAbilityType::BR_SOUN)) {
 456                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_SOUN, AttributeType::SOUND, g_ptr->m_idx, &dam_max0);
 457                 }
 458                 if (flags.has(MonsterAbilityType::BR_CHAO)) {
 459                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_CHAO, AttributeType::CHAOS, g_ptr->m_idx, &dam_max0);
 460                 }
 461                 if (flags.has(MonsterAbilityType::BR_DISE)) {
 462                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_DISE, AttributeType::DISENCHANT, g_ptr->m_idx, &dam_max0);
 463                 }
 464                 if (flags.has(MonsterAbilityType::BR_NEXU)) {
 465                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_NEXU, AttributeType::NEXUS, g_ptr->m_idx, &dam_max0);
 466                 }
 467                 if (flags.has(MonsterAbilityType::BR_TIME)) {
 468                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_TIME, AttributeType::TIME, g_ptr->m_idx, &dam_max0);
 469                 }
 470                 if (flags.has(MonsterAbilityType::BR_INER)) {
 471                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_INER, AttributeType::INERTIAL, g_ptr->m_idx, &dam_max0);
 472                 }
 473                 if (flags.has(MonsterAbilityType::BR_GRAV)) {
 474                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_GRAV, AttributeType::GRAVITY, g_ptr->m_idx, &dam_max0);
 475                 }
 476                 if (flags.has(MonsterAbilityType::BR_SHAR)) {
 477                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_SHAR, AttributeType::SHARDS, g_ptr->m_idx, &dam_max0);
 478                 }
 479                 if (flags.has(MonsterAbilityType::BR_PLAS)) {
 480                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_PLAS, AttributeType::PLASMA, g_ptr->m_idx, &dam_max0);
 481                 }
 482                 if (flags.has(MonsterAbilityType::BR_FORC)) {
 483                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_FORC, AttributeType::FORCE, g_ptr->m_idx, &dam_max0);
 484                 }
 485                 if (flags.has(MonsterAbilityType::BR_MANA)) {
 486                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_MANA, AttributeType::MANA, g_ptr->m_idx, &dam_max0);
 487                 }
 488                 if (flags.has(MonsterAbilityType::BR_NUKE)) {
 489                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_NUKE, AttributeType::NUKE, g_ptr->m_idx, &dam_max0);
 490                 }
 491                 if (flags.has(MonsterAbilityType::BR_DISI)) {
 492                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_DISI, AttributeType::DISINTEGRATE, g_ptr->m_idx, &dam_max0);
 493                 }
 494                 if (flags.has(MonsterAbilityType::BR_VOID)) {
 495                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_VOID, AttributeType::VOID_MAGIC, g_ptr->m_idx, &dam_max0);
 496                 }
 497                 if (flags.has(MonsterAbilityType::BR_ABYSS)) {
 498                     spell_damcalc_by_spellnum(player_ptr, MonsterAbilityType::BR_ABYSS, AttributeType::ABYSS, g_ptr->m_idx, &dam_max0);
 499                 }
 500             }
 501             /* Monster melee attacks */
 502             if (r_ptr->behavior_flags.has(MonsterBehaviorType::NEVER_BLOW) || d_info[player_ptr->dungeon_idx].flags.has(DungeonFeatureType::NO_MELEE)) {
 503                 dam_max += dam_max0;
 504                 continue;
 505             }
 506
 507             if (!(mx <= xx + 1 && mx >= xx - 1 && my <= yy + 1 && my >= yy - 1)) {
 508                 dam_max += dam_max0;
 509                 continue;
 510             }
 511
 512             int dam_melee = 0;
 513             for (int m = 0; m < 4; m++) {
 514                 /* Skip non-attacks */
 515                 if (r_ptr->blow[m].method == RaceBlowMethodType::NONE || (r_ptr->blow[m].method == RaceBlowMethodType::SHOOT)) {
 516                     continue;
 517                 }
 518
 519                 /* Extract the attack info */
 520                 dam_melee += blow_damcalc(m_ptr, player_ptr, &r_ptr->blow[m]);
 521                 if (r_ptr->blow[m].method == RaceBlowMethodType::EXPLODE) {
 522                     break;
 523                 }
 524             }
 525
 526             if (dam_melee > dam_max0) {
 527                 dam_max0 = dam_melee;
 528             }
 529             dam_max += dam_max0;
 530         }
 531     }
 532
 533     /* Prevent excessive warning */
 534     if (dam_max > old_damage) {
 535         old_damage = dam_max * 3 / 2;
 536
 537         if (dam_max > player_ptr->chp / 2) {
 538             auto *o_ptr = choose_warning_item(player_ptr);
 539
 540             if (o_ptr) {
 541                 describe_flavor(player_ptr, o_name, o_ptr, (OD_OMIT_PREFIX | OD_NAME_ONLY));
 542             } else {
 543                 strcpy(o_name, _("体", "body")); /* Warning ability without item */
 544             }
 545             msg_format(_("%sが鋭く震えた！", "Your %s pulsates sharply!"), o_name);
 546
 547             disturb(player_ptr, false, true);
 548             return get_check(_("本当にこのまま進むか？", "Really want to go ahead? "));
 549         }
 550     } else {
 551         old_damage = old_damage / 2;
 552     }
 553
 554     g_ptr = &player_ptr->current_floor_ptr->grid_array[yy][xx];
 555     bool is_warning = (!easy_disarm && is_trap(player_ptr, g_ptr->feat)) || (g_ptr->mimic && is_trap(player_ptr, g_ptr->feat));
 556     is_warning &= !one_in_(13);
 557     if (!is_warning) {
 558         return true;
 559     }
 560
 561     auto *o_ptr = choose_warning_item(player_ptr);
 562     if (o_ptr != nullptr) {
 563         describe_flavor(player_ptr, o_name, o_ptr, (OD_OMIT_PREFIX | OD_NAME_ONLY));
 564     } else {
 565         strcpy(o_name, _("体", "body")); /* Warning ability without item */
 566     }
 567     msg_format(_("%sが鋭く震えた！", "Your %s pulsates sharply!"), o_name);
 568     disturb(player_ptr, false, true);
 569     return get_check(_("本当にこのまま進むか？", "Really want to go ahead? "));
 570 }