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