1 #include "spell-kind/spells-world.h"
2 #include "cmd-io/cmd-save.h"
3 #include "core/asking-player.h"
4 #include "core/player-redraw-types.h"
5 #include "dungeon/dungeon.h"
6 #include "dungeon/quest-completion-checker.h"
7 #include "dungeon/quest.h"
8 #include "floor/cave.h"
9 #include "floor/floor-mode-changer.h"
10 #include "floor/floor-town.h"
11 #include "floor/geometry.h"
12 #include "floor/wild.h"
13 #include "game-option/birth-options.h"
14 #include "game-option/play-record-options.h"
15 #include "game-option/special-options.h"
16 #include "io/input-key-acceptor.h"
17 #include "io/write-diary.h"
18 #include "main/sound-definitions-table.h"
19 #include "main/sound-of-music.h"
20 #include "market/building-util.h"
21 #include "monster-floor/monster-remover.h"
22 #include "monster-race/monster-race.h"
23 #include "monster-race/race-ability-mask.h"
24 #include "monster-race/race-flags-resistance.h"
25 #include "monster-race/race-flags1.h"
26 #include "monster-race/race-resistance-mask.h"
27 #include "monster/monster-describer.h"
28 #include "monster/monster-description-types.h"
29 #include "monster/monster-info.h"
30 #include "player/player-status.h"
31 #include "system/floor-type-definition.h"
32 #include "system/grid-type-definition.h"
33 #include "system/monster-race-definition.h"
34 #include "system/monster-type-definition.h"
35 #include "system/player-type-definition.h"
36 #include "target/projection-path-calculator.h"
37 #include "target/target-checker.h"
38 #include "target/target-setter.h"
39 #include "target/target-types.h"
40 #include "term/screen-processor.h"
41 #include "util/int-char-converter.h"
42 #include "view/display-messages.h"
43 #include "world/world.h"
46 * @brief テレポート・レベルが効かないモンスターであるかどうかを判定する
47 * @param player_ptr プレイヤーへの参照ポインタ
48 * @param idx テレポート・レベル対象のモンスター
49 * @todo 変数名が実態と合っているかどうかは要確認
51 bool is_teleport_level_ineffective(PlayerType *player_ptr, MONSTER_IDX idx)
53 auto *floor_ptr = player_ptr->current_floor_ptr;
54 bool is_special_floor = floor_ptr->inside_arena || player_ptr->phase_out || (inside_quest(floor_ptr->quest_number) && !inside_quest(random_quest_number(player_ptr, floor_ptr->dun_level)));
55 bool is_invalid_floor = idx <= 0;
56 is_invalid_floor &= inside_quest(quest_number(player_ptr, floor_ptr->dun_level)) || (floor_ptr->dun_level >= d_info[player_ptr->dungeon_idx].maxdepth);
57 is_invalid_floor &= player_ptr->current_floor_ptr->dun_level >= 1;
58 is_invalid_floor &= ironman_downward;
59 return is_special_floor || is_invalid_floor;
63 * @brief プレイヤー及びモンスターをレベルテレポートさせる /
64 * Teleport the player one level up or down (random when legal)
65 * @param player_ptr プレイヤーへの参照ポインタ
66 * @param m_idx テレポートの対象となるモンスターID(0ならばプレイヤー) / If m_idx <= 0, target is player.
67 * @todo cmd-save.h への依存あり。コールバックで何とかしたい
69 void teleport_level(PlayerType *player_ptr, MONSTER_IDX m_idx)
71 GAME_TEXT m_name[160];
74 strcpy(m_name, _("あなた", "you"));
76 auto *m_ptr = &player_ptr->current_floor_ptr->m_list[m_idx];
77 monster_desc(player_ptr, m_name, m_ptr, 0);
78 see_m = is_seen(player_ptr, m_ptr);
81 if (is_teleport_level_ineffective(player_ptr, m_idx)) {
83 msg_print(_("効果がなかった。", "There is no effect."));
88 if ((m_idx <= 0) && player_ptr->anti_tele) {
89 msg_print(_("不思議な力がテレポートを防いだ!", "A mysterious force prevents you from teleporting!"));
94 if (randint0(100) < 50) {
100 if ((m_idx <= 0) && w_ptr->wizard) {
101 if (get_check("Force to go up? ")) {
103 } else if (get_check("Force to go down? ")) {
108 if ((ironman_downward && (m_idx <= 0)) || (player_ptr->current_floor_ptr->dun_level <= d_info[player_ptr->dungeon_idx].mindepth)) {
111 msg_format("%^sは床を突き破って沈んでいく。", m_name);
115 msg_format("%^s sink%s through the floor.", m_name, (m_idx <= 0) ? "" : "s");
119 if (!is_in_dungeon(player_ptr)) {
120 player_ptr->dungeon_idx = ironman_downward ? DUNGEON_ANGBAND : player_ptr->recall_dungeon;
121 player_ptr->oldpy = player_ptr->y;
122 player_ptr->oldpx = player_ptr->x;
126 exe_write_diary(player_ptr, DIARY_TELEPORT_LEVEL, 1, nullptr);
130 do_cmd_save_game(player_ptr, true);
133 if (!is_in_dungeon(player_ptr)) {
134 player_ptr->current_floor_ptr->dun_level = d_info[player_ptr->dungeon_idx].mindepth;
135 prepare_change_floor_mode(player_ptr, CFM_RAND_PLACE);
137 prepare_change_floor_mode(player_ptr, CFM_SAVE_FLOORS | CFM_DOWN | CFM_RAND_PLACE | CFM_RAND_CONNECT);
140 player_ptr->leaving = true;
142 } else if (inside_quest(quest_number(player_ptr, player_ptr->current_floor_ptr->dun_level)) || (player_ptr->current_floor_ptr->dun_level >= d_info[player_ptr->dungeon_idx].maxdepth)) {
145 msg_format("%^sは天井を突き破って宙へ浮いていく。", m_name);
149 msg_format("%^s rise%s up through the ceiling.", m_name, (m_idx <= 0) ? "" : "s");
155 exe_write_diary(player_ptr, DIARY_TELEPORT_LEVEL, -1, nullptr);
159 do_cmd_save_game(player_ptr, true);
162 prepare_change_floor_mode(player_ptr, CFM_SAVE_FLOORS | CFM_UP | CFM_RAND_PLACE | CFM_RAND_CONNECT);
164 leave_quest_check(player_ptr);
165 player_ptr->current_floor_ptr->quest_number = QuestId::NONE;
166 player_ptr->leaving = true;
171 msg_format("%^sは天井を突き破って宙へ浮いていく。", m_name);
175 msg_format("%^s rise%s up through the ceiling.", m_name, (m_idx <= 0) ? "" : "s");
181 exe_write_diary(player_ptr, DIARY_TELEPORT_LEVEL, -1, nullptr);
185 do_cmd_save_game(player_ptr, true);
188 prepare_change_floor_mode(player_ptr, CFM_SAVE_FLOORS | CFM_UP | CFM_RAND_PLACE | CFM_RAND_CONNECT);
189 player_ptr->leaving = true;
194 msg_format("%^sは床を突き破って沈んでいく。", m_name);
198 msg_format("%^s sink%s through the floor.", m_name, (m_idx <= 0) ? "" : "s");
204 exe_write_diary(player_ptr, DIARY_TELEPORT_LEVEL, 1, nullptr);
207 do_cmd_save_game(player_ptr, true);
210 prepare_change_floor_mode(player_ptr, CFM_SAVE_FLOORS | CFM_DOWN | CFM_RAND_PLACE | CFM_RAND_CONNECT);
211 player_ptr->leaving = true;
216 sound(SOUND_TPLEVEL);
220 auto *m_ptr = &player_ptr->current_floor_ptr->m_list[m_idx];
221 QuestCompletionChecker(player_ptr, m_ptr).complete();
222 if (record_named_pet && is_pet(m_ptr) && m_ptr->nickname) {
223 char m2_name[MAX_NLEN];
225 monster_desc(player_ptr, m2_name, m_ptr, MD_INDEF_VISIBLE);
226 exe_write_diary(player_ptr, DIARY_NAMED_PET, RECORD_NAMED_PET_TELE_LEVEL, m2_name);
229 delete_monster_idx(player_ptr, m_idx);
231 sound(SOUND_TPLEVEL);
235 bool teleport_level_other(PlayerType *player_ptr)
237 if (!target_set(player_ptr, TARGET_KILL)) {
240 MONSTER_IDX target_m_idx = player_ptr->current_floor_ptr->grid_array[target_row][target_col].m_idx;
244 if (!player_has_los_bold(player_ptr, target_row, target_col)) {
247 if (!projectable(player_ptr, player_ptr->y, player_ptr->x, target_row, target_col)) {
253 m_ptr = &player_ptr->current_floor_ptr->m_list[target_m_idx];
254 r_ptr = &r_info[m_ptr->r_idx];
255 GAME_TEXT m_name[MAX_NLEN];
256 monster_desc(player_ptr, m_name, m_ptr, 0);
257 msg_format(_("%^sの足を指さした。", "You gesture at %^s's feet."), m_name);
259 auto has_immune = r_ptr->resistance_flags.has_any_of(RFR_EFF_RESIST_NEXUS_MASK) || r_ptr->resistance_flags.has(MonsterResistanceType::RESIST_TELEPORT);
261 if (has_immune || (r_ptr->flags1 & RF1_QUESTOR) || (r_ptr->level + randint1(50) > player_ptr->lev + randint1(60))) {
262 msg_format(_("しかし効果がなかった!", "%^s is unaffected!"), m_name);
264 teleport_level(player_ptr, target_m_idx);
271 * @brief 町間のテレポートを行うメインルーチン
272 * @param player_ptr プレイヤーへの参照ポインタ
273 * @return テレポート処理を決定したか否か
275 bool tele_town(PlayerType *player_ptr)
277 if (player_ptr->current_floor_ptr->dun_level) {
278 msg_print(_("この魔法は地上でしか使えない!", "This spell can only be used on the surface!"));
282 if (player_ptr->current_floor_ptr->inside_arena || player_ptr->phase_out) {
283 msg_print(_("この魔法は外でしか使えない!", "This spell can only be used outside!"));
292 for (i = 1; i < max_towns; i++) {
295 if ((i == NO_TOWN) || (i == SECRET_TOWN) || (i == player_ptr->town_num) || !(player_ptr->visit & (1UL << (i - 1)))) {
299 sprintf(buf, "%c) %-20s", I2A(i - 1), town_info[i].name);
305 msg_print(_("まだ行けるところがない。", "You have not yet visited any town."));
311 prt(_("どこに行きますか:", "Where do you want to go: "), 0, 0);
320 else if ((i < 'a') || (i > ('a' + max_towns - 2))) {
322 } else if (((i - 'a' + 1) == player_ptr->town_num) || ((i - 'a' + 1) == NO_TOWN) || ((i - 'a' + 1) == SECRET_TOWN) || !(player_ptr->visit & (1UL << (i - 'a')))) {
328 for (POSITION y = 0; y < w_ptr->max_wild_y; y++) {
329 for (POSITION x = 0; x < w_ptr->max_wild_x; x++) {
330 if (wilderness[y][x].town == (i - 'a' + 1)) {
331 player_ptr->wilderness_y = y;
332 player_ptr->wilderness_x = x;
337 player_ptr->leaving = true;
338 player_ptr->leave_bldg = true;
339 player_ptr->teleport_town = true;
346 * @param player_ptr プレイヤーへの参照ポインタ
348 void reserve_alter_reality(PlayerType *player_ptr, TIME_EFFECT turns)
350 if (player_ptr->current_floor_ptr->inside_arena || ironman_downward) {
351 msg_print(_("何も起こらなかった。", "Nothing happens."));
355 if (player_ptr->alter_reality || turns == 0) {
356 player_ptr->alter_reality = 0;
357 msg_print(_("景色が元に戻った...", "The view around you returns to normal..."));
358 player_ptr->redraw |= PR_STATUS;
362 player_ptr->alter_reality = turns;
363 msg_print(_("回りの景色が変わり始めた...", "The view around you begins to change..."));
364 player_ptr->redraw |= PR_STATUS;
368 * @brief プレイヤーの帰還発動及び中止処理 /
369 * Recall the player to town or dungeon
370 * @param player_ptr プレイヤーへの参照ポインタ
371 * @param turns 発動までのターン数
374 bool recall_player(PlayerType *player_ptr, TIME_EFFECT turns)
377 * TODO: Recall the player to the last
378 * visited town when in the wilderness
380 if (player_ptr->current_floor_ptr->inside_arena || ironman_downward) {
381 msg_print(_("何も起こらなかった。", "Nothing happens."));
385 bool is_special_floor = is_in_dungeon(player_ptr);
386 is_special_floor &= max_dlv[player_ptr->dungeon_idx] > player_ptr->current_floor_ptr->dun_level;
387 is_special_floor &= !inside_quest(player_ptr->current_floor_ptr->quest_number);
388 is_special_floor &= !player_ptr->word_recall;
389 if (is_special_floor) {
390 if (get_check(_("ここは最深到達階より浅い階です。この階に戻って来ますか? ", "Reset recall depth? "))) {
391 max_dlv[player_ptr->dungeon_idx] = player_ptr->current_floor_ptr->dun_level;
392 if (record_maxdepth) {
393 exe_write_diary(player_ptr, DIARY_TRUMP, player_ptr->dungeon_idx, _("帰還のときに", "when recalled from dungeon"));
398 if (player_ptr->word_recall || turns == 0) {
399 player_ptr->word_recall = 0;
400 msg_print(_("張りつめた大気が流れ去った...", "A tension leaves the air around you..."));
401 player_ptr->redraw |= (PR_STATUS);
405 if (!is_in_dungeon(player_ptr)) {
406 DUNGEON_IDX select_dungeon;
407 select_dungeon = choose_dungeon(_("に帰還", "recall"), 2, 14);
408 if (!select_dungeon) {
411 player_ptr->recall_dungeon = select_dungeon;
414 player_ptr->word_recall = turns;
415 msg_print(_("回りの大気が張りつめてきた...", "The air about you becomes charged..."));
416 player_ptr->redraw |= (PR_STATUS);
420 bool free_level_recall(PlayerType *player_ptr)
422 DUNGEON_IDX select_dungeon = choose_dungeon(_("にテレポート", "teleport"), 4, 0);
423 if (!select_dungeon) {
427 DEPTH max_depth = d_info[select_dungeon].maxdepth;
428 if (select_dungeon == DUNGEON_ANGBAND) {
429 if (quest[QuestId::OBERON].status != QuestStatusType::FINISHED) {
431 } else if (quest[QuestId::SERPENT].status != QuestStatusType::FINISHED) {
436 QUANTITY amt = get_quantity(
437 format(_("%sの何階にテレポートしますか?", "Teleport to which level of %s? "), d_info[select_dungeon].name.c_str()), (QUANTITY)max_depth);
442 player_ptr->word_recall = 1;
443 player_ptr->recall_dungeon = select_dungeon;
444 max_dlv[player_ptr->recall_dungeon] = ((amt > d_info[select_dungeon].maxdepth) ? d_info[select_dungeon].maxdepth
445 : ((amt < d_info[select_dungeon].mindepth) ? d_info[select_dungeon].mindepth : amt));
446 if (record_maxdepth) {
447 exe_write_diary(player_ptr, DIARY_TRUMP, select_dungeon, _("トランプタワーで", "at Trump Tower"));
450 msg_print(_("回りの大気が張りつめてきた...", "The air about you becomes charged..."));
452 player_ptr->redraw |= PR_STATUS;
458 * @param player_ptr プレイヤーへの参照ポインタ
459 * @return リセット処理が実際に行われたらTRUEを返す
461 bool reset_recall(PlayerType *player_ptr)
463 int select_dungeon, dummy = 0;
467 select_dungeon = choose_dungeon(_("をセット", "reset"), 2, 14);
468 if (ironman_downward) {
469 msg_print(_("何も起こらなかった。", "Nothing happens."));
473 if (!select_dungeon) {
476 sprintf(ppp, _("何階にセットしますか (%d-%d):", "Reset to which level (%d-%d): "), (int)d_info[select_dungeon].mindepth, (int)max_dlv[select_dungeon]);
477 sprintf(tmp_val, "%d", (int)std::max(player_ptr->current_floor_ptr->dun_level, 1));
479 if (!get_string(ppp, tmp_val, 10)) {
483 dummy = atoi(tmp_val);
487 if (dummy > max_dlv[select_dungeon]) {
488 dummy = max_dlv[select_dungeon];
490 if (dummy < d_info[select_dungeon].mindepth) {
491 dummy = d_info[select_dungeon].mindepth;
494 max_dlv[select_dungeon] = dummy;
496 if (record_maxdepth) {
497 exe_write_diary(player_ptr, DIARY_TRUMP, select_dungeon, _("フロア・リセットで", "using a scroll of reset recall"));
500 msg_format("%sの帰還レベルを %d 階にセット。", d_info[select_dungeon].name.c_str(), dummy, dummy * 50);
502 msg_format("Recall depth set to level %d (%d').", dummy, dummy * 50);