src/selfinfo.c

   1 /*!\r
   2  * @file selfinfo.c\r
   3  * @brief 自己分析処理/ Self knowledge\r
   4  * @date 2018/09/07\r
   5  * @author\r
   6  * <pre>\r
   7  * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke\r
   8  * This software may be copied and distributed for educational, research,\r
   9  * and not for profit purposes provided that this copyright and statement\r
  10  * are included in all such copies.  Other copyrights may also apply.\r
  11  * </pre>\r
  12  * 2018 Deskull\r
  13  * @details\r
  14  * spell2s.cから分離\r
  15  */\r
  16 \r
  17 #include "angband.h"\r
  18 #include "player-status.h"\r
  19 \r
  20 /*!\r
  21  * @brief 自己分析処理(Nethackからのアイデア) / self-knowledge... idea from nethack.\r
  22  * @return なし\r
  23  * @details\r
  24  * <pre>\r
  25  * Useful for determining powers and\r
  26  * resistences of items.  It saves the screen, clears it, then starts listing\r
  27  * attributes, a screenful at a time.  (There are a LOT of attributes to\r
  28  * list.  It will probably take 2 or 3 screens for a powerful character whose\r
  29  * using several artifacts...) -CFT\r
  30  *\r
  31  * It is now a lot more efficient. -BEN-\r
  32  *\r
  33  * See also "identify_fully()".\r
  34  *\r
  35  * Use the "show_file()" method, perhaps.\r
  36  * </pre>\r
  37  */\r
  38 void self_knowledge(void)\r
  39 {\r
  40         int i = 0, j, k;\r
  41 \r
  42         int v_nr = 0;\r
  43         char v_string [8] [128];\r
  44         char s_string [6] [128];\r
  45 \r
  46         BIT_FLAGS flgs[TR_FLAG_SIZE];\r
  47 \r
  48         object_type *o_ptr;\r
  49 \r
  50         char Dummy[80];\r
  51         char buf[2][80];\r
  52 \r
  53         concptr info[220];\r
  54 \r
  55         PLAYER_LEVEL plev = p_ptr->lev;\r
  56 \r
  57         int percent;\r
  58 \r
  59         for (j = 0; j < TR_FLAG_SIZE; j++)\r
  60                 flgs[j] = 0L;\r
  61 \r
  62         p_ptr->knowledge |= (KNOW_STAT | KNOW_HPRATE);\r
  63 \r
  64         strcpy(Dummy, "");\r
  65 \r
  66         percent = (int)(((long)p_ptr->player_hp[PY_MAX_LEVEL - 1] * 200L) /\r
  67                 (2 * p_ptr->hitdie +\r
  68                 ((PY_MAX_LEVEL - 1+3) * (p_ptr->hitdie + 1))));\r
  69 \r
  70         sprintf(Dummy, _("現在の体力ランク : %d/100", "Your current Life Rating is %d/100."), percent);\r
  71         strcpy(buf[0], Dummy);\r
  72         info[i++] = buf[0];\r
  73         info[i++] = "";\r
  74 \r
  75         chg_virtue(V_KNOWLEDGE, 1);\r
  76         chg_virtue(V_ENLIGHTEN, 1);\r
  77 \r
  78         /* Acquire item flags from equipment */\r
  79         for (k = INVEN_RARM; k < INVEN_TOTAL; k++)\r
  80         {\r
  81                 u32b tflgs[TR_FLAG_SIZE];\r
  82 \r
  83                 o_ptr = &inventory[k];\r
  84 \r
  85                 /* Skip non-objects */\r
  86                 if (!o_ptr->k_idx) continue;\r
  87                 object_flags(o_ptr, tflgs);\r
  88 \r
  89                 /* Extract flags */\r
  90                 for (j = 0; j < TR_FLAG_SIZE; j++)\r
  91                         flgs[j] |= tflgs[j];\r
  92         }\r
  93 \r
  94         info[i++] = _("能力の最大値", "Limits of maximum stats");\r
  95 \r
  96         for (v_nr = 0; v_nr < A_MAX; v_nr++)\r
  97         {\r
  98                 char stat_desc[80];\r
  99 \r
 100                 sprintf(stat_desc, "%s 18/%d", stat_names[v_nr], p_ptr->stat_max_max[v_nr]-18);\r
 101 \r
 102                 strcpy(s_string[v_nr], stat_desc);\r
 103 \r
 104                 info[i++] = s_string[v_nr];\r
 105         }\r
 106         info[i++] = "";\r
 107 \r
 108         sprintf(Dummy, _("現在の属性 : %s(%ld)", "Your alighnment : %s(%ld)"), your_alignment(), (long int)p_ptr->align);\r
 109         strcpy(buf[1], Dummy);\r
 110         info[i++] = buf[1];\r
 111         for (v_nr = 0; v_nr < 8; v_nr++)\r
 112         {\r
 113                 GAME_TEXT vir_name [20];\r
 114                 char vir_desc[80];\r
 115                 int tester = p_ptr->virtues[v_nr];\r
 116         \r
 117                 strcpy(vir_name, virtue[(p_ptr->vir_types[v_nr])-1]);\r
 118  \r
 119                 sprintf(vir_desc, _("おっと。%sの情報なし。", "Oops. No info about %s."), vir_name);\r
 120                 if (tester < -100)\r
 121                         sprintf(vir_desc, _("[%s]の対極 (%d)", "You are the polar opposite of %s (%d)."),\r
 122                                 vir_name, tester);\r
 123                 else if (tester < -80)\r
 124                         sprintf(vir_desc, _("[%s]の大敵 (%d)", "You are an arch-enemy of %s (%d)."),\r
 125                                 vir_name, tester);\r
 126                 else if (tester < -60)\r
 127                         sprintf(vir_desc, _("[%s]の強敵 (%d)", "You are a bitter enemy of %s (%d)."),\r
 128                                 vir_name, tester);\r
 129                 else if (tester < -40)\r
 130                         sprintf(vir_desc, _("[%s]の敵 (%d)", "You are an enemy of %s (%d)."),\r
 131                                 vir_name, tester);\r
 132                 else if (tester < -20)\r
 133                         sprintf(vir_desc, _("[%s]の罪者 (%d)", "You have sinned against %s (%d)."),\r
 134                                 vir_name, tester);\r
 135                 else if (tester < 0)\r
 136                         sprintf(vir_desc, _("[%s]の迷道者 (%d)", "You have strayed from the path of %s (%d)."),\r
 137                                 vir_name, tester);\r
 138                 else if (tester == 0)\r
 139                         sprintf(vir_desc, _("[%s]の中立者 (%d)", "You are neutral to %s (%d)."),\r
 140                                 vir_name, tester);\r
 141                 else if (tester < 20)\r
 142                         sprintf(vir_desc, _("[%s]の小徳者 (%d)", "You are somewhat virtuous in %s (%d)."),\r
 143                                 vir_name, tester);\r
 144                 else if (tester < 40)\r
 145                         sprintf(vir_desc, _("[%s]の中徳者 (%d)", "You are virtuous in %s (%d)."),\r
 146                                 vir_name, tester);\r
 147                 else if (tester < 60)\r
 148                         sprintf(vir_desc, _("[%s]の高徳者 (%d)", "You are very virtuous in %s (%d)."),\r
 149                                 vir_name, tester);\r
 150                 else if (tester < 80)\r
 151                         sprintf(vir_desc, _("[%s]の覇者 (%d)", "You are a champion of %s (%d)."),\r
 152                                 vir_name, tester);\r
 153                 else if (tester < 100)\r
 154                         sprintf(vir_desc, _("[%s]の偉大な覇者 (%d)", "You are a great champion of %s (%d)."),\r
 155                                 vir_name, tester);\r
 156                 else\r
 157                         sprintf(vir_desc, _("[%s]の具現者 (%d)", "You are the living embodiment of %s (%d)."),\r
 158                                 vir_name, tester);\r
 159         \r
 160                 strcpy(v_string[v_nr], vir_desc);\r
 161         \r
 162                 info[i++] = v_string[v_nr];\r
 163         }\r
 164         info[i++] = "";\r
 165         \r
 166         /* Racial powers... */\r
 167         if (p_ptr->mimic_form)\r
 168         {\r
 169                 switch (p_ptr->mimic_form)\r
 170                 {\r
 171                         case MIMIC_DEMON:\r
 172                         case MIMIC_DEMON_LORD:\r
 173                         sprintf(Dummy, _("あなたは %d ダメージの地獄か火炎のブレスを吐くことができる。(%d MP)", \r
 174                                                         "You can nether breathe, dam. %d (cost %d)."), 3 * plev, 10+plev/3);\r
 175 \r
 176                                 info[i++] = Dummy;\r
 177                         break;\r
 178                 case MIMIC_VAMPIRE:\r
 179                         if (plev > 1)\r
 180                         {\r
 181                                 sprintf(Dummy, _("あなたは敵から %d-%d HP の生命力を吸収できる。(%d MP)", \r
 182                                                                 "You can steal life from a foe, dam. %d-%d (cost %d)."),\r
 183                                     plev + MAX(1, plev / 10), plev + plev * MAX(1, plev / 10), 1 + (plev / 3));\r
 184                                 info[i++] = Dummy;\r
 185                         }\r
 186                         break;\r
 187                 }\r
 188         }\r
 189         else\r
 190         {\r
 191         switch (p_ptr->prace)\r
 192         {\r
 193                 case RACE_NIBELUNG:\r
 194                 case RACE_DWARF:\r
 195                         if (plev > 4)\r
 196                         info[i++] = _("あなたは罠とドアと階段を感知できる。(5 MP)", "You can find traps, doors and stairs (cost 5).");\r
 197                         break;\r
 198                 case RACE_HOBBIT:\r
 199                         if (plev > 14)\r
 200                         {\r
 201                                 info[i++] = _("あなたは食料を生成できる。(10 MP)", "You can produce food (cost 10).");\r
 202                         }\r
 203                         break;\r
 204                 case RACE_GNOME:\r
 205                         if (plev > 4)\r
 206                         {\r
 207                                 sprintf(Dummy, _("あなたは範囲 %d 以内にテレポートできる。(%d MP)", "You can teleport, range %d (cost %d)."),\r
 208                                     (1 + plev), (5 + (plev / 5)));\r
 209                                 info[i++] = Dummy;\r
 210                         }\r
 211                         break;\r
 212                 case RACE_HALF_ORC:\r
 213                         if (plev > 2)\r
 214                                 info[i++] = _("あなたは恐怖を除去できる。(5 MP)", "You can remove fear (cost 5).");\r
 215                         break;\r
 216                 case RACE_HALF_TROLL:\r
 217                         if (plev > 9)\r
 218                                 info[i++] = _("あなたは狂暴化することができる。(12 MP) ", "You enter berserk fury (cost 12).");\r
 219                         break;\r
 220                 case RACE_AMBERITE:\r
 221                         if (plev > 29)\r
 222                                 info[i++] = _("あなたはシャドウシフトすることができる。(50 MP)", "You can Shift Shadows (cost 50).");\r
 223 \r
 224                         if (plev > 39)\r
 225                                 info[i++] = _("あなたは「パターン」を心に描いて歩くことができる。(75 MP)", "You can mentally Walk the Pattern (cost 75).");\r
 226 \r
 227                         break;\r
 228                 case RACE_BARBARIAN:\r
 229                         if (plev > 7)\r
 230                                 info[i++] = _("あなたは狂暴化することができる。(10 MP) ", "You can enter berserk fury (cost 10).");\r
 231 \r
 232                         break;\r
 233                 case RACE_HALF_OGRE:\r
 234                         if (plev > 24)\r
 235                                 info[i++] = _("あなたは爆発のルーンを仕掛けることができる。(35 MP)", "You can set an Explosive Rune (cost 35).");\r
 236 \r
 237                         break;\r
 238                 case RACE_HALF_GIANT:\r
 239                         if (plev > 19)\r
 240                                 info[i++] = _("あなたは石の壁を壊すことができる。(10 MP)", "You can break stone walls (cost 10).");\r
 241                         break;\r
 242                 case RACE_HALF_TITAN:\r
 243                         if (plev > 34)\r
 244                                 info[i++] = _("あなたはモンスターをスキャンすることができる。(20 MP)", "You can probe monsters (cost 20).");\r
 245                         break;\r
 246                 case RACE_CYCLOPS:\r
 247                         if (plev > 19)\r
 248                         {\r
 249                                 sprintf(Dummy, _("あなたは %d ダメージの岩石を投げることができる。(15 MP)", \r
 250                                                          "You can throw a boulder, dam. %d (cost 15)."), 3 * plev);\r
 251                                 info[i++] = Dummy;\r
 252                         }\r
 253                         break;\r
 254                 case RACE_YEEK:\r
 255                         if (plev > 14)\r
 256                                 info[i++] = _("あなたは恐怖を呼び起こす叫び声を発することができる。(15 MP)", "You can make a terrifying scream (cost 15).");\r
 257                         break;\r
 258                 case RACE_KLACKON:\r
 259                         if (plev > 8)\r
 260                         {\r
 261                                 sprintf(Dummy, _("あなたは %d ダメージの酸を吹きかけることができる。(9 MP)", "You can spit acid, dam. %d (cost 9)."), plev);\r
 262                                 info[i++] = Dummy;\r
 263                         }\r
 264                         break;\r
 265                 case RACE_KOBOLD:\r
 266                         if (plev > 11)\r
 267                         {\r
 268                                 sprintf(Dummy,\r
 269                                                 _("あなたは %d ダメージの毒矢を投げることができる。(8 MP)", "You can throw a dart of poison, dam. %d (cost 8)."), plev);\r
 270                                 info[i++] = Dummy;\r
 271                         }\r
 272                         break;\r
 273                 case RACE_DARK_ELF:\r
 274                         if (plev > 1)\r
 275                         {\r
 276                                 sprintf(Dummy, _("あなたは %d ダメージのマジック・ミサイルの呪文を使える。(2 MP)", "You can cast a Magic Missile, dam %d (cost 2)."),\r
 277                                     (3 + ((plev-1) / 5)));\r
 278                                 info[i++] = Dummy;\r
 279                         }\r
 280                         break;\r
 281                 case RACE_DRACONIAN:\r
 282                         sprintf(Dummy, _("あなたは %d ダメージのブレスを吐くことができる。(%d MP)", "You can breathe, dam. %d (cost %d)."), 2 * plev, plev);\r
 283                         info[i++] = Dummy;\r
 284                         break;\r
 285                 case RACE_MIND_FLAYER:\r
 286                         if (plev > 14)\r
 287                                 sprintf(Dummy, _("あなたは %d ダメージの精神攻撃をすることができる。(12 MP)", "You can mind blast your enemies, dam %d (cost 12)."), plev);\r
 288                         info[i++] = Dummy;\r
 289                         break;\r
 290                 case RACE_IMP:\r
 291                         if (plev > 29)\r
 292                         {\r
 293                                 sprintf(Dummy, _("あなたは %d ダメージのファイア・ボールの呪文を使える。(15 MP)", "You can cast a Fire Ball, dam. %d (cost 15)."), plev);\r
 294                                 info[i++] = Dummy;\r
 295                         }\r
 296                         else if (plev > 8)\r
 297                         {\r
 298                                 sprintf(Dummy, _("あなたは %d ダメージのファイア・ボルトの呪文を使える。(15 MP)", "You can cast a Fire Bolt, dam. %d (cost 15)."), plev);\r
 299                                 info[i++] = Dummy;\r
 300                         }\r
 301                         break;\r
 302                 case RACE_GOLEM:\r
 303                         if (plev > 19)\r
 304                                 info[i++] = _("あなたは d20+30 ターンの間肌を石に変化させられる。(15 MP)", "You can turn your skin to stone, dur d20+30 (cost 15).");\r
 305                         break;\r
 306                 case RACE_ZOMBIE:\r
 307                 case RACE_SKELETON:\r
 308                         if (plev > 29)\r
 309                                 info[i++] = _("あなたは失った経験値を回復することができる。(30 MP)", "You can restore lost experience (cost 30).");\r
 310                         break;\r
 311                 case RACE_VAMPIRE:\r
 312                         if (plev > 1)\r
 313                         {\r
 314                                 sprintf(Dummy, _("あなたは敵から %d-%d HP の生命力を吸収できる。(%d MP)", "You can steal life from a foe, dam. %d-%d (cost %d)."),\r
 315                                     plev + MAX(1, plev / 10), plev + plev * MAX(1, plev / 10), 1 + (plev / 3));\r
 316                                 info[i++] = Dummy;\r
 317                         }\r
 318                         break;\r
 319                 case RACE_SPECTRE:\r
 320                         if (plev > 3)\r
 321                         {\r
 322                                 info[i++] = _("あなたは泣き叫んで敵を恐怖させることができる。(3 MP)", "You can wail to terrify your enemies (cost 3).");\r
 323                         }\r
 324                         break;\r
 325                 case RACE_SPRITE:\r
 326                         if (plev > 11)\r
 327                         {\r
 328                                 info[i++] = _("あなたは敵を眠らせる魔法の粉を投げることができる。(12 MP)", "You can throw magical dust which induces sleep (cost 12).");\r
 329                         }\r
 330                         break;\r
 331                 case RACE_DEMON:\r
 332                         sprintf(Dummy, _("あなたは %d ダメージの地獄か火炎のブレスを吐くことができる。(%d MP)", \r
 333                                                 "You can breathe nether, dam. %d (cost %d)."), 3 * plev, 10+plev/3);\r
 334 \r
 335                         info[i++] = Dummy;\r
 336                         break;\r
 337                 case RACE_KUTAR:\r
 338                         if (plev > 19)\r
 339                                 info[i++] = _("あなたは d20+30 ターンの間横に伸びることができる。(15 MP)", "You can expand horizontally, dur d20+30 (cost 15).");\r
 340                         break;\r
 341                 case RACE_ANDROID:\r
 342                         if (plev < 10)\r
 343                                 sprintf(Dummy, _("あなたは %d ダメージのレイガンを撃つことができる。(7 MP)", "You can fire a ray gun with damage %d (cost 7)."), \r
 344                                         (plev + 1) / 2);\r
 345                         else if (plev < 25)\r
 346                                 sprintf(Dummy, _("あなたは %d ダメージのブラスターを撃つことができる。(13 MP)", "You can fire a blaster with damage %d (cost 13)."), plev);\r
 347                         else if (plev < 35)\r
 348                                 sprintf(Dummy, _("あなたは %d ダメージのバズーカを撃つことができる。(26 MP)", "You can fire a bazooka with damage %d (cost 26)."), plev * 2);\r
 349                         else if (plev < 45)\r
 350                                 sprintf(Dummy, _("あなたは %d ダメージのビームキャノンを撃つことができる。(40 MP)", \r
 351                                                 "You can fire a beam cannon with damage %d (cost 40)."), plev * 2);\r
 352                         else\r
 353                                 sprintf(Dummy, _("あなたは %d ダメージのロケットを撃つことができる。(60 MP)", \r
 354                                                 "You can fire a rocket with damage %d (cost 60)."), plev * 5);\r
 355 \r
 356                         info[i++] = Dummy;\r
 357                         break;\r
 358                 default:\r
 359                         break;\r
 360         }\r
 361         }\r
 362 \r
 363         switch(p_ptr->pclass)\r
 364         {\r
 365                 case CLASS_WARRIOR:\r
 366                         if (plev > 39)\r
 367                         {\r
 368                                 info[i++] = _("あなたはランダムな方向に対して数回攻撃することができる。(75 MP)", \r
 369                                                         "You can attack some random directions at a time (cost 75).");\r
 370                         }\r
 371                         break;\r
 372                 case CLASS_HIGH_MAGE:\r
 373                         if (p_ptr->realm1 == REALM_HEX) break;\r
 374                 case CLASS_MAGE:\r
 375                 case CLASS_SORCERER:\r
 376                         if (plev > 24)\r
 377                         {\r
 378                                 info[i++] = _("あなたはアイテムの魔力を吸収することができる。(1 MP)", \r
 379                                                 "You can absorb charges from an item (cost 1).");\r
 380                         }\r
 381                         break;\r
 382                 case CLASS_PRIEST:\r
 383                         if (is_good_realm(p_ptr->realm1))\r
 384                         {\r
 385                                 if (plev > 34)\r
 386                                 {\r
 387                                         info[i++] = _("あなたは武器を祝福することができる。(70 MP)", "You can bless a weapon (cost 70).");\r
 388                                 }\r
 389                         }\r
 390                         else\r
 391                         {\r
 392                                 if (plev > 41)\r
 393                                 {\r
 394                                         info[i++] = _("あなたは周りのすべてのモンスターを攻撃することができる。(40 MP)", "You can damages all monsters in sight (cost 40).");\r
 395                                 }\r
 396                         }\r
 397                         break;\r
 398                 case CLASS_ROGUE:\r
 399                         if (plev > 7)\r
 400                         {\r
 401                                 info[i++] = _("あなたは攻撃して即座に逃げることができる。(12 MP)", "You can hit a monster and teleport at a time (cost 12).");\r
 402                         }\r
 403                         break;\r
 404                 case CLASS_RANGER:\r
 405                         if (plev > 14)\r
 406                         {\r
 407                                 info[i++] = _("あなたは怪物を調査することができる。(20 MP)", "You can prove monsters (cost 20).");\r
 408                         }\r
 409                         break;\r
 410                 case CLASS_PALADIN:\r
 411                         if (is_good_realm(p_ptr->realm1))\r
 412                         {\r
 413                                 if (plev > 29)\r
 414                                 {\r
 415                                         info[i++] = _("あなたは聖なる槍を放つことができる。(30 MP)", "You can fires a holy spear (cost 30).");\r
 416                                 }\r
 417                         }\r
 418                         else\r
 419                         {\r
 420                                 if (plev > 29)\r
 421                                 {\r
 422                                         info[i++] = _("あなたは生命力を減少させる槍を放つことができる。(30 MP)", "You can fires a spear which drains vitality (cost 30).");\r
 423                                 }\r
 424                         }\r
 425                         break;\r
 426                 case CLASS_WARRIOR_MAGE:\r
 427                         if (plev > 24)\r
 428                         {\r
 429                                 info[i++] = _("あなたはＨＰをＭＰに変換することができる。(0 MP)", "You can convert HP to SP (cost 0).");\r
 430                                 info[i++] = _("あなたはＭＰをＨＰに変換することができる。(0 MP)", "You can convert SP to HP (cost 0).");\r
 431                         }\r
 432                         break;\r
 433                 case CLASS_CHAOS_WARRIOR:\r
 434                         if (plev > 39)\r
 435                         {\r
 436                                 info[i++] = _("あなたは周囲に怪物を惑わす光を発生させることができる。(50 MP)",\r
 437                                                 "You can radiate light which confuses nearby monsters (cost 50).");\r
 438                         }\r
 439                         break;\r
 440                 case CLASS_MONK:\r
 441                         if (plev > 24)\r
 442                         {\r
 443                                 info[i++] = _("あなたは構えることができる。(0 MP)", "You can assume a posture of special form (cost 0).");\r
 444                         }\r
 445                         if (plev > 29)\r
 446                         {\r
 447                                 info[i++] = _("あなたは通常の2倍の攻撃を行うことができる。(30 MP)", "You can perform double attacks in a time (cost 30).");\r
 448                         }\r
 449                         break;\r
 450                 case CLASS_MINDCRAFTER:\r
 451                 case CLASS_FORCETRAINER:\r
 452                         if (plev > 14)\r
 453                         {\r
 454                                 info[i++] = _("あなたは精神を集中してＭＰを回復させることができる。(0 MP)", "You can concentrate to regenerate your mana (cost 0).");\r
 455                         }\r
 456                         break;\r
 457                 case CLASS_TOURIST:\r
 458                         info[i++] = _("あなたは写真を撮影することができる。(0 MP)", "You can take a photograph (cost 0).");\r
 459                         if (plev > 24)\r
 460                         {\r
 461                                 info[i++] = _("あなたはアイテムを完全に鑑定することができる。(20 MP)", "You can *identify* items (cost 20).");\r
 462                         }\r
 463                         break;\r
 464                 case CLASS_IMITATOR:\r
 465                         if (plev > 29)\r
 466                         {\r
 467                                 info[i++] = _("あなたは怪物の特殊攻撃をダメージ2倍でまねることができる。(100 MP)", \r
 468                                                 "You can imitate monster's special attacks with double damage (cost 100).");\r
 469                         }\r
 470                         break;\r
 471                 case CLASS_BEASTMASTER:\r
 472                         info[i++] = _("あなたは1体の生命のあるモンスターを支配することができる。(レベル/4 MP)", "You can dominate a monster (cost level/4).");\r
 473                         if (plev > 29)\r
 474                         {\r
 475                                 info[i++] = _("あなたは視界内の生命のあるモンスターを支配することができる。((レベル+20)/2 MP)", \r
 476                                                 "You can dominate living monsters in sight (cost (level+20)/4).");\r
 477                         }\r
 478                         break;\r
 479                 case CLASS_MAGIC_EATER:\r
 480                         info[i++] = _("あなたは杖/魔法棒/ロッドの魔力を自分のものにすることができる。", "You can absorb a staff, wand or rod itself.");\r
 481                         break;\r
 482                 case CLASS_RED_MAGE:\r
 483                         if (plev > 47)\r
 484                         {\r
 485                                 info[i++] = _("あなたは1ターンに2回魔法を唱えることができる。(20 MP)", "You can cast two spells in one time (cost 20).");\r
 486                         }\r
 487                         break;\r
 488                 case CLASS_SAMURAI:\r
 489                         {\r
 490                                 info[i++] = _("あなたは精神を集中して気合いを溜めることができる。", "You can concentrate to regenerate your mana.");\r
 491                         }\r
 492                         if (plev > 24)\r
 493                         {\r
 494                                 info[i++] = _("あなたは特殊な型で構えることができる。", "You can assume a posture of special form.");\r
 495                         }\r
 496                         break;\r
 497                 case CLASS_BLUE_MAGE:\r
 498                         info[i++] = _("あなたは相手に使われた魔法を学ぶことができる。", "You can study spells which your enemy casts on you.");\r
 499                         break;\r
 500                 case CLASS_CAVALRY:\r
 501                         if (plev > 9)\r
 502                         {\r
 503                                 info[i++] = _("あなたはモンスターに乗って無理矢理ペットにすることができる。", "You can ride on a hostile monster forcibly to turn it into pet.");\r
 504                         }\r
 505                         break;\r
 506                 case CLASS_BERSERKER:\r
 507                         if (plev > 9)\r
 508                         {\r
 509                                 info[i++] = _("あなたは街とダンジョンの間を行き来することができる。", "You can travel between town and the depths.");\r
 510                         }\r
 511                         break;\r
 512                 case CLASS_MIRROR_MASTER:\r
 513                         info[i++] = _("あなたは鏡を作り出すことができる。(2 MP)", "You can create a Mirror (cost 2).");\r
 514                         info[i++] = _("あなたは鏡を割ることができる。(0 MP)", "You can break distant Mirrors (cost 0).");\r
 515                         break;\r
 516                 case CLASS_NINJA:\r
 517                         if (plev > 19)\r
 518                         {\r
 519                                 info[i++] = _("あなたは素早く移動することができる。", "You can walk extremery fast.");\r
 520                         }\r
 521                         break;\r
 522         }\r
 523 \r
 524         if (p_ptr->muta1)\r
 525         {\r
 526                 if (p_ptr->muta1 & MUT1_SPIT_ACID)\r
 527                 {\r
 528                         info[i++] = _("あなたは酸を吹きかけることができる。(ダメージ レベルX1)", "You can spit acid (dam lvl).");\r
 529                 }\r
 530                 if (p_ptr->muta1 & MUT1_BR_FIRE)\r
 531                 {\r
 532                         info[i++] = _("あなたは炎のブレスを吐くことができる。(ダメージ レベルX2)", "You can breathe fire (dam lvl * 2).");\r
 533                 }\r
 534                 if (p_ptr->muta1 & MUT1_HYPN_GAZE)\r
 535                 {\r
 536                         info[i++] = _("あなたの睨みは催眠効果をもつ。", "Your gaze is hypnotic.");\r
 537                 }\r
 538                 if (p_ptr->muta1 & MUT1_TELEKINES)\r
 539                 {\r
 540                         info[i++] = _("あなたは念動力をもっている。", "You are telekinetic.");\r
 541                 }\r
 542                 if (p_ptr->muta1 & MUT1_VTELEPORT)\r
 543                 {\r
 544                         info[i++] = _("あなたは自分の意思でテレポートできる。", "You can teleport at will.");\r
 545                 }\r
 546                 if (p_ptr->muta1 & MUT1_MIND_BLST)\r
 547                 {\r
 548                         info[i++] = _("あなたは精神攻撃を行える。(ダメージ 3～12d3)", "You can Mind Blast your enemies (3 to 12d3 dam).");\r
 549                 }\r
 550                 if (p_ptr->muta1 & MUT1_RADIATION)\r
 551                 {\r
 552                         info[i++] = _("あなたは自分の意思で強い放射線を発生することができる。(ダメージ レベルX2)", "You can emit hard radiation at will (dam lvl * 2).");\r
 553                 }\r
 554                 if (p_ptr->muta1 & MUT1_VAMPIRISM)\r
 555                 {\r
 556                         info[i++] = _("あなたは吸血鬼のように敵から生命力を吸収することができる。(ダメージ レベルX2)", \r
 557                                                 "You can drain life from a foe like a vampire (dam lvl * 2).");\r
 558                 }\r
 559                 if (p_ptr->muta1 & MUT1_SMELL_MET)\r
 560                 {\r
 561                         info[i++] = _("あなたは近くにある貴金属をかぎ分けることができる。", "You can smell nearby precious metal.");\r
 562                 }\r
 563                 if (p_ptr->muta1 & MUT1_SMELL_MON)\r
 564                 {\r
 565                         info[i++] = _("あなたは近くのモンスターの存在をかぎ分けることができる。", "You can smell nearby monsters.");\r
 566                 }\r
 567                 if (p_ptr->muta1 & MUT1_BLINK)\r
 568                 {\r
 569                         info[i++] = _("あなたは短い距離をテレポートできる。", "You can teleport yourself short distances.");\r
 570                 }\r
 571                 if (p_ptr->muta1 & MUT1_EAT_ROCK)\r
 572                 {\r
 573                         info[i++] = _("あなたは硬い岩を食べることができる。", "You can consume solid rock.");\r
 574                 }\r
 575                 if (p_ptr->muta1 & MUT1_SWAP_POS)\r
 576                 {\r
 577                         info[i++] = _("あなたは他の者と場所を入れ替わることができる。", "You can switch locations with another being.");\r
 578                 }\r
 579                 if (p_ptr->muta1 & MUT1_SHRIEK)\r
 580                 {\r
 581                         info[i++] = _("あなたは身の毛もよだつ叫び声を発することができる。(ダメージ レベルX2)", "You can emit a horrible shriek (dam 2 * lvl).");\r
 582                 }\r
 583                 if (p_ptr->muta1 & MUT1_ILLUMINE)\r
 584                 {\r
 585                         info[i++] = _("あなたは明るい光を放つことができる。", "You can emit bright light.");\r
 586                 }\r
 587                 if (p_ptr->muta1 & MUT1_DET_CURSE)\r
 588                 {\r
 589                         info[i++] = _("あなたは邪悪な魔法の危険を感じとることができる。", "You can feel the danger of evil magic.");\r
 590                 }\r
 591                 if (p_ptr->muta1 & MUT1_BERSERK)\r
 592                 {\r
 593                         info[i++] = _("あなたは自分の意思で狂乱戦闘状態になることができる。", "You can drive yourself into a berserk frenzy.");\r
 594                 }\r
 595                 if (p_ptr->muta1 & MUT1_POLYMORPH)\r
 596                 {\r
 597                         info[i++] = _("あなたは自分の意志で変化できる。", "You can polymorph yourself at will.");\r
 598                 }\r
 599                 if (p_ptr->muta1 & MUT1_MIDAS_TCH)\r
 600                 {\r
 601                         info[i++] = _("あなたは通常アイテムを金に変えることができる。", "You can turn ordinary items to gold.");\r
 602                 }\r
 603                 if (p_ptr->muta1 & MUT1_GROW_MOLD)\r
 604                 {\r
 605                         info[i++] = _("あなたは周囲にキノコを生やすことができる。", "You can cause mold to grow near you.");\r
 606                 }\r
 607                 if (p_ptr->muta1 & MUT1_RESIST)\r
 608                 {\r
 609                         info[i++] = _("あなたは元素の攻撃に対して身を硬くすることができる。", "You can harden yourself to the ravages of the elements.");\r
 610                 }\r
 611                 if (p_ptr->muta1 & MUT1_EARTHQUAKE)\r
 612                 {\r
 613                         info[i++] = _("あなたは周囲のダンジョンを崩壊させることができる。", "You can bring down the dungeon around your ears.");\r
 614                 }\r
 615                 if (p_ptr->muta1 & MUT1_EAT_MAGIC)\r
 616                 {\r
 617                         info[i++] = _("あなたは魔法のエネルギーを自分の物として使用できる。", "You can consume magic energy for your own use.");\r
 618                 }\r
 619                 if (p_ptr->muta1 & MUT1_WEIGH_MAG)\r
 620                 {\r
 621                         info[i++] = _("あなたは自分に影響を与える魔法の力を感じることができる。", "You can feel the strength of the magics affecting you.");\r
 622                 }\r
 623                 if (p_ptr->muta1 & MUT1_STERILITY)\r
 624                 {\r
 625                         info[i++] = _("あなたは集団的生殖不能を起こすことができる。", "You can cause mass impotence.");\r
 626                 }\r
 627                 if (p_ptr->muta1 & MUT1_PANIC_HIT)\r
 628                 {\r
 629                         info[i++] = _("あなたは攻撃した後身を守るため逃げることができる。", "You can run for your life after hitting something.");\r
 630                 }\r
 631                 if (p_ptr->muta1 & MUT1_DAZZLE)\r
 632                 {\r
 633                         info[i++] = _("あなたは混乱と盲目を引き起こす放射能を発生することができる。 ", "You can emit confusing, blinding radiation.");\r
 634                 }\r
 635                 if (p_ptr->muta1 & MUT1_LASER_EYE)\r
 636                 {\r
 637                         info[i++] = _("あなたは目からレーザー光線を発することができる。(ダメージ レベルX2)", "Your eyes can fire laser beams (dam 2 * lvl).");\r
 638                 }\r
 639                 if (p_ptr->muta1 & MUT1_RECALL)\r
 640                 {\r
 641                         info[i++] = _("あなたは街とダンジョンの間を行き来することができる。", "You can travel between town and the depths.");\r
 642                 }\r
 643                 if (p_ptr->muta1 & MUT1_BANISH)\r
 644                 {\r
 645                         info[i++] = _("あなたは邪悪なモンスターを地獄に落とすことができる。", "You can send evil creatures directly to Hell.");\r
 646                 }\r
 647                 if (p_ptr->muta1 & MUT1_COLD_TOUCH)\r
 648                 {\r
 649                         info[i++] = _("あなたは敵を触って凍らせることができる。(ダメージ レベルX3)", "You can freeze things with a touch (dam 3 * lvl).");\r
 650                 }\r
 651                 if (p_ptr->muta1 & MUT1_LAUNCHER)\r
 652                 {\r
 653                         info[i++] = _("あなたはアイテムを力強く投げることができる。", "You can hurl objects with great force.");\r
 654                 }\r
 655         }\r
 656 \r
 657         if (p_ptr->muta2)\r
 658         {\r
 659                 if (p_ptr->muta2 & MUT2_BERS_RAGE)\r
 660                 {\r
 661                         info[i++] = _("あなたは狂戦士化の発作を起こす。", "You are subject to berserker fits.");\r
 662                 }\r
 663                 if (p_ptr->muta2 & MUT2_COWARDICE)\r
 664                 {\r
 665                         info[i++] = _("あなたは時々臆病になる。", "You are subject to cowardice.");\r
 666                 }\r
 667                 if (p_ptr->muta2 & MUT2_RTELEPORT)\r
 668                 {\r
 669                         info[i++] = _("あなたはランダムにテレポートする。", "You are teleporting randomly.");\r
 670                 }\r
 671                 if (p_ptr->muta2 & MUT2_ALCOHOL)\r
 672                 {\r
 673                         info[i++] = _("あなたの体はアルコールを分泌する。", "Your body produces alcohol.");\r
 674                 }\r
 675                 if (p_ptr->muta2 & MUT2_HALLU)\r
 676                 {\r
 677                         info[i++] = _("あなたは幻覚を引き起こす精神錯乱に侵されている。", "You have a hallucinatory insanity.");\r
 678                 }\r
 679                 if (p_ptr->muta2 & MUT2_FLATULENT)\r
 680                 {\r
 681                         info[i++] = _("あなたは制御できない強烈な屁をこく。", "You are subject to uncontrollable flatulence.");\r
 682                 }\r
 683                 if (p_ptr->muta2 & MUT2_PROD_MANA)\r
 684                 {\r
 685                         info[i++] = _("あなたは制御不能な魔法のエネルギーを発している。", "You are producing magical energy uncontrollably.");\r
 686                 }\r
 687                 if (p_ptr->muta2 & MUT2_ATT_DEMON)\r
 688                 {\r
 689                         info[i++] = _("あなたはデーモンを引きつける。", "You attract demons.");\r
 690                 }\r
 691                 if (p_ptr->muta2 & MUT2_SCOR_TAIL)\r
 692                 {\r
 693                         info[i++] = _("あなたはサソリの尻尾が生えている。(毒、ダメージ 3d7)", "You have a scorpion tail (poison, 3d7).");\r
 694                 }\r
 695                 if (p_ptr->muta2 & MUT2_HORNS)\r
 696                 {\r
 697                         info[i++] = _("あなたは角が生えている。(ダメージ 2d6)", "You have horns (dam. 2d6).");\r
 698                 }\r
 699                 if (p_ptr->muta2 & MUT2_BEAK)\r
 700                 {\r
 701                         info[i++] = _("あなたはクチバシが生えている。(ダメージ 2d4)", "You have a beak (dam. 2d4).");\r
 702                 }\r
 703                 if (p_ptr->muta2 & MUT2_SPEED_FLUX)\r
 704                 {\r
 705                         info[i++] = _("あなたはランダムに早く動いたり遅く動いたりする。", "You move faster or slower randomly.");\r
 706                 }\r
 707                 if (p_ptr->muta2 & MUT2_BANISH_ALL)\r
 708                 {\r
 709                         info[i++] = _("あなたは時々近くのモンスターを消滅させる。", "You sometimes cause nearby creatures to vanish.");\r
 710                 }\r
 711                 if (p_ptr->muta2 & MUT2_EAT_LIGHT)\r
 712                 {\r
 713                         info[i++] = _("あなたは時々周囲の光を吸収して栄養にする。", "You sometimes feed off of the light around you.");\r
 714                 }\r
 715                 if (p_ptr->muta2 & MUT2_TRUNK)\r
 716                 {\r
 717                         info[i++] = _("あなたは象のような鼻を持っている。(ダメージ 1d4)", "You have an elephantine trunk (dam 1d4).");\r
 718                 }\r
 719                 if (p_ptr->muta2 & MUT2_ATT_ANIMAL)\r
 720                 {\r
 721                         info[i++] = _("あなたは動物を引きつける。", "You attract animals.");\r
 722                 }\r
 723                 if (p_ptr->muta2 & MUT2_TENTACLES)\r
 724                 {\r
 725                         info[i++] = _("あなたは邪悪な触手を持っている。(ダメージ 2d5)", "You have evil looking tentacles (dam 2d5).");\r
 726                 }\r
 727                 if (p_ptr->muta2 & MUT2_RAW_CHAOS)\r
 728                 {\r
 729                         info[i++] = _("あなたはしばしば純カオスに包まれる。", "You occasionally are surrounded with raw chaos.");\r
 730                 }\r
 731                 if (p_ptr->muta2 & MUT2_NORMALITY)\r
 732                 {\r
 733                         info[i++] = _("あなたは変異していたが、回復してきている。", "You may be mutated, but you're recovering.");\r
 734                 }\r
 735                 if (p_ptr->muta2 & MUT2_WRAITH)\r
 736                 {\r
 737                         info[i++] = _("あなたの肉体は幽体化したり実体化したりする。", "You fade in and out of physical reality.");\r
 738                 }\r
 739                 if (p_ptr->muta2 & MUT2_POLY_WOUND)\r
 740                 {\r
 741                         info[i++] = _("あなたの健康はカオスの力に影響を受ける。", "Your health is subject to chaotic forces.");\r
 742                 }\r
 743                 if (p_ptr->muta2 & MUT2_WASTING)\r
 744                 {\r
 745                         info[i++] = _("あなたは衰弱する恐ろしい病気にかかっている。", "You have a horrible wasting disease.");\r
 746                 }\r
 747                 if (p_ptr->muta2 & MUT2_ATT_DRAGON)\r
 748                 {\r
 749                         info[i++] = _("あなたはドラゴンを引きつける。", "You attract dragons.");\r
 750                 }\r
 751                 if (p_ptr->muta2 & MUT2_WEIRD_MIND)\r
 752                 {\r
 753                         info[i++] = _("あなたの精神はランダムに拡大したり縮小したりしている。", "Your mind randomly expands and contracts.");\r
 754                 }\r
 755                 if (p_ptr->muta2 & MUT2_NAUSEA)\r
 756                 {\r
 757                         info[i++] = _("あなたの胃は非常に落ち着きがない。", "You have a seriously upset stomach.");\r
 758                 }\r
 759                 if (p_ptr->muta2 & MUT2_CHAOS_GIFT)\r
 760                 {\r
 761                         info[i++] = _("あなたはカオスの守護悪魔から褒美をうけとる。", "Chaos deities give you gifts.");\r
 762                 }\r
 763                 if (p_ptr->muta2 & MUT2_WALK_SHAD)\r
 764                 {\r
 765                         info[i++] = _("あなたはしばしば他の「影」に迷い込む。", "You occasionally stumble into other shadows.");\r
 766                 }\r
 767                 if (p_ptr->muta2 & MUT2_WARNING)\r
 768                 {\r
 769                         info[i++] = _("あなたは敵に関する警告を感じる。", "You receive warnings about your foes.");\r
 770                 }\r
 771                 if (p_ptr->muta2 & MUT2_INVULN)\r
 772                 {\r
 773                         info[i++] = _("あなたは時々負け知らずな気分になる。", "You occasionally feel invincible.");\r
 774                 }\r
 775                 if (p_ptr->muta2 & MUT2_SP_TO_HP)\r
 776                 {\r
 777                         info[i++] = _("あなたは時々血が筋肉にどっと流れる。", "Your blood sometimes rushes to your muscles.");\r
 778                 }\r
 779                 if (p_ptr->muta2 & MUT2_HP_TO_SP)\r
 780                 {\r
 781                         info[i++] = _("あなたは時々頭に血がどっと流れる。", "Your blood sometimes rushes to your head.");\r
 782                 }\r
 783                 if (p_ptr->muta2 & MUT2_DISARM)\r
 784                 {\r
 785                         info[i++] = _("あなたはよくつまづいて物を落とす。", "You occasionally stumble and drop things.");\r
 786                 }\r
 787         }\r
 788 \r
 789         if (p_ptr->muta3)\r
 790         {\r
 791                 if (p_ptr->muta3 & MUT3_HYPER_STR)\r
 792                 {\r
 793                         info[i++] = _("あなたは超人的に強い。(腕力+4)", "You are superhumanly strong (+4 STR).");\r
 794                 }\r
 795                 if (p_ptr->muta3 & MUT3_PUNY)\r
 796                 {\r
 797                         info[i++] = _("あなたは虚弱だ。(腕力-4)", "You are puny (-4 STR).");\r
 798                 }\r
 799                 if (p_ptr->muta3 & MUT3_HYPER_INT)\r
 800                 {\r
 801                         info[i++] = _("あなたの脳は生体コンピュータだ。(知能＆賢さ+4)", "Your brain is a living computer (+4 INT/WIS).");\r
 802                 }\r
 803                 if (p_ptr->muta3 & MUT3_MORONIC)\r
 804                 {\r
 805                         info[i++] = _("あなたは精神薄弱だ。(知能＆賢さ-4)", "You are moronic (-4 INT/WIS).");\r
 806                 }\r
 807                 if (p_ptr->muta3 & MUT3_RESILIENT)\r
 808                 {\r
 809                         info[i++] = _("あなたは非常にタフだ。(耐久+4)", "You are very resilient (+4 CON).");\r
 810                 }\r
 811                 if (p_ptr->muta3 & MUT3_XTRA_FAT)\r
 812                 {\r
 813                         info[i++] = _("あなたは極端に太っている。(耐久+2,スピード-2)", "You are extremely fat (+2 CON, -2 speed).");\r
 814                 }\r
 815                 if (p_ptr->muta3 & MUT3_ALBINO)\r
 816                 {\r
 817                         info[i++] = _("あなたはアルビノだ。(耐久-4)", "You are albino (-4 CON).");\r
 818                 }\r
 819                 if (p_ptr->muta3 & MUT3_FLESH_ROT)\r
 820                 {\r
 821                         info[i++] = _("あなたの肉体は腐敗している。(耐久-2,魅力-1)", "Your flesh is rotting (-2 CON, -1 CHR).");\r
 822                 }\r
 823                 if (p_ptr->muta3 & MUT3_SILLY_VOI)\r
 824                 {\r
 825                         info[i++] = _("あなたの声は間抜けなキーキー声だ。(魅力-4)", "Your voice is a silly squeak (-4 CHR).");\r
 826                 }\r
 827                 if (p_ptr->muta3 & MUT3_BLANK_FAC)\r
 828                 {\r
 829                         info[i++] = _("あなたはのっぺらぼうだ。(魅力-1)", "Your face is featureless (-1 CHR).");\r
 830                 }\r
 831                 if (p_ptr->muta3 & MUT3_ILL_NORM)\r
 832                 {\r
 833                         info[i++] = _("あなたは幻影に覆われている。", "Your appearance is masked with illusion.");\r
 834                 }\r
 835                 if (p_ptr->muta3 & MUT3_XTRA_EYES)\r
 836                 {\r
 837                         info[i++] = _("あなたは余分に二つの目を持っている。(探索+15)", "You have an extra pair of eyes (+15 search).");\r
 838                 }\r
 839                 if (p_ptr->muta3 & MUT3_MAGIC_RES)\r
 840                 {\r
 841                         info[i++] = _("あなたは魔法への耐性をもっている。", "You are resistant to magic.");\r
 842                 }\r
 843                 if (p_ptr->muta3 & MUT3_XTRA_NOIS)\r
 844                 {\r
 845                         info[i++] = _("あなたは変な音を発している。(隠密-3)", "You make a lot of strange noise (-3 stealth).");\r
 846                 }\r
 847                 if (p_ptr->muta3 & MUT3_INFRAVIS)\r
 848                 {\r
 849                         info[i++] = _("あなたは素晴らしい赤外線視力を持っている。(+3)", "You have remarkable infravision (+3).");\r
 850                 }\r
 851                 if (p_ptr->muta3 & MUT3_XTRA_LEGS)\r
 852                 {\r
 853                         info[i++] = _("あなたは余分に二本の足が生えている。(加速+3)", "You have an extra pair of legs (+3 speed).");\r
 854                 }\r
 855                 if (p_ptr->muta3 & MUT3_SHORT_LEG)\r
 856                 {\r
 857                         info[i++] = _("あなたの足は短い突起だ。(加速-3)", "Your legs are short stubs (-3 speed).");\r
 858                 }\r
 859                 if (p_ptr->muta3 & MUT3_ELEC_TOUC)\r
 860                 {\r
 861                         info[i++] = _("あなたの血管には電流が流れている。", "Electricity is running through your veins.");\r
 862                 }\r
 863                 if (p_ptr->muta3 & MUT3_FIRE_BODY)\r
 864                 {\r
 865                         info[i++] = _("あなたの体は炎につつまれている。", "Your body is enveloped in flames.");\r
 866                 }\r
 867                 if (p_ptr->muta3 & MUT3_WART_SKIN)\r
 868                 {\r
 869                         info[i++] = _("あなたの肌はイボに被われている。(魅力-2, AC+5)", "Your skin is covered with warts (-2 CHR, +5 AC).");\r
 870                 }\r
 871                 if (p_ptr->muta3 & MUT3_SCALES)\r
 872                 {\r
 873                         info[i++] = _("あなたの肌は鱗になっている。(魅力-1, AC+10)", "Your skin has turned into scales (-1 CHR, +10 AC).");\r
 874                 }\r
 875                 if (p_ptr->muta3 & MUT3_IRON_SKIN)\r
 876                 {\r
 877                         info[i++] = _("あなたの肌は鉄でできている。(器用-1, AC+25)", "Your skin is made of steel (-1 DEX, +25 AC).");\r
 878                 }\r
 879                 if (p_ptr->muta3 & MUT3_WINGS)\r
 880                 {\r
 881                         info[i++] = _("あなたは羽を持っている。", "You have wings.");\r
 882                 }\r
 883                 if (p_ptr->muta3 & MUT3_FEARLESS)\r
 884                 {\r
 885                         /* Unnecessary */\r
 886                 }\r
 887                 if (p_ptr->muta3 & MUT3_REGEN)\r
 888                 {\r
 889                         /* Unnecessary */\r
 890                 }\r
 891                 if (p_ptr->muta3 & MUT3_ESP)\r
 892                 {\r
 893                         /* Unnecessary */\r
 894                 }\r
 895                 if (p_ptr->muta3 & MUT3_LIMBER)\r
 896                 {\r
 897                         info[i++] = _("あなたの体は非常にしなやかだ。(器用+3)", "Your body is very limber (+3 DEX).");\r
 898                 }\r
 899                 if (p_ptr->muta3 & MUT3_ARTHRITIS)\r
 900                 {\r
 901                         info[i++] = _("あなたはいつも関節に痛みを感じている。(器用-3)", "Your joints ache constantly (-3 DEX).");\r
 902                 }\r
 903                 if (p_ptr->muta3 & MUT3_VULN_ELEM)\r
 904                 {\r
 905                         info[i++] = _("あなたは元素の攻撃に弱い。", "You are susceptible to damage from the elements.");\r
 906                 }\r
 907                 if (p_ptr->muta3 & MUT3_MOTION)\r
 908                 {\r
 909                         info[i++] = _("あなたの動作は正確で力強い。(隠密+1)", "Your movements are precise and forceful (+1 STL).");\r
 910                 }\r
 911                 if (p_ptr->muta3 & MUT3_GOOD_LUCK)\r
 912                 {\r
 913                         info[i++] = _("あなたは白いオーラにつつまれている。", "There is a white aura surrounding you.");\r
 914                 }\r
 915                 if (p_ptr->muta3 & MUT3_BAD_LUCK)\r
 916                 {\r
 917                         info[i++] = _("あなたは黒いオーラにつつまれている。", "There is a black aura surrounding you.");\r
 918                 }\r
 919         }\r
 920 \r
 921         if (p_ptr->blind)\r
 922         {\r
 923                 info[i++] = _("あなたは目が見えない。", "You cannot see.");\r
 924         }\r
 925         if (p_ptr->confused)\r
 926         {\r
 927                 info[i++] = _("あなたは混乱している。", "You are confused.");\r
 928         }\r
 929         if (p_ptr->afraid)\r
 930         {\r
 931                 info[i++] = _("あなたは恐怖に侵されている。", "You are terrified.");\r
 932         }\r
 933         if (p_ptr->cut)\r
 934         {\r
 935                 info[i++] = _("あなたは出血している。", "You are bleeding.");\r
 936         }\r
 937         if (p_ptr->stun)\r
 938         {\r
 939                 info[i++] = _("あなたはもうろうとしている。", "You are stunned.");\r
 940         }\r
 941         if (p_ptr->poisoned)\r
 942         {\r
 943                 info[i++] = _("あなたは毒に侵されている。", "You are poisoned.");\r
 944         }\r
 945         if (p_ptr->image)\r
 946         {\r
 947                 info[i++] = _("あなたは幻覚を見ている。", "You are hallucinating.");\r
 948         }\r
 949         if (p_ptr->cursed & TRC_TY_CURSE)\r
 950         {\r
 951                 info[i++] = _("あなたは邪悪な怨念に包まれている。", "You carry an ancient foul curse.");\r
 952         }\r
 953         if (p_ptr->cursed & TRC_AGGRAVATE)\r
 954         {\r
 955                 info[i++] = _("あなたはモンスターを怒らせている。", "You aggravate monsters.");\r
 956         }\r
 957         if (p_ptr->cursed & TRC_DRAIN_EXP)\r
 958         {\r
 959                 info[i++] = _("あなたは経験値を吸われている。", "You are drained.");\r
 960         }\r
 961         if (p_ptr->cursed & TRC_SLOW_REGEN)\r
 962         {\r
 963                 info[i++] = _("あなたの回復力は非常に遅い。", "You regenerate slowly.");\r
 964         }\r
 965         if (p_ptr->cursed & TRC_ADD_L_CURSE)\r
 966         {\r
 967                 info[i++] = _("あなたの弱い呪いは増える。","Your weak curses multiply."); /* 暫定的 -- henkma */\r
 968         }\r
 969         if (p_ptr->cursed & TRC_ADD_H_CURSE)\r
 970         {\r
 971                 info[i++] = _("あなたの強い呪いは増える。","Your heavy curses multiply."); /* 暫定的 -- henkma */\r
 972         }\r
 973         if (p_ptr->cursed & TRC_CALL_ANIMAL)\r
 974         {\r
 975                 info[i++] = _("あなたは動物に狙われている。", "You attract animals.");\r
 976         }\r
 977         if (p_ptr->cursed & TRC_CALL_DEMON)\r
 978         {\r
 979                 info[i++] = _("あなたは悪魔に狙われている。", "You attract demons.");\r
 980         }\r
 981         if (p_ptr->cursed & TRC_CALL_DRAGON)\r
 982         {\r
 983                 info[i++] = _("あなたはドラゴンに狙われている。", "You attract dragons.");\r
 984         }\r
 985         if (p_ptr->cursed & TRC_COWARDICE)\r
 986         {\r
 987                 info[i++] = _("あなたは時々臆病になる。", "You are subject to cowardice.");\r
 988         }\r
 989         if (p_ptr->cursed & TRC_TELEPORT)\r
 990         {\r
 991                 info[i++] = _("あなたの位置はひじょうに不安定だ。", "Your position is very uncertain.");\r
 992         }\r
 993         if (p_ptr->cursed & TRC_LOW_MELEE)\r
 994         {\r
 995                 info[i++] = _("あなたの武器は攻撃を外しやすい。", "Your weapon causes you to miss blows.");\r
 996         }\r
 997         if (p_ptr->cursed & TRC_LOW_AC)\r
 998         {\r
 999                 info[i++] = _("あなたは攻撃を受けやすい。", "You are subject to be hit.");\r
1000         }\r
1001         if (p_ptr->cursed & TRC_LOW_MAGIC)\r
1002         {\r
1003                 info[i++] = _("あなたは魔法を失敗しやすい。", "You are subject to fail spellcasting.");\r
1004         }\r
1005         if (p_ptr->cursed & TRC_FAST_DIGEST)\r
1006         {\r
1007                 info[i++] = _("あなたはすぐお腹がへる。", "You have a good appetite.");\r
1008         }\r
1009         if (p_ptr->cursed & TRC_DRAIN_HP)\r
1010         {\r
1011                 info[i++] = _("あなたは体力を吸われている。", "You are drained.");\r
1012         }\r
1013         if (p_ptr->cursed & TRC_DRAIN_MANA)\r
1014         {\r
1015                 info[i++] = _("あなたは魔力を吸われている。", "You brain is drained.");\r
1016         }\r
1017         if (IS_BLESSED())\r
1018         {\r
1019                 info[i++] = _("あなたは高潔さを感じている。", "You feel rightous.");\r
1020         }\r
1021         if (IS_HERO())\r
1022         {\r
1023                 info[i++] = _("あなたはヒーロー気分だ。", "You feel heroic.");\r
1024         }\r
1025         if (p_ptr->shero)\r
1026         {\r
1027                 info[i++] = _("あなたは戦闘狂だ。", "You are in a battle rage.");\r
1028         }\r
1029         if (p_ptr->protevil)\r
1030         {\r
1031                 info[i++] = _("あなたは邪悪なる存在から守られている。", "You are protected from evil.");\r
1032         }\r
1033         if (p_ptr->shield)\r
1034         {\r
1035                 info[i++] = _("あなたは神秘のシールドで守られている。", "You are protected by a mystic shield.");\r
1036         }\r
1037         if (IS_INVULN())\r
1038         {\r
1039                 info[i++] = _("あなたは現在傷つかない。", "You are temporarily invulnerable.");\r
1040         }\r
1041         if (p_ptr->wraith_form)\r
1042         {\r
1043                 info[i++] = _("あなたは一時的に幽体化している。", "You are temporarily incorporeal.");\r
1044         }\r
1045         if (p_ptr->special_attack & ATTACK_CONFUSE)\r
1046         {\r
1047                 info[i++] = _("あなたの手は赤く輝いている。", "Your hands are glowing dull red.");\r
1048         }\r
1049         if (p_ptr->special_attack & ATTACK_FIRE)\r
1050         {\r
1051                 info[i++] = _("あなたの手は火炎に覆われている。", "You can strike the enemy with flame.");\r
1052         }\r
1053         if (p_ptr->special_attack & ATTACK_COLD)\r
1054         {\r
1055                 info[i++] = _("あなたの手は冷気に覆われている。", "You can strike the enemy with cold.");\r
1056         }\r
1057         if (p_ptr->special_attack & ATTACK_ACID)\r
1058         {\r
1059                 info[i++] = _("あなたの手は酸に覆われている。", "You can strike the enemy with acid.");\r
1060         }\r
1061         if (p_ptr->special_attack & ATTACK_ELEC)\r
1062         {\r
1063                 info[i++] = _("あなたの手は電撃に覆われている。", "You can strike the enemy with electoric shock.");\r
1064         }\r
1065         if (p_ptr->special_attack & ATTACK_POIS)\r
1066         {\r
1067                 info[i++] = _("あなたの手は毒に覆われている。", "You can strike the enemy with poison.");\r
1068         }\r
1069         switch (p_ptr->action)\r
1070         {\r
1071                 case ACTION_SEARCH:\r
1072                         info[i++] = _("あなたはひじょうに注意深く周囲を見渡している。", "You are looking around very carefully.");\r
1073                         break;\r
1074         }\r
1075         if (p_ptr->new_spells)\r
1076         {\r
1077                 info[i++] = _("あなたは呪文や祈りを学ぶことができる。", "You can learn some spells/prayers.");\r
1078         }\r
1079         if (p_ptr->word_recall)\r
1080         {\r
1081                 info[i++] = _("あなたはすぐに帰還するだろう。", "You will soon be recalled.");\r
1082         }\r
1083         if (p_ptr->alter_reality)\r
1084         {\r
1085                 info[i++] = _("あなたはすぐにこの世界を離れるだろう。", "You will soon be altered.");\r
1086         }\r
1087         if (p_ptr->see_infra)\r
1088         {\r
1089                 info[i++] = _("あなたの瞳は赤外線に敏感である。", "Your eyes are sensitive to infrared light.");\r
1090         }\r
1091         if (p_ptr->see_inv)\r
1092         {\r
1093                 info[i++] = _("あなたは透明なモンスターを見ることができる。", "You can see invisible creatures.");\r
1094         }\r
1095         if (p_ptr->levitation)\r
1096         {\r
1097                 info[i++] = _("あなたは飛ぶことができる。", "You can fly.");\r
1098         }\r
1099         if (p_ptr->free_act)\r
1100         {\r
1101                 info[i++] = _("あなたは麻痺知らずの効果を持っている。", "You have free action.");\r
1102         }\r
1103         if (p_ptr->regenerate)\r
1104         {\r
1105                 info[i++] = _("あなたは素早く体力を回復する。", "You regenerate quickly.");\r
1106         }\r
1107         if (p_ptr->slow_digest)\r
1108         {\r
1109                 info[i++] = _("あなたは食欲が少ない。", "Your appetite is small.");\r
1110         }\r
1111         if (p_ptr->telepathy)\r
1112         {\r
1113                 info[i++] = _("あなたはテレパシー能力を持っている。", "You have ESP.");\r
1114         }\r
1115         if (p_ptr->esp_animal)\r
1116         {\r
1117                 info[i++] = _("あなたは自然界の生物の存在を感じる能力を持っている。", "You sense natural creatures.");\r
1118         }\r
1119         if (p_ptr->esp_undead)\r
1120         {\r
1121                 info[i++] = _("あなたはアンデッドの存在を感じる能力を持っている。", "You sense undead.");\r
1122         }\r
1123         if (p_ptr->esp_demon)\r
1124         {\r
1125                 info[i++] = _("あなたは悪魔の存在を感じる能力を持っている。", "You sense demons.");\r
1126         }\r
1127         if (p_ptr->esp_orc)\r
1128         {\r
1129                 info[i++] = _("あなたはオークの存在を感じる能力を持っている。", "You sense orcs.");\r
1130         }\r
1131         if (p_ptr->esp_troll)\r
1132         {\r
1133                 info[i++] = _("あなたはトロルの存在を感じる能力を持っている。", "You sense trolls.");\r
1134         }\r
1135         if (p_ptr->esp_giant)\r
1136         {\r
1137                 info[i++] = _("あなたは巨人の存在を感じる能力を持っている。", "You sense giants.");\r
1138         }\r
1139         if (p_ptr->esp_dragon)\r
1140         {\r
1141                 info[i++] = _("あなたはドラゴンの存在を感じる能力を持っている。", "You sense dragons.");\r
1142         }\r
1143         if (p_ptr->esp_human)\r
1144         {\r
1145                 info[i++] = _("あなたは人間の存在を感じる能力を持っている。", "You sense humans.");\r
1146         }\r
1147         if (p_ptr->esp_evil)\r
1148         {\r
1149                 info[i++] = _("あなたは邪悪な生き物の存在を感じる能力を持っている。", "You sense evil creatures.");\r
1150         }\r
1151         if (p_ptr->esp_good)\r
1152         {\r
1153                 info[i++] = _("あなたは善良な生き物の存在を感じる能力を持っている。", "You sense good creatures.");\r
1154         }\r
1155         if (p_ptr->esp_nonliving)\r
1156         {\r
1157                 info[i++] = _("あなたは活動する無生物体の存在を感じる能力を持っている。", "You sense non-living creatures.");\r
1158         }\r
1159         if (p_ptr->esp_unique)\r
1160         {\r
1161                 info[i++] = _("あなたは特別な強敵の存在を感じる能力を持っている。", "You sense unique monsters.");\r
1162         }\r
1163         if (p_ptr->hold_exp)\r
1164         {\r
1165                 info[i++] = _("あなたは自己の経験値をしっかりと維持する。", "You have a firm hold on your experience.");\r
1166         }\r
1167         if (p_ptr->reflect)\r
1168         {\r
1169                 info[i++] = _("あなたは矢の呪文を反射する。", "You reflect bolt spells.");\r
1170         }\r
1171         if (p_ptr->sh_fire)\r
1172         {\r
1173                 info[i++] = _("あなたは炎のオーラに包まれている。", "You are surrounded with a fiery aura.");\r
1174         }\r
1175         if (p_ptr->sh_elec)\r
1176         {\r
1177                 info[i++] = _("あなたは電気に包まれている。", "You are surrounded with electricity.");\r
1178         }\r
1179         if (p_ptr->sh_cold)\r
1180         {\r
1181                 info[i++] = _("あなたは冷気のオーラに包まれている。", "You are surrounded with an aura of coldness.");\r
1182         }\r
1183         if (p_ptr->tim_sh_holy)\r
1184         {\r
1185                 info[i++] = _("あなたは聖なるオーラに包まれている。", "You are surrounded with a holy aura.");\r
1186         }\r
1187         if (p_ptr->tim_sh_touki)\r
1188         {\r
1189                 info[i++] = _("あなたは闘気のオーラに包まれている。", "You are surrounded with a energy aura.");\r
1190         }\r
1191         if (p_ptr->anti_magic)\r
1192         {\r
1193                 info[i++] = _("あなたは反魔法シールドに包まれている。", "You are surrounded by an anti-magic shell.");\r
1194         }\r
1195         if (p_ptr->anti_tele)\r
1196         {\r
1197                 info[i++] = _("あなたはテレポートできない。", "You cannot teleport.");\r
1198         }\r
1199         if (p_ptr->lite)\r
1200         {\r
1201                 info[i++] = _("あなたの身体は光っている。", "You are carrying a permanent light.");\r
1202         }\r
1203         if (p_ptr->warning)\r
1204         {\r
1205                 info[i++] = _("あなたは行動の前に危険を察知することができる。", "You will be warned before dangerous actions.");\r
1206         }\r
1207         if (p_ptr->dec_mana)\r
1208         {\r
1209                 info[i++] = _("あなたは少ない消費魔力で魔法を唱えることができる。", "You can cast spells with fewer mana points.");\r
1210         }\r
1211         if (p_ptr->easy_spell)\r
1212         {\r
1213                 info[i++] = _("あなたは低い失敗率で魔法を唱えることができる。", "Fail rate of your magic is decreased.");\r
1214         }\r
1215         if (p_ptr->heavy_spell)\r
1216         {\r
1217                 info[i++] = _("あなたは高い失敗率で魔法を唱えなければいけない。", "Fail rate of your magic is increased.");\r
1218         }\r
1219         if (p_ptr->mighty_throw)\r
1220         {\r
1221                 info[i++] = _("あなたは強く物を投げる。", "You can throw objects powerfully.");\r
1222         }\r
1223 \r
1224         if (p_ptr->immune_acid)\r
1225         {\r
1226                 info[i++] = _("あなたは酸に対する完全なる免疫を持っている。", "You are completely immune to acid.");\r
1227         }\r
1228         else if (p_ptr->resist_acid && IS_OPPOSE_ACID())\r
1229         {\r
1230                 info[i++] = _("あなたは酸への強力な耐性を持っている。", "You resist acid exceptionally well.");\r
1231         }\r
1232         else if (p_ptr->resist_acid || IS_OPPOSE_ACID())\r
1233         {\r
1234                 info[i++] = _("あなたは酸への耐性を持っている。", "You are resistant to acid.");\r
1235         }\r
1236 \r
1237         if (p_ptr->immune_elec)\r
1238         {\r
1239                 info[i++] = _("あなたは電撃に対する完全なる免疫を持っている。", "You are completely immune to lightning.");\r
1240         }\r
1241         else if (p_ptr->resist_elec && IS_OPPOSE_ELEC())\r
1242         {\r
1243                 info[i++] = _("あなたは電撃への強力な耐性を持っている。", "You resist lightning exceptionally well.");\r
1244         }\r
1245         else if (p_ptr->resist_elec || IS_OPPOSE_ELEC())\r
1246         {\r
1247                 info[i++] = _("あなたは電撃への耐性を持っている。", "You are resistant to lightning.");\r
1248         }\r
1249 \r
1250         if (prace_is_(RACE_ANDROID) && !p_ptr->immune_elec)\r
1251         {\r
1252                 info[i++] = _("あなたは電撃に弱い。", "You are susceptible to damage from lightning.");\r
1253         }\r
1254 \r
1255         if (p_ptr->immune_fire)\r
1256         {\r
1257                 info[i++] = _("あなたは火に対する完全なる免疫を持っている。", "You are completely immune to fire.");\r
1258         }\r
1259         else if (p_ptr->resist_fire && IS_OPPOSE_FIRE())\r
1260         {\r
1261                 info[i++] = _("あなたは火への強力な耐性を持っている。", "You resist fire exceptionally well.");\r
1262         }\r
1263         else if (p_ptr->resist_fire || IS_OPPOSE_FIRE())\r
1264         {\r
1265                 info[i++] = _("あなたは火への耐性を持っている。", "You are resistant to fire.");\r
1266         }\r
1267 \r
1268         if (prace_is_(RACE_ENT) && !p_ptr->immune_fire)\r
1269         {\r
1270                 info[i++] = _("あなたは火に弱い。", "You are susceptible to damage from fire.");\r
1271         }\r
1272 \r
1273         if (p_ptr->immune_cold)\r
1274         {\r
1275                 info[i++] = _("あなたは冷気に対する完全なる免疫を持っている。", "You are completely immune to cold.");\r
1276         }\r
1277         else if (p_ptr->resist_cold && IS_OPPOSE_COLD())\r
1278         {\r
1279                 info[i++] = _("あなたは冷気への強力な耐性を持っている。", "You resist cold exceptionally well.");\r
1280         }\r
1281         else if (p_ptr->resist_cold || IS_OPPOSE_COLD())\r
1282         {\r
1283                 info[i++] = _("あなたは冷気への耐性を持っている。", "You are resistant to cold.");\r
1284         }\r
1285 \r
1286         if (p_ptr->resist_pois && IS_OPPOSE_POIS())\r
1287         {\r
1288                 info[i++] = _("あなたは毒への強力な耐性を持っている。", "You resist poison exceptionally well.");\r
1289         }\r
1290         else if (p_ptr->resist_pois || IS_OPPOSE_POIS())\r
1291         {\r
1292                 info[i++] = _("あなたは毒への耐性を持っている。", "You are resistant to poison.");\r
1293         }\r
1294 \r
1295         if (p_ptr->resist_lite)\r
1296         {\r
1297                 info[i++] = _("あなたは閃光への耐性を持っている。", "You are resistant to bright light.");\r
1298         }\r
1299 \r
1300         if (prace_is_(RACE_VAMPIRE) || prace_is_(RACE_S_FAIRY) || (p_ptr->mimic_form == MIMIC_VAMPIRE))\r
1301         {\r
1302                 info[i++] = _("あなたは閃光に弱い。", "You are susceptible to damage from bright light.");\r
1303         }\r
1304 \r
1305         if (prace_is_(RACE_VAMPIRE) || (p_ptr->mimic_form == MIMIC_VAMPIRE) || p_ptr->wraith_form)\r
1306         {\r
1307                 info[i++] = _("あなたは暗黒に対する完全なる免疫を持っている。", "You are completely immune to darkness.");\r
1308         }\r
1309 \r
1310         else if (p_ptr->resist_dark)\r
1311         {\r
1312                 info[i++] = _("あなたは暗黒への耐性を持っている。", "You are resistant to darkness.");\r
1313         }\r
1314         if (p_ptr->resist_conf)\r
1315         {\r
1316                 info[i++] = _("あなたは混乱への耐性を持っている。", "You are resistant to confusion.");\r
1317         }\r
1318         if (p_ptr->resist_sound)\r
1319         {\r
1320                 info[i++] = _("あなたは音波の衝撃への耐性を持っている。", "You are resistant to sonic attacks.");\r
1321         }\r
1322         if (p_ptr->resist_disen)\r
1323         {\r
1324                 info[i++] = _("あなたは劣化への耐性を持っている。", "You are resistant to disenchantment.");\r
1325         }\r
1326         if (p_ptr->resist_chaos)\r
1327         {\r
1328                 info[i++] = _("あなたはカオスの力への耐性を持っている。", "You are resistant to chaos.");\r
1329         }\r
1330         if (p_ptr->resist_shard)\r
1331         {\r
1332                 info[i++] = _("あなたは破片の攻撃への耐性を持っている。", "You are resistant to blasts of shards.");\r
1333         }\r
1334         if (p_ptr->resist_nexus)\r
1335         {\r
1336                 info[i++] = _("あなたは因果混乱の攻撃への耐性を持っている。", "You are resistant to nexus attacks.");\r
1337         }\r
1338 \r
1339         if (prace_is_(RACE_SPECTRE))\r
1340         {\r
1341                 info[i++] = _("あなたは地獄の力を吸収できる。", "You can drain nether forces.");\r
1342         }\r
1343         else if (p_ptr->resist_neth)\r
1344         {\r
1345                 info[i++] = _("あなたは地獄の力への耐性を持っている。", "You are resistant to nether forces.");\r
1346         }\r
1347         if (p_ptr->resist_fear)\r
1348         {\r
1349                 info[i++] = _("あなたは全く恐怖を感じない。", "You are completely fearless.");\r
1350         }\r
1351         if (p_ptr->resist_blind)\r
1352         {\r
1353                 info[i++] = _("あなたの目は盲目への耐性を持っている。", "Your eyes are resistant to blindness.");\r
1354         }\r
1355         if (p_ptr->resist_time)\r
1356         {\r
1357                 info[i++] = _("あなたは時間逆転への耐性を持っている。", "You are resistant to time.");\r
1358         }\r
1359 \r
1360         if (p_ptr->sustain_str)\r
1361         {\r
1362                 info[i++] = _("あなたの腕力は維持されている。", "Your strength is sustained.");\r
1363         }\r
1364         if (p_ptr->sustain_int)\r
1365         {\r
1366                 info[i++] = _("あなたの知能は維持されている。", "Your intelligence is sustained.");\r
1367         }\r
1368         if (p_ptr->sustain_wis)\r
1369         {\r
1370                 info[i++] = _("あなたの賢さは維持されている。", "Your wisdom is sustained.");\r
1371         }\r
1372         if (p_ptr->sustain_con)\r
1373         {\r
1374                 info[i++] = _("あなたの耐久力は維持されている。", "Your constitution is sustained.");\r
1375         }\r
1376         if (p_ptr->sustain_dex)\r
1377         {\r
1378                 info[i++] = _("あなたの器用さは維持されている。", "Your dexterity is sustained.");\r
1379         }\r
1380         if (p_ptr->sustain_chr)\r
1381         {\r
1382                 info[i++] = _("あなたの魅力は維持されている。", "Your charisma is sustained.");\r
1383         }\r
1384 \r
1385         if (have_flag(flgs, TR_STR))\r
1386         {\r
1387                 info[i++] = _("あなたの腕力は装備によって影響を受けている。", "Your strength is affected by your equipment.");\r
1388         }\r
1389         if (have_flag(flgs, TR_INT))\r
1390         {\r
1391                 info[i++] = _("あなたの知能は装備によって影響を受けている。", "Your intelligence is affected by your equipment.");\r
1392         }\r
1393         if (have_flag(flgs, TR_WIS))\r
1394         {\r
1395                 info[i++] = _("あなたの賢さは装備によって影響を受けている。", "Your wisdom is affected by your equipment.");\r
1396         }\r
1397         if (have_flag(flgs, TR_DEX))\r
1398         {\r
1399                 info[i++] = _("あなたの器用さは装備によって影響を受けている。", "Your dexterity is affected by your equipment.");\r
1400         }\r
1401         if (have_flag(flgs, TR_CON))\r
1402         {\r
1403                 info[i++] = _("あなたの耐久力は装備によって影響を受けている。", "Your constitution is affected by your equipment.");\r
1404         }\r
1405         if (have_flag(flgs, TR_CHR))\r
1406         {\r
1407                 info[i++] = _("あなたの魅力は装備によって影響を受けている。", "Your charisma is affected by your equipment.");\r
1408         }\r
1409 \r
1410         if (have_flag(flgs, TR_STEALTH))\r
1411         {\r
1412                 info[i++] = _("あなたの隠密行動能力は装備によって影響を受けている。", "Your stealth is affected by your equipment.");\r
1413         }\r
1414         if (have_flag(flgs, TR_SEARCH))\r
1415         {\r
1416                 info[i++] = _("あなたの探索能力は装備によって影響を受けている。", "Your searching ability is affected by your equipment.");\r
1417         }\r
1418         if (have_flag(flgs, TR_INFRA))\r
1419         {\r
1420                 info[i++] = _("あなたの赤外線視力は装備によって影響を受けている。", "Your infravision is affected by your equipment.");\r
1421         }\r
1422         if (have_flag(flgs, TR_TUNNEL))\r
1423         {\r
1424                 info[i++] = _("あなたの採掘能力は装備によって影響を受けている。", "Your digging ability is affected by your equipment.");\r
1425         }\r
1426         if (have_flag(flgs, TR_SPEED))\r
1427         {\r
1428                 info[i++] = _("あなたのスピードは装備によって影響を受けている。", "Your speed is affected by your equipment.");\r
1429         }\r
1430         if (have_flag(flgs, TR_BLOWS))\r
1431         {\r
1432                 info[i++] = _("あなたの攻撃速度は装備によって影響を受けている。", "Your attack speed is affected by your equipment.");\r
1433         }\r
1434 \r
1435 \r
1436         /* Access the current weapon */\r
1437         o_ptr = &inventory[INVEN_RARM];\r
1438 \r
1439         /* Analyze the weapon */\r
1440         if (o_ptr->k_idx)\r
1441         {\r
1442                 /* Indicate Blessing */\r
1443                 if (have_flag(flgs, TR_BLESSED))\r
1444                 {\r
1445                         info[i++] = _("あなたの武器は神の祝福を受けている。", "Your weapon has been blessed by the gods.");\r
1446                 }\r
1447 \r
1448                 if (have_flag(flgs, TR_CHAOTIC))\r
1449                 {\r
1450                         info[i++] = _("あなたの武器はログルスの徴の属性をもつ。", "Your weapon is branded with the Sign of Logrus.");\r
1451                 }\r
1452 \r
1453                 if (have_flag(flgs, TR_IMPACT))\r
1454                 {\r
1455                         info[i++] = _("あなたの武器は打撃で地震を発生することができる。", "The impact of your weapon can cause earthquakes.");\r
1456                 }\r
1457 \r
1458                 if (have_flag(flgs, TR_VORPAL))\r
1459                 {\r
1460                         info[i++] = _("あなたの武器は非常に鋭い。", "Your weapon is very sharp.");\r
1461                 }\r
1462 \r
1463                 if (have_flag(flgs, TR_VAMPIRIC))\r
1464                 {\r
1465                         info[i++] = _("あなたの武器は敵から生命力を吸収する。", "Your weapon drains life from your foes.");\r
1466                 }\r
1467 \r
1468                 /* Special "Attack Bonuses" */\r
1469                 if (have_flag(flgs, TR_BRAND_ACID))\r
1470                 {\r
1471                         info[i++] = _("あなたの武器は敵を溶かす。", "Your weapon melts your foes.");\r
1472                 }\r
1473                 if (have_flag(flgs, TR_BRAND_ELEC))\r
1474                 {\r
1475                         info[i++] = _("あなたの武器は敵を感電させる。", "Your weapon shocks your foes.");\r
1476                 }\r
1477                 if (have_flag(flgs, TR_BRAND_FIRE))\r
1478                 {\r
1479                         info[i++] = _("あなたの武器は敵を燃やす。", "Your weapon burns your foes.");\r
1480                 }\r
1481                 if (have_flag(flgs, TR_BRAND_COLD))\r
1482                 {\r
1483                         info[i++] = _("あなたの武器は敵を凍らせる。", "Your weapon freezes your foes.");\r
1484                 }\r
1485                 if (have_flag(flgs, TR_BRAND_POIS))\r
1486                 {\r
1487                         info[i++] = _("あなたの武器は敵を毒で侵す。", "Your weapon poisons your foes.");\r
1488                 }\r
1489 \r
1490                 /* Special "slay" flags */\r
1491                 if (have_flag(flgs, TR_KILL_ANIMAL))\r
1492                 {\r
1493                         info[i++] = _("あなたの武器は動物の天敵である。", "Your weapon is a great bane of animals.");\r
1494                 }\r
1495                 else if (have_flag(flgs, TR_SLAY_ANIMAL))\r
1496                 {\r
1497                         info[i++] = _("あなたの武器は動物に対して強い力を発揮する。", "Your weapon strikes at animals with extra force.");\r
1498                 }\r
1499                 if (have_flag(flgs, TR_KILL_EVIL))\r
1500                 {\r
1501                         info[i++] = _("あなたの武器は邪悪なる存在の天敵である。", "Your weapon is a great bane of evil.");\r
1502                 }\r
1503                 else if (have_flag(flgs, TR_SLAY_EVIL))\r
1504                 {\r
1505                         info[i++] = _("あなたの武器は邪悪なる存在に対して強い力を発揮する。", "Your weapon strikes at evil with extra force.");\r
1506                 }\r
1507                 if (have_flag(flgs, TR_KILL_HUMAN))\r
1508                 {\r
1509                         info[i++] = _("あなたの武器は人間の天敵である。", "Your weapon is a great bane of humans.");\r
1510                 }\r
1511                 else if (have_flag(flgs, TR_SLAY_HUMAN))\r
1512                 {\r
1513                         info[i++] = _("あなたの武器は人間に対して特に強い力を発揮する。", "Your weapon is especially deadly against humans.");\r
1514                 }\r
1515                 if (have_flag(flgs, TR_KILL_UNDEAD))\r
1516                 {\r
1517                         info[i++] = _("あなたの武器はアンデッドの天敵である。", "Your weapon is a great bane of undead.");\r
1518                 }\r
1519                 else if (have_flag(flgs, TR_SLAY_UNDEAD))\r
1520                 {\r
1521                         info[i++] = _("あなたの武器はアンデッドに対して神聖なる力を発揮する。", "Your weapon strikes at undead with holy wrath.");\r
1522                 }\r
1523                 if (have_flag(flgs, TR_KILL_DEMON))\r
1524                 {\r
1525                         info[i++] = _("あなたの武器はデーモンの天敵である。", "Your weapon is a great bane of demons.");\r
1526                 }\r
1527                 else if (have_flag(flgs, TR_SLAY_DEMON))\r
1528                 {\r
1529                         info[i++] = _("あなたの武器はデーモンに対して神聖なる力を発揮する。", "Your weapon strikes at demons with holy wrath.");\r
1530                 }\r
1531                 if (have_flag(flgs, TR_KILL_ORC))\r
1532                 {\r
1533                         info[i++] = _("あなたの武器はオークの天敵である。", "Your weapon is a great bane of orcs.");\r
1534                 }\r
1535                 else if (have_flag(flgs, TR_SLAY_ORC))\r
1536                 {\r
1537                         info[i++] = _("あなたの武器はオークに対して特に強い力を発揮する。", "Your weapon is especially deadly against orcs.");\r
1538                 }\r
1539                 if (have_flag(flgs, TR_KILL_TROLL))\r
1540                 {\r
1541                         info[i++] = _("あなたの武器はトロルの天敵である。", "Your weapon is a great bane of trolls.");\r
1542                 }\r
1543                 else if (have_flag(flgs, TR_SLAY_TROLL))\r
1544                 {\r
1545                         info[i++] = _("あなたの武器はトロルに対して特に強い力を発揮する。", "Your weapon is especially deadly against trolls.");\r
1546                 }\r
1547                 if (have_flag(flgs, TR_KILL_GIANT))\r
1548                 {\r
1549                         info[i++] = _("あなたの武器はジャイアントの天敵である。", "Your weapon is a great bane of giants.");\r
1550                 }\r
1551                 else if (have_flag(flgs, TR_SLAY_GIANT))\r
1552                 {\r
1553                         info[i++] = _("あなたの武器はジャイアントに対して特に強い力を発揮する。", "Your weapon is especially deadly against giants.");\r
1554                 }\r
1555                 /* Special "kill" flags */\r
1556                 if (have_flag(flgs, TR_KILL_DRAGON))\r
1557                 {\r
1558                         info[i++] = _("あなたの武器はドラゴンの天敵である。", "Your weapon is a great bane of dragons.");\r
1559                 }\r
1560                 else if (have_flag(flgs, TR_SLAY_DRAGON))\r
1561                 {\r
1562                         info[i++] = _("あなたの武器はドラゴンに対して特に強い力を発揮する。", "Your weapon is especially deadly against dragons.");\r
1563                 }\r
1564 \r
1565                 if (have_flag(flgs, TR_FORCE_WEAPON))\r
1566                 {\r
1567                         info[i++] = _("あなたの武器はMPを使って攻撃する。", "Your weapon causes greate damages using your MP.");\r
1568                 }\r
1569                 if (have_flag(flgs, TR_THROW))\r
1570                 {\r
1571                         info[i++] = _("あなたの武器は投げやすい。", "Your weapon can be thrown well.");\r
1572                 }\r
1573         }\r
1574 \r
1575         screen_save();\r
1576 \r
1577         /* Erase the screen */\r
1578         for (k = 1; k < 24; k++) prt("", k, 13);\r
1579 \r
1580         /* Label the information */\r
1581         prt(_("        あなたの状態:", "     Your Attributes:"), 1, 15);\r
1582 \r
1583         /* We will print on top of the map (column 13) */\r
1584         for (k = 2, j = 0; j < i; j++)\r
1585         {\r
1586                 /* Show the info */\r
1587                 prt(info[j], k++, 15);\r
1588 \r
1589                 /* Every 20 entries (lines 2 to 21), start over */\r
1590                 if ((k == 22) && (j+1 < i))\r
1591                 {\r
1592                         prt(_("-- 続く --", "-- more --"), k, 15);\r
1593                         inkey();\r
1594                         for (; k > 2; k--) prt("", k, 15);\r
1595                 }\r
1596         }\r
1597 \r
1598         /* Pause */\r
1599         prt(_("[何かキーを押すとゲームに戻ります]", "[Press any key to continue]"), k, 13);\r
1600         inkey();\r
1601         screen_load();\r
1602 }\r
1603 \r
1604 /*!\r
1605  * @brief 魔法効果時間のターン数に基づいて表現IDを返す。\r
1606  * @param dur 効果ターン数\r
1607  * @return 効果時間の表現ID\r
1608  */\r
1609 static int report_magics_aux(int dur)\r
1610 {\r
1611         if (dur <= 5)\r
1612         {\r
1613                 return 0;\r
1614         }\r
1615         else if (dur <= 10)\r
1616         {\r
1617                 return 1;\r
1618         }\r
1619         else if (dur <= 20)\r
1620         {\r
1621                 return 2;\r
1622         }\r
1623         else if (dur <= 50)\r
1624         {\r
1625                 return 3;\r
1626         }\r
1627         else if (dur <= 100)\r
1628         {\r
1629                 return 4;\r
1630         }\r
1631         else if (dur <= 200)\r
1632         {\r
1633                 return 5;\r
1634         }\r
1635         else\r
1636         {\r
1637                 return 6;\r
1638         }\r
1639 }\r
1640 \r
1641 static concptr report_magic_durations[] =\r
1642 {\r
1643 #ifdef JP\r
1644         "ごく短い間",\r
1645         "少しの間",\r
1646         "しばらくの間",\r
1647         "多少長い間",\r
1648         "長い間",\r
1649         "非常に長い間",\r
1650         "信じ難いほど長い間",\r
1651         "モンスターを攻撃するまで"\r
1652 #else\r
1653         "for a short time",\r
1654         "for a little while",\r
1655         "for a while",\r
1656         "for a long while",\r
1657         "for a long time",\r
1658         "for a very long time",\r
1659         "for an incredibly long time",\r
1660         "until you hit a monster"\r
1661 #endif\r
1662 \r
1663 };\r
1664 \r
1665 /*!\r
1666  * @brief 現在の一時的効果一覧を返す / Report all currently active magical effects.\r
1667  * @return なし\r
1668  */\r
1669 void report_magics(void)\r
1670 {\r
1671         int     i = 0, j, k;\r
1672         char    Dummy[80];\r
1673         concptr    info[128];\r
1674         int     info2[128];\r
1675 \r
1676 \r
1677         if (p_ptr->blind)\r
1678         {\r
1679                 info2[i]  = report_magics_aux(p_ptr->blind);\r
1680                 info[i++] = _("あなたは目が見えない", "You cannot see");\r
1681         }\r
1682         if (p_ptr->confused)\r
1683         {\r
1684                 info2[i]  = report_magics_aux(p_ptr->confused);\r
1685                 info[i++] = _("あなたは混乱している", "You are confused");\r
1686         }\r
1687         if (p_ptr->afraid)\r
1688         {\r
1689                 info2[i]  = report_magics_aux(p_ptr->afraid);\r
1690                 info[i++] = _("あなたは恐怖に侵されている", "You are terrified");\r
1691         }\r
1692         if (p_ptr->poisoned)\r
1693         {\r
1694                 info2[i]  = report_magics_aux(p_ptr->poisoned);\r
1695                 info[i++] = _("あなたは毒に侵されている", "You are poisoned");\r
1696         }\r
1697         if (p_ptr->image)\r
1698         {\r
1699                 info2[i]  = report_magics_aux(p_ptr->image);\r
1700                 info[i++] = _("あなたは幻覚を見ている", "You are hallucinating");\r
1701         }\r
1702         if (p_ptr->blessed)\r
1703         {\r
1704                 info2[i]  = report_magics_aux(p_ptr->blessed);\r
1705                 info[i++] = _("あなたは高潔さを感じている", "You feel rightous");\r
1706         }\r
1707         if (p_ptr->hero)\r
1708         {\r
1709                 info2[i]  = report_magics_aux(p_ptr->hero);\r
1710                 info[i++] = _("あなたはヒーロー気分だ", "You feel heroic");\r
1711         }\r
1712         if (p_ptr->shero)\r
1713         {\r
1714                 info2[i]  = report_magics_aux(p_ptr->shero);\r
1715                 info[i++] = _("あなたは戦闘狂だ", "You are in a battle rage");\r
1716         }\r
1717         if (p_ptr->protevil)\r
1718         {\r
1719                 info2[i]  = report_magics_aux(p_ptr->protevil);\r
1720                 info[i++] = _("あなたは邪悪なる存在から守られている", "You are protected from evil");\r
1721         }\r
1722         if (p_ptr->shield)\r
1723         {\r
1724                 info2[i]  = report_magics_aux(p_ptr->shield);\r
1725                 info[i++] = _("あなたは神秘のシールドで守られている", "You are protected by a mystic shield");\r
1726         }\r
1727         if (p_ptr->invuln)\r
1728         {\r
1729                 info2[i]  = report_magics_aux(p_ptr->invuln);\r
1730                 info[i++] = _("あなたは無敵だ", "You are invulnerable");\r
1731         }\r
1732         if (p_ptr->wraith_form)\r
1733         {\r
1734                 info2[i]  = report_magics_aux(p_ptr->wraith_form);\r
1735                 info[i++] = _("あなたは幽体化している", "You are incorporeal");\r
1736         }\r
1737         if (p_ptr->special_attack & ATTACK_CONFUSE)\r
1738         {\r
1739                 info2[i]  = 7;\r
1740                 info[i++] = _("あなたの手は赤く輝いている", "Your hands are glowing dull red.");\r
1741         }\r
1742         if (p_ptr->word_recall)\r
1743         {\r
1744                 info2[i]  = report_magics_aux(p_ptr->word_recall);\r
1745                 info[i++] = _("この後帰還の詔が発動する", "You are waiting to be recalled");\r
1746         }\r
1747         if (p_ptr->alter_reality)\r
1748         {\r
1749                 info2[i]  = report_magics_aux(p_ptr->alter_reality);\r
1750                 info[i++] = _("この後現実変容が発動する", "You waiting to be altered");\r
1751         }\r
1752         if (p_ptr->oppose_acid)\r
1753         {\r
1754                 info2[i]  = report_magics_aux(p_ptr->oppose_acid);\r
1755                 info[i++] = _("あなたは酸への耐性を持っている", "You are resistant to acid");\r
1756         }\r
1757         if (p_ptr->oppose_elec)\r
1758         {\r
1759                 info2[i]  = report_magics_aux(p_ptr->oppose_elec);\r
1760                 info[i++] = _("あなたは電撃への耐性を持っている", "You are resistant to lightning");\r
1761         }\r
1762         if (p_ptr->oppose_fire)\r
1763         {\r
1764                 info2[i]  = report_magics_aux(p_ptr->oppose_fire);\r
1765                 info[i++] = _("あなたは火への耐性を持っている", "You are resistant to fire");\r
1766         }\r
1767         if (p_ptr->oppose_cold)\r
1768         {\r
1769                 info2[i]  = report_magics_aux(p_ptr->oppose_cold);\r
1770                 info[i++] = _("あなたは冷気への耐性を持っている", "You are resistant to cold");\r
1771         }\r
1772         if (p_ptr->oppose_pois)\r
1773         {\r
1774                 info2[i]  = report_magics_aux(p_ptr->oppose_pois);\r
1775                 info[i++] = _("あなたは毒への耐性を持っている", "You are resistant to poison");\r
1776         }\r
1777         screen_save();\r
1778 \r
1779         /* Erase the screen */\r
1780         for (k = 1; k < 24; k++) prt("", k, 13);\r
1781 \r
1782         /* Label the information */\r
1783         prt(_("    現在かかっている魔法     :", "     Your Current Magic:"), 1, 15);\r
1784 \r
1785 \r
1786         /* We will print on top of the map (column 13) */\r
1787         for (k = 2, j = 0; j < i; j++)\r
1788         {\r
1789                 /* Show the info */\r
1790                 sprintf(Dummy, _("%-28s : 期間 - %s ", "%s %s."), info[j],\r
1791                         report_magic_durations[info2[j]]);\r
1792                 prt(Dummy, k++, 15);\r
1793 \r
1794                 /* Every 20 entries (lines 2 to 21), start over */\r
1795                 if ((k == 22) && (j + 1 < i))\r
1796                 {\r
1797                         prt(_("-- 続く --", "-- more --"), k, 15);\r
1798                         inkey();\r
1799                         for (; k > 2; k--) prt("", k, 15);\r
1800                 }\r
1801         }\r
1802 \r
1803         /* Pause */\r
1804         prt(_("[何かキーを押すとゲームに戻ります]", "[Press any key to continue]"), k, 13);\r
1805         inkey();\r
1806         screen_load();\r
1807 }\r