3 /* Purpose: Racial powers (and mutations) */
6 * Copyright (c) 1989 James E. Wilson, Robert A. Koeneke
8 * This software may be copied and distributed for educational, research, and
9 * not for profit purposes provided that this copyright and statement are
10 * included in all such copies.
16 * Hook to determine if an object is contertible in an arrow/bolt
18 static bool item_tester_hook_convertible(object_type *o_ptr)
20 if((o_ptr->tval==TV_JUNK) || (o_ptr->tval==TV_SKELETON)) return TRUE;
22 if ((o_ptr->tval == TV_CORPSE) && (o_ptr->sval == SV_SKELETON)) return TRUE;
29 * do_cmd_cast calls this function if the player's class
32 static bool do_cmd_archer(void)
41 char o_name[MAX_NLEN];
47 sprintf(com, "[S]ÃÆ, [A]Ìð, [B]¥¯¥í¥¹¥Ü¥¦¤ÎÌð :");
49 sprintf(com, "Create [S]hots, Create [A]rrow or Create [B]olt ?");
51 else if(p_ptr->lev >= 10)
53 sprintf(com, "[S]ÃÆ, [A]Ìð:");
55 sprintf(com, "Create [S]hots or Create [A]rrow ?");
59 sprintf(com, "[S]ÃÆ:");
61 sprintf(com, "Create [S]hots ?");
67 msg_print("º®Í𤷤Ƥ롪");
69 msg_print("You are too confused!");
77 msg_print("Ìܤ¬¸«¤¨¤Ê¤¤¡ª");
79 msg_print("You are blind!");
86 if (!get_com(com, &ch, TRUE))
90 if (ch == 'S' || ch == 's')
95 if ((ch == 'A' || ch == 'a')&&(p_ptr->lev >= 10))
100 if ((ch == 'B' || ch == 'b')&&(p_ptr->lev >= 20))
107 /**********Create shots*********/
113 if (!get_rep_dir(&dir, FALSE)) return FALSE;
117 if (c_ptr->feat == FEAT_RUBBLE)
119 /* Get local object */
122 /* Hack -- Give the player some small firestones */
123 object_prep(q_ptr, lookup_kind(TV_SHOT, m_bonus(1, p_ptr->lev) + 1));
124 q_ptr->number = (byte)rand_range(15,30);
127 apply_magic(q_ptr, p_ptr->lev, FALSE, FALSE, FALSE, FALSE);
128 q_ptr->discount = 99;
130 (void)inven_carry(q_ptr);
132 object_desc(o_name, q_ptr, TRUE, 2);
134 msg_format("´äÀФòºï¤Ã¤Æ%s¤òºî¤Ã¤¿¡£",o_name);
136 msg_print("You make some ammo.");
139 (void)wall_to_mud(dir);
140 p_ptr->update |= (PU_VIEW | PU_LITE | PU_FLOW);
141 p_ptr->window |= (PW_OVERHEAD);
146 msg_print("¤½¤³¤Ë¤Ï´äÀФ¬¤Ê¤¤¡£");
148 msg_print("You need pile of rubble.");
152 /**********Create arrows*********/
159 item_tester_hook = item_tester_hook_convertible;
163 q = "¤É¤Î¥¢¥¤¥Æ¥à¤«¤éºî¤ê¤Þ¤¹¤«¡© ";
164 s = "ºàÎÁ¤ò»ý¤Ã¤Æ¤¤¤Ê¤¤¡£";
166 q = "Convert which item? ";
167 s = "You have no item to convert.";
169 if (!get_item(&item, q, s, (USE_INVEN | USE_FLOOR))) return FALSE;
171 /* Get the item (in the pack) */
174 q_ptr = &inventory[item];
177 /* Get the item (on the floor) */
180 q_ptr = &o_list[0 - item];
183 /* Get local object */
186 /* Hack -- Give the player some small firestones */
187 object_prep(q_ptr, lookup_kind(TV_ARROW, m_bonus(1, p_ptr->lev)+ 1));
188 q_ptr->number = (byte)rand_range(5,10);
191 apply_magic(q_ptr, p_ptr->lev, FALSE, FALSE, FALSE, FALSE);
193 q_ptr->discount = 99;
195 object_desc(o_name, q_ptr, TRUE, 2);
197 msg_format("%s¤òºî¤Ã¤¿¡£", o_name);
199 msg_print("You make some ammo.");
204 inven_item_increase(item, -1);
205 inven_item_describe(item);
206 inven_item_optimize(item);
210 floor_item_increase(0 - item, -1);
211 floor_item_describe(0 - item);
212 floor_item_optimize(0 - item);
214 (void)inven_carry(q_ptr);
216 /**********Create bolts*********/
223 item_tester_hook = item_tester_hook_convertible;
227 q = "¤É¤Î¥¢¥¤¥Æ¥à¤«¤éºî¤ê¤Þ¤¹¤«¡© ";
228 s = "ºàÎÁ¤ò»ý¤Ã¤Æ¤¤¤Ê¤¤¡£";
230 q = "Convert which item? ";
231 s = "You have no item to convert.";
233 if (!get_item(&item, q, s, (USE_INVEN | USE_FLOOR))) return FALSE;
235 /* Get the item (in the pack) */
238 q_ptr = &inventory[item];
241 /* Get the item (on the floor) */
244 q_ptr = &o_list[0 - item];
247 /* Get local object */
250 /* Hack -- Give the player some small firestones */
251 object_prep(q_ptr, lookup_kind(TV_BOLT, m_bonus(1, p_ptr->lev)+1));
252 q_ptr->number = (byte)rand_range(4,8);
255 apply_magic(q_ptr, p_ptr->lev, FALSE, FALSE, FALSE, FALSE);
257 q_ptr->discount = 99;
259 object_desc(o_name, q_ptr, TRUE, 2);
261 msg_format("%s¤òºî¤Ã¤¿¡£", o_name);
263 msg_print("You make some ammo.");
268 inven_item_increase(item, -1);
269 inven_item_describe(item);
270 inven_item_optimize(item);
274 floor_item_increase(0 - item, -1);
275 floor_item_describe(0 - item);
276 floor_item_optimize(0 - item);
279 (void)inven_carry(q_ptr);
284 bool gain_magic(void)
291 char o_name[MAX_NLEN];
293 /* Only accept legal items */
294 item_tester_hook = item_tester_hook_recharge;
298 q = "¤É¤Î¥¢¥¤¥Æ¥à¤ÎËâÎϤò¼è¤ê¹þ¤ß¤Þ¤¹¤«? ";
299 s = "ËâÎϤò¼è¤ê¹þ¤á¤ë¥¢¥¤¥Æ¥à¤¬¤Ê¤¤¡£";
301 q = "Gain power of which item? ";
302 s = "You have nothing to gain power.";
305 if (!get_item(&item, q, s, (USE_INVEN | USE_FLOOR))) return (FALSE);
307 /* Get the item (in the pack) */
310 o_ptr = &inventory[item];
313 /* Get the item (on the floor) */
316 o_ptr = &o_list[0 - item];
319 if (!object_known_p(o_ptr))
322 msg_print("´ÕÄꤵ¤ì¤Æ¤¤¤Ê¤¤¤È¼è¤ê¹þ¤á¤Ê¤¤¡£");
324 msg_print("You need to identify before absorbing.");
332 msg_print("½¼Å¶Ãæ¤Î¥¢¥¤¥Æ¥à¤Ï¼è¤ê¹þ¤á¤Ê¤¤¡£");
334 msg_print("This item is still charging.");
340 if (o_ptr->tval == TV_ROD)
342 else if (o_ptr->tval == TV_WAND)
345 if (o_ptr->tval == TV_ROD)
347 p_ptr->magic_num2[o_ptr->sval + ext] += o_ptr->number;
348 if (p_ptr->magic_num2[o_ptr->sval + ext] > 99) p_ptr->magic_num2[o_ptr->sval + ext] = 99;
353 for (num = o_ptr->number; num; num--)
356 if (o_ptr->tval == TV_WAND) gain_num = (pval + num - 1) / num;
357 if (p_ptr->magic_num2[o_ptr->sval + ext])
360 gain_num = (gain_num/3 + randint0(gain_num/3)) / 256;
361 if (gain_num < 1) gain_num = 1;
363 p_ptr->magic_num2[o_ptr->sval + ext] += gain_num;
364 if (p_ptr->magic_num2[o_ptr->sval + ext] > 99) p_ptr->magic_num2[o_ptr->sval + ext] = 99;
365 p_ptr->magic_num1[o_ptr->sval + ext] += pval * 0x10000;
366 if (p_ptr->magic_num1[o_ptr->sval + ext] > 99 * 0x10000) p_ptr->magic_num1[o_ptr->sval + ext] = 99 * 0x10000;
367 if (p_ptr->magic_num1[o_ptr->sval + ext] > p_ptr->magic_num2[o_ptr->sval + ext] * 0x10000) p_ptr->magic_num1[o_ptr->sval + ext] = p_ptr->magic_num2[o_ptr->sval + ext] * 0x10000;
368 if (o_ptr->tval == TV_WAND) pval -= (pval + num - 1) / num;
372 object_desc(o_name, o_ptr, TRUE, 3);
375 msg_format("%s¤ÎËâÎϤò¼è¤ê¹þ¤ó¤À¡£", o_name);
377 msg_format("You absorb magic of %s.", o_name);
380 /* Eliminate the item (from the pack) */
383 inven_item_increase(item, -999);
384 inven_item_describe(item);
385 inven_item_optimize(item);
388 /* Eliminate the item (from the floor) */
391 floor_item_increase(0 - item, -999);
392 floor_item_describe(0 - item);
393 floor_item_optimize(0 - item);
400 static bool choose_kamae(void)
410 msg_print("º®Í𤷤Ƥ¤¤Æ¹½¤¨¤é¤ì¤Ê¤¤¡ª");
412 msg_print("Too confused.");
421 prt(" a) ¹½¤¨¤ò¤È¤¯", 2, 20);
423 prt(" a) No form", 2, 20);
426 for (i = 0; i < MAX_KAMAE; i++)
428 if (p_ptr->lev >= kamae_shurui[i].min_level)
430 sprintf(buf," %c) %-12s %s",I2A(i+1), kamae_shurui[i].desc, kamae_shurui[i].info);
437 prt(" ¤É¤Î¹½¤¨¤ò¤È¤ê¤Þ¤¹¤«¡©", 1, 14);
439 prt(" Choose Form: ", 1, 14);
446 if (choice == ESCAPE)
451 else if ((choice == 'a') || (choice == 'A') || (choice == ESCAPE))
453 if (p_ptr->action == ACTION_KAMAE)
455 set_action(ACTION_NONE);
459 msg_print("¤â¤È¤â¤È¹½¤¨¤Æ¤¤¤Ê¤¤¡£");
461 msg_print("You are not assuming a posture.");
466 else if ((choice == 'b') || (choice == 'B'))
471 else if (((choice == 'c') || (choice == 'C')) && (p_ptr->lev > 29))
476 else if (((choice == 'd') || (choice == 'D')) && (p_ptr->lev > 34))
481 else if (((choice == 'e') || (choice == 'E')) && (p_ptr->lev > 39))
487 set_action(ACTION_KAMAE);
489 if (p_ptr->special_defense & (KAMAE_GENBU << new_kamae))
492 msg_print("¹½¤¨Ä¾¤·¤¿¡£");
494 msg_print("You reassume a posture.");
499 p_ptr->special_defense &= ~(KAMAE_MASK);
500 p_ptr->update |= (PU_BONUS);
501 p_ptr->redraw |= (PR_STATE);
503 msg_format("%s¤Î¹½¤¨¤ò¤È¤Ã¤¿¡£",kamae_shurui[new_kamae].desc);
505 msg_format("You assume a posture of %s form.",kamae_shurui[new_kamae].desc);
507 p_ptr->special_defense |= (KAMAE_GENBU << new_kamae);
509 p_ptr->redraw |= PR_STATE;
514 static bool choose_kata(void)
524 msg_print("º®Í𤷤Ƥ¤¤Æ¹½¤¨¤é¤ì¤Ê¤¤¡ª");
526 msg_print("Too confused.");
534 msg_print("°Õ¼±¤¬¤Ï¤Ã¤¤ê¤È¤·¤Ê¤¤¡£");
536 msg_print("You are not clear headed");
544 msg_print("ÂΤ¬¿Ì¤¨¤Æ¹½¤¨¤é¤ì¤Ê¤¤¡ª");
546 msg_print("You are trembling with fear!");
555 prt(" a) ·¿¤òÊø¤¹", 2, 20);
557 prt(" a) No Form", 2, 20);
560 for (i = 0; i < MAX_KATA; i++)
562 if (p_ptr->lev >= kata_shurui[i].min_level)
565 sprintf(buf," %c) %s¤Î·¿ %s",I2A(i+1), kata_shurui[i].desc, kata_shurui[i].info);
567 sprintf(buf," %c) Form of %-12s %s",I2A(i+1), kata_shurui[i].desc, kata_shurui[i].info);
575 prt(" ¤É¤Î·¿¤Ç¹½¤¨¤Þ¤¹¤«¡©", 1, 14);
577 prt(" Choose Form: ", 1, 14);
584 if (choice == ESCAPE)
589 else if ((choice == 'a') || (choice == 'A') || (choice == ESCAPE))
591 if (p_ptr->action == ACTION_KATA)
593 set_action(ACTION_NONE);
597 msg_print("¤â¤È¤â¤È¹½¤¨¤Æ¤¤¤Ê¤¤¡£");
599 msg_print("You are not assuming posture.");
604 else if ((choice == 'b') || (choice == 'B'))
609 else if (((choice == 'c') || (choice == 'C')) && (p_ptr->lev > 29))
614 else if (((choice == 'd') || (choice == 'D')) && (p_ptr->lev > 34))
619 else if (((choice == 'e') || (choice == 'E')) && (p_ptr->lev > 39))
625 set_action(ACTION_KATA);
627 if (p_ptr->special_defense & (KATA_IAI << new_kata))
630 msg_print("¹½¤¨Ä¾¤·¤¿¡£");
632 msg_print("You reassume a posture.");
637 p_ptr->special_defense &= ~(KATA_MASK);
638 p_ptr->update |= (PU_BONUS);
639 p_ptr->update |= (PU_MONSTERS);
641 msg_format("%s¤Î·¿¤Ç¹½¤¨¤¿¡£",kata_shurui[new_kata].desc);
643 msg_format("You assume a posture of %s form.",kata_shurui[new_kata].desc);
645 p_ptr->special_defense |= (KATA_IAI << new_kata);
647 p_ptr->redraw |= (PR_STATE);
648 p_ptr->redraw |= (PR_STATUS);
655 * Returns the chance to activate a racial power/mutation
657 static int racial_chance(s16b min_level, int use_stat, int difficulty)
662 int stat = p_ptr->stat_cur[use_stat];
664 /* No chance for success */
665 if ((p_ptr->lev < min_level) || p_ptr->confused)
670 if (difficulty == 0) return 100;
672 /* Calculate difficulty */
675 difficulty += p_ptr->stun;
677 else if (p_ptr->lev > min_level)
679 int lev_adj = ((p_ptr->lev - min_level) / 3);
680 if (lev_adj > 10) lev_adj = 10;
681 difficulty -= lev_adj;
684 if (difficulty < 5) difficulty = 5;
686 /* We only need halfs of the difficulty */
687 difficulty = difficulty / 2;
689 for (i = 1; i <= stat; i++)
691 val = i - difficulty;
693 sum += (val <= difficulty) ? val : difficulty;
699 return (((sum * 100) / difficulty) / stat);
703 /* Note: return value indicates that we have succesfully used the power */
705 bool racial_aux(s16b min_level, int cost, int use_stat, int difficulty)
709 /* Not enough mana - use hp */
710 if (p_ptr->csp < cost) use_hp = TRUE;
712 /* Power is not available yet */
713 if (p_ptr->lev < min_level)
716 msg_format("¤³¤ÎǽÎϤò»ÈÍѤ¹¤ë¤Ë¤Ï¥ì¥Ù¥ë %d ¤Ë㤷¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£", min_level);
718 msg_format("You need to attain level %d to use this power.", min_level);
726 else if (p_ptr->confused)
729 msg_print("º®Í𤷤Ƥ¤¤Æ¤½¤ÎǽÎϤϻȤ¨¤Ê¤¤¡£");
731 msg_print("You are too confused to use this power.");
739 else if (use_hp && (p_ptr->chp < cost))
742 if (!get_check("ËÜÅö¤Ëº£¤Î¿ê¼å¤·¤¿¾õÂ֤Ǥ³¤ÎǽÎϤò»È¤¤¤Þ¤¹¤«¡©"))
744 if (!get_check("Really use the power in your weakened state? "))
753 /* Else attempt to do it! */
759 difficulty += p_ptr->stun;
761 else if (p_ptr->lev > min_level)
763 int lev_adj = ((p_ptr->lev - min_level) / 3);
764 if (lev_adj > 10) lev_adj = 10;
765 difficulty -= lev_adj;
768 if (difficulty < 5) difficulty = 5;
771 /* take time and pay the price */
779 take_hit(DAMAGE_USELIFE, (cost / 2) + randint1(cost / 2),
782 take_hit(DAMAGE_USELIFE, (cost / 2) + randint1(cost / 2),
783 "concentrating too hard", -1);
789 p_ptr->csp -= (cost / 2) + randint1(cost / 2);
794 /* Redraw mana and hp */
795 p_ptr->redraw |= (PR_HP | PR_MANA);
798 p_ptr->window |= (PW_PLAYER | PW_SPELL);
801 if (randint1(p_ptr->stat_cur[use_stat]) >=
802 ((difficulty / 2) + randint1(difficulty / 2)))
808 msg_print("½¼Ê¬¤Ë½¸Ãæ¤Ç¤¤Ê¤«¤Ã¤¿¡£");
810 msg_print("You've failed to concentrate hard enough.");
812 if (flush_failure) flush();
818 static bool cmd_racial_power_aux(s32b command)
820 s16b plev = p_ptr->lev;
825 switch (p_ptr->pclass)
829 if (racial_aux(40, 75, A_DEX, 35))
835 for (i = 0; i < 6; i++)
838 y = py + ddy_ddd[dir];
839 x = px + ddx_ddd[dir];
842 /* Get the monster */
843 m_ptr = &m_list[c_ptr->m_idx];
845 /* Hack -- attack monsters */
851 msg_print("¹¶·â¤¬¶õ¤ò¤¤Ã¤¿¡£");
853 msg_print("You attack the empty air.");
861 case CLASS_HIGH_MAGE:
864 if (racial_aux(25, 1, A_INT, 25))
866 if (!eat_magic(p_ptr->lev * 2)) return FALSE;
872 if (p_ptr->realm1 == REALM_LIFE)
874 if (racial_aux(35, 70, A_WIS, 50))
876 if (!bless_weapon()) return FALSE;
881 if (racial_aux(42, 40, A_WIS, 30))
883 (void)dispel_monsters(plev * 4);
884 turn_monsters(plev * 4);
885 banish_monsters(plev * 4);
892 if (racial_aux(8, 12, A_DEX, 14))
896 if (!get_rep_dir(&dir, FALSE)) return FALSE;
899 if (cave[y][x].m_idx)
902 if (randint0(p_ptr->skill_dis) < 7)
904 msg_print("¤¦¤Þ¤¯Æ¨¤²¤é¤ì¤Ê¤«¤Ã¤¿¡£");
906 msg_print("You are failed to run away.");
908 else teleport_player(30);
913 msg_print("¤½¤ÎÊý¸þ¤Ë¤Ï¥â¥ó¥¹¥¿¡¼¤Ï¤¤¤Þ¤»¤ó¡£");
915 msg_print("You don't see any monster in this direction");
925 if (racial_aux(15, 20, A_INT, 12))
928 msg_print("Ũ¤òÄ´ºº¤·¤¿...");
930 msg_print("You examine your foes...");
939 if (p_ptr->realm1 == REALM_LIFE)
941 if (racial_aux(30, 30, A_WIS, 20))
943 if (!get_aim_dir(&dir)) return FALSE;
944 fire_beam(GF_HOLY_FIRE, dir, plev * 3);
949 if (racial_aux(30, 30, A_WIS, 20))
951 if (!get_aim_dir(&dir)) return FALSE;
952 fire_beam(GF_HELL_FIRE, dir, plev * 3);
957 case CLASS_WARRIOR_MAGE:
961 if (racial_aux(25, 0, A_INT, 10))
963 if (take_hit(DAMAGE_USELIFE, p_ptr->lev,
965 "£È£Ð¤«¤é£Í£Ð¤Ø¤Î̵ËŤÊÊÑ´¹", -1))
967 "thoughtless convertion from HP to SP", -1))
970 p_ptr->csp += p_ptr->lev / 5;
971 if (p_ptr->csp > p_ptr->msp)
973 p_ptr->csp = p_ptr->msp;
979 msg_print("ÊÑ´¹¤Ë¼ºÇÔ¤·¤¿¡£");
981 msg_print("You failed to convert.");
985 else if (command == -4)
987 if (racial_aux(25, 0, A_INT, 10))
989 if (p_ptr->csp >= p_ptr->lev/5)
991 p_ptr->csp -= p_ptr->lev / 5;
992 hp_player(p_ptr->lev);
996 msg_print("ÊÑ´¹¤Ë¼ºÇÔ¤·¤¿¡£");
998 msg_print("You failed to convert.");
1004 case CLASS_CHAOS_WARRIOR:
1006 if (racial_aux(40, 50, A_INT, 25))
1009 msg_print("ÊÕ¤ê¤òâˤó¤À...");
1011 msg_print("You glare nearby monsters...");
1014 stun_monsters(p_ptr->lev * 4);
1015 confuse_monsters(p_ptr->lev * 4);
1016 turn_monsters(p_ptr->lev * 4);
1017 stasis_monsters(p_ptr->lev * 4);
1025 if (empty_hands(TRUE) < 2)
1028 msg_print("ÁǼꤸ¤ã¤Ê¤¤¤È¤Ç¤¤Þ¤»¤ó¡£");
1030 msg_print("You need to be bare hands.");
1034 if (racial_aux(25, 0, A_DEX, 0))
1036 if (choose_kamae()) energy_use = 100;
1037 else energy_use = 0;
1038 p_ptr->update |= (PU_BONUS);
1039 p_ptr->redraw |= (PR_ARMOR);
1044 if (empty_hands(TRUE) < 2)
1047 msg_print("ÁǼꤸ¤ã¤Ê¤¤¤È¤Ç¤¤Þ¤»¤ó¡£");
1049 msg_print("You need to be bare hand.");
1053 if (racial_aux(30, 30, A_STR, 20))
1057 if (!get_rep_dir(&dir, FALSE)) return FALSE;
1060 if (cave[y][x].m_idx)
1064 msg_print("¤¢¡¼¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¤¿¡ª¡ª¡ª");
1066 msg_print("Ahhhtatatatatatatatatatatatatatataatatatatattaaaaa!!!!");
1070 msg_print("¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¥ª¥é¡ª¡ª¡ª");
1072 msg_print("Oraoraoraoraoraoraoraoraoraoraoraoraoraoraoraoraora!!!!");
1075 if (cave[y][x].m_idx)
1080 p_ptr->energy_need += ENERGY_NEED();
1085 msg_print("¤½¤ÎÊý¸þ¤Ë¤Ï¥â¥ó¥¹¥¿¡¼¤Ï¤¤¤Þ¤»¤ó¡£");
1087 msg_print("You don't see any monster in this direction");
1096 case CLASS_MINDCRAFTER:
1097 case CLASS_FORCETRAINER:
1102 msg_print("º£¤Ï¥Ú¥Ã¥È¤òÁà¤ë¤³¤È¤Ë½¸Ã椷¤Æ¤¤¤Ê¤¤¤È¡£");
1104 msg_print("You need concentration on the pets now.");
1108 if (racial_aux(15, 0, A_WIS, 10))
1111 msg_print("¾¯¤·Æ¬¤¬¥Ï¥Ã¥¥ê¤·¤¿¡£");
1113 msg_print("You feel your head clear a little.");
1116 p_ptr->csp += (3 + p_ptr->lev/20);
1117 if (p_ptr->csp >= p_ptr->msp)
1119 p_ptr->csp = p_ptr->msp;
1120 p_ptr->csp_frac = 0;
1129 if (racial_aux(1, 0, A_DEX, 0))
1131 if (!get_aim_dir(&dir)) return FALSE;
1133 fire_beam(GF_PHOTO, dir, 1);
1136 else if (command == -4)
1138 if (racial_aux(25, 20, A_INT, 20))
1140 if (!identify_fully(FALSE)) return FALSE;
1145 case CLASS_IMITATOR:
1147 if (racial_aux(30, 100, A_DEX, 30))
1150 if (!do_cmd_mane(TRUE)) return FALSE;
1154 case CLASS_BEASTMASTER:
1158 if (racial_aux(1, (p_ptr->lev+3) / 4, A_CHR, 10))
1160 if (!get_aim_dir(&dir)) return FALSE;
1161 (void)fire_ball_hide(GF_CONTROL_LIVING, dir, p_ptr->lev, 0);
1165 else if (command == -4)
1167 if (racial_aux(30, (p_ptr->lev+20) / 2, A_CHR, 10))
1169 project_hack(GF_CONTROL_LIVING, p_ptr->lev);
1176 if (racial_aux(1, 0, A_DEX, 0))
1178 if (!do_cmd_archer()) return FALSE;
1182 case CLASS_MAGIC_EATER:
1184 if (racial_aux(1, 0, A_INT, 0))
1186 if (!gain_magic()) return FALSE;
1192 if (racial_aux(1, 0, A_CHR, 0))
1200 case CLASS_RED_MAGE:
1202 if (racial_aux(48, 20, A_INT, 0))
1207 if (!p_ptr->paralyzed)
1217 msg_print("º£¤Ï¥Ú¥Ã¥È¤òÁà¤ë¤³¤È¤Ë½¸Ã椷¤Æ¤¤¤Ê¤¤¤È¡£");
1219 msg_print("You need concentration on the pets now.");
1225 if (p_ptr->special_defense & KATA_MASK)
1228 msg_print("º£¤Ï¹½¤¨¤Ë½¸Ã椷¤Æ¤¤¤ë¡£");
1230 msg_print("You need concentration on your form.");
1234 if (racial_aux(1, 0, A_WIS, 0))
1236 int max_csp = MAX(p_ptr->msp*4, p_ptr->lev*5+5);
1238 msg_print("Àº¿À¤ò½¸Ã椷¤Æµ¤¹ç¤¤¤òί¤á¤¿¡£");
1240 msg_print("You concentrate to charge your power.");
1243 p_ptr->csp += p_ptr->msp / 2;
1244 if (p_ptr->csp >= max_csp)
1246 p_ptr->csp = max_csp;
1247 p_ptr->csp_frac = 0;
1253 if (!buki_motteruka(INVEN_RARM))
1256 msg_print("Éð´ï¤ò»ý¤¿¤Ê¤¤¤È¤¤¤±¤Þ¤»¤ó¡£");
1258 msg_print("You need to wield a weapon.");
1262 if (racial_aux(25, 0, A_DEX, 0))
1264 if (choose_kata()) energy_use = 100;
1265 else energy_use = 0;
1266 p_ptr->update |= (PU_BONUS);
1267 p_ptr->redraw |= (PR_ARMOR);
1272 case CLASS_BLUE_MAGE:
1274 if (racial_aux(1, 0, A_INT, 0))
1276 if (p_ptr->action == ACTION_LEARN)
1278 set_action(ACTION_NONE);
1282 set_action(ACTION_LEARN);
1290 if (racial_aux(10, 0, A_STR, 10))
1293 monster_type *m_ptr;
1294 monster_race *r_ptr;
1300 msg_print("º£¤Ï¾èÇÏÃæ¤À¡£");
1302 msg_print("You ARE riding.");
1306 if (!do_riding(TRUE)) return TRUE;
1307 m_ptr = &m_list[p_ptr->riding];
1308 r_ptr = &r_info[m_ptr->r_idx];
1309 monster_desc(m_name, m_ptr, 0);
1311 msg_format("%s¤Ë¾è¤Ã¤¿¡£",m_name);
1313 msg_format("You ride on %s.",m_name);
1315 if (is_pet(m_ptr)) break;
1316 rlev = r_ptr->level;
1317 if (r_ptr->flags1 & RF1_UNIQUE) rlev = rlev * 3 / 2;
1318 if (rlev > 60) rlev = 60+(rlev-60)/2;
1319 if ((randint1(skill_exp[GINOU_RIDING]/120+p_ptr->lev*2/3) > rlev) && one_in_(2) && !p_ptr->inside_arena && !p_ptr->inside_battle && !(r_ptr->flags7 & (RF7_GUARDIAN)) && !(r_ptr->flags1 & (RF1_QUESTOR)) && (rlev < p_ptr->lev*3/2+randint0(p_ptr->lev/5)))
1322 msg_format("%s¤ò¼ê¤Ê¤º¤±¤¿¡£",m_name);
1324 msg_format("You tame %s.",m_name);
1331 msg_format("%s¤Ë¿¶¤êÍî¤È¤µ¤ì¤¿¡ª",m_name);
1333 msg_format("You have thrown off by %s.",m_name);
1340 case CLASS_BERSERKER:
1344 if (racial_aux(5, 5, A_DEX, 10))
1346 (void)set_food(PY_FOOD_MAX - 1);
1349 else if (command == -4)
1351 if (racial_aux(10, 10, A_DEX, 20))
1353 if (!word_of_recall()) return FALSE;
1360 if (racial_aux(5, 15, A_INT, 20))
1362 if (p_ptr->lev > 29)
1364 if (!identify_fully(TRUE)) return FALSE;
1368 if (!ident_spell(TRUE)) return FALSE;
1373 case CLASS_MIRROR_MASTER:
1377 if (racial_aux(1, 0, A_INT, 0)){
1379 for( x=0 ; x < cur_wid ;x++){
1380 for( y=0 ; y < cur_hgt ;y++){
1381 if( cave[y][x].feat == FEAT_MIRROR){
1382 cave_set_feat( y , x , FEAT_FLOOR );
1383 project(0,2,y,x, p_ptr->lev /2 +5 ,GF_SHARDS,(PROJECT_GRID|PROJECT_ITEM|PROJECT_KILL|PROJECT_JUMP|PROJECT_NO_REF|PROJECT_NO_HANGEKI),-1);
1389 else if (command == -4)
1394 msg_print("º£¤Ï¥Ú¥Ã¥È¤òÁà¤ë¤³¤È¤Ë½¸Ã椷¤Æ¤¤¤Ê¤¤¤È¡£");
1396 msg_print("You need concentration on the pets now.");
1400 if (racial_aux(30, 0, A_INT, 20)){
1401 if( cave[py][px].feat == FEAT_MIRROR)
1404 msg_print("¾¯¤·Æ¬¤¬¥Ï¥Ã¥¥ê¤·¤¿¡£");
1406 msg_print("You feel your head clear a little.");
1409 p_ptr->csp += ( 5 + (p_ptr->lev)*(p_ptr->lev)/100);
1410 if (p_ptr->csp >= p_ptr->msp)
1412 p_ptr->csp = p_ptr->msp;
1413 p_ptr->csp_frac = 0;
1418 msg_print("¶À¤Î¾å¤Ç¤Ê¤¤¤È½¸Ãæ¤Ç¤¤Ê¤¤¡ª");
1420 msg_print("Here are not any mirrors!");
1432 if (racial_aux(20, 0, A_DEX, 0))
1434 if (p_ptr->action == ACTION_HAYAGAKE) set_action(ACTION_NONE);
1435 else set_action(ACTION_HAYAGAKE);
1443 else if (p_ptr->mimic_form)
1445 switch (p_ptr->mimic_form)
1448 case MIMIC_DEMON_LORD:
1449 if (racial_aux(15, 10+p_ptr->lev/3, A_CON, 20))
1451 int type = (one_in_(2) ? GF_NETHER : GF_FIRE);
1452 if (!get_aim_dir(&dir)) break;
1454 msg_format("¤¢¤Ê¤¿¤Ï%s¤Î¥Ö¥ì¥¹¤òÅǤ¤¤¿¡£",((type == GF_NETHER) ? "ÃϹö" : "²Ð±ê"));
1456 msg_format("You breathe %s.",((type == GF_NETHER) ? "nether" : "fire"));
1459 fire_ball(type, dir, plev * 3,
1464 if (d_info[dungeon_type].flags1 & DF1_NO_MELEE)
1467 msg_print("¤Ê¤¼¤«¹¶·â¤¹¤ë¤³¤È¤¬¤Ç¤¤Ê¤¤¡£");
1469 msg_print("Something prevent you from attacking.");
1473 if (racial_aux(2, (1 + (plev / 3)), A_CON, 9))
1475 int y, x, dummy = 0;
1478 /* Only works on adjacent monsters */
1479 if (!get_rep_dir(&dir,FALSE)) break; /* was get_aim_dir */
1482 c_ptr = &cave[y][x];
1487 msg_print("²¿¤â¤Ê¤¤¾ì½ê¤Ë³ú¤ß¤Ä¤¤¤¿¡ª");
1489 msg_print("You bite into thin air!");
1496 msg_print("¤¢¤Ê¤¿¤Ï¥Ë¥ä¥ê¤È¤·¤Æ²ç¤ò¤à¤¤¤¿...");
1498 msg_print("You grin and bare your fangs...");
1501 dummy = plev + randint1(plev) * MAX(1, plev / 10); /* Dmg */
1502 if (drain_life(dir, dummy))
1504 if (p_ptr->food < PY_FOOD_FULL)
1505 /* No heal if we are "full" */
1506 (void)hp_player(dummy);
1509 msg_print("¤¢¤Ê¤¿¤Ï¶õÊ¢¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£");
1511 msg_print("You were not hungry.");
1514 /* Gain nutritional sustenance: 150/hp drained */
1515 /* A Food ration gives 5000 food points (by contrast) */
1516 /* Don't ever get more than "Full" this way */
1517 /* But if we ARE Gorged, it won't cure us */
1518 dummy = p_ptr->food + MIN(5000, 100 * dummy);
1519 if (p_ptr->food < PY_FOOD_MAX) /* Not gorged already */
1520 (void)set_food(dummy >= PY_FOOD_MAX ? PY_FOOD_MAX - 1 : dummy);
1524 msg_print("¤²¤§¡£¤Ò¤É¤¤Ì£¤À¡£");
1526 msg_print("Yechh. That tastes foul.");
1538 switch (p_ptr->prace)
1541 if (racial_aux(5, 5, A_WIS, 12))
1544 msg_print("¼þ°Ï¤òÄ´¤Ù¤¿¡£");
1546 msg_print("You examine your surroundings.");
1549 (void)detect_traps(DETECT_RAD_DEFAULT);
1550 (void)detect_doors(DETECT_RAD_DEFAULT);
1551 (void)detect_stairs(DETECT_RAD_DEFAULT);
1556 if (racial_aux(15, 10, A_INT, 10))
1561 /* Get local object */
1564 /* Create the food ration */
1565 object_prep(q_ptr, 21);
1567 /* Drop the object from heaven */
1568 (void)drop_near(q_ptr, -1, py, px);
1570 msg_print("¿©»ö¤òÎÁÍý¤·¤Æºî¤Ã¤¿¡£");
1572 msg_print("You cook some food.");
1579 if (racial_aux(5, 5, A_INT, 12))
1582 msg_print("¥Ñ¥Ã¡ª");
1584 msg_print("Blink!");
1587 teleport_player(10);
1592 if (racial_aux(3, 5, A_WIS,
1593 ((p_ptr->pclass == CLASS_WARRIOR || p_ptr->pclass == CLASS_BERSERKER) ? 5 : 10)))
1596 msg_print("ͦµ¤¤ò½Ð¤·¤¿¡£");
1598 msg_print("You play tough.");
1601 (void)set_afraid(0);
1605 case RACE_HALF_TROLL:
1606 if (racial_aux(10, 12, A_STR,
1607 ((p_ptr->pclass == CLASS_WARRIOR || p_ptr->pclass == CLASS_BERSERKER) ? 6 : 12)))
1610 msg_print("¤¦¤¬¤¡¤¡¡ª");
1612 msg_print("RAAAGH!");
1615 (void)set_afraid(0);
1617 (void)set_shero(10 + randint1(plev), FALSE);
1618 (void)hp_player(30);
1625 if (racial_aux(40, 75, A_WIS, 50))
1628 msg_print("¤¢¤Ê¤¿¤Ï¡Ö¥Ñ¥¿¡¼¥ó¡×¤ò¿´¤ËÉÁ¤¤¤Æ¤½¤Î¾å¤òÊ⤤¤¿...");
1630 msg_print("You picture the Pattern in your mind and walk it...");
1633 (void)set_poisoned(0);
1638 (void)set_afraid(0);
1639 (void)do_res_stat(A_STR);
1640 (void)do_res_stat(A_INT);
1641 (void)do_res_stat(A_WIS);
1642 (void)do_res_stat(A_DEX);
1643 (void)do_res_stat(A_CON);
1644 (void)do_res_stat(A_CHR);
1645 (void)restore_level();
1649 else if (command == -1)
1651 if (racial_aux(30, 50, A_INT, 50))
1653 /* No effect in arena or quest */
1654 if (p_ptr->inside_arena || p_ptr->inside_quest)
1657 msg_print("¸ú²Ì¤¬¤Ê¤«¤Ã¤¿¡£");
1659 msg_print("There is no effect.");
1666 msg_print("¤¢¤Ê¤¿¤ÏÊ⤼þ¤ê»Ï¤á¤¿¡£¼þ°Ï¤¬ÊѲ½¤·¤Æ¤¤¤ë¡£");
1668 msg_print("You start walking around. Your surroundings change.");
1672 if (autosave_l) do_cmd_save_game(TRUE);
1675 p_ptr->leaving = TRUE;
1681 case RACE_BARBARIAN:
1682 if (racial_aux(8, 10, A_STR, ((p_ptr->pclass == CLASS_WARRIOR || p_ptr->pclass == CLASS_BERSERKER) ? 6 : 12)))
1685 msg_print("¤¦¤©¤©¤ª¤ª¡ª");
1687 msg_print("Raaagh!");
1690 (void)set_afraid(0);
1692 (void)set_shero(10 + randint1(plev), FALSE);
1693 (void)hp_player(30);
1697 case RACE_HALF_OGRE:
1698 if (racial_aux(25, 35, A_INT, 15))
1701 msg_print("Çúȯ¤Î¥ë¡¼¥ó¤ò¿µ½Å¤Ë»Å³Ý¤±¤¿...");
1703 msg_print("You carefully set an explosive rune...");
1710 case RACE_HALF_GIANT:
1711 if (racial_aux(20, 10, A_STR, 12))
1713 if (!get_aim_dir(&dir)) break;
1715 msg_print("ÀФÎÊɤòᤤĤ±¤¿¡£");
1717 msg_print("You bash at a stone wall.");
1720 (void)wall_to_mud(dir);
1724 case RACE_HALF_TITAN:
1725 if (racial_aux(15, 10, A_INT, 12))
1728 msg_print("Ũ¤òÄ´ºº¤·¤¿...");
1730 msg_print("You examine your foes...");
1738 if (racial_aux(20, 15, A_STR, 12))
1740 if (!get_aim_dir(&dir)) break;
1742 msg_print("µðÂç¤Ê´ä¤òÅꤲ¤¿¡£");
1744 msg_print("You throw a huge boulder.");
1747 fire_bolt(GF_MISSILE, dir, (3 * plev) / 2);
1752 if (racial_aux(15, 15, A_WIS, 10))
1754 if (!get_aim_dir(&dir)) break;
1756 msg_print("¿È¤ÎÌÓ¤â¤è¤À¤Ä¶«¤ÓÀ¼¤ò¾å¤²¤¿¡ª");
1758 msg_print("You make a horrible scream!");
1761 (void)fear_monster(dir, plev);
1766 if (racial_aux(9, 9, A_DEX, 14))
1768 if (!get_aim_dir(&dir)) break;
1770 msg_print("»À¤òÅǤ¤¤¿¡£");
1772 msg_print("You spit acid.");
1776 fire_bolt(GF_ACID, dir, plev);
1778 fire_ball(GF_ACID, dir, plev, 2);
1783 if (racial_aux(12, 8, A_DEX, 14))
1785 if(!get_aim_dir(&dir)) break;
1787 msg_print("ÆǤΥÀ¡¼¥Ä¤òÅꤲ¤¿¡£");
1789 msg_print("You throw a dart of poison.");
1792 fire_bolt(GF_POIS, dir, plev);
1797 if (racial_aux(10, 5, A_WIS, 10))
1800 msg_print("¼þ°Ï¤òÄ´ºº¤·¤¿¡£");
1802 msg_print("You examine your surroundings.");
1805 (void)detect_traps(DETECT_RAD_DEFAULT);
1806 (void)detect_doors(DETECT_RAD_DEFAULT);
1807 (void)detect_stairs(DETECT_RAD_DEFAULT);
1812 if (racial_aux(2, 2, A_INT, 9))
1814 if (!get_aim_dir(&dir)) break;
1816 msg_print("¥Þ¥¸¥Ã¥¯¡¦¥ß¥µ¥¤¥ë¤òÊü¤Ã¤¿¡£");
1818 msg_print("You cast a magic missile.");
1821 fire_bolt_or_beam(10, GF_MISSILE, dir,
1822 damroll(3 + ((plev - 1) / 5), 4));
1826 case RACE_DRACONIAN:
1827 if (racial_aux(1, plev, A_CON, 12))
1829 int Type = (one_in_(3) ? GF_COLD : GF_FIRE);
1831 cptr Type_desc = ((Type == GF_COLD) ? "Î䵤" : "±ê");
1833 cptr Type_desc = ((Type == GF_COLD) ? "cold" : "fire");
1837 if (randint1(100) < plev)
1839 switch (p_ptr->pclass)
1842 case CLASS_BERSERKER:
1845 case CLASS_IMITATOR:
1852 Type_desc = "¥¨¥ì¥á¥ó¥È";
1854 Type_desc = "the elements";
1864 Type_desc = "shards";
1870 case CLASS_WARRIOR_MAGE:
1871 case CLASS_HIGH_MAGE:
1872 case CLASS_SORCERER:
1873 case CLASS_MAGIC_EATER:
1874 case CLASS_RED_MAGE:
1875 case CLASS_BLUE_MAGE:
1876 case CLASS_MIRROR_MASTER:
1889 Type = GF_DISENCHANT;
1893 Type_desc = "disenchantment";
1898 case CLASS_CHAOS_WARRIOR:
1901 Type = GF_CONFUSION;
1905 Type_desc = "confusion";
1913 Type_desc = "¥«¥ª¥¹";
1915 Type_desc = "chaos";
1922 case CLASS_FORCETRAINER:
1925 Type = GF_CONFUSION;
1929 Type_desc = "confusion";
1939 Type_desc = "sound";
1944 case CLASS_MINDCRAFTER:
1947 Type = GF_CONFUSION;
1951 Type_desc = "confusion";
1959 Type_desc = "Àº¿À¥¨¥Í¥ë¥®¡¼";
1961 Type_desc = "mental energy";
1970 Type = GF_HELL_FIRE;
1972 Type_desc = "ÃϹö¤Î¹å²Ð";
1974 Type_desc = "hellfire";
1980 Type = GF_HOLY_FIRE;
1982 Type_desc = "À»¤Ê¤ë±ê";
1984 Type_desc = "holy fire";
1997 Type_desc = "darkness";
2007 Type_desc = "poison";
2019 Type_desc = "sound";
2025 Type = GF_CONFUSION;
2029 Type_desc = "confusion";
2037 if (!get_aim_dir(&dir)) break;
2039 msg_format("¤¢¤Ê¤¿¤Ï%s¤Î¥Ö¥ì¥¹¤òÅǤ¤¤¿¡£", Type_desc);
2041 msg_format("You breathe %s.", Type_desc);
2044 fire_ball(Type, dir, plev * 2,
2049 case RACE_MIND_FLAYER:
2050 if (racial_aux(15, 12, A_INT, 14))
2052 if (!get_aim_dir(&dir)) break;
2056 msg_print("¤¢¤Ê¤¿¤Ï½¸Ã椷¡¢Ìܤ¬ÀÖ¤¯µ±¤¤¤¿...");
2058 msg_print("You concentrate and your eyes glow red...");
2061 fire_bolt(GF_PSI, dir, plev);
2067 if (racial_aux(9, 15, A_WIS, 15))
2069 if (!get_aim_dir(&dir)) break;
2073 msg_print("¥Õ¥¡¥¤¥¢¡¼¥Ü¡¼¥ë¤òÊü¤Ã¤¿¡£");
2075 msg_print("You cast a ball of fire.");
2078 fire_ball(GF_FIRE, dir, plev, 2);
2083 msg_print("¥Õ¥¡¥¤¥¢¡¼¥Ü¥ë¥È¤òÊü¤Ã¤¿¡£");
2085 msg_print("You cast a bolt of fire.");
2088 fire_bolt(GF_FIRE, dir, plev);
2094 if (racial_aux(20, 15, A_CON, 8))
2096 (void)set_shield(randint1(20) + 30, FALSE);
2102 if (racial_aux(30, 30, A_WIS, 18))
2105 msg_print("¤¢¤Ê¤¿¤Ï¼º¤Ã¤¿¥¨¥Í¥ë¥®¡¼¤ò¼è¤êÌ᤽¤¦¤È»î¤ß¤¿¡£");
2107 msg_print("You attempt to restore your lost energies.");
2110 (void)restore_level();
2115 if (d_info[dungeon_type].flags1 & DF1_NO_MELEE)
2118 msg_print("¤Ê¤¼¤«¹¶·â¤¹¤ë¤³¤È¤¬¤Ç¤¤Ê¤¤¡£");
2120 msg_print("Something prevent you from attacking.");
2124 if (racial_aux(2, (1 + (plev / 3)), A_CON, 9))
2126 int y, x, dummy = 0;
2129 /* Only works on adjacent monsters */
2130 if (!get_rep_dir(&dir,FALSE)) break; /* was get_aim_dir */
2133 c_ptr = &cave[y][x];
2138 msg_print("²¿¤â¤Ê¤¤¾ì½ê¤Ë³ú¤ß¤Ä¤¤¤¿¡ª");
2140 msg_print("You bite into thin air!");
2147 msg_print("¤¢¤Ê¤¿¤Ï¥Ë¥ä¥ê¤È¤·¤Æ²ç¤ò¤à¤¤¤¿...");
2149 msg_print("You grin and bare your fangs...");
2152 dummy = plev + randint1(plev) * MAX(1, plev / 10); /* Dmg */
2153 if (drain_life(dir, dummy))
2155 if (p_ptr->food < PY_FOOD_FULL)
2156 /* No heal if we are "full" */
2157 (void)hp_player(dummy);
2160 msg_print("¤¢¤Ê¤¿¤Ï¶õÊ¢¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡£");
2162 msg_print("You were not hungry.");
2165 /* Gain nutritional sustenance: 150/hp drained */
2166 /* A Food ration gives 5000 food points (by contrast) */
2167 /* Don't ever get more than "Full" this way */
2168 /* But if we ARE Gorged, it won't cure us */
2169 dummy = p_ptr->food + MIN(5000, 100 * dummy);
2170 if (p_ptr->food < PY_FOOD_MAX) /* Not gorged already */
2171 (void)set_food(dummy >= PY_FOOD_MAX ? PY_FOOD_MAX - 1 : dummy);
2175 msg_print("¤²¤§¡£¤Ò¤É¤¤Ì£¤À¡£");
2177 msg_print("Yechh. That tastes foul.");
2184 if (racial_aux(4, 6, A_INT, 3))
2187 msg_print("¤¢¤Ê¤¿¤Ï¤ª¤É¤í¤ª¤É¤í¤·¤¤¶«¤ÓÀ¼¤ò¤¢¤²¤¿¡ª");
2189 msg_print("You emit an eldritch howl!");
2192 if (!get_aim_dir(&dir)) break;
2193 (void)fear_monster(dir, plev);
2198 if (racial_aux(12, 12, A_INT, 15))
2201 msg_print("¤¢¤Ê¤¿¤ÏËâË¡¤ÎÊ´¤òÅꤲ¤Ä¤±¤¿...");
2203 msg_print("You throw some magic dust...");
2207 sleep_monsters_touch();
2209 (void)sleep_monsters();
2214 if (racial_aux(15, 10+p_ptr->lev/3, A_CON, 20))
2216 int type = (one_in_(2) ? GF_NETHER : GF_FIRE);
2217 if (!get_aim_dir(&dir)) break;
2219 msg_format("¤¢¤Ê¤¿¤Ï%s¤Î¥Ö¥ì¥¹¤òÅǤ¤¤¿¡£",((type == GF_NETHER) ? "ÃϹö" : "²Ð±ê"));
2221 msg_format("You breathe %s.",((type == GF_NETHER) ? "nether" : "fire"));
2224 fire_ball(type, dir, plev * 3,
2230 if (racial_aux(20, 15, A_CHR, 8))
2232 (void)set_tsubureru(randint1(20) + 30, FALSE);
2239 if (racial_aux(1, 7, A_STR, 8))
2241 if (!get_aim_dir(&dir)) return FALSE;
2243 msg_print("¥ì¥¤¥¬¥ó¤òȯ¼Í¤·¤¿¡£");
2245 msg_print("You fire your ray gun.");
2247 fire_bolt(GF_MISSILE, dir, (plev+1) / 2);
2252 if (racial_aux(10, 13, A_STR, 10))
2254 if (!get_aim_dir(&dir)) return FALSE;
2256 msg_print("¥Ö¥é¥¹¥¿¡¼¤òȯ¼Í¤·¤¿¡£");
2258 msg_print("You fire your blaster.");
2260 fire_bolt(GF_MISSILE, dir, plev);
2265 if (racial_aux(25, 26, A_STR, 12))
2267 if (!get_aim_dir(&dir)) return FALSE;
2269 msg_print("¥Ð¥º¡¼¥«¤òȯ¼Í¤·¤¿¡£");
2271 msg_print("You fire your bazooka.");
2273 fire_ball(GF_MISSILE, dir, plev * 2, 2);
2278 if (racial_aux(35, 40, A_STR, 15))
2280 if (!get_aim_dir(&dir)) return FALSE;
2282 msg_print("¥Ó¡¼¥à¥¥ã¥Î¥ó¤òȯ¼Í¤·¤¿¡£");
2284 msg_print("You fire a beam cannon.");
2286 fire_beam(GF_MISSILE, dir, plev * 2);
2291 if (racial_aux(45, 60, A_STR, 18))
2293 if (!get_aim_dir(&dir)) return FALSE;
2295 msg_print("¥í¥±¥Ã¥È¤òȯ¼Í¤·¤¿¡£");
2297 msg_print("You fire a rocket.");
2299 fire_ball(GF_ROCKET, dir, plev * 5, 2);
2306 msg_print("¤³¤Î¼ï²¤ÏÆüì¤ÊǽÎϤò»ý¤Ã¤Æ¤¤¤Þ¤»¤ó¡£");
2308 msg_print("This race has no bonus power.");
2318 typedef struct power_desc_type power_desc_type;
2320 struct power_desc_type
2331 * Allow user to choose a power (racial / mutation) to activate
2333 void do_cmd_racial_power(void)
2335 power_desc_type power_desc[36];
2338 int lvl = p_ptr->lev;
2340 bool warrior = ((p_ptr->pclass == CLASS_WARRIOR || p_ptr->pclass == CLASS_BERSERKER) ? TRUE : FALSE);
2343 int menu_line = (use_menu ? 1 : 0);
2346 for (num = 0; num < 36; num++)
2348 strcpy(power_desc[num].name, "");
2349 power_desc[num].number = 0;
2354 if (p_ptr->confused)
2357 msg_print("º®Í𤷤Ƥ¤¤ÆÆüìǽÎϤò»È¤¨¤Þ¤»¤ó¡ª");
2359 msg_print("You are too confused to use any powers!");
2366 if (p_ptr->special_defense & (KATA_MUSOU | KATA_KOUKIJIN))
2368 set_action(ACTION_NONE);
2371 switch (p_ptr->pclass)
2376 strcpy(power_desc[num].name, "·õ¤ÎÉñ¤¤");
2378 strcpy(power_desc[num].name, "Sword Dancing");
2381 power_desc[num].level = 40;
2382 power_desc[num].cost = 75;
2383 power_desc[num].fail = 100 - racial_chance(40, A_DEX, 35);
2384 power_desc[num++].number = -3;
2388 case CLASS_HIGH_MAGE:
2389 case CLASS_SORCERER:
2392 strcpy(power_desc[num].name, "ËâÎÏ¿©¤¤");
2394 strcpy(power_desc[num].name, "Eat Magic");
2397 power_desc[num].level = 25;
2398 power_desc[num].cost = 1;
2399 power_desc[num].fail = 100 - racial_chance(25, A_INT, 25);
2400 power_desc[num++].number = -3;
2405 if (p_ptr->realm1 == REALM_LIFE)
2408 strcpy(power_desc[num].name, "Éð´ï½ËÊ¡");
2410 strcpy(power_desc[num].name, "Bless Weapon");
2413 power_desc[num].level = 35;
2414 power_desc[num].cost = 70;
2415 power_desc[num].fail = 100 - racial_chance(35, A_WIS, 50);
2416 power_desc[num++].number = -3;
2421 strcpy(power_desc[num].name, "¾¤º²");
2423 strcpy(power_desc[num].name, "Evocation");
2426 power_desc[num].level = 42;
2427 power_desc[num].cost = 40;
2428 power_desc[num].fail = 100 - racial_chance(42, A_WIS, 35);
2429 power_desc[num++].number = -3;
2436 strcpy(power_desc[num].name, "¥Ò¥Ã¥È¡õ¥¢¥¦¥§¥¤");
2438 strcpy(power_desc[num].name, "Hit and Away");
2441 power_desc[num].level = 8;
2442 power_desc[num].cost = 12;
2443 power_desc[num].fail = 100 - racial_chance(8, A_DEX, 14);
2444 power_desc[num++].number = -3;
2450 strcpy(power_desc[num].name, "¥â¥ó¥¹¥¿¡¼Ä´ºº");
2452 strcpy(power_desc[num].name, "Probe Monster");
2455 power_desc[num].level = 15;
2456 power_desc[num].cost = 20;
2457 power_desc[num].fail = 100 - racial_chance(15, A_INT, 12);
2458 power_desc[num++].number = -3;
2463 if (p_ptr->realm1 == REALM_LIFE)
2466 strcpy(power_desc[num].name, "¥Û¡¼¥ê¡¼¡¦¥é¥ó¥¹");
2468 strcpy(power_desc[num].name, "Holy Lance");
2471 power_desc[num].level = 30;
2472 power_desc[num].cost = 30;
2473 power_desc[num].fail = 100 - racial_chance(30, A_WIS, 30);
2474 power_desc[num++].number = -3;
2479 strcpy(power_desc[num].name, "¥Ø¥ë¡¦¥é¥ó¥¹");
2481 strcpy(power_desc[num].name, "Hell Lance");
2484 power_desc[num].level = 30;
2485 power_desc[num].cost = 30;
2486 power_desc[num].fail = 100 - racial_chance(30, A_WIS, 30);
2487 power_desc[num++].number = -3;
2491 case CLASS_WARRIOR_MAGE:
2494 strcpy(power_desc[num].name, "ÊÑ´¹: £È£Ð¢ª£Í£Ð");
2496 strcpy(power_desc[num].name, "Convert HP to SP");
2499 power_desc[num].level = 25;
2500 power_desc[num].cost = 0;
2501 power_desc[num].fail = 100 - racial_chance(25, A_INT, 10);
2502 power_desc[num++].number = -3;
2504 strcpy(power_desc[num].name, "ÊÑ´¹: £Í£Ð¢ª£È£Ð");
2506 strcpy(power_desc[num].name, "Convert SP to HP");
2509 power_desc[num].level = 25;
2510 power_desc[num].cost = 0;
2511 power_desc[num].fail = 100 - racial_chance(25, A_INT, 10);
2512 power_desc[num++].number = -4;
2515 case CLASS_CHAOS_WARRIOR:
2518 strcpy(power_desc[num].name, "¸¸ÏǤθ÷");
2520 strcpy(power_desc[num].name, "Confusing Light");
2523 power_desc[num].level = 40;
2524 power_desc[num].cost = 50;
2525 power_desc[num].fail = 100 - racial_chance(40, A_INT, 25);
2526 power_desc[num++].number = -3;
2532 strcpy(power_desc[num].name, "¹½¤¨¤ë");
2534 strcpy(power_desc[num].name, "Assume a Posture");
2537 power_desc[num].level = 25;
2538 power_desc[num].cost = 0;
2539 power_desc[num].fail = 100 - racial_chance(25, A_DEX, 0);
2540 power_desc[num++].number = -3;
2542 strcpy(power_desc[num].name, "É´Îö·ý");
2544 strcpy(power_desc[num].name, "Double Attack");
2547 power_desc[num].level = 30;
2548 power_desc[num].cost = 30;
2549 power_desc[num].fail = 100 - racial_chance(20, A_STR, 20);
2550 power_desc[num++].number = -4;
2553 case CLASS_MINDCRAFTER:
2554 case CLASS_FORCETRAINER:
2557 strcpy(power_desc[num].name, "ÌÀ¶À»ß¿å");
2559 strcpy(power_desc[num].name, "Clear Mind");
2562 power_desc[num].level = 15;
2563 power_desc[num].cost = 0;
2564 power_desc[num].fail = 100 - racial_chance(15, A_WIS, 10);
2565 power_desc[num++].number = -3;
2571 strcpy(power_desc[num].name, "¼Ì¿¿»£±Æ");
2573 strcpy(power_desc[num].name, "Take a Photograph");
2576 power_desc[num].level = 1;
2577 power_desc[num].cost = 0;
2578 power_desc[num].fail = 100 - racial_chance(1, A_DEX, 0);
2579 power_desc[num++].number = -3;
2581 strcpy(power_desc[num].name, "¿¿¡¦´ÕÄê");
2583 strcpy(power_desc[num].name, "Identify True");
2586 power_desc[num].level = 25;
2587 power_desc[num].cost = 20;
2588 power_desc[num].fail = 100 - racial_chance(25, A_INT, 20);
2589 power_desc[num++].number = -4;
2592 case CLASS_IMITATOR:
2595 strcpy(power_desc[num].name, "ÇÜÊÖ¤·");
2597 strcpy(power_desc[num].name, "Double Revenge");
2600 power_desc[num].level = 30;
2601 power_desc[num].cost = 100;
2602 power_desc[num].fail = 100 - racial_chance(30, A_DEX, 30);
2603 power_desc[num++].number = -3;
2606 case CLASS_BEASTMASTER:
2609 strcpy(power_desc[num].name, "À¸Êª»ÙÇÛ");
2611 strcpy(power_desc[num].name, "Dominate a Living Thing");
2614 power_desc[num].level = 1;
2615 power_desc[num].cost = (p_ptr->lev+3)/4;
2616 power_desc[num].fail = 100 - racial_chance(1, A_CHR, 10);
2617 power_desc[num++].number = -3;
2619 strcpy(power_desc[num].name, "¿¿¡¦À¸Êª»ÙÇÛ");
2621 strcpy(power_desc[num].name, "Dominate Living Things");
2624 power_desc[num].level = 30;
2625 power_desc[num].cost = (p_ptr->lev+20)/2;
2626 power_desc[num].fail = 100 - racial_chance(30, A_CHR, 10);
2627 power_desc[num++].number = -4;
2633 strcpy(power_desc[num].name, "ÃÆ/Ìð¤ÎÀ½Â¤");
2635 strcpy(power_desc[num].name, "Create Ammo");
2638 power_desc[num].level = 1;
2639 power_desc[num].cost = 0;
2640 power_desc[num].fail = 100 - racial_chance(0, A_DEX, 0);
2641 power_desc[num++].number = -3;
2644 case CLASS_MAGIC_EATER:
2647 strcpy(power_desc[num].name, "ËâÎϤμè¤ê¹þ¤ß");
2649 strcpy(power_desc[num].name, "Absorb Magic");
2652 power_desc[num].level = 1;
2653 power_desc[num].cost = 0;
2654 power_desc[num].fail = 100 - racial_chance(0, A_INT, 0);
2655 power_desc[num++].number = -3;
2661 strcpy(power_desc[num].name, "²Î¤ò»ß¤á¤ë");
2663 strcpy(power_desc[num].name, "Stop Singing");
2666 power_desc[num].level = 1;
2667 power_desc[num].cost = 0;
2668 power_desc[num].fail = 100 - racial_chance(0, A_CHR, 0);
2669 power_desc[num++].number = -3;
2672 case CLASS_RED_MAGE:
2675 strcpy(power_desc[num].name, "Ϣ³Ëâ");
2677 strcpy(power_desc[num].name, "Double Magic");
2680 power_desc[num].level = 48;
2681 power_desc[num].cost = 20;
2682 power_desc[num].fail = 100 - racial_chance(48, A_INT, 0);
2683 power_desc[num++].number = -3;
2689 strcpy(power_desc[num].name, "µ¤¹ç¤¤¤¿¤á");
2691 strcpy(power_desc[num].name, "Concentration");
2694 power_desc[num].level = 1;
2695 power_desc[num].cost = 0;
2696 power_desc[num].fail = 100 - racial_chance(1, A_WIS, 0);
2697 power_desc[num++].number = -3;
2699 strcpy(power_desc[num].name, "·¿");
2701 strcpy(power_desc[num].name, "Assume a Posture");
2704 power_desc[num].level = 25;
2705 power_desc[num].cost = 0;
2706 power_desc[num].fail = 100 - racial_chance(25, A_DEX, 0);
2707 power_desc[num++].number = -4;
2710 case CLASS_BLUE_MAGE:
2713 strcpy(power_desc[num].name, "¥é¡¼¥Ë¥ó¥°");
2715 strcpy(power_desc[num].name, "Learning");
2718 power_desc[num].level = 1;
2719 power_desc[num].cost = 0;
2720 power_desc[num].fail = 100 - racial_chance(1, A_INT, 0);
2721 power_desc[num++].number = -3;
2727 strcpy(power_desc[num].name, "¹ÓÇϤʤ餷");
2729 strcpy(power_desc[num].name, "Rodeo");
2732 power_desc[num].level = 10;
2733 power_desc[num].cost = 0;
2734 power_desc[num].fail = 100 - racial_chance(10, A_STR, 10);
2735 power_desc[num++].number = -3;
2738 case CLASS_BERSERKER:
2741 strcpy(power_desc[num].name, "¶õÊ¢½¼Â");
2743 strcpy(power_desc[num].name, "Satisfy Hunger");
2746 power_desc[num].level = 5;
2747 power_desc[num].cost = 5;
2748 power_desc[num].fail = 100 - racial_chance(5, A_DEX, 10);
2749 power_desc[num++].number = -3;
2751 strcpy(power_desc[num].name, "µ¢´Ô");
2753 strcpy(power_desc[num].name, "Recall");
2756 power_desc[num].level = 10;
2757 power_desc[num].cost = 10;
2758 power_desc[num].fail = 100 - racial_chance(10, A_DEX, 20);
2759 power_desc[num++].number = -4;
2762 case CLASS_MIRROR_MASTER:
2765 strcpy(power_desc[num].name, "¶À³ä¤ê");
2767 strcpy(power_desc[num].name, "Break Mirrors");
2770 power_desc[num].level = 1;
2771 power_desc[num].cost = 0;
2772 power_desc[num].fail = 100 - racial_chance(1, A_INT, 0);
2773 power_desc[num++].number = -3;
2775 strcpy(power_desc[num].name, "ÀÅ¿å");
2777 strcpy(power_desc[num].name, "Mirror Concentration");
2780 power_desc[num].level = 30;
2781 power_desc[num].cost = 0;
2782 power_desc[num].fail = 100 - racial_chance(30, A_INT, 20);
2783 power_desc[num++].number = -4;
2789 strcpy(power_desc[num].name, "ÌÜÍø¤");
2791 strcpy(power_desc[num].name, "Judgment");
2794 power_desc[num].level = 5;
2795 power_desc[num].cost = 15;
2796 power_desc[num].fail = 100 - racial_chance(5, A_INT, 20);
2797 power_desc[num++].number = -3;
2803 strcpy(power_desc[num].name, "®¶î¤±");
2805 strcpy(power_desc[num].name, "Quick Walk");
2808 power_desc[num].level = 20;
2809 power_desc[num].cost = 0;
2810 power_desc[num].fail = 100 - racial_chance(20, A_DEX, 0);
2811 power_desc[num++].number = -3;
2816 strcpy(power_desc[0].name, "(¤Ê¤·)");
2818 strcpy(power_desc[0].name, "(none)");
2823 if (p_ptr->mimic_form)
2825 switch (p_ptr->mimic_form)
2828 case MIMIC_DEMON_LORD:
2830 sprintf(power_desc[num].name, "ÃϹö/²Ð±ê¤Î¥Ö¥ì¥¹ (¥À¥á¡¼¥¸ %d)", lvl * 3);
2832 sprintf(power_desc[num].name, "Nether or Fire Breath (dam %d)", lvl * 3);
2835 power_desc[num].level = 15;
2836 power_desc[num].cost = 10+lvl/3;
2837 power_desc[num].fail = 100 - racial_chance(15, A_CON, 20);
2838 power_desc[num++].number = -1;
2842 strcpy(power_desc[num].name, "À¸Ì¿Îϵۼý");
2844 strcpy(power_desc[num].name, "Drain Life");
2847 power_desc[num].level = 2;
2848 power_desc[num].cost = 1 + (lvl / 3);
2849 power_desc[num].fail = 100 - racial_chance(2, A_CON, 9);
2850 power_desc[num++].number = -1;
2856 switch (p_ptr->prace)
2860 strcpy(power_desc[num].name, "¥É¥¢¤Èæ« ´¶ÃÎ");
2862 strcpy(power_desc[num].name, "Detect Doors+Traps");
2865 power_desc[num].level = 5;
2866 power_desc[num].cost = 5;
2867 power_desc[num].fail = 100 - racial_chance(5, A_WIS, 12);
2868 power_desc[num++].number = -1;
2872 strcpy(power_desc[num].name, "¥É¥¢¤Èæ« ´¶ÃÎ");
2874 strcpy(power_desc[num].name, "Detect Doors+Traps");
2877 power_desc[num].level = 10;
2878 power_desc[num].cost = 5;
2879 power_desc[num].fail = 100 - racial_chance(10, A_WIS, 10);
2880 power_desc[num++].number = -1;
2884 strcpy(power_desc[num].name, "¿©ÎÈÀ¸À®");
2886 strcpy(power_desc[num].name, "Create Food");
2889 power_desc[num].level = 15;
2890 power_desc[num].cost = 10;
2891 power_desc[num].fail = 100 - racial_chance(15, A_INT, 10);
2892 power_desc[num++].number = -1;
2896 sprintf(power_desc[num].name, "¥·¥ç¡¼¥È¡¦¥Æ¥ì¥Ý¡¼¥È");
2898 sprintf(power_desc[num].name, "Blink");
2901 power_desc[num].level = 5;
2902 power_desc[num].cost = 5;
2903 power_desc[num].fail = 100 - racial_chance(5, A_INT, 12);
2904 power_desc[num++].number = -1;
2908 strcpy(power_desc[num].name, "¶²Éݽüµî");
2910 strcpy(power_desc[num].name, "Remove Fear");
2913 power_desc[num].level = 3;
2914 power_desc[num].cost = 5;
2915 power_desc[num].fail = 100 - racial_chance(3, A_WIS, (warrior ? 5 : 10));
2916 power_desc[num++].number = -1;
2918 case RACE_HALF_TROLL:
2920 strcpy(power_desc[num].name, "¶¸Àï»Î²½");
2922 strcpy(power_desc[num].name, "Berserk");
2925 power_desc[num].level = 10;
2926 power_desc[num].cost = 12;
2927 power_desc[num].fail = 100 - racial_chance(10, A_STR, (warrior ? 6 : 12));
2928 power_desc[num++].number = -1;
2930 case RACE_BARBARIAN:
2932 strcpy(power_desc[num].name, "¶¸Àï»Î²½");
2934 strcpy(power_desc[num].name, "Berserk");
2937 power_desc[num].level = 8;
2938 power_desc[num].cost = 10;
2939 power_desc[num].fail = 100 - racial_chance(8, A_STR, (warrior ? 6 : 12));
2940 power_desc[num++].number = -1;
2944 strcpy(power_desc[num].name, "¥·¥ã¥É¥¦¡¦¥·¥Õ¥È");
2946 strcpy(power_desc[num].name, "Shadow Shifting");
2949 power_desc[num].level = 30;
2950 power_desc[num].cost = 50;
2951 power_desc[num].fail = 100 - racial_chance(30, A_INT, 50);
2952 power_desc[num++].number = -1;
2954 strcpy(power_desc[num].name, "¥Ñ¥¿¡¼¥ó¡¦¥¦¥©¡¼¥¯");
2956 strcpy(power_desc[num].name, "Pattern Mindwalking");
2959 power_desc[num].level = 40;
2960 power_desc[num].cost = 75;
2961 power_desc[num].fail = 100 - racial_chance(40, A_WIS, 50);
2962 power_desc[num++].number = -2;
2964 case RACE_HALF_OGRE:
2966 strcpy(power_desc[num].name, "Çúȯ¤Î¥ë¡¼¥ó");
2968 strcpy(power_desc[num].name, "Explosive Rune");
2971 power_desc[num].level = 25;
2972 power_desc[num].cost = 35;
2973 power_desc[num].fail = 100 - racial_chance(25, A_INT, 15);
2974 power_desc[num++].number = -1;
2976 case RACE_HALF_GIANT:
2978 strcpy(power_desc[num].name, "´äÀÐÍϲò");
2980 strcpy(power_desc[num].name, "Stone to Mud");
2983 power_desc[num].level = 20;
2984 power_desc[num].cost = 10;
2985 power_desc[num].fail = 100 - racial_chance(20, A_STR, 12);
2986 power_desc[num++].number = -1;
2988 case RACE_HALF_TITAN:
2990 strcpy(power_desc[num].name, "¥¹¥¥ã¥ó¡¦¥â¥ó¥¹¥¿¡¼");
2992 strcpy(power_desc[num].name, "Probing");
2995 power_desc[num].level = 15;
2996 power_desc[num].cost = 10;
2997 power_desc[num].fail = 100 - racial_chance(15, A_INT, 12);
2998 power_desc[num++].number = -1;
3002 sprintf(power_desc[num].name, "´äÀÐÅꤲ¡Ê¥À¥á¡¼¥¸ %d¡Ë", (3 * lvl) / 2);
3004 sprintf(power_desc[num].name, "Throw Boulder (dam %d)", (3 * lvl) / 2);
3007 power_desc[num].level = 20;
3008 power_desc[num].cost = 15;
3009 power_desc[num].fail = 100 - racial_chance(20, A_STR, 12);
3010 power_desc[num++].number = -1;
3014 strcpy(power_desc[num].name, "¥â¥ó¥¹¥¿¡¼¶²¹²");
3016 strcpy(power_desc[num].name, "Scare Monster");
3019 power_desc[num].level = 15;
3020 power_desc[num].cost = 15;
3021 power_desc[num].fail = 100 - racial_chance(15, A_WIS, 10);
3022 power_desc[num++].number = -1;
3026 strcpy(power_desc[num].name, "¥â¥ó¥¹¥¿¡¼¶²¹²");
3028 strcpy(power_desc[num].name, "Scare Monster");
3031 power_desc[num].level = 4;
3032 power_desc[num].cost = 6;
3033 power_desc[num].fail = 100 - racial_chance(4, A_INT, 3);
3034 power_desc[num++].number = -1;
3038 sprintf(power_desc[num].name, "»À¤ÎÂà (¥À¥á¡¼¥¸ %d)", lvl);
3040 sprintf(power_desc[num].name, "Spit Acid (dam %d)", lvl);
3043 power_desc[num].level = 9;
3044 power_desc[num].cost = 9;
3045 power_desc[num].fail = 100 - racial_chance(9, A_DEX, 14);
3046 power_desc[num++].number = -1;
3050 sprintf(power_desc[num].name, "ÆǤΥÀ¡¼¥Ä (¥À¥á¡¼¥¸ %d)", lvl);
3052 sprintf(power_desc[num].name, "Poison Dart (dam %d)", lvl);
3055 power_desc[num].level = 12;
3056 power_desc[num].cost = 8;
3057 power_desc[num].fail = 100 - racial_chance(12, A_DEX, 14);
3058 power_desc[num++].number = -1;
3062 sprintf(power_desc[num].name, "¥Þ¥¸¥Ã¥¯¡¦¥ß¥µ¥¤¥ë (¥À¥á¡¼¥¸ %dd%d)", 3 + ((lvl - 1) / 5), 4);
3064 sprintf(power_desc[num].name, "Magic Missile (dm %dd%d)", 3 + ((lvl - 1) / 5), 4);
3067 power_desc[num].level = 2;
3068 power_desc[num].cost = 2;
3069 power_desc[num].fail = 100 - racial_chance(2, A_INT, 9);
3070 power_desc[num++].number = -1;
3072 case RACE_DRACONIAN:
3074 sprintf(power_desc[num].name, "¥Ö¥ì¥¹ (¥À¥á¡¼¥¸ %d)", lvl * 2);
3076 sprintf(power_desc[num].name, "Breath Weapon (dam %d)", lvl * 2);
3079 power_desc[num].level = 1;
3080 power_desc[num].cost = lvl;
3081 power_desc[num].fail = 100 - racial_chance(1, A_CON, 12);
3082 power_desc[num++].number = -1;
3084 case RACE_MIND_FLAYER:
3086 sprintf(power_desc[num].name, "Àº¿À¹¶·â (¥À¥á¡¼¥¸ %d)", lvl);
3088 sprintf(power_desc[num].name, "Mind Blast (dam %d)", lvl);
3091 power_desc[num].level = 15;
3092 power_desc[num].cost = 12;
3093 power_desc[num].fail = 100 - racial_chance(15, A_INT, 14);
3094 power_desc[num++].number = -1;
3098 sprintf(power_desc[num].name, "¥Õ¥¡¥¤¥¢¡¦¥Ü¥ë¥È/¥Ü¡¼¥ë (¥À¥á¡¼¥¸ %d)", lvl);
3100 sprintf(power_desc[num].name, "Fire Bolt/Ball (dam %d)", lvl);
3103 power_desc[num].level = 9;
3104 power_desc[num].cost = 15;
3105 power_desc[num].fail = 100 - racial_chance(9, A_WIS, 15);
3106 power_desc[num++].number = -1;
3110 strcpy(power_desc[num].name, "È©Àв½ (´ü´Ö 1d20+30)");
3112 strcpy(power_desc[num].name, "Stone Skin (dur 1d20+30)");
3115 power_desc[num].level = 20;
3116 power_desc[num].cost = 15;
3117 power_desc[num].fail = 100 - racial_chance(20, A_CON, 8);
3118 power_desc[num++].number = -1;
3123 strcpy(power_desc[num].name, "·Ð¸³ÃÍÉü³è");
3125 strcpy(power_desc[num].name, "Restore Life");
3128 power_desc[num].level = 30;
3129 power_desc[num].cost = 30;
3130 power_desc[num].fail = 100 - racial_chance(30, A_WIS, 18);
3131 power_desc[num++].number = -1;
3135 strcpy(power_desc[num].name, "À¸Ì¿Îϵۼý");
3137 strcpy(power_desc[num].name, "Drain Life");
3140 power_desc[num].level = 2;
3141 power_desc[num].cost = 1 + (lvl / 3);
3142 power_desc[num].fail = 100 - racial_chance(2, A_CON, 9);
3143 power_desc[num++].number = -1;
3147 strcpy(power_desc[num].name, "̲¤êÊ´");
3149 strcpy(power_desc[num].name, "Sleeping Dust");
3152 power_desc[num].level = 12;
3153 power_desc[num].cost = 12;
3154 power_desc[num].fail = 100 - racial_chance(12, A_INT, 15);
3155 power_desc[num++].number = -1;
3159 sprintf(power_desc[num].name, "ÃϹö/²Ð±ê¤Î¥Ö¥ì¥¹ (¥À¥á¡¼¥¸ %d)", lvl * 3);
3161 sprintf(power_desc[num].name, "Nether or Fire Breath (dam %d)", lvl * 3);
3164 power_desc[num].level = 15;
3165 power_desc[num].cost = 10+lvl/3;
3166 power_desc[num].fail = 100 - racial_chance(15, A_CON, 20);
3167 power_desc[num++].number = -1;
3171 strcpy(power_desc[num].name, "²£¤Ë¿¤Ó¤ë");
3173 strcpy(power_desc[num].name, "Expand Horizontally (dur 30+1d20)");
3176 power_desc[num].level = 20;
3177 power_desc[num].cost = 15;
3178 power_desc[num].fail = 100 - racial_chance(15, A_CHR, 8);
3179 power_desc[num++].number = -1;
3182 if (p_ptr->lev < 10)
3185 strcpy(power_desc[num].name, "¥ì¥¤¥¬¥ó");
3187 strcpy(power_desc[num].name, "Ray Gun");
3190 power_desc[num].level = 1;
3191 power_desc[num].cost = 7;
3192 power_desc[num].fail = 100 - racial_chance(1, A_STR, 8);
3194 else if (p_ptr->lev < 25)
3197 strcpy(power_desc[num].name, "¥Ö¥é¥¹¥¿¡¼");
3199 strcpy(power_desc[num].name, "Blaster");
3202 power_desc[num].level = 10;
3203 power_desc[num].cost = 13;
3204 power_desc[num].fail = 100 - racial_chance(10, A_STR, 10);
3206 else if (p_ptr->lev < 35)
3209 strcpy(power_desc[num].name, "¥Ð¥º¡¼¥«");
3211 strcpy(power_desc[num].name, "Bazooka");
3214 power_desc[num].level = 25;
3215 power_desc[num].cost = 26;
3216 power_desc[num].fail = 100 - racial_chance(25, A_STR, 12);
3218 else if (p_ptr->lev < 45)
3221 strcpy(power_desc[num].name, "¥Ó¡¼¥à¥¥ã¥Î¥ó");
3223 strcpy(power_desc[num].name, "Beam Cannon");
3226 power_desc[num].level = 35;
3227 power_desc[num].cost = 40;
3228 power_desc[num].fail = 100 - racial_chance(35, A_STR, 15);
3233 strcpy(power_desc[num].name, "¥í¥±¥Ã¥È");
3235 strcpy(power_desc[num].name, "Rocket");
3238 power_desc[num].level = 45;
3239 power_desc[num].cost = 60;
3240 power_desc[num].fail = 100 - racial_chance(45, A_STR, 18);
3242 power_desc[num++].number = -1;
3253 if (p_ptr->muta1 & MUT1_SPIT_ACID)
3256 strcpy(power_desc[num].name, "»À¤ÎÂÃ");
3258 strcpy(power_desc[num].name, "Spit Acid");
3261 power_desc[num].level = 9;
3262 power_desc[num].cost = 9;
3263 power_desc[num].fail = 100 - racial_chance(9, A_DEX, 15);
3264 power_desc[num++].number = MUT1_SPIT_ACID;
3267 if (p_ptr->muta1 & MUT1_BR_FIRE)
3270 strcpy(power_desc[num].name, "±ê¤Î¥Ö¥ì¥¹");
3272 strcpy(power_desc[num].name, "Fire Breath");
3275 power_desc[num].level = 20;
3276 power_desc[num].cost = lvl;
3277 power_desc[num].fail = 100 - racial_chance(20, A_CON, 18);
3278 power_desc[num++].number = MUT1_BR_FIRE;
3281 if (p_ptr->muta1 & MUT1_HYPN_GAZE)
3284 strcpy(power_desc[num].name, "ºÅ̲âˤß");
3286 strcpy(power_desc[num].name, "Hypnotic Gaze");
3289 power_desc[num].level = 12;
3290 power_desc[num].cost = 12;
3291 power_desc[num].fail = 100 - racial_chance(12, A_CHR, 18);
3292 power_desc[num++].number = MUT1_HYPN_GAZE;
3295 if (p_ptr->muta1 & MUT1_TELEKINES)
3298 strcpy(power_desc[num].name, "Ç°Æ°ÎÏ");
3300 strcpy(power_desc[num].name, "Telekinesis");
3303 power_desc[num].level = 9;
3304 power_desc[num].cost = 9;
3305 power_desc[num].fail = 100 - racial_chance(9, A_WIS, 14);
3306 power_desc[num++].number = MUT1_TELEKINES;
3309 if (p_ptr->muta1 & MUT1_VTELEPORT)
3312 strcpy(power_desc[num].name, "¥Æ¥ì¥Ý¡¼¥È");
3314 strcpy(power_desc[num].name, "Teleport");
3317 power_desc[num].level = 7;
3318 power_desc[num].cost = 7;
3319 power_desc[num].fail = 100 - racial_chance(7, A_WIS, 15);
3320 power_desc[num++].number = MUT1_VTELEPORT;
3323 if (p_ptr->muta1 & MUT1_MIND_BLST)
3326 strcpy(power_desc[num].name, "Àº¿À¹¶·â");
3328 strcpy(power_desc[num].name, "Mind Blast");
3331 power_desc[num].level = 5;
3332 power_desc[num].cost = 3;
3333 power_desc[num].fail = 100 - racial_chance(5, A_WIS, 15);
3334 power_desc[num++].number = MUT1_MIND_BLST;
3337 if (p_ptr->muta1 & MUT1_RADIATION)
3340 strcpy(power_desc[num].name, "Êü¼Íǽ");
3342 strcpy(power_desc[num].name, "Emit Radiation");
3345 power_desc[num].level = 15;
3346 power_desc[num].cost = 15;
3347 power_desc[num].fail = 100 - racial_chance(15, A_CON, 14);
3348 power_desc[num++].number = MUT1_RADIATION;
3351 if (p_ptr->muta1 & MUT1_VAMPIRISM)
3354 strcpy(power_desc[num].name, "µÛ·ì¥É¥ì¥¤¥ó");
3356 strcpy(power_desc[num].name, "Vampiric Drain");
3359 power_desc[num].level = 2;
3360 power_desc[num].cost = (1 + (lvl / 3));
3361 power_desc[num].fail = 100 - racial_chance(2, A_CON, 9);
3362 power_desc[num++].number = MUT1_VAMPIRISM;
3365 if (p_ptr->muta1 & MUT1_SMELL_MET)
3368 strcpy(power_desc[num].name, "¶â°Ó̳Ð");
3370 strcpy(power_desc[num].name, "Smell Metal");
3373 power_desc[num].level = 3;
3374 power_desc[num].cost = 2;
3375 power_desc[num].fail = 100 - racial_chance(3, A_INT, 12);
3376 power_desc[num++].number = MUT1_SMELL_MET;
3379 if (p_ptr->muta1 & MUT1_SMELL_MON)
3382 strcpy(power_desc[num].name, "Ũ½Ó̳Ð");
3384 strcpy(power_desc[num].name, "Smell Monsters");
3387 power_desc[num].level = 5;
3388 power_desc[num].cost = 4;
3389 power_desc[num].fail = 100 - racial_chance(5, A_INT, 15);
3390 power_desc[num++].number = MUT1_SMELL_MON;
3393 if (p_ptr->muta1 & MUT1_BLINK)
3396 strcpy(power_desc[num].name, "¥·¥ç¡¼¥È¡¦¥Æ¥ì¥Ý¡¼¥È");
3398 strcpy(power_desc[num].name, "Blink");
3401 power_desc[num].level = 3;
3402 power_desc[num].cost = 3;
3403 power_desc[num].fail = 100 - racial_chance(3, A_WIS, 12);
3404 power_desc[num++].number = MUT1_BLINK;
3407 if (p_ptr->muta1 & MUT1_EAT_ROCK)
3410 strcpy(power_desc[num].name, "´ä¿©¤¤");
3412 strcpy(power_desc[num].name, "Eat Rock");
3415 power_desc[num].level = 8;
3416 power_desc[num].cost = 12;
3417 power_desc[num].fail = 100 - racial_chance(8, A_CON, 18);
3418 power_desc[num++].number = MUT1_EAT_ROCK;
3421 if (p_ptr->muta1 & MUT1_SWAP_POS)
3424 strcpy(power_desc[num].name, "°ÌÃÖ¸ò´¹");
3426 strcpy(power_desc[num].name, "Swap Position");
3429 power_desc[num].level = 15;
3430 power_desc[num].cost = 12;
3431 power_desc[num].fail = 100 - racial_chance(15, A_DEX, 16);
3432 power_desc[num++].number = MUT1_SWAP_POS;
3435 if (p_ptr->muta1 & MUT1_SHRIEK)
3438 strcpy(power_desc[num].name, "¶«¤Ó");
3440 strcpy(power_desc[num].name, "Shriek");
3443 power_desc[num].level = 20;
3444 power_desc[num].cost = 14;
3445 power_desc[num].fail = 100 - racial_chance(20, A_CON, 16);
3446 power_desc[num++].number = MUT1_SHRIEK;
3449 if (p_ptr->muta1 & MUT1_ILLUMINE)
3452 strcpy(power_desc[num].name, "¾ÈÌÀ");
3454 strcpy(power_desc[num].name, "Illuminate");
3457 power_desc[num].level = 3;
3458 power_desc[num].cost = 2;
3459 power_desc[num].fail = 100 - racial_chance(3, A_INT, 10);
3460 power_desc[num++].number = MUT1_ILLUMINE;
3463 if (p_ptr->muta1 & MUT1_DET_CURSE)
3466 strcpy(power_desc[num].name, "¼ö¤¤´¶ÃÎ");
3468 strcpy(power_desc[num].name, "Detect Curses");
3471 power_desc[num].level = 7;
3472 power_desc[num].cost = 14;
3473 power_desc[num].fail = 100 - racial_chance(7, A_WIS, 14);
3474 power_desc[num++].number = MUT1_DET_CURSE;
3477 if (p_ptr->muta1 & MUT1_BERSERK)
3480 strcpy(power_desc[num].name, "¶¸Àï»Î²½");
3482 strcpy(power_desc[num].name, "Berserk");
3485 power_desc[num].level = 8;
3486 power_desc[num].cost = 8;
3487 power_desc[num].fail = 100 - racial_chance(8, A_STR, 14);
3488 power_desc[num++].number = MUT1_BERSERK;
3491 if (p_ptr->muta1 & MUT1_POLYMORPH)
3494 strcpy(power_desc[num].name, "ÊÑ¿È");
3496 strcpy(power_desc[num].name, "Polymorph");
3499 power_desc[num].level = 18;
3500 power_desc[num].cost = 20;
3501 power_desc[num].fail = 100 - racial_chance(18, A_CON, 18);
3502 power_desc[num++].number = MUT1_POLYMORPH;
3505 if (p_ptr->muta1 & MUT1_MIDAS_TCH)
3508 strcpy(power_desc[num].name, "¥ß¥À¥¹¤Î¼ê");
3510 strcpy(power_desc[num].name, "Midas Touch");
3513 power_desc[num].level = 10;
3514 power_desc[num].cost = 5;
3515 power_desc[num].fail = 100 - racial_chance(10, A_INT, 12);
3516 power_desc[num++].number = MUT1_MIDAS_TCH;
3519 if (p_ptr->muta1 & MUT1_GROW_MOLD)
3522 strcpy(power_desc[num].name, "¥«¥ÓȯÀ¸");
3524 strcpy(power_desc[num].name, "Grow Mold");
3527 power_desc[num].level = 1;
3528 power_desc[num].cost = 6;
3529 power_desc[num].fail = 100 - racial_chance(1, A_CON, 14);
3530 power_desc[num++].number = MUT1_GROW_MOLD;
3533 if (p_ptr->muta1 & MUT1_RESIST)
3536 strcpy(power_desc[num].name, "¥¨¥ì¥á¥ó¥ÈÂÑÀ");
3538 strcpy(power_desc[num].name, "Resist Elements");
3541 power_desc[num].level = 10;
3542 power_desc[num].cost = 12;
3543 power_desc[num].fail = 100 - racial_chance(10, A_CON, 12);
3544 power_desc[num++].number = MUT1_RESIST;
3547 if (p_ptr->muta1 & MUT1_EARTHQUAKE)
3550 strcpy(power_desc[num].name, "ÃÏ¿Ì");
3552 strcpy(power_desc[num].name, "Earthquake");
3555 power_desc[num].level = 12;
3556 power_desc[num].cost = 12;
3557 power_desc[num].fail = 100 - racial_chance(12, A_STR, 16);
3558 power_desc[num++].number = MUT1_EARTHQUAKE;
3561 if (p_ptr->muta1 & MUT1_EAT_MAGIC)
3564 strcpy(power_desc[num].name, "ËâÎÏ¿©¤¤");
3566 strcpy(power_desc[num].name, "Eat Magic");
3569 power_desc[num].level = 17;
3570 power_desc[num].cost = 1;
3571 power_desc[num].fail = 100 - racial_chance(17, A_WIS, 15);
3572 power_desc[num++].number = MUT1_EAT_MAGIC;
3575 if (p_ptr->muta1 & MUT1_WEIGH_MAG)
3578 strcpy(power_desc[num].name, "ËâÎÏ´¶ÃÎ");
3580 strcpy(power_desc[num].name, "Weigh Magic");
3583 power_desc[num].level = 6;
3584 power_desc[num].cost = 6;
3585 power_desc[num].fail = 100 - racial_chance(6, A_INT, 10);
3586 power_desc[num++].number = MUT1_WEIGH_MAG;
3589 if (p_ptr->muta1 & MUT1_STERILITY)
3592 strcpy(power_desc[num].name, "Áý¿£ÁË»ß");
3594 strcpy(power_desc[num].name, "Sterilize");
3597 power_desc[num].level = 12;
3598 power_desc[num].cost = 23;
3599 power_desc[num].fail = 100 - racial_chance(12, A_CHR, 15);
3600 power_desc[num++].number = MUT1_STERILITY;
3603 if (p_ptr->muta1 & MUT1_PANIC_HIT)
3606 strcpy(power_desc[num].name, "¥Ò¥Ã¥È¡õ¥¢¥¦¥§¥¤");
3608 strcpy(power_desc[num].name, "Panic Hit");
3611 power_desc[num].level = 10;
3612 power_desc[num].cost = 12;
3613 power_desc[num].fail = 100 - racial_chance(10, A_DEX, 14);
3614 power_desc[num++].number = MUT1_PANIC_HIT;
3617 if (p_ptr->muta1 & MUT1_DAZZLE)
3620 strcpy(power_desc[num].name, "âÁÏÇ");
3622 strcpy(power_desc[num].name, "Dazzle");
3625 power_desc[num].level = 7;
3626 power_desc[num].cost = 15;
3627 power_desc[num].fail = 100 - racial_chance(7, A_CHR, 8);
3628 power_desc[num++].number = MUT1_DAZZLE;
3631 if (p_ptr->muta1 & MUT1_LASER_EYE)
3634 strcpy(power_desc[num].name, "¥ì¡¼¥¶¡¼¡¦¥¢¥¤");
3636 strcpy(power_desc[num].name, "Laser Eye");
3639 power_desc[num].level = 7;
3640 power_desc[num].cost = 10;
3641 power_desc[num].fail = 100 - racial_chance(7, A_WIS, 9);
3642 power_desc[num++].number = MUT1_LASER_EYE;
3645 if (p_ptr->muta1 & MUT1_RECALL)
3648 strcpy(power_desc[num].name, "µ¢´Ô");
3650 strcpy(power_desc[num].name, "Recall");
3653 power_desc[num].level = 17;
3654 power_desc[num].cost = 50;
3655 power_desc[num].fail = 100 - racial_chance(17, A_INT, 16);
3656 power_desc[num++].number = MUT1_RECALL;
3659 if (p_ptr->muta1 & MUT1_BANISH)
3662 strcpy(power_desc[num].name, "¼Ù°¾ÃÌÇ");
3664 strcpy(power_desc[num].name, "Banish Evil");
3667 power_desc[num].level = 25;
3668 power_desc[num].cost = 25;
3669 power_desc[num].fail = 100 - racial_chance(25, A_WIS, 18);
3670 power_desc[num++].number = MUT1_BANISH;
3673 if (p_ptr->muta1 & MUT1_COLD_TOUCH)
3676 strcpy(power_desc[num].name, "Åà·ë¤Î¼ê");
3678 strcpy(power_desc[num].name, "Cold Touch");
3681 power_desc[num].level = 2;
3682 power_desc[num].cost = 2;
3683 power_desc[num].fail = 100 - racial_chance(2, A_CON, 11);
3684 power_desc[num++].number = MUT1_COLD_TOUCH;
3687 if (p_ptr->muta1 & MUT1_LAUNCHER)
3690 strcpy(power_desc[num].name, "¥¢¥¤¥Æ¥àÅꤲ");
3692 strcpy(power_desc[num].name, "Throw Object");
3695 power_desc[num].level = 1;
3696 power_desc[num].cost = lvl;
3697 power_desc[num].fail = 100 - racial_chance(1, A_STR, 6);
3698 /* XXX_XXX_XXX Hack! MUT1_LAUNCHER counts as negative... */
3699 power_desc[num++].number = 3;
3703 /* Nothing chosen yet */
3709 /* Build a prompt */
3711 (void) strnfmt(out_val, 78, "(ÆüìǽÎÏ %c-%c, *'¤Ç°ìÍ÷, ESC¤ÇÃæÃÇ) ¤É¤ÎÆüìǽÎϤò»È¤¤¤Þ¤¹¤«¡©",
3713 (void)strnfmt(out_val, 78, "(Powers %c-%c, *=List, ESC=exit) Use which power? ",
3716 I2A(0), (num <= 26) ? I2A(num - 1) : '0' + num - 27);
3719 if (!repeat_pull(&i) || i<0 || i>=num) {
3720 #endif /* ALLOW_REPEAT */
3721 if (use_menu) screen_save();
3722 /* Get a spell from the user */
3724 choice = (always_show_list || use_menu) ? ESCAPE:1;
3727 if( choice==ESCAPE ) choice = ' ';
3728 else if( !get_com(out_val, &choice, FALSE) )break;
3730 if (use_menu && choice != ' ')
3746 menu_line += (num - 1);
3767 else if (menu_line+18 <= num)
3781 if (menu_line > num) menu_line -= num;
3783 /* Request redraw */
3784 if ((choice == ' ') || (choice == '*') || (choice == '?') || (use_menu && ask))
3787 if (!redraw || use_menu)
3800 /* Save the screen */
3801 if (!use_menu) screen_save();
3803 /* Print header(s) */
3806 prt(" Lv MP ¼ºÎ¨", y++, x);
3808 prt(" Lv Cost Fail", y++, x);
3813 prt(" Lv MP ¼ºÎ¨ Lv MP ¼ºÎ¨", y++, x);
3815 prt(" Lv Cost Fail Lv Cost Fail", y++, x);
3822 x1 = ((ctr < 18) ? x : x + 40);
3823 y1 = ((ctr < 18) ? y + ctr : y + ctr - 18);
3828 if (ctr == (menu_line-1)) strcpy(dummy, " ¡Õ ");
3830 if (ctr == (menu_line-1)) strcpy(dummy, " > ");
3832 else strcpy(dummy, " ");
3836 /* letter/number for power selection */
3840 letter = '0' + ctr - 26;
3841 sprintf(dummy, " %c) ",letter);
3843 strcat(dummy, format("%-23.23s %2d %4d %3d%%", power_desc[ctr].name, power_desc[ctr].level, power_desc[ctr].cost, power_desc[ctr].fail));
3855 /* Restore the screen */
3865 if (choice == '\r' && num == 1)
3870 if (isalpha(choice))
3873 ask = (isupper(choice));
3876 if (ask) choice = tolower(choice);
3878 /* Extract request */
3879 i = (islower(choice) ? A2I(choice) : -1);
3883 ask = FALSE; /* Can't uppercase digits */
3885 i = choice - '0' + 26;
3889 /* Totally Illegal */
3890 if ((i < 0) || (i >= num))
3903 (void) strnfmt(tmp_val, 78, "%s¤ò»È¤¤¤Þ¤¹¤«¡© ", power_desc[i].name);
3905 (void)strnfmt(tmp_val, 78, "Use %s? ", power_desc[i].name);
3909 /* Belay that order */
3910 if (!get_check(tmp_val)) continue;
3917 /* Restore the screen */
3918 if (redraw) screen_load();
3920 /* Abort if needed */
3928 } /*if (!repeat_pull(&i) || ...)*/
3929 #endif /* ALLOW_REPEAT */
3930 if (power_desc[i].number < 0)
3932 if (!cmd_racial_power_aux(power_desc[i].number)) energy_use = 0;
3936 mutation_power_aux(power_desc[i].number);
3939 /* Redraw mana and hp */
3940 p_ptr->redraw |= (PR_HP | PR_MANA);
3943 p_ptr->window |= (PW_PLAYER | PW_SPELL);