src/player/selfinfo.c

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