OSDN Git Service

[Refactor] #37353 後で同名の構造体を作り、feat_*と命名を一致させるため floor_type を feat_ground_type に改名...
[hengband/hengband.git] / src / wild.c
index 7847f4c..08dacb9 100644 (file)
@@ -1,6 +1,6 @@
-/*!
+/*!
  * @file wild.c
- * @brief ¹ÓÌî¥Þ¥Ã¥×¤ÎÀ¸À®¤È¥ë¡¼¥ë´ÉÍý / Wilderness generation
+ * @brief 荒野マップの生成とルール管理 / Wilderness generation
  * @date 2014/02/13
  * @author
  * Copyright (c) 1989 James E. Wilson, Robert A. Koeneke\n
  */
 
 #include "angband.h"
+#include "world.h"
+#include "monster.h"
+#include "realm-hex.h"
+#include "player-status.h"
 
 /*!
- * @brief ÃÏ·ÁÀ¸À®³ÎΨ¤ò·è¤á¤ëÍ×ÁÇ100¤ÎÇÛÎó¤ò³ÎΨ¥Æ¡¼¥Ö¥ë¤«¤éºîÀ®¤¹¤ë
- * @param feat_type Èó°ìÍͳÎΨ¤òºÆ¸½¤¹¤ë¤¿¤á¤ÎÍ×ÁÇ¿ô100¤ÎÇÛÎó
- * @param prob ¸µ¤Î³ÎΨ¥Æ¡¼¥Ö¥ë
- * @return ¤Ê¤·
+ * @brief 地形生成確率を決める要素100の配列を確率テーブルから作成する
+ * @param feat_type 非一様確率を再現するための要素数100の配列
+ * @param prob 元の確率テーブル
+ * @return なし
  */
 static void set_floor_and_wall_aux(s16b feat_type[100], feat_prob prob[DUNGEON_FEAT_PROB_NUM])
 {
@@ -36,14 +40,14 @@ static void set_floor_and_wall_aux(s16b feat_type[100], feat_prob prob[DUNGEON_F
 }
 
 /*!
- * @brief ¥À¥ó¥¸¥ç¥ó¤ÎÃÏ·Á¤ò»ØÄê³ÎΨ¤Ë±þ¤¸¤Æ³Æ¥Þ¥¹¤Ø¥é¥ó¥À¥à¤ËÉߤ­µÍ¤á¤ë
+ * @brief ダンジョンの地形を指定確率に応じて各マスへランダムに敷き詰める
  * / Fill the arrays of floors and walls in the good proportions
- * @param type ¥À¥ó¥¸¥ç¥óID
- * @return ¤Ê¤·
+ * @param type ダンジョンID
+ * @return なし
  */
-void set_floor_and_wall(byte type)
+void set_floor_and_wall(DUNGEON_IDX type)
 {
-       static byte cur_type = 255;
+       DUNGEON_IDX cur_type = 255;
        dungeon_info_type *d_ptr;
 
        /* Already filled */
@@ -52,7 +56,7 @@ void set_floor_and_wall(byte type)
        cur_type = type;
        d_ptr = &d_info[type];
 
-       set_floor_and_wall_aux(floor_type, d_ptr->floor);
+       set_floor_and_wall_aux(feat_ground_type, d_ptr->floor);
        set_floor_and_wall_aux(fill_type, d_ptr->fill);
 
        feat_wall_outer = d_ptr->outer_wall;
@@ -62,29 +66,28 @@ void set_floor_and_wall(byte type)
 
 
 /*!
- * @brief ¥×¥é¥º¥Þ¥Õ¥é¥¯¥¿¥ëŪÃÏ·ÁÀ¸À®¤ÎºÆµ¢Ãæ´Ö½èÍý
+ * @brief プラズマフラクタル的地形生成の再帰中間処理
  * / Helper for plasma generation.
- * @param x1 º¸¾åü¤Î¿¼¤ß
- * @param x2 ±¦¾åü¤Î¿¼¤ß
- * @param x3 º¸²¼Ã¼¤Î¿¼¤ß
- * @param x4 ±¦²¼Ã¼¤Î¿¼¤ß
- * @param xmid Ãæ±ûºÂɸX
- * @param ymid Ãæ±ûºÂɸY
- * @param rough ¥é¥ó¥À¥àÉý
- * @param depth_max ¿¼¤ß¤ÎºÇÂçÃÍ
- * @return ¤Ê¤·
+ * @param x1 左上端の深み
+ * @param x2 右上端の深み
+ * @param x3 左下端の深み
+ * @param x4 右下端の深み
+ * @param xmid 中央座標X
+ * @param ymid 中央座標Y
+ * @param rough ランダム幅
+ * @param depth_max 深みの最大値
+ * @return なし
  */
-static void perturb_point_mid(int x1, int x2, int x3, int x4,
-                         int xmid, int ymid, int rough, int depth_max)
+static void perturb_point_mid(FEAT_IDX x1, FEAT_IDX x2, FEAT_IDX x3, FEAT_IDX x4, POSITION xmid, POSITION ymid, FEAT_IDX rough, FEAT_IDX depth_max)
 {
        /*
         * Average the four corners & perturb it a bit.
         * tmp is a random int +/- rough
         */
-       int tmp2 = rough*2 + 1;
-       int tmp = randint1(tmp2) - (rough + 1);
+       FEAT_IDX tmp2 = rough*2 + 1;
+       FEAT_IDX tmp = randint1(tmp2) - (rough + 1);
 
-       int avg = ((x1 + x2 + x3 + x4) / 4) + tmp;
+       FEAT_IDX avg = ((x1 + x2 + x3 + x4) / 4) + tmp;
 
        /* Division always rounds down, so we round up again */
        if (((x1 + x2 + x3 + x4) % 4) > 1)
@@ -95,33 +98,32 @@ static void perturb_point_mid(int x1, int x2, int x3, int x4,
        if (avg > depth_max) avg = depth_max;
 
        /* Set the new value. */
-       cave[ymid][xmid].feat = avg;
+       cave[ymid][xmid].feat = (FEAT_IDX)avg;
 }
 
 
 /*!
- * @brief ¥×¥é¥º¥Þ¥Õ¥é¥¯¥¿¥ëŪÃÏ·ÁÀ¸À®¤ÎºÆµ¢Ëöü½èÍý
+ * @brief プラズマフラクタル的地形生成の再帰末端処理
  * / Helper for plasma generation.
- * @param x1 Ãæ´ÖËöüÉô1¤Î½Å¤ß
- * @param x2 Ãæ´ÖËöüÉô2¤Î½Å¤ß
- * @param x3 Ãæ´ÖËöüÉô3¤Î½Å¤ß
- * @param xmid ºÇ½ªËöüÉôºÂɸX
- * @param ymid ºÇ½ªËöüÉôºÂɸY
- * @param rough ¥é¥ó¥À¥àÉý
- * @param depth_max ¿¼¤ß¤ÎºÇÂçÃÍ
- * @return ¤Ê¤·
+ * @param x1 中間末端部1の重み
+ * @param x2 中間末端部2の重み
+ * @param x3 中間末端部3の重み
+ * @param xmid 最終末端部座標X
+ * @param ymid 最終末端部座標Y
+ * @param rough ランダム幅
+ * @param depth_max 深みの最大値
+ * @return なし
  */
-static void perturb_point_end(int x1, int x2, int x3,
-                         int xmid, int ymid, int rough, int depth_max)
+static void perturb_point_end(FEAT_IDX x1, FEAT_IDX x2, FEAT_IDX x3, POSITION xmid, POSITION ymid, FEAT_IDX rough, FEAT_IDX depth_max)
 {
        /*
         * Average the three corners & perturb it a bit.
         * tmp is a random int +/- rough
         */
-       int tmp2 = rough * 2 + 1;
-       int tmp = randint0(tmp2) - rough;
+       FEAT_IDX tmp2 = rough * 2 + 1;
+       FEAT_IDX tmp = randint0(tmp2) - rough;
 
-       int avg = ((x1 + x2 + x3) / 3) + tmp;
+       FEAT_IDX avg = ((x1 + x2 + x3) / 3) + tmp;
 
        /* Division always rounds down, so we round up again */
        if ((x1 + x2 + x3) % 3) avg++;
@@ -131,20 +133,20 @@ static void perturb_point_end(int x1, int x2, int x3,
        if (avg > depth_max) avg = depth_max;
 
        /* Set the new value. */
-       cave[ymid][xmid].feat = avg;
+       cave[ymid][xmid].feat = (FEAT_IDX)avg;
 }
 
 
 /*!
- * @brief ¥×¥é¥º¥Þ¥Õ¥é¥¯¥¿¥ëŪÃÏ·ÁÀ¸À®¤Î³«»Ï½èÍý
+ * @brief プラズマフラクタル的地形生成の開始処理
  * / Helper for plasma generation.
- * @param x1 ½èÍýÈϰϤκ¸¾åXºÂɸ
- * @param y1 ½èÍýÈϰϤκ¸¾åYºÂɸ
- * @param x2 ½èÍýÈϰϤᦲ¼XºÂɸ
- * @param y2 ½èÍýÈϰϤᦲ¼YºÂɸ
- * @param depth_max ¿¼¤ß¤ÎºÇÂçÃÍ
- * @param rough ¥é¥ó¥À¥àÉý
- * @return ¤Ê¤·
+ * @param x1 処理範囲の左上X座標
+ * @param y1 処理範囲の左上Y座標
+ * @param x2 処理範囲の右下X座標
+ * @param y2 処理範囲の右下Y座標
+ * @param depth_max 深みの最大値
+ * @param rough ランダム幅
+ * @return なし
  * @details
  * <pre>
  * A generic function to generate the plasma fractal.
@@ -154,12 +156,11 @@ static void perturb_point_end(int x1, int x2, int x3,
  * need to be converted to features.
  * </pre>
  */
-static void plasma_recursive(int x1, int y1, int x2, int y2,
-                            int depth_max, int rough)
+static void plasma_recursive(POSITION x1, POSITION y1, POSITION x2, POSITION y2, FEAT_IDX depth_max, FEAT_IDX rough)
 {
        /* Find middle */
-       int xmid = (x2 - x1) / 2 + x1;
-       int ymid = (y2 - y1) / 2 + y1;
+       POSITION xmid = (x2 - x1) / 2 + x1;
+       POSITION ymid = (y2 - y1) / 2 + y1;
 
        /* Are we done? */
        if (x1 + 1 == x2) return;
@@ -196,18 +197,18 @@ static void plasma_recursive(int x1, int y1, int x2, int y2,
 static s16b terrain_table[MAX_WILDERNESS][MAX_FEAT_IN_TERRAIN];
 
 /*!
- * @brief ¹ÓÌî¥Õ¥í¥¢À¸À®¤Î¥µ¥Ö¥ë¡¼¥Á¥ó
- * @param terrain ¹ÓÌîÃÏ·ÁID
- * @param seed Íð¿ô¤Î¸ÇÄꥷ¡¼¥É
- * @param border Ì¤»ÈÍÑ
- * @param corner ¹­°è¥Þ¥Ã¥×¤Î³ÑÉôʬ¤È¤·¤Æ¤ÎÀ¸À®¤Ê¤é¤ÐTRUE
- * @return ¤Ê¤·
+ * @brief 荒野フロア生成のサブルーチン
+ * @param terrain 荒野地形ID
+ * @param seed 乱数の固定シード
+ * @param border 未使用
+ * @param corner 広域マップの角部分としての生成ならばTRUE
+ * @return なし
  */
 static void generate_wilderness_area(int terrain, u32b seed, bool border, bool corner)
 {
-       int x1, y1;
+       POSITION x1, y1;
        int table_size = sizeof(terrain_table[0]) / sizeof(s16b);
-       int roughness = 1; /* The roughness of the level. */
+       FEAT_IDX roughness = 1; /* The roughness of the level. */
        u32b state_backup[4];
 
        /* Unused */
@@ -234,7 +235,7 @@ static void generate_wilderness_area(int terrain, u32b seed, bool border, bool c
        Rand_state_backup(state_backup);
 
        /* Hack -- Induce consistant flavors */
-       Rand_state_init(seed);
+       Rand_state_set(seed);
 
        if (!corner)
        {
@@ -253,10 +254,10 @@ static void generate_wilderness_area(int terrain, u32b seed, bool border, bool c
         * ToDo: calculate the medium height of the adjacent
         * terrains for every corner.
         */
-       cave[1][1].feat = randint0(table_size);
-       cave[MAX_HGT-2][1].feat = randint0(table_size);
-       cave[1][MAX_WID-2].feat = randint0(table_size);
-       cave[MAX_HGT-2][MAX_WID-2].feat = randint0(table_size);
+       cave[1][1].feat = (s16b)randint0(table_size);
+       cave[MAX_HGT-2][1].feat = (s16b)randint0(table_size);
+       cave[1][MAX_WID-2].feat = (s16b)randint0(table_size);
+       cave[MAX_HGT-2][MAX_WID-2].feat = (s16b)randint0(table_size);
 
        if (!corner)
        {
@@ -298,13 +299,13 @@ static void generate_wilderness_area(int terrain, u32b seed, bool border, bool c
 
 
 /*!
- * @brief ¹ÓÌî¥Õ¥í¥¢À¸À®¤Î¥á¥¤¥ó¥ë¡¼¥Á¥ó /
+ * @brief 荒野フロア生成のメインルーチン /
  * Load a town or generate a terrain level using "plasma" fractals.
- * @param y ¹­°è¥Þ¥Ã¥×YºÂɸ
- * @param x ¹­°è¥Þ¥Ã¥×YºÂɸ
- * @param border ¹­°è¥Þ¥Ã¥×¤ÎÊÕÉôʬ¤È¤·¤Æ¤ÎÀ¸À®¤Ê¤é¤ÐTRUE
- * @param corner ¹­°è¥Þ¥Ã¥×¤Î³ÑÉôʬ¤È¤·¤Æ¤ÎÀ¸À®¤Ê¤é¤ÐTRUE
- * @return ¤Ê¤·
+ * @param y 広域Y座標
+ * @param x 広域X座標
+ * @param border 広域マップの辺部分としての生成ならばTRUE
+ * @param corner 広域マップの角部分としての生成ならばTRUE
+ * @return なし
  * @details
  * <pre>
  * x and y are the coordinates of the area in the wilderness.
@@ -315,12 +316,12 @@ static void generate_wilderness_area(int terrain, u32b seed, bool border, bool c
  * If corner is set then only the corners of the area are needed.
  * </pre>
  */
-static void generate_area(int y, int x, bool border, bool corner)
+static void generate_area(POSITION y, POSITION x, bool border, bool corner)
 {
-       int x1, y1;
+       POSITION x1, y1;
 
        /* Number of the town (if any) */
-       p_ptr->town_num = wilderness[y][x].town;
+       p_ptr->town_num = (s16b)wilderness[y][x].town;
 
        /* Set the base level */
        base_level = wilderness[y][x].level;
@@ -420,7 +421,7 @@ static void generate_area(int y, int x, bool border, bool corner)
                Rand_state_backup(state_backup);
 
                /* Hack -- Induce consistant flavors */
-               Rand_state_init(wilderness[y][x].seed);
+               Rand_state_set(wilderness[y][x].seed);
 
                dy = rand_range(6, cur_hgt - 6);
                dx = rand_range(6, cur_wid - 6);
@@ -441,9 +442,9 @@ static border_type border;
 
 
 /*!
- * @brief ¹­°è¥Þ¥Ã¥×¤ÎÀ¸À® /
+ * @brief 広域マップの生成 /
  * Build the wilderness area outside of the town.
- * @return ¤Ê¤·
+ * @return なし
  */
 void wilderness_gen(void)
 {
@@ -465,8 +466,6 @@ void wilderness_gen(void)
 
        x = p_ptr->wilderness_x;
        y = p_ptr->wilderness_y;
-
-       /* Prepare allocation table */
        get_mon_num_prep(get_monster_hook(), NULL);
 
        /* North border */
@@ -625,8 +624,8 @@ void wilderness_gen(void)
                                        if ((f_ptr->subtype == 4) || ((p_ptr->town_num == 1) && (f_ptr->subtype == 0)))
                                        {
                                                if (c_ptr->m_idx) delete_monster_idx(c_ptr->m_idx);
-                                               p_ptr->oldpy = y;
-                                               p_ptr->oldpx = x;
+                                               p_ptr->oldpy = (s16b)y;
+                                               p_ptr->oldpx = (s16b)x;
                                        }
                                }
                        }
@@ -646,8 +645,8 @@ void wilderness_gen(void)
                                if (cave_have_flag_grid(c_ptr, FF_ENTRANCE))
                                {
                                        if (c_ptr->m_idx) delete_monster_idx(c_ptr->m_idx);
-                                       p_ptr->oldpy = y;
-                                       p_ptr->oldpx = x;
+                                       p_ptr->oldpy = (s16b)y;
+                                       p_ptr->oldpx = (s16b)x;
                                }
                        }
                }
@@ -657,12 +656,12 @@ void wilderness_gen(void)
        player_place(p_ptr->oldpy, p_ptr->oldpx);
        /* p_ptr->leaving_dungeon = FALSE;*/
 
-       lim = (generate_encounter==TRUE)?40:MIN_M_ALLOC_TN;
+       lim = (generate_encounter == TRUE) ? 40 : MIN_M_ALLOC_TN;
 
        /* Make some residents */
        for (i = 0; i < lim; i++)
        {
-               u32b mode = 0;
+               BIT_FLAGS mode = 0;
 
                if (!(generate_encounter || (one_in_(2) && (!p_ptr->town_num))))
                        mode |= PM_ALLOW_SLEEP;
@@ -678,7 +677,7 @@ void wilderness_gen(void)
        set_floor_and_wall(0);
 
        /* Set rewarded quests to finished */
-       for (i = 0; i < max_quests; i++)
+       for (i = 0; i < max_q_idx; i++)
        {
                if (quest[i].status == QUEST_STATUS_REWARDED)
                        quest[i].status = QUEST_STATUS_FINISHED;
@@ -689,11 +688,11 @@ void wilderness_gen(void)
 static s16b conv_terrain2feat[MAX_WILDERNESS];
 
 /*!
- * @brief ¹­°è¥Þ¥Ã¥×¤ÎÀ¸À®(´Ê°×½èÍýÈÇ) /
+ * @brief 広域マップの生成(簡易処理版) /
  * Build the wilderness area. -DG-
- * @return ¤Ê¤·
+ * @return なし
  */
-void wilderness_gen_small()
+void wilderness_gen_small(void)
 {
        int i, j;
 
@@ -713,8 +712,8 @@ void wilderness_gen_small()
        {
                if (wilderness[j][i].town && (wilderness[j][i].town != NO_TOWN))
                {
-                       cave[j][i].feat = feat_town;
-                       cave[j][i].special = wilderness[j][i].town;
+                       cave[j][i].feat = (s16b)feat_town;
+                       cave[j][i].special = (s16b)wilderness[j][i].town;
                }
                else if (wilderness[j][i].road) cave[j][i].feat = feat_floor;
                else if (wilderness[j][i].entrance && (p_ptr->total_winner || !(d_info[wilderness[j][i].entrance].flags1 & DF1_WINNER)))
@@ -738,8 +737,8 @@ void wilderness_gen_small()
        panel_col_min = cur_wid;
 
        /* Place the player */
-       px = p_ptr->wilderness_x;
-       py = p_ptr->wilderness_y;
+       p_ptr->x = p_ptr->wilderness_x;
+       p_ptr->y = p_ptr->wilderness_y;
 
        p_ptr->town_num = 0;
 }
@@ -761,16 +760,16 @@ static wilderness_grid w_letter[255];
 
 
 /*!
- * @brief w_info.txt¤Î¥Ç¡¼¥¿²òÀÏ /
+ * @brief w_info.txtのデータ解析 /
  * Parse a sub-file of the "extra info"
- * @param buf
- * @param ymin Ì¤»ÈÍÑ
- * @param xmin ¹­°èÃÏ·Á¥Þ¥Ã¥×¤òÆɤ߹þ¤ß¤¿¤¤xºÂɸ¤Î³«»Ï°ÌÃÖ
- * @param ymax Ì¤»ÈÍÑ
- * @param xmax ¹­°èÃÏ·Á¥Þ¥Ã¥×¤òÆɤ߹þ¤ß¤¿¤¤xºÂɸ¤Î½ªÎ»°ÌÃÖ
- * @param y ¹­°è¥Þ¥Ã¥×¤Î¹â¤µ¤òÊÖ¤¹»²¾È¥Ý¥¤¥ó¥¿
- * @param x ¹­°è¥Þ¥Ã¥×¤ÎÉý¤òÊÖ¤¹»²¾È¥Ý¥¤¥ó¥¿
- * @return ¤Ê¤·
+ * @param buf 読み取ったデータ行のバッファ
+ * @param ymin 未使用
+ * @param xmin 広域地形マップを読み込みたいx座標の開始位置
+ * @param ymax 未使用
+ * @param xmax 広域地形マップを読み込みたいx座標の終了位置
+ * @param y åº\83å\9f\9fã\83\9eã\83\83ã\83\97ã\81®é«\98ã\81\95ã\82\92è¿\94ã\81\99å\8f\82ç\85§ã\83\9dã\82¤ã\83³ã\82¿
+ * @param x åº\83å\9f\9fã\83\9eã\83\83ã\83\97ã\81®å¹\85ã\82\92è¿\94ã\81\99å\8f\82ç\85§ã\83\9dã\82¤ã\83³ã\82¿
+ * @return なし
  */
 errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, int *y, int *x)
 {
@@ -809,7 +808,7 @@ errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, in
                                w_letter[index].terrain = 0;
                        
                        if (num > 2)
-                               w_letter[index].level = atoi(zz[2]);
+                               w_letter[index].level = (s16b)atoi(zz[2]);
                        else
                                w_letter[index].level = 0;
                        
@@ -819,7 +818,7 @@ errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, in
                                w_letter[index].town = 0;
                        
                        if (num > 4)
-                               w_letter[index].road = atoi(zz[4]);
+                               w_letter[index].road = (byte_hack)atoi(zz[4]);
                        else
                                w_letter[index].road = 0;
                        
@@ -849,17 +848,12 @@ errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, in
                
                for (*x = xmin, i = 0; ((*x < xmax) && (i < len)); (*x)++, s++, i++)
                {
-                       int idx = s[0];
-                       
-                       wilderness[*y][*x].terrain = w_letter[idx].terrain;
-                       
-                       wilderness[*y][*x].level = w_letter[idx].level;
-                       
-                       wilderness[*y][*x].town = w_letter[idx].town;
-                       
-                       wilderness[*y][*x].road = w_letter[idx].road;
-                       
-                       strcpy(town[w_letter[idx].town].name, w_letter[idx].name);
+                       int id = s[0];
+                       wilderness[*y][*x].terrain = w_letter[id].terrain;
+                       wilderness[*y][*x].level = w_letter[id].level;
+                       wilderness[*y][*x].town = w_letter[id].town;
+                       wilderness[*y][*x].road = w_letter[id].road;
+                       strcpy(town[w_letter[id].town].name, w_letter[id].name);
                }
                
                (*y)++;
@@ -903,7 +897,7 @@ errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, in
        for (i = 1; i < max_d_idx; i++)
        {
                if (!d_info[i].maxdepth) continue;
-               wilderness[d_info[i].dy][d_info[i].dx].entrance = i;
+               wilderness[d_info[i].dy][d_info[i].dx].entrance = (byte_hack)i;
                if (!wilderness[d_info[i].dy][d_info[i].dx].town)
                        wilderness[d_info[i].dy][d_info[i].dx].level = d_info[i].mindepth;
        }
@@ -913,12 +907,15 @@ errr parse_line_wilderness(char *buf, int ymin, int xmin, int ymax, int xmax, in
 }
 
 
-/*
+
+/*!
+ * @brief ゲーム開始時に各荒野フロアの乱数シードを指定する /
  * Generate the random seeds for the wilderness
+ * @return なし
  */
 void seed_wilderness(void)
 {
-       int x, y;
+       POSITION x, y;
 
        /* Init wilderness seeds */
        for (x = 0; x < max_wild_x; x++)
@@ -937,8 +934,11 @@ void seed_wilderness(void)
  */
 typedef wilderness_type *wilderness_type_ptr;
 
-/*
+
+/*!
+ * @brief ゲーム開始時の荒野初期化メインルーチン /
  * Initialize wilderness array
+ * @return エラーコード
  */
 errr init_wilderness(void)
 {
@@ -957,14 +957,21 @@ errr init_wilderness(void)
        return 0;
 }
 
-
-static void init_terrain_table(int terrain, s16b feat_global, cptr fmt, ...)
+/*!
+ * @brief 荒野の地勢設定を初期化する /
+ * Initialize wilderness array
+ * @param terrain 初期化したい地勢ID
+ * @param feat_global 基本的な地形ID
+ * @param fmt 地勢内の地形数を参照するための独自フォーマット
+ * @return なし
+ */
+static void init_terrain_table(int terrain, s16b feat_global, concptr fmt, ...)
 {
        va_list vp;
-       cptr    p;
+       concptr    p;
        int     cur = 0;
        char    check = 'a';
-       s16b    feat;
+       FEAT_IDX feat;
        int     num;
 
        /* Begin the varargs stuff */
@@ -1007,8 +1014,10 @@ static void init_terrain_table(int terrain, s16b feat_global, cptr fmt, ...)
 }
 
 
-/*
+/*!
+ * @brief 荒野の地勢設定全体を初期化するメインルーチン /
  * Initialize arrays for wilderness terrains
+ * @return なし
  */
 void init_wilderness_terrains(void)
 {
@@ -1085,7 +1094,11 @@ void init_wilderness_terrains(void)
                feat_mountain, MAX_FEAT_IN_TERRAIN - 8);
 }
 
-
+/*!
+ * @brief 荒野から広域マップへの切り替え処理 /
+ * Initialize arrays for wilderness terrains
+ * @return 切り替えが行われた場合はTRUEを返す。
+ */
 bool change_wild_mode(void)
 {
        int i;
@@ -1098,7 +1111,7 @@ bool change_wild_mode(void)
        if (lite_town || vanilla_town)
        {
 #ifdef JP
-               msg_print("¹ÓÌî¤Ê¤ó¤Æ¤Ê¤¤¡£");
+               msg_print("荒野なんてない。");
 #else
                msg_print("No global map.");
 #endif
@@ -1108,8 +1121,8 @@ bool change_wild_mode(void)
        if (p_ptr->wild_mode)
        {
                /* Save the location in the global map */
-               p_ptr->wilderness_x = px;
-               p_ptr->wilderness_y = py;
+               p_ptr->wilderness_x = p_ptr->x;
+               p_ptr->wilderness_y = p_ptr->y;
 
                /* Give first move to the player */
                p_ptr->energy_need = 0;
@@ -1134,35 +1147,35 @@ bool change_wild_mode(void)
                if (m_ptr->cdis > MAX_SIGHT) continue;
                if (!is_hostile(m_ptr)) continue;
 #ifdef JP
-               msg_print("Ũ¤¬¤¹¤°¶á¤¯¤Ë¤¤¤ë¤È¤­¤Ï¹­°è¥Þ¥Ã¥×¤ËÆþ¤ì¤Ê¤¤¡ª");
+               msg_print("敵がすぐ近くにいるときは広域マップに入れない!");
 #else
                msg_print("You cannot enter global map, since there is some monsters nearby!");
 #endif
-               energy_use = 0;
+               free_turn(p_ptr);
                return FALSE;
        }
 
        if (have_pet)
        {
 #ifdef JP
-               cptr msg = "¥Ú¥Ã¥È¤òÃÖ¤¤¤Æ¹­°è¥Þ¥Ã¥×¤ËÆþ¤ê¤Þ¤¹¤«¡©";
+               concptr msg = "ペットを置いて広域マップに入りますか?";
 #else
-               cptr msg = "Do you leave your pets behind? ";
+               concptr msg = "Do you leave your pets behind? ";
 #endif
 
                if (!get_check_strict(msg, CHECK_OKAY_CANCEL))
                {
-                       energy_use = 0;
+                       free_turn(p_ptr);
                        return FALSE;
                }
        }
 
        /* HACK */
-       energy_use = 1000;
+       p_ptr->energy_use = 1000;
 
        /* Remember the position */
-       p_ptr->oldpx = px;
-       p_ptr->oldpy = py;
+       p_ptr->oldpx = p_ptr->x;
+       p_ptr->oldpy = p_ptr->y;
 
        /* Cancel hex spelling */
        if (hex_spelling_any()) stop_hex_spell_all();