-#ifdef JP
-if (flags6 & (RF6_S_HOUND)) {vp[vn] = "¥Ï¥¦¥ó¥É¾¤´";color[vn++] = TERM_L_UMBER;}
-#else
- if (flags6 & (RF6_S_HOUND)) {vp[vn] = "summon hounds";color[vn++] = TERM_L_UMBER;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_HYDRA)) {vp[vn] = "¥Ò¥É¥é¾¤´";color[vn++] = TERM_L_GREEN;}
-#else
- if (flags6 & (RF6_S_HYDRA)) {vp[vn] = "summon hydras";color[vn++] = TERM_L_GREEN;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_ANGEL)) {vp[vn] = "Å·»È°ìÂξ¤´";color[vn++] = TERM_YELLOW;}
-#else
- if (flags6 & (RF6_S_ANGEL)) {vp[vn] = "summon an angel";color[vn++] = TERM_YELLOW;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_DEMON)) {vp[vn] = "¥Ç¡¼¥â¥ó°ìÂξ¤´";color[vn++] = TERM_L_RED;}
-#else
- if (flags6 & (RF6_S_DEMON)) {vp[vn] = "summon a demon";color[vn++] = TERM_L_RED;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_UNDEAD)) {vp[vn] = "¥¢¥ó¥Ç¥Ã¥É°ìÂξ¤´";color[vn++] = TERM_L_DARK;}
-#else
- if (flags6 & (RF6_S_UNDEAD)) {vp[vn] = "summon an undead";color[vn++] = TERM_L_DARK;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_DRAGON)) {vp[vn] = "¥É¥é¥´¥ó°ìÂξ¤´";color[vn++] = TERM_ORANGE;}
-#else
- if (flags6 & (RF6_S_DRAGON)) {vp[vn] = "summon a dragon";color[vn++] = TERM_ORANGE;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_HI_UNDEAD)) {vp[vn] = "¶¯ÎϤʥ¢¥ó¥Ç¥Ã¥É¾¤´";color[vn++] = TERM_L_DARK;}
-#else
- if (flags6 & (RF6_S_HI_UNDEAD)) {vp[vn] = "summon Greater Undead";color[vn++] = TERM_L_DARK;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_HI_DRAGON)) {vp[vn] = "¸ÅÂå¥É¥é¥´¥ó¾¤´";color[vn++] = TERM_ORANGE;}
-#else
- if (flags6 & (RF6_S_HI_DRAGON)) {vp[vn] = "summon Ancient Dragons";color[vn++] = TERM_ORANGE;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_CYBER)) {vp[vn] = "¥µ¥¤¥Ð¡¼¥Ç¡¼¥â¥ó¾¤´";color[vn++] = TERM_UMBER;}
-#else
- if (flags6 & (RF6_S_CYBER)) {vp[vn] = "summon Cyberdemons";color[vn++] = TERM_UMBER;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_AMBERITES)) {vp[vn] = "¥¢¥ó¥Ð¡¼¤Î²¦Â²¾¤´";color[vn++] = TERM_VIOLET;}
-#else
- if (flags6 & (RF6_S_AMBERITES)) {vp[vn] = "summon Lords of Amber";color[vn++] = TERM_VIOLET;}
-#endif
-
-#ifdef JP
-if (flags6 & (RF6_S_UNIQUE)) {vp[vn] = "¥æ¥Ë¡¼¥¯¡¦¥â¥ó¥¹¥¿¡¼¾¤´";color[vn++] = TERM_VIOLET;}
-#else
- if (flags6 & (RF6_S_UNIQUE)) {vp[vn] = "summon Unique Monsters";color[vn++] = TERM_VIOLET;}
-#endif
-
-
- /* Describe spells */
- if (vn)
- {
- /* Note magic */
- magic = TRUE;
-
- /* Intro */
- if (breath)
- {
-#ifdef JP
- hooked_roff("¡¢¤Ê¤ª¤«¤Ä");
-#else
- hooked_roff(", and is also");
-#endif
-
- }
- else
- {
-#ifdef JP
- hooked_roff(format("%^s¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s is", wd_he[msex]));
-#endif
-
- }
-
-#ifdef JP
- /* Adverb */
- if (flags2 & (RF2_SMART)) hook_c_roff(TERM_YELLOW, "Ū³Î¤Ë");
-
- /* Verb Phrase */
- hooked_roff("ËâË¡¤ò»È¤¦¤³¤È¤¬¤Ç¤¡¢");
-#else
- /* Verb Phrase */
- hooked_roff(" magical, casting spells");
-
- /* Adverb */
- if (flags2 & RF2_SMART) hook_c_roff(TERM_YELLOW, " intelligently");
-#endif
-
-
- /* Scan */
- for (n = 0; n < vn; n++)
- {
- /* Intro */
-#ifdef JP
- if ( n != 0 ) hooked_roff("¡¢");
-#else
- if (n == 0) hooked_roff(" which ");
- else if (n < vn-1) hooked_roff(", ");
- else hooked_roff(" or ");
-#endif
-
-
- /* Dump */
- hook_c_roff(color[n], vp[n]);
- }
-#ifdef JP
- hooked_roff("¤Î¼öʸ¤ò¾§¤¨¤ë¤³¤È¤¬¤¢¤ë");
-#endif
- }
-
-
- /* End the sentence about inate/other spells */
- if (breath || magic)
- {
- /* Total casting */
- m = r_ptr->r_cast_spell;
-
- /* Average frequency */
- n = r_ptr->freq_spell;
-
- /* Describe the spell frequency */
- if (m > 100 || know_everything)
- {
-#ifdef JP
- hooked_roff(format("(³ÎΨ:1/%d)", 100 / n));
-#else
- hooked_roff(format("; 1 time in %d", 100 / n));
-#endif
-
- }
-
- /* Guess at the frequency */
- else if (m)
- {
- n = ((n + 9) / 10) * 10;
-#ifdef JP
- hooked_roff(format("(³ÎΨ:Ìó1/%d)", 100 / n));
-#else
- hooked_roff(format("; about 1 time in %d", 100 / n));
-#endif
-
- }
-
- /* End this sentence */
-#ifdef JP
- hooked_roff("¡£");
-#else
- hooked_roff(". ");
-#endif
-
- }
-
- /* Describe monster "toughness" */
- if (know_armour(r_idx))
- {
- /* Armor */
-#ifdef JP
- hooked_roff(format("%^s¤Ï AC%d ¤ÎËɸæÎϤÈ",
-#else
- hooked_roff(format("%^s has an armor rating of %d",
-#endif
-
- wd_he[msex], r_ptr->ac));
-
- /* Maximized hitpoints */
- if (flags1 & RF1_FORCE_MAXHP)
- {
-#ifdef JP
- hooked_roff(format(" %d ¤ÎÂÎÎϤ¬¤¢¤ë¡£",
-#else
- hooked_roff(format(" and a life rating of %d. ",
-#endif
-
- r_ptr->hdice * r_ptr->hside));
- }
-
- /* Variable hitpoints */
- else
- {
-#ifdef JP
- hooked_roff(format(" %dd%d ¤ÎÂÎÎϤ¬¤¢¤ë¡£",
-#else
- hooked_roff(format(" and a life rating of %dd%d. ",
-#endif
-
- r_ptr->hdice, r_ptr->hside));
- }
- }
-
-
-
- /* Collect special abilities. */
- vn = 0;
-#ifdef JP
- if (flags7 & (RF7_HAS_LITE_1 | RF7_HAS_LITE_2)) { vp[vn] = "¥À¥ó¥¸¥ç¥ó¤ò¾È¤é¤¹"; color[vn++] = TERM_WHITE; }
-#else
- if (flags7 & (RF7_HAS_LITE_1 | RF7_HAS_LITE_2)) { vp[vn] = "illuminate the dungeon"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags7 & (RF7_HAS_DARK_1 | RF7_HAS_DARK_2)) { vp[vn] = "¥À¥ó¥¸¥ç¥ó¤ò°Å¤¯¤¹¤ë"; color[vn++] = TERM_L_DARK; }
-#else
- if (flags7 & (RF7_HAS_DARK_1 | RF7_HAS_DARK_2)) { vp[vn] = "darken the dungeon"; color[vn++] = TERM_L_DARK; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_OPEN_DOOR) { vp[vn] = "¥É¥¢¤ò³«¤±¤ë"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_OPEN_DOOR) { vp[vn] = "open doors"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_BASH_DOOR) { vp[vn] = "¥É¥¢¤òÂǤÁÇˤë"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_BASH_DOOR) { vp[vn] = "bash down doors"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_PASS_WALL) { vp[vn] = "Êɤò¤¹¤êÈ´¤±¤ë"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_PASS_WALL) { vp[vn] = "pass through walls"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_KILL_WALL) { vp[vn] = "Êɤò·¡¤ê¿Ê¤à"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_KILL_WALL) { vp[vn] = "bore through walls"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_MOVE_BODY) { vp[vn] = "¼å¤¤¥â¥ó¥¹¥¿¡¼¤ò²¡¤·¤Î¤±¤ë"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_MOVE_BODY) { vp[vn] = "push past weaker monsters"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_KILL_BODY) { vp[vn] = "¼å¤¤¥â¥ó¥¹¥¿¡¼¤òÅݤ¹"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_KILL_BODY) { vp[vn] = "destroy weaker monsters"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_TAKE_ITEM) { vp[vn] = "¥¢¥¤¥Æ¥à¤ò½¦¤¦"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_TAKE_ITEM) { vp[vn] = "pick up objects"; color[vn++] = TERM_WHITE; }
-#endif
-
-#ifdef JP
- if (flags2 & RF2_KILL_ITEM) { vp[vn] = "¥¢¥¤¥Æ¥à¤ò²õ¤¹"; color[vn++] = TERM_WHITE; }
-#else
- if (flags2 & RF2_KILL_ITEM) { vp[vn] = "destroy objects"; color[vn++] = TERM_WHITE; }
-#endif
-
-
- /* Describe special abilities. */
- if (vn)
- {
- /* Intro */
-#ifdef JP
- hooked_roff(format("%^s¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s", wd_he[msex]));
-#endif
-
-
- /* Scan */
- for (n = 0; n < vn; n++)
- {
- /* Intro */
-#ifdef JP
- if (n != vn - 1)
- {
- jverb(vp[n], jverb_buf, JVERB_AND);
- hook_c_roff(color[n], jverb_buf);
- hooked_roff("¡¢");
- }
- else hook_c_roff(color[n], vp[n]);
-#else
- if (n == 0) hooked_roff(" can ");
- else if (n < vn - 1) hooked_roff(", ");
- else hooked_roff(" and ");
-
- /* Dump */
- hook_c_roff(color[n], vp[n]);
-#endif
-
- }
-
- /* End */
-#ifdef JP
- hooked_roff("¤³¤È¤¬¤Ç¤¤ë¡£");
-#else
- hooked_roff(". ");
-#endif
-
- }
-
-
- /* Describe special abilities. */
- if (flags7 & (RF7_SELF_LITE_1 | RF7_SELF_LITE_2))
- {
-#ifdef JP
- hooked_roff(format("%^s¤Ï¸÷¤Ã¤Æ¤¤¤ë¡£", wd_he[msex]));
-#else
- hooked_roff(format("%^s is shining. ", wd_he[msex]));
-#endif
-
- }
- if (flags7 & (RF7_SELF_DARK_1 | RF7_SELF_DARK_2))
- {
-#ifdef JP
- hook_c_roff(TERM_L_DARK, format("%^s¤Ï°Å¹õ¤ËÊñ¤Þ¤ì¤Æ¤¤¤ë¡£", wd_he[msex]));
-#else
- hook_c_roff(TERM_L_DARK, format("%^s is surrounded by darkness. ", wd_he[msex]));
-#endif
-
- }
- if (flags2 & RF2_INVISIBLE)
- {
-#ifdef JP
- hooked_roff(format("%^s¤ÏÆ©ÌÀ¤ÇÌܤ˸«¤¨¤Ê¤¤¡£", wd_he[msex]));
-#else
- hooked_roff(format("%^s is invisible. ", wd_he[msex]));
-#endif
-
- }
- if (flags2 & RF2_COLD_BLOOD)
- {
-#ifdef JP
- hooked_roff(format("%^s¤ÏÎä·ìưʪ¤Ç¤¢¤ë¡£", wd_he[msex]));
-#else
- hooked_roff(format("%^s is cold blooded. ", wd_he[msex]));
-#endif
-
- }
- if (flags2 & RF2_EMPTY_MIND)
- {
-#ifdef JP
- hooked_roff(format("%^s¤Ï¥Æ¥ì¥Ñ¥·¡¼¤Ç¤Ï´¶ÃΤǤ¤Ê¤¤¡£", wd_he[msex]));
-#else
- hooked_roff(format("%^s is not detected by telepathy. ", wd_he[msex]));
-#endif
-
- }
- else if (flags2 & RF2_WEIRD_MIND)
- {
-#ifdef JP
- hooked_roff(format("%^s¤Ï¤Þ¤ì¤Ë¥Æ¥ì¥Ñ¥·¡¼¤Ç´¶ÃΤǤ¤ë¡£", wd_he[msex]));
-#else
- hooked_roff(format("%^s is rarely detected by telepathy. ", wd_he[msex]));
-#endif
-
- }
- if (flags2 & RF2_MULTIPLY)
- {
-#ifdef JP
- hook_c_roff(TERM_L_UMBER, format("%^s¤ÏÇúȯŪ¤ËÁý¿£¤¹¤ë¡£", wd_he[msex]));
-#else
- hook_c_roff(TERM_L_UMBER, format("%^s breeds explosively. ", wd_he[msex]));
-#endif
-
- }
- if (flags2 & RF2_REGENERATE)
- {
-#ifdef JP
- hook_c_roff(TERM_L_WHITE, format("%^s¤ÏÁÇÁ᤯ÂÎÎϤò²óÉü¤¹¤ë¡£", wd_he[msex]));
-#else
- hook_c_roff(TERM_L_WHITE, format("%^s regenerates quickly. ", wd_he[msex]));
-#endif
-
- }
- if (flags7 & RF7_RIDING)
- {
-#ifdef JP
- hook_c_roff(TERM_SLATE, format("%^s¤Ë¾è¤ë¤³¤È¤¬¤Ç¤¤ë¡£", wd_he[msex]));
-#else
- hook_c_roff(TERM_SLATE, format("%^s is suitable for riding. ", wd_he[msex]));
-#endif
-
- }
-
-
- /* Collect susceptibilities */
- vn = 0;
-#ifdef JP
- if (flags3 & RF3_HURT_ROCK) {vp[vn] = "´ä¤ò½üµî¤¹¤ë¤â¤Î";color[vn++] = TERM_UMBER;}
-#else
- if (flags3 & RF3_HURT_ROCK) {vp[vn] = "rock remover";color[vn++] = TERM_UMBER;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_HURT_LITE) {vp[vn] = "ÌÀ¤ë¤¤¸÷";color[vn++] = TERM_YELLOW;}
-#else
- if (flags3 & RF3_HURT_LITE) {vp[vn] = "bright light";color[vn++] = TERM_YELLOW;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_HURT_FIRE) {vp[vn] = "±ê";color[vn++] = TERM_RED;}
-#else
- if (flags3 & RF3_HURT_FIRE) {vp[vn] = "fire";color[vn++] = TERM_RED;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_HURT_COLD) {vp[vn] = "Î䵤";color[vn++] = TERM_L_WHITE;}
-#else
- if (flags3 & RF3_HURT_COLD) {vp[vn] = "cold";color[vn++] = TERM_L_WHITE;}
-#endif
-
-
- /* Describe susceptibilities */
- if (vn)
- {
- /* Intro */
-#ifdef JP
- hooked_roff(format("%^s¤Ë¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s", wd_he[msex]));
-#endif
-
-
- /* Scan */
- for (n = 0; n < vn; n++)
- {
- /* Intro */
-#ifdef JP
- if ( n != 0 ) hooked_roff("¤ä");
-#else
- if (n == 0) hooked_roff(" is hurt by ");
- else if (n < vn-1) hooked_roff(", ");
- else hooked_roff(" and ");
-#endif
-
-
- /* Dump */
- hook_c_roff(color[n], vp[n]);
- }
-
- /* End */
-#ifdef JP
- hooked_roff("¤Ç¥À¥á¡¼¥¸¤òÍ¿¤¨¤é¤ì¤ë¡£");
-#else
- hooked_roff(". ");
-#endif
-
- }
-
-
- /* Collect immunities */
- vn = 0;
-#ifdef JP
- if (flagsr & RFR_IM_ACID) {vp[vn] = "»À";color[vn++] = TERM_GREEN;}
-#else
- if (flagsr & RFR_IM_ACID) {vp[vn] = "acid";color[vn++] = TERM_GREEN;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_IM_ELEC) {vp[vn] = "°ðºÊ";color[vn++] = TERM_BLUE;}
-#else
- if (flagsr & RFR_IM_ELEC) {vp[vn] = "lightning";color[vn++] = TERM_BLUE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_IM_FIRE) {vp[vn] = "±ê";color[vn++] = TERM_RED;}
-#else
- if (flagsr & RFR_IM_FIRE) {vp[vn] = "fire";color[vn++] = TERM_RED;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_IM_COLD) {vp[vn] = "Î䵤";color[vn++] = TERM_L_WHITE;}
-#else
- if (flagsr & RFR_IM_COLD) {vp[vn] = "cold";color[vn++] = TERM_L_WHITE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_IM_POIS) {vp[vn] = "ÆÇ";color[vn++] = TERM_L_GREEN;}
-#else
- if (flagsr & RFR_IM_POIS) {vp[vn] = "poison";color[vn++] = TERM_L_GREEN;}
-#endif
-
-
- /* Collect resistances */
-#ifdef JP
- if (flagsr & RFR_RES_LITE) {vp[vn] = "Á®¸÷";color[vn++] = TERM_YELLOW;}
-#else
- if (flagsr & RFR_RES_LITE) {vp[vn] = "light";color[vn++] = TERM_YELLOW;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_DARK) {vp[vn] = "°Å¹õ";color[vn++] = TERM_L_DARK;}
-#else
- if (flagsr & RFR_RES_DARK) {vp[vn] = "dark";color[vn++] = TERM_L_DARK;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_NETH) {vp[vn] = "ÃϹö";color[vn++] = TERM_L_DARK;}
-#else
- if (flagsr & RFR_RES_NETH) {vp[vn] = "nether";color[vn++] = TERM_L_DARK;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_WATE) {vp[vn] = "¿å";color[vn++] = TERM_BLUE;}
-#else
- if (flagsr & RFR_RES_WATE) {vp[vn] = "water";color[vn++] = TERM_BLUE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_PLAS) {vp[vn] = "¥×¥é¥º¥Þ";color[vn++] = TERM_L_RED;}
-#else
- if (flagsr & RFR_RES_PLAS) {vp[vn] = "plasma";color[vn++] = TERM_L_RED;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_SHAR) {vp[vn] = "ÇËÊÒ";color[vn++] = TERM_L_UMBER;}
-#else
- if (flagsr & RFR_RES_SHAR) {vp[vn] = "shards";color[vn++] = TERM_L_UMBER;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_SOUN) {vp[vn] = "¹ì²»";color[vn++] = TERM_ORANGE;}
-#else
- if (flagsr & RFR_RES_SOUN) {vp[vn] = "sound";color[vn++] = TERM_ORANGE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_CHAO) {vp[vn] = "¥«¥ª¥¹";color[vn++] = TERM_VIOLET;}
-#else
- if (flagsr & RFR_RES_CHAO) {vp[vn] = "chaos";color[vn++] = TERM_VIOLET;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_NEXU) {vp[vn] = "°ø²Ìº®Íð";color[vn++] = TERM_VIOLET;}
-#else
- if (flagsr & RFR_RES_NEXU) {vp[vn] = "nexus";color[vn++] = TERM_VIOLET;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_DISE) {vp[vn] = "Îô²½";color[vn++] = TERM_VIOLET;}
-#else
- if (flagsr & RFR_RES_DISE) {vp[vn] = "disenchantment";color[vn++] = TERM_VIOLET;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_WALL) {vp[vn] = "¥Õ¥©¡¼¥¹";color[vn++] = TERM_UMBER;}
-#else
- if (flagsr & RFR_RES_WALL) {vp[vn] = "force";color[vn++] = TERM_UMBER;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_INER) {vp[vn] = "ÃÙÆß";color[vn++] = TERM_SLATE;}
-#else
- if (flagsr & RFR_RES_INER) {vp[vn] = "inertia";color[vn++] = TERM_SLATE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_TIME) {vp[vn] = "»þ´ÖµÕž";color[vn++] = TERM_L_BLUE;}
-#else
- if (flagsr & RFR_RES_TIME) {vp[vn] = "time";color[vn++] = TERM_L_BLUE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_GRAV) {vp[vn] = "½ÅÎÏ";color[vn++] = TERM_SLATE;}
-#else
- if (flagsr & RFR_RES_GRAV) {vp[vn] = "gravity";color[vn++] = TERM_SLATE;}
-#endif
-
-#ifdef JP
- if (flagsr & RFR_RES_ALL) {vp[vn] = "¤¢¤é¤æ¤ë¹¶·â";color[vn++] = TERM_YELLOW;}
-#else
- if (flagsr & RFR_RES_ALL) {vp[vn] = "all";color[vn++] = TERM_YELLOW;}
-#endif
-
-#ifdef JP
- if ((flagsr & RFR_RES_TELE) && !(r_ptr->flags1 & RF1_UNIQUE)) {vp[vn] = "¥Æ¥ì¥Ý¡¼¥È";color[vn++] = TERM_ORANGE;}
-#else
- if ((flagsr & RFR_RES_TELE) && !(r_ptr->flags1 & RF1_UNIQUE)) {vp[vn] = "teleportation";color[vn++] = TERM_ORANGE;}
-#endif
-
-
- /* Describe immunities and resistances */
- if (vn)
- {
- /* Intro */
-#ifdef JP
- hooked_roff(format("%^s¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s", wd_he[msex]));
-#endif
-
-
- /* Scan */
- for (n = 0; n < vn; n++)
- {
- /* Intro */
-#ifdef JP
- if ( n != 0 ) hooked_roff("¤È");
-#else
- if (n == 0) hooked_roff(" resists ");
- else if (n < vn-1) hooked_roff(", ");
- else hooked_roff(" and ");
-#endif
-
-
- /* Dump */
- hook_c_roff(color[n], vp[n]);
- }
-
- /* End */
-#ifdef JP
- hooked_roff("¤ÎÂÑÀ¤ò»ý¤Ã¤Æ¤¤¤ë¡£");
-#else
- hooked_roff(". ");
-#endif
-
- }
-
-
- if ((r_ptr->r_xtra1 & MR1_SINKA) || know_everything)
- {
- if (r_ptr->next_r_idx)
- {
-#ifdef JP
- hooked_roff(format("%^s¤Ï·Ð¸³¤òÀѤà¤È¡¢", wd_he[msex]));
-#else
- hooked_roff(format("%^s will evolve into ", wd_he[msex]));
-#endif
- hook_c_roff(TERM_YELLOW, format("%s", r_name+r_info[r_ptr->next_r_idx].name));
-#ifdef JP
- hooked_roff(format("¤Ë¿Ê²½¤¹¤ë¡£"));
-#else
- hooked_roff(format(" when %s gets enugh experience. ", wd_he[msex]));
-#endif
- }
- else if (!(r_ptr->flags1 & RF1_UNIQUE))
- {
-#ifdef JP
- hooked_roff(format("%s¤Ï¿Ê²½¤·¤Ê¤¤¡£", wd_he[msex]));
-#else
- hooked_roff(format("%s won't evolve. ", wd_he[msex]));
-#endif
- }
- }
-
- /* Collect non-effects */
- vn = 0;
-#ifdef JP
- if (flags3 & RF3_NO_STUN) {vp[vn] = "Û¯Û°¤È¤·¤Ê¤¤";color[vn++] = TERM_ORANGE;}
-#else
- if (flags3 & RF3_NO_STUN) {vp[vn] = "stunned";color[vn++] = TERM_ORANGE;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_NO_FEAR) {vp[vn] = "¶²Éݤò´¶¤¸¤Ê¤¤";color[vn++] = TERM_SLATE;}
-#else
- if (flags3 & RF3_NO_FEAR) {vp[vn] = "frightened";color[vn++] = TERM_SLATE;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_NO_CONF) {vp[vn] = "º®Í𤷤ʤ¤";color[vn++] = TERM_L_UMBER;}
-#else
- if (flags3 & RF3_NO_CONF) {vp[vn] = "confused";color[vn++] = TERM_L_UMBER;}
-#endif
-
-#ifdef JP
- if (flags3 & RF3_NO_SLEEP) {vp[vn] = "̲¤é¤µ¤ì¤Ê¤¤";color[vn++] = TERM_BLUE;}
-#else
- if (flags3 & RF3_NO_SLEEP) {vp[vn] = "slept";color[vn++] = TERM_BLUE;}
-#endif
-
-#ifdef JP
- if ((flagsr & RFR_RES_TELE) && (r_ptr->flags1 & RF1_UNIQUE)) {vp[vn] = "¥Æ¥ì¥Ý¡¼¥È¤µ¤ì¤Ê¤¤";color[vn++] = TERM_ORANGE;}
-#else
- if ((flagsr & RFR_RES_TELE) && (r_ptr->flags1 & RF1_UNIQUE)) {vp[vn] = "teleported";color[vn++] = TERM_ORANGE;}
-#endif
-
- /* Describe non-effects */
- if (vn)
- {
- /* Intro */
-#ifdef JP
- hooked_roff(format("%^s¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s", wd_he[msex]));
-#endif
-
-
- /* Scan */
- for (n = 0; n < vn; n++)
- {
- /* Intro */
-#ifdef JP
- if ( n != 0 ) hooked_roff("¤·¡¢");
-#else
- if (n == 0) hooked_roff(" cannot be ");
- else if (n < vn - 1) hooked_roff(", ");
- else hooked_roff(" or ");
-#endif
-
-
- /* Dump */
- hook_c_roff(color[n], vp[n]);
- }
-
- /* End */
-#ifdef JP
- hooked_roff("¡£");
-#else
- hooked_roff(". ");
-#endif
-
- }
-
-
- /* Do we know how aware it is? */
- if ((((int)r_ptr->r_wake * (int)r_ptr->r_wake) > r_ptr->sleep) ||
- (r_ptr->r_ignore == MAX_UCHAR) ||
- (r_ptr->sleep == 0 && r_ptr->r_tkills >= 10) || know_everything)
- {
- cptr act;
-
- if (r_ptr->sleep > 200)
- {
-#ifdef JP
- act = "¤ò̵»ë¤·¤¬¤Á¤Ç¤¢¤ë¤¬";
-#else
- act = "prefers to ignore";
-#endif
-
- }
- else if (r_ptr->sleep > 95)
- {
-#ifdef JP
- act = "¤ËÂФ·¤Æ¤Û¤È¤ó¤ÉÃí°Õ¤òʧ¤ï¤Ê¤¤¤¬";
-#else
- act = "pays very little attention to";
-#endif
-
- }
- else if (r_ptr->sleep > 75)
- {
-#ifdef JP
- act = "¤ËÂФ·¤Æ¤¢¤Þ¤êÃí°Õ¤òʧ¤ï¤Ê¤¤¤¬";
-#else
- act = "pays little attention to";
-#endif
-
- }
- else if (r_ptr->sleep > 45)
- {
-#ifdef JP
- act = "¤ò¸«²á¤´¤·¤¬¤Á¤Ç¤¢¤ë¤¬";
-#else
- act = "tends to overlook";
-#endif
-
- }
- else if (r_ptr->sleep > 25)
- {
-#ifdef JP
- act = "¤ò¤Û¤ó¤Î¾¯¤·¤Ï¸«¤Æ¤ª¤ê";
-#else
- act = "takes quite a while to see";
-#endif
-
- }
- else if (r_ptr->sleep > 10)
- {
-#ifdef JP
- act = "¤ò¤·¤Ð¤é¤¯¤Ï¸«¤Æ¤ª¤ê";
-#else
- act = "takes a while to see";
-#endif
-
- }
- else if (r_ptr->sleep > 5)
- {
-#ifdef JP
- act = "¤ò´öʬÃí°Õ¿¼¤¯¸«¤Æ¤ª¤ê";
-#else
- act = "is fairly observant of";
-#endif
-
- }
- else if (r_ptr->sleep > 3)
- {
-#ifdef JP
- act = "¤òÃí°Õ¿¼¤¯¸«¤Æ¤ª¤ê";
-#else
- act = "is observant of";
-#endif
-
- }
- else if (r_ptr->sleep > 1)
- {
-#ifdef JP
- act = "¤ò¤«¤Ê¤êÃí°Õ¿¼¤¯¸«¤Æ¤ª¤ê";
-#else
- act = "is very observant of";
-#endif
-
- }
- else if (r_ptr->sleep > 0)
- {
-#ifdef JP
- act = "¤ò·Ù²ü¤·¤Æ¤ª¤ê";
-#else
- act = "is vigilant for";
-#endif
-
- }
- else
- {
-#ifdef JP
- act = "¤ò¤«¤Ê¤ê·Ù²ü¤·¤Æ¤ª¤ê";
-#else
- act = "is ever vigilant for";
-#endif
-
- }
-
-#ifdef JP
- hooked_roff(format("%^s¤Ï¿¯Æþ¼Ô%s¡¢ %d ¥Õ¥£¡¼¥ÈÀ褫¤é¿¯Æþ¼Ô¤Ëµ¤ÉÕ¤¯¤³¤È¤¬¤¢¤ë¡£",
- wd_he[msex], act, 10 * r_ptr->aaf));
-#else
- hooked_roff(format("%^s %s intruders, which %s may notice from %d feet. ",
- wd_he[msex], act, wd_he[msex], 10 * r_ptr->aaf));
-#endif
-
- }
-
-
- /* Drops gold and/or items */
- if (drop_gold || drop_item)
- {
- /* Intro */
-#ifdef JP
- hooked_roff(format("%^s¤Ï", wd_he[msex]));
-#else
- hooked_roff(format("%^s may carry", wd_he[msex]));
-
- /* No "n" needed */
- sin = FALSE;
-#endif
-
-
- /* Count maximum drop */
- n = MAX(drop_gold, drop_item);
-
- /* One drop (may need an "n") */
- if (n == 1)