OSDN Git Service

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