OSDN Git Service

Merge pull request #716 from sikabane-works/release/3.0.0Alpha16
[hengbandforosx/hengbandosx.git] / src / birth / game-play-initializer.cpp
1 #include "birth/game-play-initializer.h"
2 #include "info-reader/fixed-map-parser.h"
3 #include "dungeon/dungeon.h"
4 #include "dungeon/quest.h"
5 #include "floor/floor-util.h"
6 #include "game-option/birth-options.h"
7 #include "game-option/cheat-options.h"
8 #include "inventory/inventory-slot-types.h"
9 #include "market/arena.h"
10 #include "monster-race/monster-race.h"
11 #include "monster-race/race-flags1.h"
12 #include "monster-race/race-flags7.h"
13 #include "object/object-generator.h"
14 #include "object/object-kind.h"
15 #include "pet/pet-util.h"
16 #include "player/player-race-types.h"
17 #include "system/artifact-type-definition.h"
18 #include "system/floor-type-definition.h"
19 #include "system/system-variables.h"
20 #include "world/world.h"
21
22 /*!
23  * @brief ベースアイテム構造体の鑑定済みフラグをリセットする。
24  * @return なし
25  * @details
26  * 不具合対策で0からリセットする(セーブは0から)
27  */
28 static void k_info_reset(void)
29 {
30     for (int i = 0; i < max_k_idx; i++) {
31         object_kind *k_ptr = &k_info[i];
32         k_ptr->tried = FALSE;
33         k_ptr->aware = FALSE;
34     }
35 }
36
37 /*!
38  * @brief プレイヤー構造体の内容を初期値で消去する(名前を除く) / Clear all the global "character" data (without name)
39  * @param creature_ptr プレーヤーへの参照ポインタ
40  * @return なし
41  * @details 少し長いが、これ1つで処理が完結しているので分割は見送る
42  */
43 void player_wipe_without_name(player_type *creature_ptr)
44 {
45     player_type tmp;
46
47 #ifdef SET_UID
48     int uid = creature_ptr->player_uid;
49 #endif
50     COPY(&tmp, creature_ptr, player_type);
51     if (creature_ptr->last_message)
52         string_free(creature_ptr->last_message);
53
54     if (creature_ptr->inventory_list != NULL)
55         C_KILL(creature_ptr->inventory_list, INVEN_TOTAL, object_type);
56
57     (void)WIPE(creature_ptr, player_type);
58
59     //TODO: キャラ作成からゲーム開始までに  current_floor_ptr を参照しなければならない処理は今後整理して外す。
60     creature_ptr->current_floor_ptr = &floor_info;
61     C_MAKE(creature_ptr->inventory_list, INVEN_TOTAL, object_type);
62     for (int i = 0; i < 4; i++)
63         strcpy(creature_ptr->history[i], "");
64
65     for (int i = 0; i < max_q_idx; i++) {
66         quest_type *const q_ptr = &quest[i];
67         q_ptr->status = QUEST_STATUS_UNTAKEN;
68         q_ptr->cur_num = 0;
69         q_ptr->max_num = 0;
70         q_ptr->type = 0;
71         q_ptr->level = 0;
72         q_ptr->r_idx = 0;
73         q_ptr->complev = 0;
74         q_ptr->comptime = 0;
75     }
76
77     creature_ptr->inven_cnt = 0;
78     creature_ptr->equip_cnt = 0;
79     for (int i = 0; i < INVEN_TOTAL; i++)
80         object_wipe(&creature_ptr->inventory_list[i]);
81
82     for (int i = 0; i < max_a_idx; i++) {
83         artifact_type *a_ptr = &a_info[i];
84         a_ptr->cur_num = 0;
85     }
86
87     k_info_reset();
88     for (int i = 1; i < max_r_idx; i++) {
89         monster_race *r_ptr = &r_info[i];
90         r_ptr->cur_num = 0;
91         r_ptr->max_num = 100;
92         if (r_ptr->flags1 & RF1_UNIQUE)
93             r_ptr->max_num = 1;
94         else if (r_ptr->flags7 & RF7_NAZGUL)
95             r_ptr->max_num = MAX_NAZGUL_NUM;
96
97         r_ptr->r_pkills = 0;
98         r_ptr->r_akills = 0;
99     }
100
101     creature_ptr->food = PY_FOOD_FULL - 1;
102     if (creature_ptr->pclass == CLASS_SORCERER) {
103         creature_ptr->spell_learned1 = creature_ptr->spell_learned2 = 0xffffffffL;
104         creature_ptr->spell_worked1 = creature_ptr->spell_worked2 = 0xffffffffL;
105     } else {
106         creature_ptr->spell_learned1 = creature_ptr->spell_learned2 = 0L;
107         creature_ptr->spell_worked1 = creature_ptr->spell_worked2 = 0L;
108     }
109
110     creature_ptr->spell_forgotten1 = creature_ptr->spell_forgotten2 = 0L;
111     for (int i = 0; i < 64; i++)
112         creature_ptr->spell_order[i] = 99;
113
114     creature_ptr->learned_spells = 0;
115     creature_ptr->add_spells = 0;
116     creature_ptr->knowledge = 0;
117     creature_ptr->mutant_regenerate_mod = 100;
118
119     cheat_peek = FALSE;
120     cheat_hear = FALSE;
121     cheat_room = FALSE;
122     cheat_xtra = FALSE;
123     cheat_know = FALSE;
124     cheat_live = FALSE;
125     cheat_save = FALSE;
126     cheat_diary_output = FALSE;
127     cheat_turn = FALSE;
128
129     current_world_ptr->total_winner = FALSE;
130     creature_ptr->timewalk = FALSE;
131     creature_ptr->panic_save = 0;
132
133     current_world_ptr->noscore = 0;
134     current_world_ptr->wizard = FALSE;
135     creature_ptr->wait_report_score = FALSE;
136     creature_ptr->pet_follow_distance = PET_FOLLOW_DIST;
137     creature_ptr->pet_extra_flags = (PF_TELEPORT | PF_ATTACK_SPELL | PF_SUMMON_SPELL);
138
139     for (int i = 0; i < current_world_ptr->max_d_idx; i++)
140         max_dlv[i] = 0;
141
142     creature_ptr->visit = 1;
143     creature_ptr->wild_mode = FALSE;
144
145     for (int i = 0; i < MAX_SPELLS; i++) {
146         creature_ptr->magic_num1[i] = 0;
147         creature_ptr->magic_num2[i] = 0;
148     }
149
150     creature_ptr->max_plv = creature_ptr->lev = 1;
151     creature_ptr->arena_number = 0;
152     creature_ptr->current_floor_ptr->inside_arena = FALSE;
153     creature_ptr->current_floor_ptr->inside_quest = 0;
154     for (int i = 0; i < MAX_MANE; i++) {
155         creature_ptr->mane_spell[i] = -1;
156         creature_ptr->mane_dam[i] = 0;
157     }
158
159     creature_ptr->mane_num = 0;
160     creature_ptr->exit_bldg = TRUE;
161     creature_ptr->today_mon = 0;
162     update_gambling_monsters(creature_ptr);
163     creature_ptr->muta.clear();
164
165     for (int i = 0; i < 8; i++)
166         creature_ptr->virtues[i] = 0;
167
168     creature_ptr->dungeon_idx = 0;
169     if (vanilla_town || ironman_downward) {
170         creature_ptr->recall_dungeon = DUNGEON_ANGBAND;
171     } else {
172         creature_ptr->recall_dungeon = DUNGEON_GALGALS;
173     }
174
175     memcpy(creature_ptr->name, tmp.name, sizeof(tmp.name));
176
177 #ifdef SET_UID
178     creature_ptr->player_uid = uid;
179 #endif
180 }
181
182 /*!
183  * @brief ダンジョン内部のクエストを初期化する / Initialize random quests and final quests
184  * @param creature_ptr プレーヤーへの参照ポインタ
185  * @return なし
186  */
187 void init_dungeon_quests(player_type *creature_ptr)
188 {
189     int number_of_quests = MAX_RANDOM_QUEST - MIN_RANDOM_QUEST + 1;
190     init_flags = INIT_ASSIGN;
191     floor_type *floor_ptr = creature_ptr->current_floor_ptr;
192     floor_ptr->inside_quest = MIN_RANDOM_QUEST;
193     parse_fixed_map(creature_ptr, "q_info.txt", 0, 0, 0, 0);
194     floor_ptr->inside_quest = 0;
195     for (int i = MIN_RANDOM_QUEST + number_of_quests - 1; i >= MIN_RANDOM_QUEST; i--) {
196         quest_type *q_ptr = &quest[i];
197         monster_race *quest_r_ptr;
198         q_ptr->status = QUEST_STATUS_TAKEN;
199         determine_random_questor(creature_ptr, q_ptr);
200         quest_r_ptr = &r_info[q_ptr->r_idx];
201         quest_r_ptr->flags1 |= RF1_QUESTOR;
202         q_ptr->max_num = 1;
203     }
204
205     init_flags = INIT_ASSIGN;
206     floor_ptr->inside_quest = QUEST_OBERON;
207     parse_fixed_map(creature_ptr, "q_info.txt", 0, 0, 0, 0);
208     quest[QUEST_OBERON].status = QUEST_STATUS_TAKEN;
209
210     floor_ptr->inside_quest = QUEST_SERPENT;
211     parse_fixed_map(creature_ptr, "q_info.txt", 0, 0, 0, 0);
212     quest[QUEST_SERPENT].status = QUEST_STATUS_TAKEN;
213     floor_ptr->inside_quest = 0;
214 }
215
216 /*!
217  * @brief ゲームターンを初期化する / Reset turn
218  * @param creature_ptr プレーヤーへの参照ポインタ
219  * @return なし
220  * @details アンデッド系種族は開始時刻を夜からにする / Undead start just sunset
221  * @details
222  */
223 void init_turn(player_type *creature_ptr)
224 {
225     if ((creature_ptr->prace == RACE_VAMPIRE) || (creature_ptr->prace == RACE_SKELETON) || (creature_ptr->prace == RACE_ZOMBIE) || (creature_ptr->prace == RACE_SPECTRE)) {
226         current_world_ptr->game_turn = (TURNS_PER_TICK * 3 * TOWN_DAWN) / 4 + 1;
227         current_world_ptr->game_turn_limit = TURNS_PER_TICK * TOWN_DAWN * MAX_DAYS + TURNS_PER_TICK * TOWN_DAWN * 3 / 4;
228     } else {
229         current_world_ptr->game_turn = 1;
230         current_world_ptr->game_turn_limit = TURNS_PER_TICK * TOWN_DAWN * (MAX_DAYS - 1) + TURNS_PER_TICK * TOWN_DAWN * 3 / 4;
231     }
232
233     current_world_ptr->dungeon_turn = 1;
234     current_world_ptr->dungeon_turn_limit = TURNS_PER_TICK * TOWN_DAWN * (MAX_DAYS - 1) + TURNS_PER_TICK * TOWN_DAWN * 3 / 4;
235 }