src/cmd-visual/cmd-visuals.cpp

   1 #include "cmd-visual/cmd-visuals.h"
   2 #include "cmd-visual/cmd-draw.h"
   3 #include "core/asking-player.h"
   4 #include "core/visuals-reseter.h"
   5 #include "flavor/flavor-describer.h"
   6 #include "flavor/object-flavor-types.h"
   7 #include "flavor/object-flavor.h"
   8 #include "game-option/special-options.h"
   9 #include "io/files-util.h"
  10 #include "io/input-key-acceptor.h"
  11 #include "io/read-pref-file.h"
  12 #include "knowledge/knowledge-features.h"
  13 #include "knowledge/knowledge-items.h"
  14 #include "knowledge/knowledge-monsters.h"
  15 #include "knowledge/lighting-level-table.h"
  16 #include "main/sound-of-music.h"
  17 #include "monster-race/monster-race.h"
  18 #include "object/object-kind.h"
  19 #include "system/monster-race-definition.h"
  20 #include "system/object-type-definition.h"
  21 #include "system/player-type-definition.h"
  22 #include "term/screen-processor.h"
  23 #include "term/term-color-types.h"
  24 #include "util/angband-files.h"
  25 #include "util/int-char-converter.h"
  26 #include "view/display-messages.h"
  27
  28 /*!
  29  * @brief キャラクタのビジュアルIDを変更する際の対象指定関数
  30  * @param i 指定対象となるキャラクタコード
  31  * @param num 指定されたビジュアルIDを返す参照ポインタ
  32  * @param max ビジュアルIDの最大数
  33  * @return 指定が実際に行われた場合TRUE、キャンセルされた場合FALSE
  34  */
  35 static bool cmd_visuals_aux(int i, IDX *num, IDX max)
  36 {
  37     if (iscntrl(i)) {
  38         char str[10] = "";
  39         sprintf(str, "%d", *num);
  40         if (!get_string(format("Input new number(0-%d): ", max - 1), str, 4))
  41             return false;
  42
  43         IDX tmp = (IDX)strtol(str, nullptr, 0);
  44         if (tmp >= 0 && tmp < max)
  45             *num = tmp;
  46     } else if (isupper(i))
  47         *num = (*num + max - 1) % max;
  48     else
  49         *num = (*num + 1) % max;
  50
  51     return true;
  52 }
  53
  54 /*!
  55  * @brief キャラクタの変更メニュー表示
  56  * @param choice_msg 選択メッセージ
  57  */
  58 static void print_visuals_menu(concptr choice_msg)
  59 {
  60     prt(_("[ 画面表示の設定 ]", "Interact with Visuals"), 1, 0);
  61     prt(_("(0) ユーザー設定ファイルのロード", "(0) Load a user pref file"), 3, 5);
  62     prt(_("(1) モンスターの 色/文字 をファイルに書き出す", "(1) Dump monster attr/chars"), 4, 5);
  63     prt(_("(2) アイテムの   色/文字 をファイルに書き出す", "(2) Dump object attr/chars"), 5, 5);
  64     prt(_("(3) 地形の       色/文字 をファイルに書き出す", "(3) Dump feature attr/chars"), 6, 5);
  65     prt(_("(4) モンスターの 色/文字 を変更する (数値操作)", "(4) Change monster attr/chars (numeric operation)"), 7, 5);
  66     prt(_("(5) アイテムの   色/文字 を変更する (数値操作)", "(5) Change object attr/chars (numeric operation)"), 8, 5);
  67     prt(_("(6) 地形の       色/文字 を変更する (数値操作)", "(6) Change feature attr/chars (numeric operation)"), 9, 5);
  68     prt(_("(7) モンスターの 色/文字 を変更する (シンボルエディタ)", "(7) Change monster attr/chars (visual mode)"), 10, 5);
  69     prt(_("(8) アイテムの   色/文字 を変更する (シンボルエディタ)", "(8) Change object attr/chars (visual mode)"), 11, 5);
  70     prt(_("(9) 地形の       色/文字 を変更する (シンボルエディタ)", "(9) Change feature attr/chars (visual mode)"), 12, 5);
  71     prt(_("(R) 画面表示方法の初期化", "(R) Reset visuals"), 13, 5);
  72     prt(format(_("コマンド: %s", "Command: %s"), choice_msg ? choice_msg : _("", "")), 15, 0);
  73 }
  74
  75 /*
  76  * Interact with "visuals"
  77  */
  78 void do_cmd_visuals(PlayerType *player_ptr)
  79 {
  80     FILE *auto_dump_stream;
  81     char tmp[160];
  82     char buf[1024];
  83     bool need_redraw = false;
  84     concptr empty_symbol = "<< ? >>";
  85     if (use_bigtile)
  86         empty_symbol = "<< ?? >>";
  87
  88     screen_save();
  89     while (true) {
  90         term_clear();
  91         print_visuals_menu(nullptr);
  92         int i = inkey();
  93         if (i == ESCAPE)
  94             break;
  95
  96         switch (i) {
  97         case '0': {
  98             prt(_("コマンド: ユーザー設定ファイルのロード", "Command: Load a user pref file"), 15, 0);
  99             prt(_("ファイル: ", "File: "), 17, 0);
 100             sprintf(tmp, "%s.prf", player_ptr->base_name);
 101             if (!askfor(tmp, 70))
 102                 continue;
 103
 104             (void)process_pref_file(player_ptr, tmp, true);
 105             need_redraw = true;
 106             break;
 107         }
 108         case '1': {
 109             static concptr mark = "Monster attr/chars";
 110             prt(_("コマンド: モンスターの[色/文字]をファイルに書き出します", "Command: Dump monster attr/chars"), 15, 0);
 111             prt(_("ファイル: ", "File: "), 17, 0);
 112             sprintf(tmp, "%s.prf", player_ptr->base_name);
 113             if (!askfor(tmp, 70))
 114                 continue;
 115
 116             path_build(buf, sizeof(buf), ANGBAND_DIR_USER, tmp);
 117             if (!open_auto_dump(&auto_dump_stream, buf, mark))
 118                 continue;
 119
 120             auto_dump_printf(auto_dump_stream, _("\n# モンスターの[色/文字]の設定\n\n", "\n# Monster attr/char definitions\n\n"));
 121             for (const auto& r_ref : r_info) {
 122                 if (r_ref.name.empty())
 123                     continue;
 124
 125                 auto_dump_printf(auto_dump_stream, "# %s\n", r_ref.name.c_str());
 126                 auto_dump_printf(auto_dump_stream, "R:%d:0x%02X/0x%02X\n\n", r_ref.idx, (byte)(r_ref.x_attr), (byte)(r_ref.x_char));
 127             }
 128
 129             close_auto_dump(&auto_dump_stream, mark);
 130             msg_print(_("モンスターの[色/文字]をファイルに書き出しました。", "Dumped monster attr/chars."));
 131             break;
 132         }
 133         case '2': {
 134             static concptr mark = "Object attr/chars";
 135             prt(_("コマンド: アイテムの[色/文字]をファイルに書き出します", "Command: Dump object attr/chars"), 15, 0);
 136             prt(_("ファイル: ", "File: "), 17, 0);
 137             sprintf(tmp, "%s.prf", player_ptr->base_name);
 138             if (!askfor(tmp, 70))
 139                 continue;
 140
 141             path_build(buf, sizeof(buf), ANGBAND_DIR_USER, tmp);
 142             if (!open_auto_dump(&auto_dump_stream, buf, mark))
 143                 continue;
 144
 145             auto_dump_printf(auto_dump_stream, _("\n# アイテムの[色/文字]の設定\n\n", "\n# Object attr/char definitions\n\n"));
 146             for (const auto &k_ref : k_info) {
 147                 GAME_TEXT o_name[MAX_NLEN];
 148                 if (k_ref.name.empty())
 149                     continue;
 150
 151                 if (!k_ref.flavor) {
 152                     strip_name(o_name, k_ref.idx);
 153                 } else {
 154                     object_type dummy;
 155                     dummy.prep(k_ref.idx);
 156                     describe_flavor(player_ptr, o_name, &dummy, OD_FORCE_FLAVOR);
 157                 }
 158
 159                 auto_dump_printf(auto_dump_stream, "# %s\n", o_name);
 160                 auto_dump_printf(auto_dump_stream, "K:%d:0x%02X/0x%02X\n\n", (int)k_ref.idx, (byte)(k_ref.x_attr), (byte)(k_ref.x_char));
 161             }
 162
 163             close_auto_dump(&auto_dump_stream, mark);
 164             msg_print(_("アイテムの[色/文字]をファイルに書き出しました。", "Dumped object attr/chars."));
 165             break;
 166         }
 167         case '3': {
 168             static concptr mark = "Feature attr/chars";
 169             prt(_("コマンド: 地形の[色/文字]をファイルに書き出します", "Command: Dump feature attr/chars"), 15, 0);
 170             prt(_("ファイル: ", "File: "), 17, 0);
 171             sprintf(tmp, "%s.prf", player_ptr->base_name);
 172             if (!askfor(tmp, 70))
 173                 continue;
 174
 175             path_build(buf, sizeof(buf), ANGBAND_DIR_USER, tmp);
 176             if (!open_auto_dump(&auto_dump_stream, buf, mark))
 177                 continue;
 178
 179             auto_dump_printf(auto_dump_stream, _("\n# 地形の[色/文字]の設定\n\n", "\n# Feature attr/char definitions\n\n"));
 180             for (const auto &f_ref : f_info) {
 181                 if (f_ref.name.empty())
 182                     continue;
 183                 if (f_ref.mimic != f_ref.idx)
 184                     continue;
 185
 186                 auto_dump_printf(auto_dump_stream, "# %s\n", (f_ref.name.c_str()));
 187                 auto_dump_printf(auto_dump_stream, "F:%d:0x%02X/0x%02X:0x%02X/0x%02X:0x%02X/0x%02X\n\n", f_ref.idx, (byte)(f_ref.x_attr[F_LIT_STANDARD]),
 188                     (byte)(f_ref.x_char[F_LIT_STANDARD]), (byte)(f_ref.x_attr[F_LIT_LITE]), (byte)(f_ref.x_char[F_LIT_LITE]),
 189                     (byte)(f_ref.x_attr[F_LIT_DARK]), (byte)(f_ref.x_char[F_LIT_DARK]));
 190             }
 191
 192             close_auto_dump(&auto_dump_stream, mark);
 193             msg_print(_("地形の[色/文字]をファイルに書き出しました。", "Dumped feature attr/chars."));
 194             break;
 195         }
 196         case '4': {
 197             static concptr choice_msg = _("モンスターの[色/文字]を変更します", "Change monster attr/chars");
 198             static MONRACE_IDX r = 0;
 199             prt(format(_("コマンド: %s", "Command: %s"), choice_msg), 15, 0);
 200             while (true) {
 201                 monster_race *r_ptr = &r_info[r];
 202                 int c;
 203                 IDX t;
 204
 205                 TERM_COLOR da = r_ptr->d_attr;
 206                 byte dc = r_ptr->d_char;
 207                 TERM_COLOR ca = r_ptr->x_attr;
 208                 byte cc = r_ptr->x_char;
 209
 210                 term_putstr(5, 17, -1, TERM_WHITE, format(_("モンスター = %d, 名前 = %-40.40s", "Monster = %d, Name = %-40.40s"), r, r_ptr->name.c_str()));
 211                 term_putstr(10, 19, -1, TERM_WHITE, format(_("初期値  色 / 文字 = %3u / %3u", "Default attr/char = %3u / %3u"), da, dc));
 212                 term_putstr(40, 19, -1, TERM_WHITE, empty_symbol);
 213                 term_queue_bigchar(43, 19, da, dc, 0, 0);
 214                 term_putstr(10, 20, -1, TERM_WHITE, format(_("現在値  色 / 文字 = %3u / %3u", "Current attr/char = %3u / %3u"), ca, cc));
 215                 term_putstr(40, 20, -1, TERM_WHITE, empty_symbol);
 216                 term_queue_bigchar(43, 20, ca, cc, 0, 0);
 217                 term_putstr(0, 22, -1, TERM_WHITE, _("コマンド (n/N/^N/a/A/^A/c/C/^C/v/V/^V): ", "Command (n/N/^N/a/A/^A/c/C/^C/v/V/^V): "));
 218                 i = inkey();
 219                 if (i == ESCAPE)
 220                     break;
 221
 222                 if (iscntrl(i))
 223                     c = 'a' + i - KTRL('A');
 224                 else if (isupper(i))
 225                     c = 'a' + i - 'A';
 226                 else
 227                     c = i;
 228
 229                 switch (c) {
 230                 case 'n': {
 231                     IDX prev_r = r;
 232                     do {
 233                         if (!cmd_visuals_aux(i, &r, static_cast<IDX>(r_info.size()))) {
 234                             r = prev_r;
 235                             break;
 236                         }
 237                     } while (r_info[r].name.empty());
 238                 }
 239
 240                 break;
 241                 case 'a':
 242                     t = (int)r_ptr->x_attr;
 243                     (void)cmd_visuals_aux(i, &t, 256);
 244                     r_ptr->x_attr = (byte)t;
 245                     need_redraw = true;
 246                     break;
 247                 case 'c':
 248                     t = (int)r_ptr->x_char;
 249                     (void)cmd_visuals_aux(i, &t, 256);
 250                     r_ptr->x_char = (byte)t;
 251                     need_redraw = true;
 252                     break;
 253                 case 'v':
 254                     do_cmd_knowledge_monsters(player_ptr, &need_redraw, true, r);
 255                     term_clear();
 256                     print_visuals_menu(choice_msg);
 257                     break;
 258                 }
 259             }
 260
 261             break;
 262         }
 263         case '5': {
 264             static concptr choice_msg = _("アイテムの[色/文字]を変更します", "Change object attr/chars");
 265             static IDX k = 0;
 266             prt(format(_("コマンド: %s", "Command: %s"), choice_msg), 15, 0);
 267             while (true) {
 268                 object_kind *k_ptr = &k_info[k];
 269                 int c;
 270                 IDX t;
 271
 272                 TERM_COLOR da = k_ptr->d_attr;
 273                 SYMBOL_CODE dc = k_ptr->d_char;
 274                 TERM_COLOR ca = k_ptr->x_attr;
 275                 SYMBOL_CODE cc = k_ptr->x_char;
 276
 277                 term_putstr(5, 17, -1, TERM_WHITE,
 278                     format(
 279                         _("アイテム = %d, 名前 = %-40.40s", "Object = %d, Name = %-40.40s"), k, (!k_ptr->flavor ? k_ptr->name : k_ptr->flavor_name).c_str()));
 280                 term_putstr(10, 19, -1, TERM_WHITE, format(_("初期値  色 / 文字 = %3d / %3d", "Default attr/char = %3d / %3d"), da, dc));
 281                 term_putstr(40, 19, -1, TERM_WHITE, empty_symbol);
 282                 term_queue_bigchar(43, 19, da, dc, 0, 0);
 283                 term_putstr(10, 20, -1, TERM_WHITE, format(_("現在値  色 / 文字 = %3d / %3d", "Current attr/char = %3d / %3d"), ca, cc));
 284                 term_putstr(40, 20, -1, TERM_WHITE, empty_symbol);
 285                 term_queue_bigchar(43, 20, ca, cc, 0, 0);
 286                 term_putstr(0, 22, -1, TERM_WHITE, _("コマンド (n/N/^N/a/A/^A/c/C/^C/v/V/^V): ", "Command (n/N/^N/a/A/^A/c/C/^C/v/V/^V): "));
 287
 288                 i = inkey();
 289                 if (i == ESCAPE)
 290                     break;
 291
 292                 if (iscntrl(i))
 293                     c = 'a' + i - KTRL('A');
 294                 else if (isupper(i))
 295                     c = 'a' + i - 'A';
 296                 else
 297                     c = i;
 298
 299                 switch (c) {
 300                 case 'n': {
 301                     IDX prev_k = k;
 302                     do {
 303                         if (!cmd_visuals_aux(i, &k, static_cast<IDX>(k_info.size()))) {
 304                             k = prev_k;
 305                             break;
 306                         }
 307                     } while (k_info[k].name.empty());
 308                 }
 309
 310                 break;
 311                 case 'a':
 312                     t = (int)k_ptr->x_attr;
 313                     (void)cmd_visuals_aux(i, &t, 256);
 314                     k_ptr->x_attr = (byte)t;
 315                     need_redraw = true;
 316                     break;
 317                 case 'c':
 318                     t = (int)k_ptr->x_char;
 319                     (void)cmd_visuals_aux(i, &t, 256);
 320                     k_ptr->x_char = (byte)t;
 321                     need_redraw = true;
 322                     break;
 323                 case 'v':
 324                     do_cmd_knowledge_objects(player_ptr, &need_redraw, true, k);
 325                     term_clear();
 326                     print_visuals_menu(choice_msg);
 327                     break;
 328                 }
 329             }
 330
 331             break;
 332         }
 333         case '6': {
 334             static concptr choice_msg = _("地形の[色/文字]を変更します", "Change feature attr/chars");
 335             static IDX f = 0;
 336             static IDX lighting_level = F_LIT_STANDARD;
 337             prt(format(_("コマンド: %s", "Command: %s"), choice_msg), 15, 0);
 338             while (true) {
 339                 feature_type *f_ptr = &f_info[f];
 340                 int c;
 341                 IDX t;
 342
 343                 TERM_COLOR da = f_ptr->d_attr[lighting_level];
 344                 byte dc = f_ptr->d_char[lighting_level];
 345                 TERM_COLOR ca = f_ptr->x_attr[lighting_level];
 346                 byte cc = f_ptr->x_char[lighting_level];
 347
 348                 prt("", 17, 5);
 349                 term_putstr(5, 17, -1, TERM_WHITE,
 350                     format(_("地形 = %d, 名前 = %s, 明度 = %s", "Terrain = %d, Name = %s, Lighting = %s"), f, (f_ptr->name.c_str()),
 351                         lighting_level_str[lighting_level]));
 352                 term_putstr(10, 19, -1, TERM_WHITE, format(_("初期値  色 / 文字 = %3d / %3d", "Default attr/char = %3d / %3d"), da, dc));
 353                 term_putstr(40, 19, -1, TERM_WHITE, empty_symbol);
 354                 term_queue_bigchar(43, 19, da, dc, 0, 0);
 355                 term_putstr(10, 20, -1, TERM_WHITE, format(_("現在値  色 / 文字 = %3d / %3d", "Current attr/char = %3d / %3d"), ca, cc));
 356                 term_putstr(40, 20, -1, TERM_WHITE, empty_symbol);
 357                 term_queue_bigchar(43, 20, ca, cc, 0, 0);
 358                 term_putstr(0, 22, -1, TERM_WHITE,
 359                     _("コマンド (n/N/^N/a/A/^A/c/C/^C/l/L/^L/d/D/^D/v/V/^V): ", "Command (n/N/^N/a/A/^A/c/C/^C/l/L/^L/d/D/^D/v/V/^V): "));
 360
 361                 i = inkey();
 362                 if (i == ESCAPE)
 363                     break;
 364
 365                 if (iscntrl(i))
 366                     c = 'a' + i - KTRL('A');
 367                 else if (isupper(i))
 368                     c = 'a' + i - 'A';
 369                 else
 370                     c = i;
 371
 372                 switch (c) {
 373                 case 'n': {
 374                     IDX prev_f = f;
 375                     do {
 376                         if (!cmd_visuals_aux(i, &f, static_cast<IDX>(f_info.size()))) {
 377                             f = prev_f;
 378                             break;
 379                         }
 380                     } while (f_info[f].name.empty() || (f_info[f].mimic != f));
 381                 }
 382
 383                 break;
 384                 case 'a':
 385                     t = (int)f_ptr->x_attr[lighting_level];
 386                     (void)cmd_visuals_aux(i, &t, 256);
 387                     f_ptr->x_attr[lighting_level] = (byte)t;
 388                     need_redraw = true;
 389                     break;
 390                 case 'c':
 391                     t = (int)f_ptr->x_char[lighting_level];
 392                     (void)cmd_visuals_aux(i, &t, 256);
 393                     f_ptr->x_char[lighting_level] = (byte)t;
 394                     need_redraw = true;
 395                     break;
 396                 case 'l':
 397                     (void)cmd_visuals_aux(i, &lighting_level, F_LIT_MAX);
 398                     break;
 399                 case 'd':
 400                     apply_default_feat_lighting(f_ptr->x_attr, f_ptr->x_char);
 401                     need_redraw = true;
 402                     break;
 403                 case 'v':
 404                     do_cmd_knowledge_features(&need_redraw, true, f, &lighting_level);
 405                     term_clear();
 406                     print_visuals_menu(choice_msg);
 407                     break;
 408                 }
 409             }
 410
 411             break;
 412         }
 413         case '7':
 414             do_cmd_knowledge_monsters(player_ptr, &need_redraw, true, -1);
 415             break;
 416         case '8':
 417             do_cmd_knowledge_objects(player_ptr, &need_redraw, true, -1);
 418             break;
 419         case '9': {
 420             IDX lighting_level = F_LIT_STANDARD;
 421             do_cmd_knowledge_features(&need_redraw, true, -1, &lighting_level);
 422             break;
 423         }
 424         case 'R':
 425         case 'r':
 426             reset_visuals(player_ptr);
 427             msg_print(_("画面上の[色/文字]を初期値にリセットしました。", "Visual attr/char tables reset."));
 428             need_redraw = true;
 429             break;
 430         default:
 431             bell();
 432             break;
 433         }
 434
 435         msg_erase();
 436     }
 437
 438     screen_load();
 439     if (need_redraw)
 440         do_cmd_redraw(player_ptr);
 441 }