*/
#include "lore/monster-lore.h"
-#include "locale/english.h"
-#include "locale/japanese.h"
+#include "game-option/cheat-options.h"
#include "lore/lore-calculator.h"
#include "lore/lore-util.h"
#include "lore/magic-types-setter.h"
-#include "monster-race/race-flags-ability1.h"
+#include "monster-race/monster-race.h"
#include "monster-race/race-flags-ability2.h"
-#include "monster-race/race-flags-resistance.h"
#include "monster-race/race-flags1.h"
#include "monster-race/race-flags2.h"
#include "monster-race/race-flags3.h"
#include "monster-race/race-flags4.h"
-#include "monster-race/race-flags7.h"
#include "monster-race/race-indice-types.h"
-#include "mspell/monster-spell.h"
-#include "mspell/mspell-damage-calculator.h"
-#include "mspell/mspell-type.h"
#include "term/term-color-types.h"
-#include "util/util.h"
+#include "view/display-lore-attacks.h"
+#include "view/display-lore-drops.h"
#include "view/display-lore-magics.h"
#include "view/display-lore-status.h"
#include "view/display-lore.h"
-/*!
- * 英語の複数系記述用マクロ / Pluralizer. Args(count, singular, plural)
- */
-#define plural(c, s, p) (((c) == 1) ? (s) : (p))
-
static void set_msex_flags(lore_type *lore_ptr)
{
lore_ptr->msex = MSEX_NONE;
display_monster_constitutions(lore_ptr);
lore_ptr->vn = 0;
- if (lore_ptr->flags3 & RF3_HURT_ROCK) {
- lore_ptr->vp[lore_ptr->vn] = _("岩を除去するもの", "rock remover");
- lore_ptr->color[lore_ptr->vn++] = TERM_UMBER;
- }
- if (lore_ptr->flags3 & RF3_HURT_LITE) {
- lore_ptr->vp[lore_ptr->vn] = _("明るい光", "bright light");
- lore_ptr->color[lore_ptr->vn++] = TERM_YELLOW;
- }
- if (lore_ptr->flags3 & RF3_HURT_FIRE) {
- lore_ptr->vp[lore_ptr->vn] = _("炎", "fire");
- lore_ptr->color[lore_ptr->vn++] = TERM_RED;
- }
- if (lore_ptr->flags3 & RF3_HURT_COLD) {
- lore_ptr->vp[lore_ptr->vn] = _("冷気", "cold");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_WHITE;
- }
-
- if (lore_ptr->vn > 0) {
- hooked_roff(format(_("%^sには", "%^s"), wd_he[lore_ptr->msex]));
-
- for (int n = 0; n < lore_ptr->vn; n++) {
-#ifdef JP
- if (n != 0)
- hooked_roff("や");
-#else
- if (n == 0)
- hooked_roff(" is hurt by ");
- else if (n < lore_ptr->vn - 1)
- hooked_roff(", ");
- else
- hooked_roff(" and ");
-#endif
- hook_c_roff(lore_ptr->color[n], lore_ptr->vp[n]);
- }
-
- hooked_roff(_("でダメージを与えられる。", ". "));
- }
+ display_monster_concrete_weakness(lore_ptr);
+ display_monster_weakness(lore_ptr);
lore_ptr->vn = 0;
- if (lore_ptr->flagsr & RFR_IM_ACID) {
- lore_ptr->vp[lore_ptr->vn] = _("酸", "acid");
- lore_ptr->color[lore_ptr->vn++] = TERM_GREEN;
- }
- if (lore_ptr->flagsr & RFR_IM_ELEC) {
- lore_ptr->vp[lore_ptr->vn] = _("稲妻", "lightning");
- lore_ptr->color[lore_ptr->vn++] = TERM_BLUE;
- }
- if (lore_ptr->flagsr & RFR_IM_FIRE) {
- lore_ptr->vp[lore_ptr->vn] = _("炎", "fire");
- lore_ptr->color[lore_ptr->vn++] = TERM_RED;
- }
- if (lore_ptr->flagsr & RFR_IM_COLD) {
- lore_ptr->vp[lore_ptr->vn] = _("冷気", "cold");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_WHITE;
- }
- if (lore_ptr->flagsr & RFR_IM_POIS) {
- lore_ptr->vp[lore_ptr->vn] = _("毒", "poison");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_GREEN;
- }
-
- if (lore_ptr->flagsr & RFR_RES_LITE) {
- lore_ptr->vp[lore_ptr->vn] = _("閃光", "light");
- lore_ptr->color[lore_ptr->vn++] = TERM_YELLOW;
- }
- if (lore_ptr->flagsr & RFR_RES_DARK) {
- lore_ptr->vp[lore_ptr->vn] = _("暗黒", "dark");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_DARK;
- }
- if (lore_ptr->flagsr & RFR_RES_NETH) {
- lore_ptr->vp[lore_ptr->vn] = _("地獄", "nether");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_DARK;
- }
- if (lore_ptr->flagsr & RFR_RES_WATE) {
- lore_ptr->vp[lore_ptr->vn] = _("水", "water");
- lore_ptr->color[lore_ptr->vn++] = TERM_BLUE;
- }
- if (lore_ptr->flagsr & RFR_RES_PLAS) {
- lore_ptr->vp[lore_ptr->vn] = _("プラズマ", "plasma");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_RED;
- }
- if (lore_ptr->flagsr & RFR_RES_SHAR) {
- lore_ptr->vp[lore_ptr->vn] = _("破片", "shards");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_UMBER;
- }
- if (lore_ptr->flagsr & RFR_RES_SOUN) {
- lore_ptr->vp[lore_ptr->vn] = _("轟音", "sound");
- lore_ptr->color[lore_ptr->vn++] = TERM_ORANGE;
- }
- if (lore_ptr->flagsr & RFR_RES_CHAO) {
- lore_ptr->vp[lore_ptr->vn] = _("カオス", "chaos");
- lore_ptr->color[lore_ptr->vn++] = TERM_VIOLET;
- }
- if (lore_ptr->flagsr & RFR_RES_NEXU) {
- lore_ptr->vp[lore_ptr->vn] = _("因果混乱", "nexus");
- lore_ptr->color[lore_ptr->vn++] = TERM_VIOLET;
- }
- if (lore_ptr->flagsr & RFR_RES_DISE) {
- lore_ptr->vp[lore_ptr->vn] = _("劣化", "disenchantment");
- lore_ptr->color[lore_ptr->vn++] = TERM_VIOLET;
- }
- if (lore_ptr->flagsr & RFR_RES_WALL) {
- lore_ptr->vp[lore_ptr->vn] = _("フォース", "force");
- lore_ptr->color[lore_ptr->vn++] = TERM_UMBER;
- }
- if (lore_ptr->flagsr & RFR_RES_INER) {
- lore_ptr->vp[lore_ptr->vn] = _("遅鈍", "inertia");
- lore_ptr->color[lore_ptr->vn++] = TERM_SLATE;
- }
- if (lore_ptr->flagsr & RFR_RES_TIME) {
- lore_ptr->vp[lore_ptr->vn] = _("時間逆転", "time");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_BLUE;
- }
- if (lore_ptr->flagsr & RFR_RES_GRAV) {
- lore_ptr->vp[lore_ptr->vn] = _("重力", "gravity");
- lore_ptr->color[lore_ptr->vn++] = TERM_SLATE;
- }
- if (lore_ptr->flagsr & RFR_RES_ALL) {
- lore_ptr->vp[lore_ptr->vn] = _("あらゆる攻撃", "all");
- lore_ptr->color[lore_ptr->vn++] = TERM_YELLOW;
- }
- if ((lore_ptr->flagsr & RFR_RES_TELE) && !(lore_ptr->r_ptr->flags1 & RF1_UNIQUE)) {
- lore_ptr->vp[lore_ptr->vn] = _("テレポート", "teleportation");
- lore_ptr->color[lore_ptr->vn++] = TERM_ORANGE;
- }
-
- if (lore_ptr->vn > 0) {
- hooked_roff(format(_("%^sは", "%^s"), wd_he[lore_ptr->msex]));
- for (int n = 0; n < lore_ptr->vn; n++) {
-#ifdef JP
- if (n != 0)
- hooked_roff("と");
-#else
- if (n == 0)
- hooked_roff(" resists ");
- else if (n < lore_ptr->vn - 1)
- hooked_roff(", ");
- else
- hooked_roff(" and ");
-#endif
- hook_c_roff(lore_ptr->color[n], lore_ptr->vp[n]);
- }
-
- hooked_roff(_("の耐性を持っている。", ". "));
- }
-
- if ((lore_ptr->r_ptr->r_xtra1 & MR1_SINKA) || lore_ptr->know_everything) {
- if (lore_ptr->r_ptr->next_r_idx) {
- hooked_roff(format(_("%^sは経験を積むと、", "%^s will evolve into "), wd_he[lore_ptr->msex]));
- hook_c_roff(TERM_YELLOW, format("%s", r_name + r_info[lore_ptr->r_ptr->next_r_idx].name));
-
- hooked_roff(_(format("に進化する。"), format(" when %s gets enough experience. ", wd_he[lore_ptr->msex])));
- } else if (!(lore_ptr->r_ptr->flags1 & RF1_UNIQUE)) {
- hooked_roff(format(_("%sは進化しない。", "%s won't evolve. "), wd_he[lore_ptr->msex]));
- }
- }
+ display_monster_concrete_resistances(lore_ptr);
+ display_monster_resistances(lore_ptr);
+ display_monster_evolution(lore_ptr);
lore_ptr->vn = 0;
- if (lore_ptr->flags3 & RF3_NO_STUN) {
- lore_ptr->vp[lore_ptr->vn] = _("朦朧としない", "stunned");
- lore_ptr->color[lore_ptr->vn++] = TERM_ORANGE;
- }
- if (lore_ptr->flags3 & RF3_NO_FEAR) {
- lore_ptr->vp[lore_ptr->vn] = _("恐怖を感じない", "frightened");
- lore_ptr->color[lore_ptr->vn++] = TERM_SLATE;
- }
- if (lore_ptr->flags3 & RF3_NO_CONF) {
- lore_ptr->vp[lore_ptr->vn] = _("混乱しない", "confused");
- lore_ptr->color[lore_ptr->vn++] = TERM_L_UMBER;
- }
- if (lore_ptr->flags3 & RF3_NO_SLEEP) {
- lore_ptr->vp[lore_ptr->vn] = _("眠らされない", "slept");
- lore_ptr->color[lore_ptr->vn++] = TERM_BLUE;
- }
- if ((lore_ptr->flagsr & RFR_RES_TELE) && (lore_ptr->r_ptr->flags1 & RF1_UNIQUE)) {
- lore_ptr->vp[lore_ptr->vn] = _("テレポートされない", "teleported");
- lore_ptr->color[lore_ptr->vn++] = TERM_ORANGE;
- }
-
- if (lore_ptr->vn > 0) {
- hooked_roff(format(_("%^sは", "%^s"), wd_he[lore_ptr->msex]));
- for (int n = 0; n < lore_ptr->vn; n++) {
-#ifdef JP
- if (n != 0)
- hooked_roff("し、");
-#else
- if (n == 0)
- hooked_roff(" cannot be ");
- else if (n < lore_ptr->vn - 1)
- hooked_roff(", ");
- else
- hooked_roff(" or ");
-#endif
- hook_c_roff(lore_ptr->color[n], lore_ptr->vp[n]);
- }
-
- hooked_roff(_("。", ". "));
- }
-
- if ((((int)lore_ptr->r_ptr->r_wake * (int)lore_ptr->r_ptr->r_wake) > lore_ptr->r_ptr->sleep) || (lore_ptr->r_ptr->r_ignore == MAX_UCHAR)
- || (lore_ptr->r_ptr->sleep == 0 && lore_ptr->r_ptr->r_tkills >= 10) || lore_ptr->know_everything) {
- concptr act;
- if (lore_ptr->r_ptr->sleep > 200) {
- act = _("を無視しがちであるが", "prefers to ignore");
- } else if (lore_ptr->r_ptr->sleep > 95) {
- act = _("に対してほとんど注意を払わないが", "pays very little attention to");
- } else if (lore_ptr->r_ptr->sleep > 75) {
- act = _("に対してあまり注意を払わないが", "pays little attention to");
- } else if (lore_ptr->r_ptr->sleep > 45) {
- act = _("を見過ごしがちであるが", "tends to overlook");
- } else if (lore_ptr->r_ptr->sleep > 25) {
- act = _("をほんの少しは見ており", "takes quite a while to see");
- } else if (lore_ptr->r_ptr->sleep > 10) {
- act = _("をしばらくは見ており", "takes a while to see");
- } else if (lore_ptr->r_ptr->sleep > 5) {
- act = _("を幾分注意深く見ており", "is fairly observant of");
- } else if (lore_ptr->r_ptr->sleep > 3) {
- act = _("を注意深く見ており", "is observant of");
- } else if (lore_ptr->r_ptr->sleep > 1) {
- act = _("をかなり注意深く見ており", "is very observant of");
- } else if (lore_ptr->r_ptr->sleep > 0) {
- act = _("を警戒しており", "is vigilant for");
- } else {
- act = _("をかなり警戒しており", "is ever vigilant for");
- }
-
- hooked_roff(_(format("%^sは侵入者%s、 %d フィート先から侵入者に気付くことがある。", wd_he[lore_ptr->msex], act, 10 * lore_ptr->r_ptr->aaf),
- format("%^s %s intruders, which %s may notice from %d feet. ", wd_he[lore_ptr->msex], act, wd_he[lore_ptr->msex], 10 * lore_ptr->r_ptr->aaf)));
- }
-
- if (lore_ptr->drop_gold || lore_ptr->drop_item) {
- hooked_roff(format(_("%^sは", "%^s may carry"), wd_he[lore_ptr->msex]));
-#ifdef JP
-#else
- lore_ptr->sin = FALSE;
-#endif
-
- int n = MAX(lore_ptr->drop_gold, lore_ptr->drop_item);
- if (n == 1) {
- hooked_roff(_("一つの", " a"));
-#ifdef JP
-#else
- lore_ptr->sin = TRUE;
-#endif
- } else if (n == 2) {
- hooked_roff(_("一つか二つの", " one or two"));
- } else {
- hooked_roff(format(_(" %d 個までの", " up to %d"), n));
- }
-
- concptr p;
- if (lore_ptr->flags1 & RF1_DROP_GREAT) {
- p = _("特別な", " exceptional");
- } else if (lore_ptr->flags1 & RF1_DROP_GOOD) {
- p = _("上質な", " good");
-#ifdef JP
-#else
- lore_ptr->sin = FALSE;
-#endif
- } else {
- p = NULL;
- }
-
- if (lore_ptr->drop_item) {
-#ifdef JP
-#else
- if (lore_ptr->sin)
- hooked_roff("n");
-
- lore_ptr->sin = FALSE;
-#endif
- if (p)
- hooked_roff(p);
- hooked_roff(_("アイテム", " object"));
-#ifdef JP
-#else
- if (n != 1)
- hooked_roff("s");
-#endif
- p = _("や", " or");
- }
-
- if (lore_ptr->drop_gold) {
-#ifdef JP
-#else
- if (!p)
- lore_ptr->sin = FALSE;
-
- if (lore_ptr->sin)
- hooked_roff("n");
-
- lore_ptr->sin = FALSE;
-#endif
- if (p)
- hooked_roff(p);
- hooked_roff(_("財宝", " treasure"));
-#ifdef JP
-#else
- if (n != 1)
- hooked_roff("s");
-#endif
- }
-
- hooked_roff(_("を持っていることがある。", ". "));
- }
-
- const int max_attack_numbers = 4;
- int count = 0;
- for (int m = 0; m < max_attack_numbers; m++) {
- if (!lore_ptr->r_ptr->blow[m].method)
- continue;
- if (lore_ptr->r_ptr->blow[m].method == RBM_SHOOT)
- continue;
-
- if (lore_ptr->r_ptr->r_blows[m] || lore_ptr->know_everything)
- count++;
- }
-
- int attack_numbers = 0;
- for (int m = 0; m < max_attack_numbers; m++) {
- if (!lore_ptr->r_ptr->blow[m].method)
- continue;
- if (lore_ptr->r_ptr->blow[m].method == RBM_SHOOT)
- continue;
- if (!lore_ptr->r_ptr->r_blows[m] && !lore_ptr->know_everything)
- continue;
-
- rbm_type method = lore_ptr->r_ptr->blow[m].method;
- int effect = lore_ptr->r_ptr->blow[m].effect;
- int d1 = lore_ptr->r_ptr->blow[m].d_dice;
- int d2 = lore_ptr->r_ptr->blow[m].d_side;
-
- concptr p = NULL;
- switch (method) {
- case RBM_HIT:
- p = _("殴る", "hit");
- break;
- case RBM_TOUCH:
- p = _("触る", "touch");
- break;
- case RBM_PUNCH:
- p = _("パンチする", "punch");
- break;
- case RBM_KICK:
- p = _("蹴る", "kick");
- break;
- case RBM_CLAW:
- p = _("ひっかく", "claw");
- break;
- case RBM_BITE:
- p = _("噛む", "bite");
- break;
- case RBM_STING:
- p = _("刺す", "sting");
- break;
- case RBM_SLASH:
- p = _("斬る", "slash");
- break;
- case RBM_BUTT:
- p = _("角で突く", "butt");
- break;
- case RBM_CRUSH:
- p = _("体当たりする", "crush");
- break;
- case RBM_ENGULF:
- p = _("飲み込む", "engulf");
- break;
- case RBM_CHARGE:
- p = _("請求書をよこす", "charge");
- break;
- case RBM_CRAWL:
- p = _("体の上を這い回る", "crawl on you");
- break;
- case RBM_DROOL:
- p = _("よだれをたらす", "drool on you");
- break;
- case RBM_SPIT:
- p = _("つばを吐く", "spit");
- break;
- case RBM_EXPLODE:
- p = _("爆発する", "explode");
- break;
- case RBM_GAZE:
- p = _("にらむ", "gaze");
- break;
- case RBM_WAIL:
- p = _("泣き叫ぶ", "wail");
- break;
- case RBM_SPORE:
- p = _("胞子を飛ばす", "release spores");
- break;
- case RBM_XXX4:
- break;
- case RBM_BEG:
- p = _("金をせがむ", "beg");
- break;
- case RBM_INSULT:
- p = _("侮辱する", "insult");
- break;
- case RBM_MOAN:
- p = _("うめく", "moan");
- break;
- case RBM_SHOW:
- p = _("歌う", "sing");
- break;
- }
-
- concptr q = NULL;
- switch (effect) {
- case RBE_SUPERHURT:
- q = _("強力に攻撃する", "slaughter");
- break;
- case RBE_HURT:
- q = _("攻撃する", "attack");
- break;
- case RBE_POISON:
- q = _("毒をくらわす", "poison");
- break;
- case RBE_UN_BONUS:
- q = _("劣化させる", "disenchant");
- break;
- case RBE_UN_POWER:
- q = _("充填魔力を吸収する", "drain charges");
- break;
- case RBE_EAT_GOLD:
- q = _("金を盗む", "steal gold");
- break;
- case RBE_EAT_ITEM:
- q = _("アイテムを盗む", "steal items");
- break;
- case RBE_EAT_FOOD:
- q = _("あなたの食料を食べる", "eat your food");
- break;
- case RBE_EAT_LITE:
- q = _("明かりを吸収する", "absorb light");
- break;
- case RBE_ACID:
- q = _("酸を飛ばす", "shoot acid");
- break;
- case RBE_ELEC:
- q = _("感電させる", "electrocute");
- break;
- case RBE_FIRE:
- q = _("燃やす", "burn");
- break;
- case RBE_COLD:
- q = _("凍らせる", "freeze");
- break;
- case RBE_BLIND:
- q = _("盲目にする", "blind");
- break;
- case RBE_CONFUSE:
- q = _("混乱させる", "confuse");
- break;
- case RBE_TERRIFY:
- q = _("恐怖させる", "terrify");
- break;
- case RBE_PARALYZE:
- q = _("麻痺させる", "paralyze");
- break;
- case RBE_LOSE_STR:
- q = _("腕力を減少させる", "reduce strength");
- break;
- case RBE_LOSE_INT:
- q = _("知能を減少させる", "reduce intelligence");
- break;
- case RBE_LOSE_WIS:
- q = _("賢さを減少させる", "reduce wisdom");
- break;
- case RBE_LOSE_DEX:
- q = _("器用さを減少させる", "reduce dexterity");
- break;
- case RBE_LOSE_CON:
- q = _("耐久力を減少させる", "reduce constitution");
- break;
- case RBE_LOSE_CHR:
- q = _("魅力を減少させる", "reduce charisma");
- break;
- case RBE_LOSE_ALL:
- q = _("全ステータスを減少させる", "reduce all stats");
- break;
- case RBE_SHATTER:
- q = _("粉砕する", "shatter");
- break;
- case RBE_EXP_10:
- q = _("経験値を減少(10d6+)させる", "lower experience (by 10d6+)");
- break;
- case RBE_EXP_20:
- q = _("経験値を減少(20d6+)させる", "lower experience (by 20d6+)");
- break;
- case RBE_EXP_40:
- q = _("経験値を減少(40d6+)させる", "lower experience (by 40d6+)");
- break;
- case RBE_EXP_80:
- q = _("経験値を減少(80d6+)させる", "lower experience (by 80d6+)");
- break;
- case RBE_DISEASE:
- q = _("病気にする", "disease");
- break;
- case RBE_TIME:
- q = _("時間を逆戻りさせる", "time");
- break;
- case RBE_DR_LIFE:
- q = _("生命力を吸収する", "drain life");
- break;
- case RBE_DR_MANA:
- q = _("魔力を奪う", "drain mana force");
- break;
- case RBE_INERTIA:
- q = _("減速させる", "slow");
- break;
- case RBE_STUN:
- q = _("朦朧とさせる", "stun");
- break;
- }
-
-#ifdef JP
- if (attack_numbers == 0) {
- hooked_roff(format("%^sは", wd_he[lore_ptr->msex]));
- }
-
- if (d1 && d2 && (lore_ptr->know_everything || know_damage(r_idx, m))) {
- hooked_roff(format(" %dd%d ", d1, d2));
- hooked_roff("のダメージで");
- }
-
- if (!p)
- p = "何か奇妙なことをする";
-
- /* XXしてYYし/XXしてYYする/XXし/XXする */
- if (q != NULL)
- jverb(p, lore_ptr->jverb_buf, JVERB_TO);
- else if (attack_numbers != count - 1)
- jverb(p, lore_ptr->jverb_buf, JVERB_AND);
- else
- strcpy(lore_ptr->jverb_buf, p);
-
- hooked_roff(lore_ptr->jverb_buf);
- if (q) {
- if (attack_numbers != count - 1)
- jverb(q, lore_ptr->jverb_buf, JVERB_AND);
- else
- strcpy(lore_ptr->jverb_buf, q);
- hooked_roff(lore_ptr->jverb_buf);
- }
-
- if (attack_numbers != count - 1)
- hooked_roff("、");
-#else
- if (attack_numbers == 0) {
- hooked_roff(format("%^s can ", wd_he[lore_ptr->msex]));
- } else if (attack_numbers < count - 1) {
- hooked_roff(", ");
- } else {
- hooked_roff(", and ");
- }
-
- if (!p)
- p = "do something weird";
- hooked_roff(p);
- if (q) {
- hooked_roff(" to ");
- hooked_roff(q);
- if (d1 && d2 && (lore_ptr->know_everything || know_damage(r_idx, m))) {
- hooked_roff(" with damage");
- hooked_roff(format(" %dd%d", d1, d2));
- }
- }
-#endif
-
- attack_numbers++;
- }
-
- if (attack_numbers > 0) {
- hooked_roff(_("。", ". "));
- } else if (lore_ptr->flags1 & RF1_NEVER_BLOW) {
- hooked_roff(format(_("%^sは物理的な攻撃方法を持たない。", "%^s has no physical attacks. "), wd_he[lore_ptr->msex]));
- } else {
- hooked_roff(format(_("%s攻撃については何も知らない。", "Nothing is known about %s attack. "), wd_his[lore_ptr->msex]));
- }
-
- bool is_kingpin = (lore_ptr->flags1 & RF1_QUESTOR) != 0;
- is_kingpin &= lore_ptr->r_ptr->r_sights > 0;
- is_kingpin &= lore_ptr->r_ptr->max_num > 0;
- is_kingpin &= (r_idx == MON_OBERON) || (r_idx == MON_SERPENT);
- if (is_kingpin) {
- hook_c_roff(TERM_VIOLET, _("あなたはこのモンスターを殺したいという強い欲望を感じている...", "You feel an intense desire to kill this monster... "));
- } else if (lore_ptr->flags7 & RF7_GUARDIAN) {
- hook_c_roff(TERM_L_RED, _("このモンスターはダンジョンの主である。", "This monster is the master of a dungeon."));
- }
-
- hooked_roff("\n");
+ display_monster_concrete_immunities(lore_ptr);
+ display_monster_immunities(lore_ptr);
+ display_monster_alert(lore_ptr);
+ display_monster_drops(lore_ptr);
+ display_monster_attacks(lore_ptr);
+ display_monster_guardian(lore_ptr);
}