src/monster-attack/monster-attack-processor.c

   1 /*!
   2  * @brief モンスターの攻撃に関する処理
   3  * @date 2020/03/08
   4  * @author Hourier
   5  */
   6
   7 #include "monster-attack/monster-attack-processor.h"
   8 #include "floor/floor.h"
   9 #include "monster/monster-status.h"
  10 #include "dungeon/dungeon.h"
  11 #include "monster-attack/monster-attack-player.h"
  12 #include "monster-race/monster-race.h"
  13 #include "monster-race/race-flags1.h"
  14 #include "monster-race/race-flags2.h"
  15 #include "monster/monster-info.h"
  16 #include "melee/monster-attack-monster.h"
  17 #include "system/floor-type-definition.h"
  18
  19  /*!
  20   * @brief モンスターが移動した結果、そこにプレーヤーがいたら直接攻撃を行う
  21   * @param target_ptr プレーヤーへの参照ポインタ
  22   * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
  23   * @param m_idx モンスターID
  24   * @param ny 移動後の、モンスターのY座標
  25   * @param nx 移動後の、モンスターのX座標
  26   * @return なし
  27   * @details
  28   * 反攻撃の洞窟など、直接攻撃ができない場所では処理をスキップする
  29   */
  30 void exe_monster_attack_to_player(player_type *target_ptr, turn_flags *turn_flags_ptr, MONSTER_IDX m_idx, POSITION ny, POSITION nx)
  31 {
  32         monster_type *m_ptr = &target_ptr->current_floor_ptr->m_list[m_idx];
  33         monster_race *r_ptr = &r_info[m_ptr->r_idx];
  34         if (!turn_flags_ptr->do_move || !player_bold(target_ptr, ny, nx))
  35                 return;
  36
  37         if (r_ptr->flags1 & RF1_NEVER_BLOW)
  38         {
  39                 if (is_original_ap_and_seen(target_ptr, m_ptr))
  40                         r_ptr->r_flags1 |= (RF1_NEVER_BLOW);
  41
  42                 turn_flags_ptr->do_move = FALSE;
  43         }
  44
  45         if (turn_flags_ptr->do_move && ((d_info[target_ptr->dungeon_idx].flags1 & DF1_NO_MELEE) != 0) && !monster_confused_remaining(m_ptr))
  46         {
  47                 if (!(r_ptr->flags2 & RF2_STUPID))
  48                         turn_flags_ptr->do_move = FALSE;
  49                 else if (is_original_ap_and_seen(target_ptr, m_ptr))
  50                         r_ptr->r_flags2 |= (RF2_STUPID);
  51         }
  52
  53         if (!turn_flags_ptr->do_move) return;
  54
  55         if (!target_ptr->riding || one_in_(2))
  56         {
  57                 (void)make_attack_normal(target_ptr, m_idx);
  58                 turn_flags_ptr->do_move = FALSE;
  59                 turn_flags_ptr->do_turn = TRUE;
  60         }
  61 }
  62
  63
  64 /*!
  65  * @brief モンスターからモンスターへの直接攻撃を実行する
  66  * @param target_ptr プレーヤーへの参照ポインタ
  67  * @param m_idx モンスターID
  68  * @param g_ptr グリッドへの参照ポインタ
  69  */
  70 static bool exe_monster_attack_to_monster(player_type *target_ptr, MONSTER_IDX m_idx, grid_type *g_ptr)
  71 {
  72         monster_type *m_ptr = &target_ptr->current_floor_ptr->m_list[m_idx];
  73         monster_race *r_ptr = &r_info[m_ptr->r_idx];
  74         monster_type *y_ptr;
  75         y_ptr = &target_ptr->current_floor_ptr->m_list[g_ptr->m_idx];
  76         if ((r_ptr->flags1 & RF1_NEVER_BLOW) != 0) return FALSE;
  77
  78         if (((r_ptr->flags2 & RF2_KILL_BODY) == 0) && is_original_ap_and_seen(target_ptr, m_ptr))
  79                 r_ptr->r_flags2 |= (RF2_KILL_BODY);
  80
  81         if ((y_ptr->r_idx == 0) || (y_ptr->hp < 0)) return FALSE;
  82         if (monst_attack_monst(target_ptr, m_idx, g_ptr->m_idx)) return TRUE;
  83         if ((d_info[target_ptr->dungeon_idx].flags1 & DF1_NO_MELEE) == 0) return FALSE;
  84         if (monster_confused_remaining(m_ptr)) return TRUE;
  85         if ((r_ptr->flags2 & RF2_STUPID) == 0) return FALSE;
  86
  87         if (is_original_ap_and_seen(target_ptr, m_ptr))
  88                 r_ptr->r_flags2 |= (RF2_STUPID);
  89
  90         return TRUE;
  91 }
  92
  93
  94 /*!
  95   * @brief モンスターからモンスターへの攻撃処理
  96   * @param target_ptr プレーヤーへの参照ポインタ
  97   * @param turn_flags_ptr ターン経過処理フラグへの参照ポインタ
  98   * @param m_idx モンスターID
  99   * @param g_ptr グリッドへの参照ポインタ
 100   * @param can_cross モンスターが地形を踏破できるならばTRUE
 101   * @return ターン消費が発生したらTRUE
 102   */
 103 bool process_monster_attack_to_monster(player_type *target_ptr, turn_flags *turn_flags_ptr, MONSTER_IDX m_idx, grid_type *g_ptr, bool can_cross)
 104 {
 105         monster_type *m_ptr = &target_ptr->current_floor_ptr->m_list[m_idx];
 106         monster_race *r_ptr = &r_info[m_ptr->r_idx];
 107         monster_type *y_ptr;
 108         y_ptr = &target_ptr->current_floor_ptr->m_list[g_ptr->m_idx];
 109         if (!turn_flags_ptr->do_move || (g_ptr->m_idx == 0)) return FALSE;
 110
 111         monster_race *z_ptr = &r_info[y_ptr->r_idx];
 112         turn_flags_ptr->do_move = FALSE;
 113         if ((((r_ptr->flags2 & RF2_KILL_BODY) != 0) && ((r_ptr->flags1 & RF1_NEVER_BLOW) == 0) &&
 114                 (r_ptr->mexp * r_ptr->level > z_ptr->mexp * z_ptr->level) &&
 115                 can_cross && (g_ptr->m_idx != target_ptr->riding)) ||
 116                 are_enemies(target_ptr, m_ptr, y_ptr) || monster_confused_remaining(m_ptr))
 117         {
 118                 return exe_monster_attack_to_monster(target_ptr, m_idx, g_ptr);
 119         }
 120
 121         if (((r_ptr->flags2 & RF2_MOVE_BODY) != 0) && ((r_ptr->flags1 & RF1_NEVER_MOVE) == 0) &&
 122                 (r_ptr->mexp > z_ptr->mexp) &&
 123                 can_cross && (g_ptr->m_idx != target_ptr->riding) &&
 124                 monster_can_cross_terrain(target_ptr, target_ptr->current_floor_ptr->grid_array[m_ptr->fy][m_ptr->fx].feat, z_ptr, 0))
 125         {
 126                 turn_flags_ptr->do_move = TRUE;
 127                 turn_flags_ptr->did_move_body = TRUE;
 128                 (void)set_monster_csleep(target_ptr, g_ptr->m_idx, 0);
 129         }
 130
 131         return FALSE;
 132 }