7 #include "player/eldritch-horror.h"
8 #include "core/player-update-types.h"
9 #include "core/stuff-handler.h"
10 #include "locale/english.h"
11 #include "monster-race/monster-race-hook.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-race/race-flags3.h"
16 #include "monster/horror-descriptions.h"
17 #include "monster/monster-describer.h"
18 #include "monster/monster-info.h"
19 #include "monster/monster-list.h"
20 #include "monster/monster-util.h"
21 #include "monster/smart-learn-types.h"
22 #include "mutation/mutation-flag-types.h"
23 #include "player-base/player-race.h"
24 #include "player-info/mimic-info-table.h"
25 #include "player/player-status-flags.h"
26 #include "player/player-status.h"
27 #include "status/bad-status-setter.h"
28 #include "status/base-status.h"
29 #include "system/floor-type-definition.h"
30 #include "system/monster-race-definition.h"
31 #include "system/monster-type-definition.h"
32 #include "system/player-type-definition.h"
33 #include "timed-effect/player-hallucination.h"
34 #include "timed-effect/timed-effects.h"
35 #include "view/display-messages.h"
36 #include "world/world.h"
39 * @brief エルドリッチホラーの形容詞種別を決める
40 * @param r_ptr モンスター情報への参照ポインタ
43 static concptr decide_horror_message(MonsterRaceInfo *r_ptr)
45 int horror_num = randint0(MAX_SAN_HORROR_SUM);
46 if (horror_num < MAX_SAN_HORROR_COMMON) {
47 return horror_desc_common[horror_num];
50 if (r_ptr->kind_flags.has(MonsterKindType::EVIL)) {
51 return horror_desc_evil[horror_num - MAX_SAN_HORROR_COMMON];
54 return horror_desc_neutral[horror_num - MAX_SAN_HORROR_COMMON];
58 * @brief エルドリッチホラー持ちのモンスターを見た時の反応 (モンスター名版)
59 * @param m_name モンスター名
60 * @param r_ptr モンスター情報への参照ポインタ
61 * @todo m_nameとdescで何が違うのかは良く分からない
63 static void see_eldritch_horror(GAME_TEXT *m_name, MonsterRaceInfo *r_ptr)
65 concptr horror_message = decide_horror_message(r_ptr);
66 msg_format(_("%s%sの顔を見てしまった!", "You behold the %s visage of %s!"), horror_message, m_name);
67 r_ptr->r_flags2 |= RF2_ELDRITCH_HORROR;
71 * @brief エルドリッチホラー持ちのモンスターを見た時の反応 (モンスター名版)
72 * @param desc モンスター名 (エルドリッチホラー持ちの全モンスターからランダム…のはず)
73 * @param r_ptr モンスターへの参照ポインタ
75 static void feel_eldritch_horror(concptr desc, MonsterRaceInfo *r_ptr)
77 concptr horror_message = decide_horror_message(r_ptr);
78 msg_format(_("%s%sの顔を見てしまった!", "You behold the %s visage of %s!"), horror_message, desc);
79 r_ptr->r_flags2 |= RF2_ELDRITCH_HORROR;
83 * @brief ELDRITCH_HORRORによるプレイヤーの精神破壊処理
84 * @param m_ptr ELDRITCH_HORRORを引き起こしたモンスターの参照ポインタ。薬・罠・魔法の影響ならnullptr
85 * @param necro 暗黒領域魔法の詠唱失敗によるものならばTRUEを返す
87 void sanity_blast(PlayerType *player_ptr, MonsterEntity *m_ptr, bool necro)
89 if (player_ptr->phase_out || !w_ptr->character_dungeon) {
94 if (!necro && m_ptr) {
95 GAME_TEXT m_name[MAX_NLEN];
96 auto *r_ptr = &monraces_info[m_ptr->ap_r_idx];
97 power = r_ptr->level / 2;
98 monster_desc(player_ptr, m_name, m_ptr, 0);
99 if (r_ptr->kind_flags.has_not(MonsterKindType::UNIQUE)) {
100 if (r_ptr->flags1 & RF1_FRIENDS) {
107 if (!w_ptr->is_loading_now) {
115 if (!(r_ptr->flags2 & RF2_ELDRITCH_HORROR)) {
119 if (m_ptr->is_pet()) {
123 if (randint1(100) > power) {
127 if (saving_throw(player_ptr->skill_sav - power)) {
131 if (player_ptr->effects()->hallucination()->is_hallucinated()) {
132 msg_format(_("%s%sの顔を見てしまった!", "You behold the %s visage of %s!"), funny_desc[randint0(MAX_SAN_FUNNY)], m_name);
134 msg_print(funny_comments[randint0(MAX_SAN_COMMENT)]);
135 BadStatusSetter(player_ptr).mod_hallucination(randint1(r_ptr->level));
141 see_eldritch_horror(m_name, r_ptr);
142 switch (PlayerRace(player_ptr).life()) {
143 case PlayerRaceLifeType::DEMON:
145 case PlayerRaceLifeType::UNDEAD:
146 if (saving_throw(25 + player_ptr->lev)) {
154 MonsterRaceInfo *r_ptr;
155 GAME_TEXT m_name[MAX_NLEN];
157 get_mon_num_prep(player_ptr, get_nightmare, nullptr);
158 r_ptr = &monraces_info[get_mon_num(player_ptr, 0, MAX_DEPTH, 0)];
159 power = r_ptr->level + 10;
160 desc = r_ptr->name.data();
161 get_mon_num_prep(player_ptr, nullptr, nullptr);
165 if (r_ptr->kind_flags.has_not(MonsterKindType::UNIQUE)) {
166 sprintf(m_name, "%s %s", (is_a_vowel(desc[0]) ? "an" : "a"), desc);
169 sprintf(m_name, "%s", desc);
171 if (r_ptr->kind_flags.has_not(MonsterKindType::UNIQUE)) {
172 if (r_ptr->flags1 & RF1_FRIENDS) {
179 if (saving_throw(player_ptr->skill_sav * 100 / power)) {
180 msg_format(_("夢の中で%sに追いかけられた。", "%^s chases you through your dreams."), m_name);
184 if (player_ptr->effects()->hallucination()->is_hallucinated()) {
185 msg_format(_("%s%sの顔を見てしまった!", "You behold the %s visage of %s!"), funny_desc[randint0(MAX_SAN_FUNNY)], m_name);
187 msg_print(funny_comments[randint0(MAX_SAN_COMMENT)]);
188 BadStatusSetter(player_ptr).mod_hallucination(randint1(r_ptr->level));
194 feel_eldritch_horror(desc, r_ptr);
195 switch (PlayerRace(player_ptr).life()) {
196 case PlayerRaceLifeType::DEMON:
197 if (saving_throw(20 + player_ptr->lev)) {
201 case PlayerRaceLifeType::UNDEAD:
202 if (saving_throw(10 + player_ptr->lev)) {
210 msg_print(_("ネクロノミコンを読んで正気を失った!", "Your sanity is shaken by reading the Necronomicon!"));
213 /* 過去の効果無効率再現のため5回saving_throw 実行 */
214 if (saving_throw(player_ptr->skill_sav - power) && saving_throw(player_ptr->skill_sav - power) && saving_throw(player_ptr->skill_sav - power) && saving_throw(player_ptr->skill_sav - power) && saving_throw(player_ptr->skill_sav - power)) {
218 switch (randint1(22)) {
220 if (player_ptr->muta.has_not(PlayerMutationType::MORONIC)) {
221 if ((player_ptr->stat_use[A_INT] < 4) && (player_ptr->stat_use[A_WIS] < 4)) {
222 msg_print(_("あなたは完璧な馬鹿になったような気がした。しかしそれは元々だった。", "You turn into an utter moron!"));
224 msg_print(_("あなたは完璧な馬鹿になった!", "You turn into an utter moron!"));
227 if (player_ptr->muta.has(PlayerMutationType::HYPER_INT)) {
228 msg_print(_("あなたの脳は生体コンピュータではなくなった。", "Your brain is no longer a living computer."));
229 player_ptr->muta.reset(PlayerMutationType::HYPER_INT);
232 player_ptr->muta.set(PlayerMutationType::MORONIC);
238 if (player_ptr->muta.has_not(PlayerMutationType::COWARDICE) && !has_resist_fear(player_ptr)) {
239 msg_print(_("あなたはパラノイアになった!", "You become paranoid!"));
240 if (player_ptr->muta.has(PlayerMutationType::FEARLESS)) {
241 msg_print(_("あなたはもう恐れ知らずではなくなった。", "You are no longer fearless."));
242 player_ptr->muta.reset(PlayerMutationType::FEARLESS);
245 player_ptr->muta.set(PlayerMutationType::COWARDICE);
251 if (player_ptr->muta.has_not(PlayerMutationType::HALLU) && !has_resist_chaos(player_ptr)) {
252 msg_print(_("幻覚をひき起こす精神錯乱に陥った!", "You are afflicted by a hallucinatory insanity!"));
253 player_ptr->muta.set(PlayerMutationType::HALLU);
259 if (player_ptr->muta.has_not(PlayerMutationType::BERS_RAGE) && !has_resist_conf(player_ptr)) {
260 msg_print(_("激烈な感情の発作におそわれるようになった!", "You become subject to fits of berserk rage!"));
261 player_ptr->muta.set(PlayerMutationType::BERS_RAGE);
274 BadStatusSetter bss(player_ptr);
275 if (!has_resist_conf(player_ptr)) {
276 (void)bss.mod_confusion(randint0(4) + 4);
279 if (!has_resist_chaos(player_ptr) && one_in_(3)) {
280 (void)bss.mod_hallucination(randint0(250) + 150);
283 /*!< @todo いつからかは不明だがreturnとbreakが同時に存在している。どちらがデッドコードか不明瞭なので保留 */
290 BadStatusSetter bss(player_ptr);
291 if (!has_resist_conf(player_ptr)) {
292 (void)bss.mod_confusion(randint0(4) + 4);
294 if (!player_ptr->free_act) {
295 (void)bss.mod_paralysis(randint0(4) + 4);
297 if (!has_resist_chaos(player_ptr)) {
298 (void)bss.mod_hallucination(randint0(250) + 150);
302 (void)do_dec_stat(player_ptr, A_INT);
303 } while (randint0(100) > player_ptr->skill_sav && one_in_(2));
306 (void)do_dec_stat(player_ptr, A_WIS);
307 } while (randint0(100) > player_ptr->skill_sav && one_in_(2));
313 if (lose_all_info(player_ptr)) {
314 msg_print(_("あまりの恐怖に全てのことを忘れてしまった!", "You forget everything in your utmost terror!"));
323 do_dec_stat(player_ptr, A_INT);
324 do_dec_stat(player_ptr, A_WIS);
331 player_ptr->update |= PU_BONUS;
332 handle_stuff(player_ptr);