src/spell/spells-diceroll.c

   1 #include "spell/spells-diceroll.h"
   2 #include "floor/floor.h"
   3 #include "monster-race/race-flags-resistance.h"
   4 #include "monster-race/race-flags1.h"
   5 #include "monster-race/race-flags3.h"
   6 #include "monster-race/race-flags7.h"
   7 #include "monster-race/monster-race-hook.h"
   8 #include "monster/monster-flag-types.h"
   9 #include "monster/monster-info.h"
  10 #include "mutation/mutation.h"
  11 #include "player/player-class.h"
  12 #include "room/rooms.h"
  13
  14 /*!
  15  * @brief モンスター魅了用セービングスロー共通部(汎用系)
  16  * @param pow 魅了パワー
  17  * @param m_ptr 対象モンスター
  18  * @return 魅了に抵抗したらTRUE
  19  */
  20 bool common_saving_throw_charm(player_type *operator_ptr, HIT_POINT pow, monster_type *m_ptr)
  21 {
  22         monster_race *r_ptr = &r_info[m_ptr->r_idx];
  23
  24         if (operator_ptr->current_floor_ptr->inside_arena) return TRUE;
  25
  26         /* Memorize a flag */
  27         if (r_ptr->flagsr & RFR_RES_ALL)
  28         {
  29                 if (is_original_ap_and_seen(operator_ptr, m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
  30                 return TRUE;
  31         }
  32
  33         if (r_ptr->flags3 & RF3_NO_CONF)
  34         {
  35                 if (is_original_ap_and_seen(operator_ptr, m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
  36                 return TRUE;
  37         }
  38
  39         if (r_ptr->flags1 & RF1_QUESTOR || m_ptr->mflag2 & MFLAG2_NOPET) return TRUE;
  40
  41         pow += (adj_chr_chm[operator_ptr->stat_ind[A_CHR]] - 1);
  42         if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL)) pow = pow * 2 / 3;
  43         return (r_ptr->level > randint1((pow - 10) < 1 ? 1 : (pow - 10)) + 5);
  44 }
  45
  46 /*!
  47  * @brief モンスター服従用セービングスロー共通部(部族依存系)
  48  * @param pow 服従パワー
  49  * @param m_ptr 対象モンスター
  50  * @return 服従に抵抗したらTRUE
  51  */
  52 bool common_saving_throw_control(player_type *operator_ptr, HIT_POINT pow, monster_type *m_ptr)
  53 {
  54         monster_race *r_ptr = &r_info[m_ptr->r_idx];
  55
  56         if (operator_ptr->current_floor_ptr->inside_arena) return TRUE;
  57
  58         /* Memorize a flag */
  59         if (r_ptr->flagsr & RFR_RES_ALL)
  60         {
  61                 if (is_original_ap_and_seen(operator_ptr, m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
  62                 return TRUE;
  63         }
  64
  65         if (r_ptr->flags1 & RF1_QUESTOR || m_ptr->mflag2 & MFLAG2_NOPET) return TRUE;
  66
  67         pow += adj_chr_chm[operator_ptr->stat_ind[A_CHR]] - 1;
  68         if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL)) pow = pow * 2 / 3;
  69         return (r_ptr->level > randint1((pow - 10) < 1 ? 1 : (pow - 10)) + 5);
  70 }
  71
  72 /*!
  73 * @brief 一部ボルト魔法のビーム化確率を算出する / Prepare standard probability to become beam for fire_bolt_or_beam()
  74 * @return ビーム化確率(%)
  75 * @details
  76 * ハードコーティングによる実装が行われている。
  77 * メイジは(レベル)%、ハイメイジ、スペルマスターは(レベル)%、それ以外の職業は(レベル/2)%
  78 */
  79 PERCENTAGE beam_chance(player_type *caster_ptr)
  80 {
  81         if (caster_ptr->pclass == CLASS_MAGE)
  82                 return (PERCENTAGE)(caster_ptr->lev);
  83         if (caster_ptr->pclass == CLASS_HIGH_MAGE || caster_ptr->pclass == CLASS_SORCERER)
  84                 return (PERCENTAGE)(caster_ptr->lev + 10);
  85
  86         return (PERCENTAGE)(caster_ptr->lev / 2);
  87 }