OSDN Git Service

add mspells4.c in Makefile.am
[hengband/hengband.git] / src / effects.c
index 75534c2..d1233bd 100644 (file)
@@ -1,17 +1,26 @@
-/* File: effects.c */
-
-/*
- * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke
- *
- * This software may be copied and distributed for educational, research,
- * and not for profit purposes provided that this copyright and statement
- * are included in all such copies.  Other copyrights may also apply.
+/*!
+ * @file effects.c
+ * @brief ¥×¥ì¥¤¥ä¡¼¤Î¥¹¥Æ¡¼¥¿¥¹´ÉÍý / effects of various "objects"
+ * @date 2014/01/01
+ * @author
+ * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke\n
+ *\n
+ * This software may be copied and distributed for educational, research,\n
+ * and not for profit purposes provided that this copyright and statement\n
+ * are included in all such copies.  Other copyrights may also apply.\n
+ *\n
+ * 2013 Deskull rearranged comment for Doxygen.\n
  */
 
-/* Purpose: effects of various "objects" */
 
 #include "angband.h"
 
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤Î·Ñ³¹ÔÆ°¤òÀßÄꤹ¤ë¡£
+ * @param typ ·Ñ³¹ÔÆ°¤ÎID\n
+ * #ACTION_NONE / #ACTION_SEARCH / #ACTION_REST / #ACTION_LEARN / #ACTION_FISH / #ACTION_KAMAE / #ACTION_KATA / #ACTION_SING / #ACTION_HAYAGAKE / #ACTION_SPELL ¤«¤éÁªÂò¡£
+ * @return ¤Ê¤·
+ */
 void set_action(int typ)
 {
        int prev_typ = p_ptr->action;
@@ -87,6 +96,7 @@ void set_action(int typ)
 #else
                                msg_print("You are no longer walking extremely fast.");
 #endif
+                               energy_use = 100;
                                break;
                        }
                        case ACTION_SPELL:
@@ -105,6 +115,7 @@ void set_action(int typ)
 
        /* If we are requested other action, stop singing */
        if (prev_typ == ACTION_SING) stop_singing();
+       if (prev_typ == ACTION_SPELL) stop_hex_spell();
 
        switch (p_ptr->action)
        {
@@ -158,7 +169,10 @@ void set_action(int typ)
        p_ptr->redraw |= (PR_STATE);
 }
 
-/* reset timed flags */
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤ÎÁ´¤Æ¤Î»þ¸Â¸ú²Ì¤ò¥ê¥»¥Ã¥È¤¹¤ë¡£ / reset timed flags
+ * @return ¤Ê¤·
+ */
 void reset_tim_flags(void)
 {
        p_ptr->fast = 0;            /* Timed -- Fast */
@@ -241,7 +255,10 @@ void reset_tim_flags(void)
        }
 }
 
-
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤ËËâÎϾõî¸ú²Ì¤òÍ¿¤¨¤ë¡£
+ * @return ¤Ê¤·
+ */
 void dispel_player(void)
 {
        (void)set_fast(0, TRUE);
@@ -329,9 +346,12 @@ void dispel_player(void)
 }
 
 
-/*
- * Set "p_ptr->tim_mimic", and "p_ptr->mimic_form",
- * notice observable changes
+/*!
+ * @brief Êѿȸú²Ì¤Î·Ñ³»þ´Ö¤ÈÊÑ¿ÈÀè¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_mimic", and "p_ptr->mimic_form", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param p ÊÑ¿ÈÆâÍÆ
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_mimic(int v, int p, bool do_dec)
 {
@@ -386,8 +406,7 @@ bool set_mimic(int v, int p, bool do_dec)
                return (FALSE);
 
        /* Disturb */
-       if (disturb_state)
-               disturb(0, 0);
+       if (disturb_state) disturb(0, 1);
 
        /* Redraw title */
        p_ptr->redraw |= (PR_BASIC | PR_STATUS);
@@ -401,13 +420,15 @@ bool set_mimic(int v, int p, bool do_dec)
        return (TRUE);
 }
 
-/*
- * Set "p_ptr->blind", notice observable changes
- *
- * Note the use of "PU_UN_LITE" and "PU_UN_VIEW", which is needed to
- * memorize any terrain features which suddenly become "visible".
- * Note that blindness is currently the only thing which can affect
- * "player_can_see_bold()".
+/*!
+ * @brief ÌÕÌܤηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->blind", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
+ * Note the use of "PU_UN_LITE" and "PU_UN_VIEW", which is needed to\n
+ * memorize any terrain features which suddenly become "visible".\n
+ * Note that blindness is currently the only thing which can affect\n
+ * "player_can_see_bold()".\n
  */
 bool set_blind(int v)
 {
@@ -500,8 +521,10 @@ msg_print("
 }
 
 
-/*
- * Set "p_ptr->confused", notice observable changes
+/*!
+ * @brief º®Íð¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->confused", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_confused(int v)
 {
@@ -610,8 +633,10 @@ msg_print("
 }
 
 
-/*
- * Set "p_ptr->poisoned", notice observable changes
+/*!
+ * @brief ÆǤηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->poisoned", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_poisoned(int v)
 {
@@ -672,8 +697,10 @@ msg_print("
 }
 
 
-/*
- * Set "p_ptr->afraid", notice observable changes
+/*!
+ * @brief ¶²Éݤηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->afraid", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_afraid(int v)
 {
@@ -750,9 +777,10 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->paralyzed", notice observable changes
+/*!
+ * @brief Ëãáã¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->paralyzed", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_paralyzed(int v)
 {
@@ -822,11 +850,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->image", notice observable changes
- *
- * Note that we must redraw the map when hallucination changes.
+/*!
+ * @brief ¸¸³Ð¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->image", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details Note that we must redraw the map when hallucination changes.
  */
 bool set_image(int v)
 {
@@ -883,7 +911,7 @@ msg_print("
        if (!notice) return (FALSE);
 
        /* Disturb */
-       if (disturb_state) disturb(0, 0);
+       if (disturb_state) disturb(0, 1);
 
        /* Redraw map */
        p_ptr->redraw |= (PR_MAP);
@@ -904,9 +932,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->fast", notice observable changes
+/*!
+ * @brief ²Ã®¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->fast", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_fast(int v, bool do_dec)
 {
@@ -972,9 +1002,11 @@ msg_print("ư
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->lightspeed", notice observable changes
+/*!
+ * @brief ¸÷®°ÜÆ°¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->lightspeed", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_lightspeed(int v, bool do_dec)
 {
@@ -985,6 +1017,8 @@ bool set_lightspeed(int v, bool do_dec)
 
        if (p_ptr->is_dead) return FALSE;
 
+       if (p_ptr->wild_mode) v = 0;
+
        /* Open */
        if (v)
        {
@@ -1040,9 +1074,11 @@ msg_print("ư
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->slow", notice observable changes
+/*!
+ * @brief ¸ºÂ®¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->slow", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_slow(int v, bool do_dec)
 {
@@ -1107,8 +1143,11 @@ msg_print("ư
 }
 
 
-/*
- * Set "p_ptr->shield", notice observable changes
+/*!
+ * @brief È©Àв½¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->shield", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_shield(int v, bool do_dec)
 {
@@ -1176,9 +1215,11 @@ msg_print("ȩ
 }
 
 
-
-/*
- * Set "p_ptr->tsubureru", notice observable changes
+/*!
+ * @brief ¤Ä¤Ö¤ì¤ë¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tsubureru", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tsubureru(int v, bool do_dec)
 {
@@ -1246,9 +1287,11 @@ msg_print("
 }
 
 
-
-/*
- * Set "p_ptr->magicdef", notice observable changes
+/*!
+ * @brief ËâË¡¤Î³»¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->magicdef", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_magicdef(int v, bool do_dec)
 {
@@ -1315,10 +1358,11 @@ bool set_magicdef(int v, bool do_dec)
        return (TRUE);
 }
 
-
-
-/*
- * Set "p_ptr->blessed", notice observable changes
+/*!
+ * @brief ½ËÊ¡¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->blessed", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_blessed(int v, bool do_dec)
 {
@@ -1386,8 +1430,11 @@ msg_print("
 }
 
 
-/*
- * Set "p_ptr->hero", notice observable changes
+/*!
+ * @brief »Îµ¤¹âÍȤηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->hero", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_hero(int v, bool do_dec)
 {
@@ -1457,9 +1504,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->shero", notice observable changes
+/*!
+ * @brief ¶¸Àï»Î²½¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->shero", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_shero(int v, bool do_dec)
 {
@@ -1530,9 +1579,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->protevil", notice observable changes
+/*!
+ * @brief Âмٰ­·ë³¦¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->protevil", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_protevil(int v, bool do_dec)
 {
@@ -1596,8 +1647,11 @@ msg_print("
        return (TRUE);
 }
 
-/*
- * Set "p_ptr->wraith_form", notice observable changes
+/*!
+ * @brief Í©Âβ½¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->wraith_form", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_wraith_form(int v, bool do_dec)
 {
@@ -1688,9 +1742,11 @@ msg_print("
 
 }
 
-
-/*
- * Set "p_ptr->invuln", notice observable changes
+/*!
+ * @brief Ìµ½ýµå¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->invuln", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_invuln(int v, bool do_dec)
 {
@@ -1782,9 +1838,11 @@ msg_print("̵Ũ
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_esp", notice observable changes
+/*!
+ * @brief »þ¸ÂESP¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_esp", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_esp(int v, bool do_dec)
 {
@@ -1854,9 +1912,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_invis", notice observable changes
+/*!
+ * @brief »þ¸ÂÆ©ÌÀ»ë¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_invis", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_invis(int v, bool do_dec)
 {
@@ -1926,9 +1986,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_infra", notice observable changes
+/*!
+ * @brief »þ¸ÂÀÖ³°Àþ»ëÎϤηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_infra", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_infra(int v, bool do_dec)
 {
@@ -1998,9 +2060,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_regen", notice observable changes
+/*!
+ * @brief »þ¸ÂµÞ²óÉü¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_regen", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_regen(int v, bool do_dec)
 {
@@ -2067,9 +2131,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_stealth", notice observable changes
+/*!
+ * @brief ±£Ì©¤Î²Î¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_stealth", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_stealth(int v, bool do_dec)
 {
@@ -2136,7 +2202,11 @@ msg_print("­
        return (TRUE);
 }
 
-
+/*!
+ * @brief Ä¶±£Ì©¾õÂÖ¤ò¥»¥Ã¥È¤¹¤ë
+ * @param set TRUE¤Ê¤é¤ÐĶ±£Ì©¾õÂ֤ˤʤ롣
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ */
 bool set_superstealth(bool set)
 {
        bool notice = FALSE;
@@ -2205,9 +2275,11 @@ bool set_superstealth(bool set)
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_levitation", notice observable changes
+/*!
+ * @brief °ì»þŪÉâÍ·¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_levitation", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_levitation(int v, bool do_dec)
 {
@@ -2274,9 +2346,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_sh_touki", notice observable changes
+/*!
+ * @brief °ì»þŪƮµ¤¤Î¥ª¡¼¥é¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_sh_touki", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_sh_touki(int v, bool do_dec)
 {
@@ -2340,9 +2414,11 @@ msg_print("Ʈ
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_sh_fire", notice observable changes
+/*!
+ * @brief °ì»þŪ²Ð±ê¤Î¥ª¡¼¥é¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_sh_fire", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_sh_fire(int v, bool do_dec)
 {
@@ -2409,9 +2485,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_sh_holy", notice observable changes
+/*!
+ * @brief °ì»þŪÀ»¤Ê¤ë¤Î¥ª¡¼¥é¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_sh_holy", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_sh_holy(int v, bool do_dec)
 {
@@ -2478,10 +2556,11 @@ msg_print("
        return (TRUE);
 }
 
-
-
-/*
- * Set "p_ptr->tim_eyeeye", notice observable changes
+/*!
+ * @brief ÌܤˤÏÌܤò¤Î»Ä¤ê»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_eyeeye", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_eyeeye(int v, bool do_dec)
 {
@@ -2549,9 +2628,11 @@ msg_print("Ĩȳ
 }
 
 
-
-/*
- * Set "p_ptr->resist_magic", notice observable changes
+/*!
+ * @brief °ì»þŪËâË¡Ëɸæ¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->resist_magic", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_resist_magic(int v, bool do_dec)
 {
@@ -2618,9 +2699,11 @@ msg_print("You are no longer protected from magic.");
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_reflect", notice observable changes
+/*!
+ * @brief °ì»þŪȿ¼Í¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tim_reflect", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_tim_reflect(int v, bool do_dec)
 {
@@ -2756,9 +2839,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->dustrobe", notice observable changes
+/*!
+ * @brief °ì»þŪÇËÊҤΥª¡¼¥é¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->dustrobe", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_dustrobe(int v, bool do_dec)
 {
@@ -2825,9 +2910,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->tim_regen", notice observable changes
+/*!
+ * @brief °ì»þŪÊÉÈ´¤±¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->kabenuke", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_kabenuke(int v, bool do_dec)
 {
@@ -2894,7 +2981,12 @@ msg_print("
        return (TRUE);
 }
 
-
+/*!
+ * @brief ¥ª¥¯¥ì·»¤µ¤ó¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->tsuyoshi", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ */
 bool set_tsuyoshi(int v, bool do_dec)
 {
        bool notice = FALSE;
@@ -2968,10 +3060,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set a temporary elemental brand.  Clear all other brands.  Print status 
- * messages. -LM-
+/*!
+ * @brief °ì»þŪ¸µÁÇ¥¹¥ì¥¤¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set a temporary elemental brand. Clear all other brands. Print status messages. -LM-
+ * @param attack_type ¥¹¥ì¥¤¤Î¥¿¥¤¥×ID
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_ele_attack(u32b attack_type, int v)
 {
@@ -3067,10 +3160,11 @@ bool set_ele_attack(u32b attack_type, int v)
        return (TRUE);
 }
 
-
-/*
- * Set a temporary elemental brand.  Clear all other brands.  Print status 
- * messages. -LM-
+/*!
+ * @brief °ì»þŪ¸µÁÇÌȱ֤ηѳ»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set a temporary elemental brand.  Clear all other brands.  Print status messages. -LM-
+ * @param immune_type Ìȱ֤Υ¿¥¤¥×ID
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_ele_immune(u32b immune_type, int v)
 {
@@ -3166,9 +3260,11 @@ bool set_ele_immune(u32b immune_type, int v)
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->oppose_acid", notice observable changes
+/*!
+ * @brief °ì»þŪ»ÀÂÑÀ­¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->oppose_acid", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_oppose_acid(int v, bool do_dec)
 {
@@ -3232,9 +3328,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->oppose_elec", notice observable changes
+/*!
+ * @brief °ì»þŪÅÅ·âÂÑÀ­¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->oppose_elec", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_oppose_elec(int v, bool do_dec)
 {
@@ -3298,9 +3396,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->oppose_fire", notice observable changes
+/*!
+ * @brief °ì»þŪ²Ð±êÂÑÀ­¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->oppose_fire", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_oppose_fire(int v, bool do_dec)
 {
@@ -3365,9 +3465,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->oppose_cold", notice observable changes
+/*!
+ * @brief °ì»þŪÎ䵤ÂÑÀ­¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->oppose_cold", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_oppose_cold(int v, bool do_dec)
 {
@@ -3431,9 +3533,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->oppose_pois", notice observable changes
+/*!
+ * @brief °ì»þŪÆÇÂÑÀ­¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->oppose_pois", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @param do_dec ¸½ºß¤Î·Ñ³»þ´Ö¤è¤êŤ¤ÃͤΤ߾å½ñ¤­¤¹¤ë
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool set_oppose_pois(int v, bool do_dec)
 {
@@ -3498,10 +3602,11 @@ msg_print("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->stun", notice observable changes
- *
+/*!
+ * @brief Û¯Û°¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->stun", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
  * Note the special code to only notice "range" changes.
  */
 bool set_stun(int v)
@@ -3694,9 +3799,11 @@ msg_print("
 }
 
 
-/*
- * Set "p_ptr->cut", notice observable changes
- *
+/*!
+ * @brief ½Ð·ì¤Î·Ñ³»þ´Ö¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->cut", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
  * Note the special code to only notice "range" changes.
  */
 bool set_cut(int v)
@@ -3952,28 +4059,31 @@ msg_format("
        return (TRUE);
 }
 
-
-/*
- * Set "p_ptr->food", notice observable changes
- *
+/*!
+ * @brief ¶õÊ¢¾õÂÖ¤ò¥»¥Ã¥È¤¹¤ë / Set "p_ptr->food", notice observable changes
+ * @param v ·Ñ³»þ´Ö
+ * @return ¥¹¥Æ¡¼¥¿¥¹¤Ë±Æ¶Á¤òµÚ¤Ü¤¹ÊѲ½¤¬¤¢¤Ã¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
+ * Set "", notice observable changes\n
+ *\n
  * The "p_ptr->food" variable can get as large as 20000, allowing the
  * addition of the most "filling" item, Elvish Waybread, which adds
- * 7500 food units, without overflowing the 32767 maximum limit.
- *
+ * 7500 food units, without overflowing the 32767 maximum limit.\n
+ *\n
  * Perhaps we should disturb the player with various messages,
- * especially messages about hunger status changes.  XXX XXX XXX
- *
+ * especially messages about hunger status changes.  XXX XXX XXX\n
+ *\n
  * Digestion of food is handled in "dungeon.c", in which, normally,
  * the player digests about 20 food units per 100 game turns, more
  * when "fast", more when "regenerating", less with "slow digestion",
  * but when the player is "gorged", he digests 100 food units per 10
- * game turns, or a full 1000 food units per 100 game turns.
- *
+ * game turns, or a full 1000 food units per 100 game turns.\n
+ *\n
  * Note that the player's speed is reduced by 10 units while gorged,
  * so if the player eats a single food ration (5000 food units) when
  * full (15000 food units), he will be gorged for (5000/100)*10 = 500
  * game turns, or 500/(100/5) = 25 player turns (if nothing else is
- * affecting the player speed).
+ * affecting the player speed).\n
  */
 bool set_food(int v)
 {
@@ -4217,11 +4327,13 @@ msg_print("
        return (TRUE);
 }
 
-/*
- * Increases a stat by one randomized level             -RAK-
- *
- * Note that this function (used by stat potions) now restores
- * the stat BEFORE increasing it.
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤Î´ðËÜǽÎÏÃͤòÁý²Ã¤µ¤»¤ë / Increases a stat by one randomized level -RAK-
+ * @param stat ¾å¾º¤µ¤»¤ë¥¹¥Æ¡¼¥¿¥¹ID
+ * @return ¼ÂºÝ¤Ë¾å¾º¤·¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
+ * Note that this function (used by stat potions) now restores\n
+ * the stat BEFORE increasing it.\n
  */
 bool inc_stat(int stat)
 {
@@ -4282,19 +4394,22 @@ bool inc_stat(int stat)
        return (FALSE);
 }
 
-
-
-/*
- * Decreases a stat by an amount indended to vary from 0 to 100 percent.
- *
- * Amount could be a little higher in extreme cases to mangle very high
- * stats from massive assaults.  -CWS
- *
- * Note that "permanent" means that the *given* amount is permanent,
- * not that the new value becomes permanent.  This may not work exactly
- * as expected, due to "weirdness" in the algorithm, but in general,
- * if your stat is already drained, the "max" value will not drop all
- * the way down to the "cur" value.
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤Î´ðËÜǽÎÏÃͤò¸º¾¯¤µ¤»¤ë / Decreases a stat by an amount indended to vary from 0 to 100 percent.
+ * @param stat ¸º¾¯¤µ¤»¤ë¥¹¥Æ¡¼¥¿¥¹ID
+ * @param amount ¸º¾¯¤µ¤»¤ë´ðËÜÎÌ
+ * @param permanent TRUE¤Ê¤é¤Ð¸½ºß¤ÎºÇÂçÃͤò¸º¾¯¤µ¤»¤ë
+ * @return ¼ÂºÝ¤Ë¸º¾¯¤·¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
+ * @details
+ *\n
+ * Amount could be a little higher in extreme cases to mangle very high\n
+ * stats from massive assaults.  -CWS\n
+ *\n
+ * Note that "permanent" means that the *given* amount is permanent,\n
+ * not that the new value becomes permanent.  This may not work exactly\n
+ * as expected, due to "weirdness" in the algorithm, but in general,\n
+ * if your stat is already drained, the "max" value will not drop all\n
+ * the way down to the "cur" value.\n
  */
 bool dec_stat(int stat, int amount, int permanent)
 {
@@ -4410,8 +4525,10 @@ bool dec_stat(int stat, int amount, int permanent)
 }
 
 
-/*
- * Restore a stat.  Return TRUE only if this actually makes a difference.
+/*!
+ * @brief ¥×¥ì¥¤¥ä¡¼¤Î´ðËÜǽÎÏÃͤò²óÉü¤µ¤»¤ë / Restore a stat.  Return TRUE only if this actually makes a difference.
+ * @param stat ²óÉü¥¹¥Æ¡¼¥¿¥¹ID
+ * @return ¼ÂºÝ¤Ë²óÉü¤·¤¿¾ì¹çTRUE¤òÊÖ¤¹¡£
  */
 bool res_stat(int stat)
 {
@@ -4736,9 +4853,9 @@ bool restore_level(void)
        {
                /* Message */
 #ifdef JP
-msg_print("À¸Ì¿ÎϤ¬Ìá¤Ã¤Æ¤­¤¿µ¤¤¬¤¹¤ë¡£");
+msg_print("·Ð¸³Ãͤ¬Ìá¤Ã¤Æ¤­¤¿µ¤¤¬¤¹¤ë¡£");
 #else
-               msg_print("You feel your life energies returning.");
+               msg_print("You feel your experience returning.");
 #endif
 
 
@@ -4924,7 +5041,7 @@ msg_print("
        if ((power > randint0(20)) && one_in_(3) && (p_ptr->prace != RACE_ANDROID))
        {
                char effect_msg[80] = "";
-               int new_race, expfact, goalexpfact;
+               int new_race;
 
                /* Some form of racial polymorph... */
                power -= 10;
@@ -5015,21 +5132,11 @@ msg_print("
 
                }
 
-               /*
-                * Restrict the race choices by exp penalty so
-                * weak polymorph always means weak race
-                */
-               if (power < 0)
-                       goalexpfact = 100;
-               else
-                       goalexpfact = 100 + 3 * randint0(power);
-
                do
                {
                        new_race = randint0(MAX_RACES);
-                       expfact = race_info[new_race].r_exp;
                }
-               while (((new_race == p_ptr->prace) && (expfact > goalexpfact)) || (new_race == RACE_ANDROID));
+               while ((new_race == p_ptr->prace) || (new_race == RACE_ANDROID));
 
                change_race(new_race, effect_msg);
        }
@@ -5125,7 +5232,7 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
        if (damage_type != DAMAGE_USELIFE)
        {
                /* Disturb */
-               disturb(1, 0);
+               disturb(1, 1);
                if (auto_more)
                {
                        now_damaged = TRUE;
@@ -5220,8 +5327,6 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
        /* Window stuff */
        p_ptr->window |= (PW_PLAYER);
 
-       handle_stuff();
-
        if (damage_type != DAMAGE_GENO && p_ptr->chp == 0)
        {
                chg_virtue(V_SACRIFICE, 1);
@@ -5243,6 +5348,8 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
 
                chg_virtue(V_SACRIFICE, 10);
 
+               handle_stuff();
+
                /* Leaving */
                p_ptr->leaving = TRUE;
 
@@ -5266,6 +5373,8 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
                        bool seppuku = streq(hit_from, "Seppuku");
                        bool winning_seppuku = p_ptr->total_winner && seppuku;
 
+                       play_music(TERM_XTRA_MUSIC_BASIC, MUSIC_BASIC_GAMEOVER);
+
 #ifdef WORLD_SCORE
                        /* Make screen dump */
                        screen_dump = make_screen_dump();
@@ -5303,7 +5412,7 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
                        }
                        else
                        {
-                               char buf[10];
+                               char buf[20];
 
                                if (p_ptr->inside_arena)
 #ifdef JP
@@ -5480,6 +5589,8 @@ int take_hit(int damage_type, int damage, cptr hit_from, int monspell)
                return damage;
        }
 
+       handle_stuff();
+
        /* Hitpoint warning */
        if (p_ptr->chp < warning)
        {
@@ -5681,38 +5792,38 @@ void lose_exp(s32b amount)
  * Drain experience
  * If resisted to draining, return FALSE
  */
-bool drain_exp(s32b drain, s32b slip, int hold_life_prob)
+bool drain_exp(s32b drain, s32b slip, int hold_exp_prob)
 {
        /* Androids and their mimics are never drained */
        if (p_ptr->prace == RACE_ANDROID) return FALSE;
 
-       if (p_ptr->hold_life && (randint0(100) < hold_life_prob))
+       if (p_ptr->hold_exp && (randint0(100) < hold_exp_prob))
        {
                /* Hold experience */
 #ifdef JP
-               msg_print("¤·¤«¤·¼«¸Ê¤ÎÀ¸Ì¿ÎϤò¼é¤ê¤­¤Ã¤¿¡ª");
+               msg_print("¤·¤«¤·¼«¸Ê¤Î·Ð¸³Ãͤò¼é¤ê¤­¤Ã¤¿¡ª");
 #else
-               msg_print("You keep hold of your life force!");
+               msg_print("You keep hold of your experience!");
 #endif
                return FALSE;
        }
 
        /* Hold experience failed */
-       if (p_ptr->hold_life)
+       if (p_ptr->hold_exp)
        {
 #ifdef JP
-               msg_print("À¸Ì¿ÎϤò¾¯¤·µÛ¤¤¼è¤é¤ì¤¿µ¤¤¬¤¹¤ë¡ª");
+               msg_print("·Ð¸³Ãͤò¾¯¤·µÛ¤¤¼è¤é¤ì¤¿µ¤¤¬¤¹¤ë¡ª");
 #else
-               msg_print("You feel your life slipping away!");
+               msg_print("You feel your experience slipping away!");
 #endif
                lose_exp(slip);
        }
        else
        {
 #ifdef JP
-               msg_print("À¸Ì¿ÎϤ¬ÂΤ«¤éµÛ¤¤¼è¤é¤ì¤¿µ¤¤¬¤¹¤ë¡ª");
+               msg_print("·Ð¸³Ãͤ¬ÂΤ«¤éµÛ¤¤¼è¤é¤ì¤¿µ¤¤¬¤¹¤ë¡ª");
 #else
-               msg_print("You feel your life draining away!");
+               msg_print("You feel your experience draining away!");
 #endif
                lose_exp(drain);
        }