OSDN Git Service

Merge pull request #2284 from Hourier/Delete-SYMBOL_CODE
[hengbandforosx/hengbandosx.git] / src / knowledge / knowledge-items.cpp
1 /*!
2  * @brief 既知のアイテムとアーティファクトを表示する
3  * @date 2020/04/23
4  * @author Hourier
5  */
6
7 #include "knowledge/knowledge-items.h"
8 #include "core/show-file.h"
9 #include "core/stuff-handler.h"
10 #include "flavor/flavor-describer.h"
11 #include "flavor/object-flavor-types.h"
12 #include "flavor/object-flavor.h"
13 #include "game-option/special-options.h"
14 #include "inventory/inventory-slot-types.h"
15 #include "io-dump/dump-util.h"
16 #include "io/input-key-acceptor.h"
17 #include "knowledge/object-group-table.h"
18 #include "object-enchant/special-object-flags.h"
19 #include "object/object-kind-hook.h"
20 #include "object/object-kind.h"
21 #include "perception/identification.h"
22 #include "perception/object-perception.h"
23 #include "system/artifact-type-definition.h"
24 #include "system/floor-type-definition.h"
25 #include "system/grid-type-definition.h"
26 #include "system/player-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/int-char-converter.h"
31 #include "util/sort.h"
32 #include "view/display-messages.h"
33 #include "world/world.h"
34
35 #include <numeric>
36
37 /*! 
38  * @brief Check the status of "artifacts"
39  * @param player_ptr プレイヤーへの参照ポインタ
40  * @todo okay = 既知のアーティファクト? と思われるが確証がない分かりやすい変数名へ変更求む&万が一未知である旨の配列なら負論理なのでゴソッと差し替えるべき
41  */
42 void do_cmd_knowledge_artifacts(PlayerType *player_ptr)
43 {
44     FILE *fff = nullptr;
45     GAME_TEXT file_name[FILE_NAME_SIZE];
46     if (!open_temporary_file(&fff, file_name))
47         return;
48
49     //! @note 一般的に std::vector<bool> は使用を避けるべきとされているが、ここの用途では問題ない
50     std::vector<bool> okay(a_info.size());
51
52     for (const auto &a_ref : a_info) {
53         okay[a_ref.idx] = false;
54         if (a_ref.name.empty())
55             continue;
56         if (!a_ref.cur_num)
57             continue;
58
59         okay[a_ref.idx] = true;
60     }
61
62     for (POSITION y = 0; y < player_ptr->current_floor_ptr->height; y++) {
63         for (POSITION x = 0; x < player_ptr->current_floor_ptr->width; x++) {
64             auto *g_ptr = &player_ptr->current_floor_ptr->grid_array[y][x];
65             for (const auto this_o_idx : g_ptr->o_idx_list) {
66                 ObjectType *o_ptr;
67                 o_ptr = &player_ptr->current_floor_ptr->o_list[this_o_idx];
68                 if (!o_ptr->is_fixed_artifact())
69                     continue;
70                 if (o_ptr->is_known())
71                     continue;
72
73                 okay[o_ptr->fixed_artifact_idx] = false;
74             }
75         }
76     }
77
78     for (ARTIFACT_IDX i = 0; i < INVEN_TOTAL; i++) {
79         auto *o_ptr = &player_ptr->inventory_list[i];
80         if (!o_ptr->k_idx)
81             continue;
82         if (!o_ptr->is_fixed_artifact())
83             continue;
84         if (o_ptr->is_known())
85             continue;
86
87         okay[o_ptr->fixed_artifact_idx] = false;
88     }
89
90     std::vector<ARTIFACT_IDX> whats;
91     for (const auto &a_ref : a_info) {
92         if (okay[a_ref.idx])
93             whats.push_back(a_ref.idx);
94     }
95
96     uint16_t why = 3;
97     ang_sort(player_ptr, whats.data(), &why, whats.size(), ang_sort_art_comp, ang_sort_art_swap);
98     for (auto a_idx : whats) {
99         auto *a_ptr = &a_info[a_idx];
100         GAME_TEXT base_name[MAX_NLEN];
101         strcpy(base_name, _("未知の伝説のアイテム", "Unknown Artifact"));
102         ARTIFACT_IDX z = lookup_kind(a_ptr->tval, a_ptr->sval);
103         if (z) {
104             ObjectType forge;
105             ObjectType *q_ptr;
106             q_ptr = &forge;
107             q_ptr->prep(z);
108             q_ptr->fixed_artifact_idx = a_idx;
109             q_ptr->ident |= IDENT_STORE;
110             describe_flavor(player_ptr, base_name, q_ptr, (OD_OMIT_PREFIX | OD_NAME_ONLY));
111         }
112
113         fprintf(fff, _("     %s\n", "     The %s\n"), base_name);
114     }
115
116     angband_fclose(fff);
117     (void)show_file(player_ptr, true, file_name, _("既知の伝説のアイテム", "Artifacts Seen"), 0, 0);
118     fd_kill(file_name);
119 }
120
121 /*
122  * Build a list of object indexes in the given group. Return the number
123  * of objects in the group.
124  *
125  * mode & 0x01 : check for non-empty group
126  * mode & 0x02 : visual operation only
127  */
128 static KIND_OBJECT_IDX collect_objects(int grp_cur, KIND_OBJECT_IDX object_idx[], BIT_FLAGS8 mode)
129 {
130     KIND_OBJECT_IDX object_cnt = 0;
131     auto group_tval = object_group_tval[grp_cur];
132     for (const auto &k_ref : k_info) {
133         if (k_ref.name.empty())
134             continue;
135
136         if (!(mode & 0x02)) {
137             if (!w_ptr->wizard) {
138                 if (!k_ref.flavor)
139                     continue;
140                 if (!k_ref.aware)
141                     continue;
142             }
143
144             auto k = std::reduce(std::begin(k_ref.chance), std::end(k_ref.chance), 0);
145             if (!k)
146                 continue;
147         }
148
149         if (group_tval == ItemKindType::LIFE_BOOK) {
150             if (ItemKindType::LIFE_BOOK <= k_ref.tval && k_ref.tval <= ItemKindType::HEX_BOOK) {
151                 object_idx[object_cnt++] = k_ref.idx;
152             } else
153                 continue;
154         } else if (k_ref.tval == group_tval) {
155             object_idx[object_cnt++] = k_ref.idx;
156         } else
157             continue;
158
159         if (mode & 0x01)
160             break;
161     }
162
163     object_idx[object_cnt] = -1;
164     return object_cnt;
165 }
166
167 /*
168  * Display the objects in a group.
169  */
170 static void display_object_list(int col, int row, int per_page, IDX object_idx[], int object_cur, int object_top, bool visual_only)
171 {
172     int i;
173     for (i = 0; i < per_page && (object_idx[object_top + i] >= 0); i++) {
174         GAME_TEXT o_name[MAX_NLEN];
175         TERM_COLOR a;
176         object_kind *flavor_k_ptr;
177         KIND_OBJECT_IDX k_idx = object_idx[object_top + i];
178         auto *k_ptr = &k_info[k_idx];
179         TERM_COLOR attr = ((k_ptr->aware || visual_only) ? TERM_WHITE : TERM_SLATE);
180         byte cursor = ((k_ptr->aware || visual_only) ? TERM_L_BLUE : TERM_BLUE);
181         if (!visual_only && k_ptr->flavor) {
182             flavor_k_ptr = &k_info[k_ptr->flavor];
183         } else {
184             flavor_k_ptr = k_ptr;
185         }
186
187         attr = ((i + object_top == object_cur) ? cursor : attr);
188         if (!k_ptr->flavor || (!visual_only && k_ptr->aware)) {
189             strip_name(o_name, k_idx);
190         } else {
191             strcpy(o_name, flavor_k_ptr->flavor_name.c_str());
192         }
193
194         c_prt(attr, o_name, row + i, col);
195         if (per_page == 1) {
196             c_prt(attr, format("%02x/%02x", flavor_k_ptr->x_attr, flavor_k_ptr->x_char), row + i, (w_ptr->wizard || visual_only) ? 64 : 68);
197         }
198
199         if (w_ptr->wizard || visual_only) {
200             c_prt(attr, format("%d", k_idx), row + i, 70);
201         }
202
203         a = flavor_k_ptr->x_attr;
204         auto c = flavor_k_ptr->x_char;
205
206         term_queue_bigchar(use_bigtile ? 76 : 77, row + i, a, c, 0, 0);
207     }
208
209     for (; i < per_page; i++) {
210         term_erase(col, row + i, 255);
211     }
212 }
213
214 /*
215  * Describe fake object
216  */
217 static void desc_obj_fake(PlayerType *player_ptr, KIND_OBJECT_IDX k_idx)
218 {
219     ObjectType *o_ptr;
220     ObjectType ObjectType_body;
221     o_ptr = &ObjectType_body;
222     o_ptr->wipe();
223     o_ptr->prep(k_idx);
224
225     o_ptr->ident |= IDENT_KNOWN;
226     handle_stuff(player_ptr);
227
228     if (screen_object(player_ptr, o_ptr, SCROBJ_FAKE_OBJECT | SCROBJ_FORCE_DETAIL))
229         return;
230
231     msg_print(_("特に変わったところはないようだ。", "You see nothing special."));
232     msg_print(nullptr);
233 }
234
235 /**
236  * @brief Display known objects
237  */
238 void do_cmd_knowledge_objects(PlayerType *player_ptr, bool *need_redraw, bool visual_only, KIND_OBJECT_IDX direct_k_idx)
239 {
240     KIND_OBJECT_IDX object_old, object_top;
241     KIND_OBJECT_IDX grp_idx[100];
242     int object_cnt;
243
244     bool visual_list = false;
245     TERM_COLOR attr_top = 0;
246     byte char_left = 0;
247     byte mode;
248
249     TERM_LEN wid, hgt;
250     term_get_size(&wid, &hgt);
251
252     int browser_rows = hgt - 8;
253     std::vector<KIND_OBJECT_IDX> object_idx(k_info.size());
254
255     int len;
256     int max = 0;
257     int grp_cnt = 0;
258     if (direct_k_idx < 0) {
259         mode = visual_only ? 0x03 : 0x01;
260         for (IDX i = 0; object_group_text[i] != nullptr; i++) {
261             len = strlen(object_group_text[i]);
262             if (len > max)
263                 max = len;
264
265             if (collect_objects(i, object_idx.data(), mode)) {
266                 grp_idx[grp_cnt++] = i;
267             }
268         }
269
270         object_old = -1;
271         object_cnt = 0;
272     } else {
273         auto *k_ptr = &k_info[direct_k_idx];
274         object_kind *flavor_k_ptr;
275
276         if (!visual_only && k_ptr->flavor) {
277             flavor_k_ptr = &k_info[k_ptr->flavor];
278         } else {
279             flavor_k_ptr = k_ptr;
280         }
281
282         object_idx[0] = direct_k_idx;
283         object_old = direct_k_idx;
284         object_cnt = 1;
285         object_idx[1] = -1;
286         (void)visual_mode_command(
287             'v', &visual_list, browser_rows - 1, wid - (max + 3), &attr_top, &char_left, &flavor_k_ptr->x_attr, &flavor_k_ptr->x_char, need_redraw);
288     }
289
290     grp_idx[grp_cnt] = -1;
291     mode = visual_only ? 0x02 : 0x00;
292     IDX old_grp_cur = -1;
293     IDX grp_cur = 0;
294     IDX grp_top = 0;
295     IDX object_cur = object_top = 0;
296     bool flag = false;
297     bool redraw = true;
298     int column = 0;
299     while (!flag) {
300         object_kind *k_ptr, *flavor_k_ptr;
301
302         if (redraw) {
303             clear_from(0);
304
305 #ifdef JP
306             prt(format("%s - アイテム", !visual_only ? "知識" : "表示"), 2, 0);
307             if (direct_k_idx < 0)
308                 prt("グループ", 4, 0);
309             prt("名前", 4, max + 3);
310             if (w_ptr->wizard || visual_only)
311                 prt("Idx", 4, 70);
312             prt("文字", 4, 74);
313 #else
314             prt(format("%s - objects", !visual_only ? "Knowledge" : "Visuals"), 2, 0);
315             if (direct_k_idx < 0)
316                 prt("Group", 4, 0);
317             prt("Name", 4, max + 3);
318             if (w_ptr->wizard || visual_only)
319                 prt("Idx", 4, 70);
320             prt("Sym", 4, 75);
321 #endif
322
323             for (IDX i = 0; i < 78; i++) {
324                 term_putch(i, 5, TERM_WHITE, '=');
325             }
326
327             if (direct_k_idx < 0) {
328                 for (IDX i = 0; i < browser_rows; i++) {
329                     term_putch(max + 1, 6 + i, TERM_WHITE, '|');
330                 }
331             }
332
333             redraw = false;
334         }
335
336         if (direct_k_idx < 0) {
337             if (grp_cur < grp_top)
338                 grp_top = grp_cur;
339             if (grp_cur >= grp_top + browser_rows)
340                 grp_top = grp_cur - browser_rows + 1;
341
342             std::vector<concptr> tmp_texts;
343             for (auto &text : object_group_text) {
344                 tmp_texts.push_back(text);
345             }
346
347             display_group_list(0, 6, max, browser_rows, grp_idx, tmp_texts.data(), grp_cur, grp_top);
348             if (old_grp_cur != grp_cur) {
349                 old_grp_cur = grp_cur;
350                 object_cnt = collect_objects(grp_idx[grp_cur], object_idx.data(), mode);
351             }
352
353             while (object_cur < object_top)
354                 object_top = std::max<short>(0, object_top - browser_rows / 2);
355
356             while (object_cur >= object_top + browser_rows)
357                 object_top = std::min<short>(object_cnt - browser_rows, object_top + browser_rows / 2);
358         }
359
360         if (!visual_list) {
361             display_object_list(max + 3, 6, browser_rows, object_idx.data(), object_cur, object_top, visual_only);
362         } else {
363             object_top = object_cur;
364             display_object_list(max + 3, 6, 1, object_idx.data(), object_cur, object_top, visual_only);
365             display_visual_list(max + 3, 7, browser_rows - 1, wid - (max + 3), attr_top, char_left);
366         }
367
368         k_ptr = &k_info[object_idx[object_cur]];
369
370         if (!visual_only && k_ptr->flavor) {
371             flavor_k_ptr = &k_info[k_ptr->flavor];
372         } else {
373             flavor_k_ptr = k_ptr;
374         }
375
376 #ifdef JP
377         prt(format("<方向>%s%s%s, ESC", (!visual_list && !visual_only) ? ", 'r'で詳細を見る" : "", visual_list ? ", ENTERで決定" : ", 'v'でシンボル変更",
378                 (attr_idx || char_idx) ? ", 'c', 'p'でペースト" : ", 'c'でコピー"),
379             hgt - 1, 0);
380 #else
381         prt(format("<dir>%s%s%s, ESC", (!visual_list && !visual_only) ? ", 'r' to recall" : "", visual_list ? ", ENTER to accept" : ", 'v' for visuals",
382                 (attr_idx || char_idx) ? ", 'c', 'p' to paste" : ", 'c' to copy"),
383             hgt - 1, 0);
384 #endif
385
386         if (!visual_only) {
387             if (object_cnt)
388                 object_kind_track(player_ptr, object_idx[object_cur]);
389
390             if (object_old != object_idx[object_cur]) {
391                 handle_stuff(player_ptr);
392                 object_old = object_idx[object_cur];
393             }
394         }
395
396         if (visual_list) {
397             place_visual_list_cursor(max + 3, 7, flavor_k_ptr->x_attr, flavor_k_ptr->x_char, attr_top, char_left);
398         } else if (!column) {
399             term_gotoxy(0, 6 + (grp_cur - grp_top));
400         } else {
401             term_gotoxy(max + 3, 6 + (object_cur - object_top));
402         }
403
404         char ch = inkey();
405         if (visual_mode_command(
406                 ch, &visual_list, browser_rows - 1, wid - (max + 3), &attr_top, &char_left, &flavor_k_ptr->x_attr, &flavor_k_ptr->x_char, need_redraw)) {
407             if (direct_k_idx >= 0) {
408                 switch (ch) {
409                 case '\n':
410                 case '\r':
411                 case ESCAPE:
412                     flag = true;
413                     break;
414                 }
415             }
416             continue;
417         }
418
419         switch (ch) {
420         case ESCAPE: {
421             flag = true;
422             break;
423         }
424
425         case 'R':
426         case 'r': {
427             if (!visual_list && !visual_only && (grp_cnt > 0)) {
428                 desc_obj_fake(player_ptr, object_idx[object_cur]);
429                 redraw = true;
430             }
431
432             break;
433         }
434
435         default: {
436             browser_cursor(ch, &column, &grp_cur, grp_cnt, &object_cur, object_cnt);
437             break;
438         }
439         }
440     }
441 }