OSDN Git Service

#37287 #37353 (2.2.0.89) PET_COMMAND_IDX, FF_FLAGS_IDX型を定義し、型の置換を継続中。 / Define PET_CO...
[hengband/hengband.git] / src / xtra2.c
index a9c328f..1f54bd4 100644 (file)
@@ -27,7 +27,7 @@ void check_experience(void)
        bool level_mutation = FALSE;
        bool level_inc_stat = FALSE;
        bool android = (p_ptr->prace == RACE_ANDROID ? TRUE : FALSE);
-       int  old_lev = p_ptr->lev;
+       PLAYER_LEVEL old_lev = p_ptr->lev;
 
        /* Hack -- lower limit */
        if (p_ptr->exp < 0) p_ptr->exp = 0;
@@ -230,7 +230,7 @@ msg_format("レベル %d にようこそ。", p_ptr->lev);
  * Used to allocate proper treasure when "Creeping coins" die
  * XXX XXX XXX Note the use of actual "monster names"
  */
-static int get_coin_type(int r_idx)
+static int get_coin_type(MONRACE_IDX r_idx)
 {
        /* Analyze monsters */
        switch (r_idx)
@@ -254,7 +254,7 @@ static int get_coin_type(int r_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトがクロークならばTRUEを返す
  */
-static bool kind_is_cloak(int k_idx)
+static bool kind_is_cloak(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -275,7 +275,7 @@ static bool kind_is_cloak(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトが竿状武器ならばTRUEを返す
  */
-static bool kind_is_polearm(int k_idx)
+static bool kind_is_polearm(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -296,7 +296,7 @@ static bool kind_is_polearm(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトが剣ならばTRUEを返す
  */
-static bool kind_is_sword(int k_idx)
+static bool kind_is_sword(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -317,7 +317,7 @@ static bool kind_is_sword(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトが魔法書ならばTRUEを返す
  */
-static bool kind_is_book(int k_idx)
+static bool kind_is_book(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -338,7 +338,7 @@ static bool kind_is_book(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトがベースアイテム時点でGOODなアイテムならばTRUEを返す
  */
-static bool kind_is_good_book(int k_idx)
+static bool kind_is_good_book(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -359,7 +359,7 @@ static bool kind_is_good_book(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトが鎧ならばTRUEを返す
  */
-static bool kind_is_armor(int k_idx)
+static bool kind_is_armor(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -380,7 +380,7 @@ static bool kind_is_armor(int k_idx)
  * @param k_idx 判定したいオブジェクトのベースアイテムID
  * @return オブジェクトが打撃武器ならばTRUEを返す
  */
-static bool kind_is_hafted(int k_idx)
+static bool kind_is_hafted(KIND_OBJECT_IDX k_idx)
 {
        object_kind *k_ptr = &k_info[k_idx];
 
@@ -439,7 +439,7 @@ static int count_all_hostile_monsters(void)
        {
                for (y = 0; y < cur_hgt; ++ y)
                {
-                       int m_idx = cave[y][x].m_idx;
+                       MONSTER_IDX m_idx = cave[y][x].m_idx;
 
                        if (m_idx > 0 && is_hostile(&m_list[m_idx]))
                        {
@@ -459,7 +459,7 @@ static int count_all_hostile_monsters(void)
  */
 void check_quest_completion(monster_type *m_ptr)
 {
-       int y, x;
+       POSITION y, x;
 
        int quest_num;
 
@@ -624,7 +624,7 @@ void check_quest_completion(monster_type *m_ptr)
        /* Create a magical staircase */
        if (create_stairs)
        {
-               int ny, nx;
+               POSITION ny, nx;
 
                /* Stagger around */
                while (cave_perma_bold(y, x) || cave[y][x].o_idx || (cave[y][x].info & CAVE_OBJECT) )
@@ -737,7 +737,7 @@ cptr extract_note_dies(monster_race *r_ptr)
  * it drops all of its objects, which may disappear in crowded rooms.
  * </pre>
  */
-void monster_death(int m_idx, bool drop_item)
+void monster_death(MONSTER_IDX m_idx, bool drop_item)
 {
        int i, j, y, x;
 
@@ -792,11 +792,11 @@ void monster_death(int m_idx, bool drop_item)
        {
                if (r_ptr->blow[i].method == RBM_EXPLODE)
                {
-                       int flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
+                       BIT_FLAGS flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
                        int typ = mbe_info[r_ptr->blow[i].effect].explode_type;
-                       int d_dice = r_ptr->blow[i].d_dice;
-                       int d_side = r_ptr->blow[i].d_side;
-                       int damage = damroll(d_dice, d_side);
+                       DICE_NUMBER d_dice = r_ptr->blow[i].d_dice;
+                       DICE_SID d_side = r_ptr->blow[i].d_side;
+                       HIT_POINT damage = damroll(d_dice, d_side);
 
                        project(m_idx, 3, y, x, damage, typ, flg, -1);
                        break;
@@ -924,7 +924,7 @@ void monster_death(int m_idx, bool drop_item)
                        {
                                int wy = y, wx = x;
                                bool pet = is_pet(m_ptr);
-                               u32b mode = 0L;
+                               BIT_FLAGS mode = 0L;
 
                                if (pet) mode |= PM_FORCE_PET;
 
@@ -989,7 +989,7 @@ void monster_death(int m_idx, bool drop_item)
                {
                        if (!one_in_(7))
                        {
-                               int wy = y, wx = x;
+                               POSITION wy = y, wx = x;
                                int attempts = 100;
                                bool pet = is_pet(m_ptr);
 
@@ -1001,7 +1001,7 @@ void monster_death(int m_idx, bool drop_item)
 
                                if (attempts > 0)
                                {
-                                       u32b mode = 0L;
+                                       BIT_FLAGS mode = 0L;
                                        if (pet) mode |= PM_FORCE_PET;
 
                                        if (summon_specific((pet ? -1 : m_idx), wy, wx, 100, SUMMON_DAWN, mode))
@@ -1017,7 +1017,7 @@ void monster_death(int m_idx, bool drop_item)
        case MON_UNMAKER:
                /* One more ultra-hack: An Unmaker goes out with a big bang! */
                {
-                       int flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
+                       BIT_FLAGS flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
                        (void)project(m_idx, 6, y, x, 100, GF_CHAOS, flg, -1);
                }
                break;
@@ -1132,7 +1132,7 @@ void monster_death(int m_idx, bool drop_item)
 
        case MON_ROLENTO:
                {
-                       int flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
+                       BIT_FLAGS flg = PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL;
                        (void)project(m_idx, 3, y, x, damroll(20, 10), GF_FIRE, flg, -1);
                }
                break;
@@ -1278,7 +1278,7 @@ void monster_death(int m_idx, bool drop_item)
 
                if ((r_ptr->flags7 & RF7_GUARDIAN) && (d_info[dungeon_type].final_guardian == m_ptr->r_idx))
                {
-                       int k_idx = d_info[dungeon_type].final_object ? d_info[dungeon_type].final_object
+                       IDX k_idx = d_info[dungeon_type].final_object ? d_info[dungeon_type].final_object
                                : lookup_kind(TV_SCROLL, SV_SCROLL_ACQUIREMENT);
 
                        if (d_info[dungeon_type].final_artifact)
@@ -1436,7 +1436,7 @@ void monster_death(int m_idx, bool drop_item)
  * "type" is not yet used and should be 0.
  * </pre>
  */
-hit_point mon_damage_mod(monster_type *m_ptr, hit_point dam, bool is_psy_spear)
+HIT_POINT mon_damage_mod(monster_type *m_ptr, HIT_POINT dam, bool is_psy_spear)
 {
        monster_race    *r_ptr = &r_info[m_ptr->r_idx];
 
@@ -1478,7 +1478,7 @@ hit_point mon_damage_mod(monster_type *m_ptr, hit_point dam, bool is_psy_spear)
  * experience point of a monster later.
  * </pre>
  */
-static void get_exp_from_mon(int dam, monster_type *m_ptr)
+static void get_exp_from_mon(HIT_POINT dam, monster_type *m_ptr)
 {
        monster_race *r_ptr = &r_info[m_ptr->r_idx];
 
@@ -1577,7 +1577,7 @@ static void get_exp_from_mon(int dam, monster_type *m_ptr)
  * to induce changes in the monster recall code.
  * </pre>
  */
-bool mon_take_hit(int m_idx, int dam, bool *fear, cptr note)
+bool mon_take_hit(MONSTER_IDX m_idx, HIT_POINT dam, bool *fear, cptr note)
 {
        monster_type    *m_ptr = &m_list[m_idx];
        monster_race    *r_ptr = &r_info[m_ptr->r_idx];
@@ -1940,7 +1940,7 @@ msg_format("%sを葬り去った。", m_name);
                {
                        int dummy_y = m_ptr->fy;
                        int dummy_x = m_ptr->fx;
-                       u32b mode = 0L;
+                       BIT_FLAGS mode = 0L;
 
                        if (is_pet(m_ptr)) mode |= PM_FORCE_PET;
 
@@ -2338,7 +2338,7 @@ void verify_panel(void)
 /*
  * Monster health description
  */
-cptr look_mon_desc(monster_type *m_ptr, u32b mode)
+cptr look_mon_desc(monster_type *m_ptr, BIT_FLAGS mode)
 {
        monster_race *ap_r_ptr = &r_info[m_ptr->ap_r_idx];
        bool         living;
@@ -2530,7 +2530,7 @@ void ang_sort(vptr u, vptr v, int n)
  * Future versions may restrict the ability to target "trappers"
  * and "mimics", but the semantics is a little bit weird.
  */
-bool target_able(int m_idx)
+bool target_able(MONSTER_IDX m_idx)
 {
        monster_type *m_ptr = &m_list[m_idx];
 
@@ -2598,10 +2598,10 @@ bool target_okay(void)
  */
 static bool ang_sort_comp_distance(vptr u, vptr v, int a, int b)
 {
-       byte *x = (byte*)(u);
-       byte *y = (byte*)(v);
+       POSITION *x = (POSITION*)(u);
+       POSITION *y = (POSITION*)(v);
 
-       int da, db, kx, ky;
+       POSITION da, db, kx, ky;
 
        /* Absolute distance components */
        kx = x[a]; kx -= p_ptr->x; kx = ABS(kx);
@@ -2630,8 +2630,8 @@ static bool ang_sort_comp_distance(vptr u, vptr v, int a, int b)
  */
 static bool ang_sort_comp_importance(vptr u, vptr v, int a, int b)
 {
-       byte *x = (byte*)(u);
-       byte *y = (byte*)(v);
+       POSITION *x = (POSITION*)(u);
+       POSITION *y = (POSITION*)(v);
        cave_type *ca_ptr = &cave[y[a]][x[a]];
        cave_type *cb_ptr = &cave[y[b]][x[b]];
        monster_type *ma_ptr = &m_list[ca_ptr->m_idx];
@@ -2699,10 +2699,10 @@ static bool ang_sort_comp_importance(vptr u, vptr v, int a, int b)
  */
 static void ang_sort_swap_distance(vptr u, vptr v, int a, int b)
 {
-       byte *x = (byte*)(u);
-       byte *y = (byte*)(v);
+       POSITION *x = (POSITION*)(u);
+       POSITION *y = (POSITION*)(v);
 
-       byte temp;
+       POSITION temp;
 
        /* Swap "x" */
        temp = x[a];
@@ -2720,13 +2720,11 @@ static void ang_sort_swap_distance(vptr u, vptr v, int a, int b)
 /*
  * Hack -- help "select" a location (see below)
  */
-static s16b target_pick(int y1, int x1, int dy, int dx)
+static POSITION_IDX target_pick(POSITION y1, POSITION x1, POSITION dy, POSITION dx)
 {
-       int i, v;
-
-       int x2, y2, x3, y3, x4, y4;
-
-       int b_i = -1, b_v = 9999;
+       POSITION_IDX i, v;
+       POSITION x2, y2, x3, y3, x4, y4;
+       POSITION_IDX b_i = -1, b_v = 9999;
 
 
        /* Scan the locations */
@@ -2836,7 +2834,7 @@ static bool target_set_accept(int y, int x)
  *
  * Return the number of target_able monsters in the set.
  */
-static void target_set_prepare(int mode)
+static void target_set_prepare(BIT_FLAGS mode)
 {
        int y, x;
        int min_hgt, max_hgt, min_wid, max_wid;
@@ -2904,7 +2902,7 @@ static void target_set_prepare(int mode)
 
        if (p_ptr->riding && target_pet && (temp_n > 1) && (mode & (TARGET_KILL)))
        {
-               byte tmp;
+               POSITION tmp;
 
                tmp = temp_y[0];
                temp_y[0] = temp_y[1];
@@ -2915,7 +2913,7 @@ static void target_set_prepare(int mode)
        }
 }
 
-void target_set_prepare_look(){
+void target_set_prepare_look(void){
        target_set_prepare(TARGET_LOOK);
 }
 
@@ -2998,7 +2996,7 @@ bool show_gold_on_floor = FALSE;
  *
  * This function must handle blindness/hallucination.
  */
-static int target_set_aux(int y, int x, int mode, cptr info)
+static char target_set_aux(POSITION y, POSITION x, BIT_FLAGS mode, cptr info)
 {
        cave_type *c_ptr = &cave[y][x];
        s16b this_o_idx, next_o_idx = 0;
@@ -3006,11 +3004,12 @@ static int target_set_aux(int y, int x, int mode, cptr info)
        bool boring = TRUE;
        s16b feat;
        feature_type *f_ptr;
-       int query = '\001';
+       char query = '\001';
        char out_val[MAX_NLEN+80];
 
 #ifdef ALLOW_EASY_FLOOR
-       int floor_list[23], floor_num = 0;
+       OBJECT_IDX floor_list[23];
+       ITEM_NUMBER floor_num = 0;
 
        /* Scan all objects in the grid */
        if (easy_floor)
@@ -3264,10 +3263,10 @@ static int target_set_aux(int y, int x, int mode, cptr info)
                                /* Display rough information about items */
 #ifdef JP
                                sprintf(out_val, "%s %d個のアイテム%s%s ['x'で一覧, %s]",
-                                       s1, floor_num, s2, s3, info);
+                                       s1, (int)floor_num, s2, s3, info);
 #else
                                sprintf(out_val, "%s%s%sa pile of %d items [x,%s]",
-                                       s1, s2, s3, floor_num, info);
+                                       s1, s2, s3, (int)floor_num, info);
 #endif
 
                                prt(out_val, 0, 0);
@@ -3286,7 +3285,8 @@ static int target_set_aux(int y, int x, int mode, cptr info)
                        /* Continue scrolling list if requested */
                        while (1)
                        {
-                               int i, o_idx;
+                               int i;
+                               IDX o_idx;
 
                                /* Save screen */
                                screen_save();
@@ -3299,10 +3299,10 @@ static int target_set_aux(int y, int x, int mode, cptr info)
                                /* Prompt */
 #ifdef JP
                                sprintf(out_val, "%s %d個のアイテム%s%s [Enterで次へ, %s]",
-                                       s1, floor_num, s2, s3, info);
+                                       s1, (int)floor_num, s2, s3, info);
 #else
                                sprintf(out_val, "%s%s%sa pile of %d items [Enter,%s]",
-                                       s1, s2, s3, floor_num, info);
+                                       s1, s2, s3, (int)floor_num, info);
 #endif
                                prt(out_val, 0, 0);
 
@@ -3423,7 +3423,7 @@ static int target_set_aux(int y, int x, int mode, cptr info)
                if (have_flag(f_ptr->flags, FF_QUEST_ENTER))
                {
                        /* Set the quest number temporary */
-                       int old_quest = p_ptr->inside_quest;
+                       IDX old_quest = p_ptr->inside_quest;
                        int j;
 
                        /* Clear the text */
@@ -3579,20 +3579,16 @@ static int target_set_aux(int y, int x, int mode, cptr info)
  * This command will cancel any old target, even if used from
  * inside the "look" command.
  */
-bool target_set(int mode)
+bool target_set(BIT_FLAGS mode)
 {
        int             i, d, m, t, bd;
-       int             y = p_ptr->y;
-       int             x = p_ptr->x;
+       POSITION y = p_ptr->y;
+       POSITION x = p_ptr->x;
 
        bool    done = FALSE;
-
        bool    flag = TRUE;
-
        char    query;
-
        char    info[80];
-
        char    same_key;
 
        cave_type               *c_ptr;
@@ -3892,7 +3888,7 @@ bool target_set(int mode)
                        strcpy(info, _("q止 t決 p自 m近 +次 -前", "q,t,p,m,+,-,<dir>"));
 
                        /* Describe and Prompt (enable "TARGET_LOOK") */
-                       while (!(query = target_set_aux(y, x, mode | TARGET_LOOK, info)));
+                       while ((query = target_set_aux(y, x, mode | TARGET_LOOK, info)) == 0);
 
                        /* Cancel tracking */
                        /* health_track(0); */
@@ -4090,12 +4086,10 @@ bool target_set(int mode)
  *
  * Note that confusion over-rides any (explicit?) user choice.
  */
-bool get_aim_dir(int *dp)
+bool get_aim_dir(DIRECTION *dp)
 {
-       int             dir;
-
+       DIRECTION dir;
        char    command;
-
        cptr    p;
 
        /* Initialize */
@@ -4240,9 +4234,9 @@ bool get_aim_dir(int *dp)
  * This function tracks and uses the "global direction", and uses
  * that as the "desired direction", to which "confusion" is applied.
  */
-bool get_rep_dir(int *dp, bool under)
+bool get_rep_dir(DIRECTION *dp, bool under)
 {
-       int dir;
+       DIRECTION dir;
        cptr prompt;
 
        /* Initialize */
@@ -4378,9 +4372,9 @@ bool get_rep_dir(int *dp, bool under)
 }
 
 
-bool get_rep_dir2(int *dp)
+bool get_rep_dir2(DIRECTION *dp)
 {
-       int dir;
+       DIRECTION dir;
 
        /* Initialize */
        (*dp) = 0;
@@ -4460,7 +4454,8 @@ void gain_level_reward(int chosen_reward)
        object_type forge;
        char        wrath_reason[32] = "";
        int         nasty_chance = 6;
-       int         dummy = 0, dummy2 = 0;
+       OBJECT_TYPE_VALUE dummy = 0;
+       OBJECT_SUBTYPE_VALUE dummy2 = 0;
        int         type, effect;
        cptr        reward = NULL;
        char o_name[MAX_NLEN];
@@ -5145,7 +5140,7 @@ msg_format("%sはあなたを無視した。",
  * XAngband: determine if a given location is "interesting"
  * based on target_set_accept function.
  */
-static bool tgt_pt_accept(int y, int x)
+static bool tgt_pt_accept(POSITION y, POSITION x)
 {
        cave_type *c_ptr;
 
@@ -5184,7 +5179,7 @@ static bool tgt_pt_accept(int y, int x)
  */
 static void tgt_pt_prepare(void)
 {
-       int y, x;
+       POSITION y, x;
 
        /* Reset "temp" array */
        temp_n = 0;
@@ -5217,10 +5212,11 @@ static void tgt_pt_prepare(void)
 /*
  * old -- from PsiAngband.
  */
-bool tgt_pt(int *x_ptr, int *y_ptr)
+bool tgt_pt(POSITION *x_ptr, POSITION *y_ptr)
 {
        char ch = 0;
-       int d, x, y, n = 0;
+       int d, n = 0;
+       POSITION x, y;
        bool success = FALSE;
 
        int wid, hgt;
@@ -5402,13 +5398,12 @@ bool tgt_pt(int *x_ptr, int *y_ptr)
 }
 
 
-bool get_hack_dir(int *dp)
+bool get_hack_dir(DIRECTION *dp)
 {
-       int             dir;
+       DIRECTION dir;
        cptr    p;
        char    command;
 
-
        /* Initialize */
        (*dp) = 0;
 
@@ -5529,12 +5524,14 @@ s16b gain_energy(void)
 }
 
 
-/*
- * Return bow energy 
+/*!
+ * @brief 射撃武器の攻撃に必要な基本消費エネルギーを返す/Return bow energy
+ * @param sval 射撃武器のアイテム副分類ID 
+ * @return 消費する基本エネルギー
  */
-s16b bow_energy(int sval)
+ENERGY bow_energy(OBJECT_SUBTYPE_VALUE sval)
 {
-       int energy = 100;
+       ENERGY energy = 10000;
 
        /* Analyze the launcher */
        switch (sval)
@@ -5589,7 +5586,7 @@ s16b bow_energy(int sval)
 /*
  * Return bow tmul
  */
-int bow_tmul(int sval)
+int bow_tmul(OBJECT_SUBTYPE_VALUE sval)
 {
        int tmul = 0;
 
@@ -5710,10 +5707,10 @@ int spell_exp_level(int spell_exp)
  * Display a rumor and apply its effects
  */
 
-int rumor_num(char *zz, int max_idx)
+IDX rumor_num(char *zz, IDX max_idx)
 {
        if (strcmp(zz, "*") == 0) return randint1(max_idx - 1);
-       return atoi(zz);
+       return (IDX)atoi(zz);
 }
 
 cptr rumor_bind_name(char *base, cptr fullname)
@@ -5736,7 +5733,7 @@ cptr rumor_bind_name(char *base, cptr fullname)
 
 void display_rumor(bool ex)
 {
-       bool err;
+       errr err;
        int section = 0;
        char Rumor[1024];
 
@@ -5762,7 +5759,7 @@ void display_rumor(bool ex)
                {
                        if (strcmp(zz[0], "ARTIFACT") == 0)
                        {
-                               int a_idx, k_idx;
+                               IDX a_idx, k_idx;
                                object_type forge;
                                object_type *q_ptr = &forge;
                                artifact_type *a_ptr;
@@ -5783,7 +5780,7 @@ void display_rumor(bool ex)
                        }
                        else if  (strcmp(zz[0], "MONSTER") == 0)
                        {
-                               int r_idx;
+                               MONRACE_IDX r_idx;
                                monster_race *r_ptr;
 
                                while(1)
@@ -5823,7 +5820,7 @@ void display_rumor(bool ex)
                        }
                        else if  (strcmp(zz[0], "TOWN") == 0)
                        {
-                               int t_idx;
+                               IDX t_idx;
                                s32b visit;
 
                                while(1)