OSDN Git Service

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