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