2 * todo サブルーチン分割を行うと行数が膨れ上がりそう、再分割も検討すべし
3 * @brief 既知のモンスターに関する情報を表示する
8 #include "knowledge/knowledge-monsters.h"
9 #include "core/show-file.h"
10 #include "core/stuff-handler.h"
11 #include "game-option/cheat-options.h"
12 #include "game-option/special-options.h"
13 #include "io-dump/dump-util.h"
14 #include "io/input-key-acceptor.h"
15 #include "knowledge/monster-group-table.h"
16 #include "locale/english.h"
17 #include "monster-race/monster-race.h"
18 #include "monster-race/race-flags1.h"
19 #include "monster-race/race-flags3.h"
20 #include "monster-race/race-flags7.h"
21 #include "monster/monster-describer.h"
22 #include "monster/monster-description-types.h"
23 #include "monster/monster-info.h"
24 #include "monster/monster-status.h"
25 #include "monster/smart-learn-types.h"
26 #include "system/floor-type-definition.h"
27 #include "term/screen-processor.h"
28 #include "term/term-color-types.h"
29 #include "util/angband-files.h"
30 #include "util/bit-flags-calculator.h"
31 #include "util/int-char-converter.h"
32 #include "util/sort.h"
33 #include "util/string-processor.h"
34 #include "view/display-lore.h"
35 #include "view/display-monster-status.h"
36 #include "world/world.h"
40 * Build a list of monster indexes in the given group.
42 * mode & 0x01 : check for non-empty group
43 * mode & 0x02 : visual operation only
45 * @param creature_ptr プレーヤーへの参照ポインタ
47 * @param mon_idx[] ???
49 * @return The number of monsters in the group
51 static IDX collect_monsters(player_type *creature_ptr, IDX grp_cur, IDX mon_idx[], monster_lore_mode mode)
53 concptr group_char = monster_group_char[grp_cur];
54 bool grp_unique = (monster_group_char[grp_cur] == (char *)-1L);
55 bool grp_riding = (monster_group_char[grp_cur] == (char *)-2L);
56 bool grp_wanted = (monster_group_char[grp_cur] == (char *)-3L);
57 bool grp_amberite = (monster_group_char[grp_cur] == (char *)-4L);
60 for (IDX i = 0; i < max_r_idx; i++) {
61 monster_race *r_ptr = &r_info[i];
64 if (((mode != MONSTER_LORE_DEBUG) && (mode != MONSTER_LORE_RESEARCH)) && !cheat_know && !r_ptr->r_sights)
68 if (none_bits(r_ptr->flags1, RF1_UNIQUE))
70 } else if (grp_riding) {
71 if (none_bits(r_ptr->flags7, RF7_RIDING))
73 } else if (grp_wanted) {
75 for (int j = 0; j < MAX_BOUNTY; j++) {
76 if (current_world_ptr->bounty_r_idx[j] == i || current_world_ptr->bounty_r_idx[j] - 10000 == i
77 || (creature_ptr->today_mon && creature_ptr->today_mon == i)) {
85 } else if (grp_amberite) {
86 if (none_bits(r_ptr->flags3, RF3_AMBERITE))
89 if (!angband_strchr(group_char, r_ptr->d_char))
93 mon_idx[mon_cnt++] = i;
94 if (mode == MONSTER_LORE_NORMAL)
96 if (mode == MONSTER_LORE_DEBUG)
100 mon_idx[mon_cnt] = -1;
102 ang_sort(creature_ptr, mon_idx, &dummy_why, mon_cnt, ang_sort_comp_monster_level, ang_sort_swap_hook);
107 * @brief 現在のペットを表示するコマンドのメインルーチン /
108 * Display current pets
109 * @param creature_ptr プレーヤーへの参照ポインタ
112 void do_cmd_knowledge_pets(player_type *creature_ptr)
115 GAME_TEXT file_name[FILE_NAME_SIZE];
116 if (!open_temporary_file(&fff, file_name))
120 GAME_TEXT pet_name[MAX_NLEN];
122 for (int i = creature_ptr->current_floor_ptr->m_max - 1; i >= 1; i--) {
123 m_ptr = &creature_ptr->current_floor_ptr->m_list[i];
124 if (!monster_is_valid(m_ptr) || !is_pet(m_ptr))
128 monster_desc(creature_ptr, pet_name, m_ptr, MD_ASSUME_VISIBLE | MD_INDEF_VISIBLE);
129 fprintf(fff, "%s (%s)\n", pet_name, look_mon_desc(m_ptr, 0x00));
132 int show_upkeep = calculate_upkeep(creature_ptr);
134 fprintf(fff, "----------------------------------------------\n");
136 fprintf(fff, " 合計: %d 体のペット\n", t_friends);
138 fprintf(fff, " Total: %d pet%s.\n", t_friends, (t_friends == 1 ? "" : "s"));
140 fprintf(fff, _(" 維持コスト: %d%% MP\n", " Upkeep: %d%% mana.\n"), show_upkeep);
143 (void)show_file(creature_ptr, TRUE, file_name, _("現在のペット", "Current Pets"), 0, 0);
148 * @brief 現在までに倒したモンスターを表示するコマンドのメインルーチン /
149 * @param creature_ptr プレーヤーへの参照ポインタ
152 * @note the player ghosts are ignored.
154 void do_cmd_knowledge_kill_count(player_type *creature_ptr)
157 GAME_TEXT file_name[FILE_NAME_SIZE];
158 if (!open_temporary_file(&fff, file_name))
162 C_MAKE(who, max_r_idx, MONRACE_IDX);
164 for (int kk = 1; kk < max_r_idx; kk++) {
165 monster_race *r_ptr = &r_info[kk];
167 if (any_bits(r_ptr->flags1, RF1_UNIQUE)) {
168 bool dead = (r_ptr->max_num == 0);
174 MONSTER_NUMBER this_monster = r_ptr->r_pkills;
176 if (this_monster > 0) {
177 total += this_monster;
183 fprintf(fff, _("あなたはまだ敵を倒していない。\n\n", "You have defeated no enemies yet.\n\n"));
186 fprintf(fff, "あなたは%ld体の敵を倒している。\n\n", (long int)total);
188 fprintf(fff, "You have defeated %ld %s.\n\n", (long int)total, (total == 1) ? "enemy" : "enemies");
193 for (MONRACE_IDX i = 1; i < max_r_idx; i++) {
194 monster_race *r_ptr = &r_info[i];
200 ang_sort(creature_ptr, who, &why, n, ang_sort_comp_hook, ang_sort_swap_hook);
201 for (int k = 0; k < n; k++) {
202 monster_race *r_ptr = &r_info[who[k]];
203 if (any_bits(r_ptr->flags1, RF1_UNIQUE)) {
204 bool dead = (r_ptr->max_num == 0);
206 fprintf(fff, " %s\n", (r_name + r_ptr->name));
213 MONSTER_NUMBER this_monster = r_ptr->r_pkills;
214 if (this_monster <= 0)
218 concptr number_of_kills = angband_strchr("pt", r_ptr->d_char) ? "人" : "体";
219 fprintf(fff, " %3d %sの %s\n", (int)this_monster, number_of_kills, r_name + r_ptr->name);
221 if (this_monster < 2) {
222 if (angband_strstr(r_name + r_ptr->name, "coins")) {
223 fprintf(fff, " 1 pile of %s\n", (r_name + r_ptr->name));
225 fprintf(fff, " 1 %s\n", (r_name + r_ptr->name));
229 strcpy(ToPlural, (r_name + r_ptr->name));
230 plural_aux(ToPlural);
231 fprintf(fff, " %d %s\n", this_monster, ToPlural);
234 total += this_monster;
237 fprintf(fff, "----------------------------------------------\n");
239 fprintf(fff, " 合計: %lu 体を倒した。\n", (unsigned long int)total);
241 fprintf(fff, " Total: %lu creature%s killed.\n", (unsigned long int)total, (total == 1 ? "" : "s"));
244 C_KILL(who, max_r_idx, s16b);
246 (void)show_file(creature_ptr, TRUE, file_name, _("倒した敵の数", "Kill Count"), 0, 0);
251 * Display the monsters in a group.
253 static void display_monster_list(int col, int row, int per_page, s16b mon_idx[], int mon_cur, int mon_top, bool visual_only)
256 for (i = 0; i < per_page && (mon_idx[mon_top + i] >= 0); i++) {
258 MONRACE_IDX r_idx = mon_idx[mon_top + i];
259 monster_race *r_ptr = &r_info[r_idx];
260 attr = ((i + mon_top == mon_cur) ? TERM_L_BLUE : TERM_WHITE);
261 c_prt(attr, (r_name + r_ptr->name), row + i, col);
263 c_prt(attr, format("%02x/%02x", r_ptr->x_attr, r_ptr->x_char), row + i, (current_world_ptr->wizard || visual_only) ? 56 : 61);
265 if (current_world_ptr->wizard || visual_only)
266 c_prt(attr, format("%d", r_idx), row + i, 62);
268 term_erase(69, row + i, 255);
269 term_queue_bigchar(use_bigtile ? 69 : 70, row + i, r_ptr->x_attr, r_ptr->x_char, 0, 0);
271 if (none_bits(r_ptr->flags1, RF1_UNIQUE))
272 put_str(format("%5d", r_ptr->r_pkills), row + i, 73);
274 c_put_str((r_ptr->max_num == 0 ? TERM_L_DARK : TERM_WHITE), (r_ptr->max_num == 0 ? _("死亡", " dead") : _("生存", "alive")), row + i, 74);
278 for (; i < per_page; i++) {
279 term_erase(col, row + i, 255);
285 * Display known monsters.
286 * @param creature_ptr プレーヤーへの参照ポインタ
287 * @param need_redraw 画面の再描画が必要な時TRUE
288 * @param visual_only ???
289 * @param direct_r_idx モンスターID
292 void do_cmd_knowledge_monsters(player_type *creature_ptr, bool *need_redraw, bool visual_only, IDX direct_r_idx)
295 term_get_size(&wid, &hgt);
297 C_MAKE(mon_idx, max_r_idx, MONRACE_IDX);
303 bool visual_list = FALSE;
304 TERM_COLOR attr_top = 0;
306 monster_lore_mode mode;
307 int browser_rows = hgt - 8;
308 if (direct_r_idx < 0) {
309 mode = visual_only ? MONSTER_LORE_DEBUG : MONSTER_LORE_NORMAL;
311 for (IDX i = 0; monster_group_text[i] != NULL; i++) {
312 len = strlen(monster_group_text[i]);
316 if ((monster_group_char[i] == ((char *)-1L)) || collect_monsters(creature_ptr, i, mon_idx, mode)) {
317 grp_idx[grp_cnt++] = i;
323 mon_idx[0] = direct_r_idx;
327 (void)visual_mode_command('v', &visual_list, browser_rows - 1, wid - (max + 3), &attr_top, &char_left, &r_info[direct_r_idx].x_attr,
328 &r_info[direct_r_idx].x_char, need_redraw);
331 grp_idx[grp_cnt] = -1;
332 mode = visual_only ? MONSTER_LORE_RESEARCH : MONSTER_LORE_NONE;
333 IDX old_grp_cur = -1;
344 prt(format(_("%s - モンスター", "%s - monsters"), !visual_only ? _("知識", "Knowledge") : _("表示", "Visuals")), 2, 0);
345 if (direct_r_idx < 0)
346 prt(_("グループ", "Group"), 4, 0);
347 prt(_("名前", "Name"), 4, max + 3);
348 if (current_world_ptr->wizard || visual_only)
350 prt(_("文字", "Sym"), 4, 67);
352 prt(_("殺害数", "Kills"), 4, 72);
354 for (IDX i = 0; i < 78; i++) {
355 term_putch(i, 5, TERM_WHITE, '=');
358 if (direct_r_idx < 0) {
359 for (IDX i = 0; i < browser_rows; i++) {
360 term_putch(max + 1, 6 + i, TERM_WHITE, '|');
367 if (direct_r_idx < 0) {
368 if (grp_cur < grp_top)
370 if (grp_cur >= grp_top + browser_rows)
371 grp_top = grp_cur - browser_rows + 1;
373 display_group_list(0, 6, max, browser_rows, grp_idx, monster_group_text, grp_cur, grp_top);
374 if (old_grp_cur != grp_cur) {
375 old_grp_cur = grp_cur;
376 mon_cnt = collect_monsters(creature_ptr, grp_idx[grp_cur], mon_idx, mode);
379 while (mon_cur < mon_top)
380 mon_top = MAX(0, mon_top - browser_rows / 2);
381 while (mon_cur >= mon_top + browser_rows)
382 mon_top = MIN(mon_cnt - browser_rows, mon_top + browser_rows / 2);
386 display_monster_list(max + 3, 6, browser_rows, mon_idx, mon_cur, mon_top, visual_only);
389 display_monster_list(max + 3, 6, 1, mon_idx, mon_cur, mon_top, visual_only);
390 display_visual_list(max + 3, 7, browser_rows - 1, wid - (max + 3), attr_top, char_left);
393 prt(format(_("<方向>%s%s%s, ESC", "<dir>%s%s%s, ESC"), (!visual_list && !visual_only) ? _(", 'r'で思い出を見る", ", 'r' to recall") : "",
394 visual_list ? _(", ENTERで決定", ", ENTER to accept") : _(", 'v'でシンボル変更", ", 'v' for visuals"),
395 (attr_idx || char_idx) ? _(", 'c', 'p'でペースト", ", 'c', 'p' to paste") : _(", 'c'でコピー", ", 'c' to copy")),
399 r_ptr = &r_info[mon_idx[mon_cur]];
403 monster_race_track(creature_ptr, mon_idx[mon_cur]);
404 handle_stuff(creature_ptr);
408 place_visual_list_cursor(max + 3, 7, r_ptr->x_attr, r_ptr->x_char, attr_top, char_left);
409 } else if (!column) {
410 term_gotoxy(0, 6 + (grp_cur - grp_top));
412 term_gotoxy(max + 3, 6 + (mon_cur - mon_top));
416 if (visual_mode_command(ch, &visual_list, browser_rows - 1, wid - (max + 3), &attr_top, &char_left, &r_ptr->x_attr, &r_ptr->x_char, need_redraw)) {
417 if (direct_r_idx >= 0) {
438 if (!visual_list && !visual_only && (mon_idx[mon_cur] > 0)) {
439 screen_roff(creature_ptr, mon_idx[mon_cur], MONSTER_LORE_NORMAL);
450 browser_cursor(ch, &column, &grp_cur, grp_cnt, &mon_cur, mon_cnt);
457 C_KILL(mon_idx, max_r_idx, MONRACE_IDX);
461 * List wanted monsters
462 * @param creature_ptr プレーヤーへの参照ポインタ
465 void do_cmd_knowledge_bounty(player_type *creature_ptr)
468 GAME_TEXT file_name[FILE_NAME_SIZE];
469 if (!open_temporary_file(&fff, file_name))
472 fprintf(fff, _("今日のターゲット : %s\n", "Today's target : %s\n"),
473 (creature_ptr->today_mon ? r_name + r_info[creature_ptr->today_mon].name : _("不明", "unknown")));
475 fprintf(fff, _("賞金首リスト\n", "List of wanted monsters\n"));
476 fprintf(fff, "----------------------------------------------\n");
479 for (int i = 0; i < MAX_BOUNTY; i++) {
480 if (current_world_ptr->bounty_r_idx[i] <= 10000) {
481 fprintf(fff, "%s\n", r_name + r_info[current_world_ptr->bounty_r_idx[i]].name);
487 fprintf(fff, "\n%s\n", _("賞金首はもう残っていません。", "There are no more wanted monster."));
490 (void)show_file(creature_ptr, TRUE, file_name, _("賞金首の一覧", "Wanted monsters"), 0, 0);