src/monster-attack/monster-attack-lose.c

   1 #include "monster-attack/monster-attack-lose.h"
   2 #include "mind/mind-mirror-master.h"
   3 #include "monster-attack/monster-attack-status.h"
   4 #include "monster-attack/monster-attack-util.h"
   5 #include "player/player-damage.h"
   6 #include "player/player-status-flags.h"
   7 #include "player/player-status-resist.h"
   8 #include "status/bad-status-setter.h"
   9 #include "status/base-status.h"
  10 #include "status/element-resistance.h"
  11 #include "view/display-messages.h"
  12
  13 /*!
  14  * @brief 病気ダメージを計算する (毒耐性があれば、(1d4 + 4) / 9になる。二重耐性なら更に(1d4 + 4) / 9)
  15  * @param target_ptr プレーヤーへの参照ポインタ
  16  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
  17  * @return なし
  18  * @details 10% (毒の一次耐性があれば4%、二重耐性ならば1.6%)の確率で耐久が低下し、更に1/10の確率で永久低下する
  19  */
  20 void calc_blow_disease(player_type *target_ptr, monap_type *monap_ptr)
  21 {
  22     if (has_resist_pois(target_ptr))
  23         monap_ptr->damage = monap_ptr->damage * (randint1(4) + 4) / 9;
  24
  25     if (is_oppose_pois(target_ptr))
  26         monap_ptr->damage = monap_ptr->damage * (randint1(4) + 4) / 9;
  27
  28     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
  29     if (target_ptr->is_dead || check_multishadow(target_ptr))
  30         return;
  31
  32     if (!(has_resist_pois(target_ptr) || is_oppose_pois(target_ptr)) && set_poisoned(target_ptr, target_ptr->poisoned + randint1(monap_ptr->rlev) + 5))
  33         monap_ptr->obvious = TRUE;
  34
  35     bool disease_possibility = randint1(100) > calc_nuke_damage_rate(target_ptr);
  36     if (disease_possibility || (randint1(100) > 10) || (target_ptr->prace == RACE_ANDROID))
  37         return;
  38
  39     bool perm = one_in_(10);
  40     if (dec_stat(target_ptr, A_CON, randint1(10), perm)) {
  41         msg_print(_("病があなたを蝕んでいる気がする。", "You feel sickly."));
  42         monap_ptr->obvious = TRUE;
  43     }
  44 }
  45
  46 /*!
  47  * @brief 腕力低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
  48  * @param target_ptr プレーヤーへの参照ポインタ
  49  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
  50  * @return なし
  51  */
  52 void calc_blow_lose_strength(player_type *target_ptr, monap_type *monap_ptr)
  53 {
  54     if (has_sustain_str(target_ptr))
  55         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
  56
  57     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
  58     if (target_ptr->is_dead || check_multishadow(target_ptr))
  59         return;
  60
  61     if (do_dec_stat(target_ptr, A_STR))
  62         monap_ptr->obvious = TRUE;
  63 }
  64
  65 /*!
  66  * @brief 知能低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
  67  * @param target_ptr プレーヤーへの参照ポインタ
  68  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
  69  * @return なし
  70  */
  71 void calc_blow_lose_intelligence(player_type *target_ptr, monap_type *monap_ptr)
  72 {
  73     if (has_sustain_int(target_ptr))
  74         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
  75
  76     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
  77     if (target_ptr->is_dead || check_multishadow(target_ptr))
  78         return;
  79
  80     if (do_dec_stat(target_ptr, A_INT))
  81         monap_ptr->obvious = TRUE;
  82 }
  83
  84 /*!
  85  * @brief 賢さ低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
  86  * @param target_ptr プレーヤーへの参照ポインタ
  87  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
  88  * @return なし
  89  */
  90 void calc_blow_lose_wisdom(player_type *target_ptr, monap_type *monap_ptr)
  91 {
  92     if (has_sustain_wis(target_ptr))
  93         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
  94
  95     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
  96     if (target_ptr->is_dead || check_multishadow(target_ptr))
  97         return;
  98
  99     if (do_dec_stat(target_ptr, A_WIS))
 100         monap_ptr->obvious = TRUE;
 101 }
 102
 103 /*!
 104  * @brief 器用低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
 105  * @param target_ptr プレーヤーへの参照ポインタ
 106  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
 107  * @return なし
 108  */
 109 void calc_blow_lose_dexterity(player_type *target_ptr, monap_type *monap_ptr)
 110 {
 111     if (has_sustain_dex(target_ptr))
 112         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
 113
 114     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
 115     if (target_ptr->is_dead || check_multishadow(target_ptr))
 116         return;
 117
 118     if (do_dec_stat(target_ptr, A_DEX))
 119         monap_ptr->obvious = TRUE;
 120 }
 121
 122 /*!
 123  * @brief 耐久低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
 124  * @param target_ptr プレーヤーへの参照ポインタ
 125  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
 126  * @return なし
 127  */
 128 void calc_blow_lose_constitution(player_type *target_ptr, monap_type *monap_ptr)
 129 {
 130     if (has_sustain_con(target_ptr))
 131         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
 132
 133     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
 134     if (target_ptr->is_dead || check_multishadow(target_ptr))
 135         return;
 136
 137     if (do_dec_stat(target_ptr, A_CON))
 138         monap_ptr->obvious = TRUE;
 139 }
 140
 141 /*!
 142  * @brief 魅力低下ダメージを計算する (維持があれば、(1d4 + 4) / 9になる)
 143  * @param target_ptr プレーヤーへの参照ポインタ
 144  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
 145  * @return なし
 146  */
 147 void calc_blow_lose_charisma(player_type *target_ptr, monap_type *monap_ptr)
 148 {
 149     if (has_sustain_chr(target_ptr))
 150         monap_ptr->get_damage = monap_ptr->get_damage * (randint1(4) + 4) / 9;
 151
 152     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
 153     if (target_ptr->is_dead || check_multishadow(target_ptr))
 154         return;
 155
 156     if (do_dec_stat(target_ptr, A_CHR))
 157         monap_ptr->obvious = TRUE;
 158 }
 159
 160 /*!
 161  * @brief 全能力低下ダメージを計算する (維持があれば、1つに付き-3%軽減する)
 162  * @param target_ptr プレーヤーへの参照ポインタ
 163  * @param monap_ptr モンスターからプレーヤーへの直接攻撃構造体への参照ポインタ
 164  * @return なし
 165  */
 166 void calc_blow_lose_all(player_type *target_ptr, monap_type *monap_ptr)
 167 {
 168     int damage_ratio = 100;
 169     if (has_sustain_str(target_ptr))
 170         damage_ratio -= 3;
 171
 172     if (has_sustain_int(target_ptr))
 173         damage_ratio -= 3;
 174
 175     if (has_sustain_wis(target_ptr))
 176         damage_ratio -= 3;
 177
 178     if (has_sustain_dex(target_ptr))
 179         damage_ratio -= 3;
 180
 181     if (has_sustain_con(target_ptr))
 182         damage_ratio -= 3;
 183
 184     if (has_sustain_chr(target_ptr))
 185         damage_ratio -= 3;
 186
 187     monap_ptr->damage = monap_ptr->damage * damage_ratio / 100;
 188     monap_ptr->get_damage += take_hit(target_ptr, DAMAGE_ATTACK, monap_ptr->damage, monap_ptr->ddesc, -1);
 189     if (target_ptr->is_dead || check_multishadow(target_ptr))
 190         return;
 191
 192     process_lose_all_attack(target_ptr, monap_ptr);
 193 }