src/variable.c

   1 /*!
   2  * @file variable.c
   3  * @brief グローバル変数定義 / Angband variables
   4  * @date 2014/10/05
   5  * @author
   6  * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke<br>
   7  * <br>
   8  * This software may be copied and distributed for educational, research,<br>
   9  * and not for profit purposes provided that this copyright and statement<br>
  10  * are included in all such copies.  Other copyrights may also apply.<br>
  11  */
  12
  13 #include "angband.h"
  14 #include "geometry.h"
  15
  16 /*!
  17  * コピーライト情報 /
  18  * Hack -- Link a copyright message into the executable
  19  */
  20 const concptr copyright[5] =
  21 {
  22         "Copyright (c) 1989 James E. Wilson, Robert A. Keoneke",
  23         "",
  24         "This software may be copied and distributed for educational, research,",
  25         "and not for profit purposes provided that this copyright and statement",
  26         "are included in all such copies."
  27 };
  28
  29 int max_macrotrigger = 0; /*!< 現在登録中のマクロ(トリガー)の数 */
  30 concptr macro_template = NULL; /*!< Angband設定ファイルのT: タグ情報から読み込んだ長いTコードを処理するために利用する文字列ポインタ */
  31 concptr macro_modifier_chr; /*!< &x# で指定されるマクロトリガーに関する情報を記録する文字列ポインタ */
  32 concptr macro_modifier_name[MAX_MACRO_MOD]; /*!< マクロ上で取り扱う特殊キーを文字列上で表現するためのフォーマットを記録した文字列ポインタ配列 */
  33 concptr macro_trigger_name[MAX_MACRO_TRIG]; /*!< マクロのトリガーコード */
  34 concptr macro_trigger_keycode[2][MAX_MACRO_TRIG];  /*!< マクロの内容 */
  35
  36 int level_up = 0; /*!< レベルアップの際に遅延してcalc_mana()関数上で上昇量を表示するかどうかの判定フラグ */
  37
  38
  39 /*
  40  * 自動拾い/破壊設定のリストに関する変数 / List for auto-picker/destroyer entries
  41  */
  42 int max_autopick = 0; /*!< 現在登録している自動拾い/破壊設定の数 */
  43 int max_max_autopick = 0; /*!< 自動拾い/破壊設定の限界数 */
  44 autopick_type *autopick_list = NULL; /*!< 自動拾い/破壊設定構造体のポインタ配列 */
  45
  46 /*
  47  * Savefile version
  48  */
  49 byte h_ver_major; /* Savefile version for Hengband 1.1.1 and later */
  50 byte h_ver_minor;
  51 byte h_ver_patch;
  52 byte h_ver_extra;
  53
  54 byte sf_extra;          /* Savefile's encoding key */
  55
  56 byte z_major;           /* Savefile version for Hengband */
  57 byte z_minor;
  58 byte z_patch;
  59
  60 /*
  61  * Savefile information
  62  */
  63 u32b sf_system;                 /* Operating system info */
  64 u32b sf_when;                   /* Time when savefile created */
  65 u16b sf_lives;                  /* Number of past "lives" with this file */
  66 u16b sf_saves;                  /* Number of "saves" during this life */
  67
  68 /*
  69  * Run-time arguments
  70  */
  71 bool arg_fiddle;                        /* Command arg -- Request fiddle mode */
  72 bool arg_wizard;                        /* Command arg -- Request wizard mode */
  73 bool arg_sound;                         /* Command arg -- Request special sounds */
  74 bool arg_music;                         /* Command arg -- Request special musics */
  75 byte arg_graphics;                      /* Command arg -- Request graphics mode */
  76 bool arg_monochrome;            /* Command arg -- Request monochrome mode */
  77 bool arg_force_original;        /* Command arg -- Request original keyset */
  78 bool arg_force_roguelike;       /* Command arg -- Request roguelike keyset */
  79 bool arg_bigtile = FALSE;       /* Command arg -- Request big tile mode */
  80
  81 /*
  82  * Various things
  83  */
  84 bool character_generated;       /* The character exists */
  85 bool character_dungeon;         /* The character has a dungeon */
  86 bool character_loaded;          /* The character was loaded from a savefile */
  87 bool character_saved;           /* The character was just saved to a savefile */
  88
  89 bool character_icky;            /* The game is in an icky full screen mode */
  90 bool character_xtra;            /* The game is in an icky startup mode */
  91
  92 bool creating_savefile;         /* New savefile is currently created */
  93
  94 u32b seed_flavor;               /* Hack -- consistent object colors */
  95 u32b seed_town;                 /* Hack -- consistent town layout */
  96
  97 s16b command_cmd;               /* Current "Angband Command" */
  98
  99 COMMAND_ARG command_arg;        /*!< 各種コマンドの汎用的な引数として扱う / Gives argument of current command */
 100 COMMAND_NUM command_rep;        /*!< 各種コマンドの汎用的なリピート数として扱う / Gives repetition of current command */
 101 DIRECTION command_dir;          /*!< 各種コマンドの汎用的な方向値処理として扱う/ Gives direction of current command */
 102
 103 s16b command_see;               /* See "object1.c" */
 104 s16b command_wrk;               /* See "object1.c" */
 105
 106 TERM_LEN command_gap = 999;         /* See "object1.c" */
 107
 108 s16b command_new;               /* Command chaining from inven/equip view */
 109
 110 bool msg_flag;                  /* Used in msg_print() for "buffering" */
 111
 112 s16b running;                   /* Current counter for running, if any */
 113
 114 bool invoking_midnight_curse; /*!< 悪夢モード時の真夜中太古の呪い発生処理フラグ */
 115
 116 GAME_TURN old_battle;
 117
 118 bool use_sound;                 /* The "sound" mode is enabled */
 119 bool use_music;                 /* The "music" mode is enabled */
 120 bool use_graphics;              /* The "graphics" mode is enabled */
 121 bool use_bigtile = FALSE;
 122
 123 s16b signal_count;              /* Hack -- Count interupts */
 124
 125 bool inkey_base;                /* See the "inkey()" function */
 126 bool inkey_xtra;                /* See the "inkey()" function */
 127 bool inkey_scan;                /* See the "inkey()" function */
 128 bool inkey_flag;                /* See the "inkey()" function */
 129 bool get_com_no_macros = FALSE; /* Expand macros in "get_com" or not */
 130
 131 OBJECT_SUBTYPE_VALUE coin_type; /* Hack -- force coin type */
 132
 133 bool opening_chest;             /* Hack -- prevent chest generation */
 134
 135 bool shimmer_monsters;  /* Hack -- optimize multi-hued monsters */
 136 bool shimmer_objects;   /* Hack -- optimize multi-hued objects */
 137
 138 bool repair_monsters;   /* Hack -- optimize detect monsters */
 139 bool repair_objects;    /* Hack -- optimize detect objects */
 140
 141 bool is_loading_now;    /*!< ロード直後にcalc_bonus()時の徳変化、及びsanity_blast()による異常を抑止する */
 142 bool hack_mutation;
 143
 144 s16b inven_cnt; /* Number of items in inventory */
 145 s16b equip_cnt; /* Number of items in equipment */
 146
 147 OBJECT_IDX o_max = 1; /* Number of allocated objects */
 148 OBJECT_IDX o_cnt = 0; /* Number of live objects */
 149
 150 MONSTER_IDX m_max = 1; /* Number of allocated monsters */
 151 MONSTER_IDX m_cnt = 0; /* Number of live monsters */
 152
 153 MONSTER_IDX hack_m_idx = 0;     /* Hack -- see "process_monsters()" */
 154 MONSTER_IDX hack_m_idx_ii = 0;
 155
 156 bool multi_rew = FALSE;
 157 char summon_kin_type;   /* Hack, by Julian Lighton: summon 'relatives' */
 158
 159 int total_friends = 0;
 160 int leaving_quest = 0;
 161 bool reinit_wilderness = FALSE;
 162
 163
 164
 165 /*
 166  * Dungeon variables
 167  */
 168
 169 bool closing_flag;              /* Dungeon is closing */
 170
 171
 172 /*
 173  * Dungeon size info
 174  */
 175
 176 POSITION panel_row_min, panel_row_max;
 177 POSITION panel_col_min, panel_col_max;
 178 POSITION panel_col_prt, panel_row_prt;
 179
 180
 181 /*
 182  * Targetting variables
 183  */
 184 MONSTER_IDX target_who;
 185 POSITION target_col;
 186 POSITION target_row;
 187
 188
 189 /*
 190  * User info
 191  */
 192 int player_uid;
 193 int player_euid;
 194 int player_egid;
 195
 196 /*
 197  * Stripped version of "player_name"
 198  */
 199 char player_base[32];
 200
 201
 202 /*
 203  * Buffer to hold the current savefile name
 204  * 'savefile' holds full path name. 'savefile_base' holds only base name.
 205  */
 206 char savefile[1024];
 207 char savefile_base[40];
 208
 209
 210 pos_list tmp_pos;
 211
 212
 213 /*
 214  * Number of active macros.
 215  */
 216 s16b macro__num;
 217
 218 /*
 219  * Array of macro patterns [MACRO_MAX]
 220  */
 221 concptr *macro__pat;
 222
 223 /*
 224  * Array of macro actions [MACRO_MAX]
 225  */
 226 concptr *macro__act;
 227
 228 /*
 229  * Array of macro types [MACRO_MAX]
 230  */
 231 bool *macro__cmd;
 232
 233 /*
 234  * Current macro action [1024]
 235  */
 236 char *macro__buf;
 237
 238
 239 /*
 240  * The number of quarks
 241  */
 242 STR_OFFSET quark__num;
 243
 244 /*
 245  * The pointers to the quarks [QUARK_MAX]
 246  */
 247 concptr *quark__str;
 248
 249
 250 /*
 251  * The next "free" index to use
 252  */
 253 u32b message__next;
 254
 255 /*
 256  * The index of the oldest message (none yet)
 257  */
 258 u32b message__last;
 259
 260 /*
 261  * The next "free" offset
 262  */
 263 u32b message__head;
 264
 265 /*
 266  * The offset to the oldest used char (none yet)
 267  */
 268 u32b message__tail;
 269
 270 /*
 271  * The array of offsets, by index [MESSAGE_MAX]
 272  */
 273 u32b *message__ptr;
 274
 275 /*
 276  * The array of chars, by offset [MESSAGE_BUF]
 277  */
 278 char *message__buf;
 279
 280 BIT_FLAGS option_flag[8]; //!< The array of normal options
 281 BIT_FLAGS option_mask[8]; //!< The array of normal options
 282 BIT_FLAGS window_flag[8]; //!< The array of window options
 283 BIT_FLAGS window_mask[8]; //!< The array of window options
 284
 285 /*
 286  * The array of window pointers
 287  */
 288 term *angband_term[8];
 289
 290 /*
 291  * Standard window names
 292  */
 293 const char angband_term_name[8][16] =
 294 {
 295         "Hengband",
 296         "Term-1",
 297         "Term-2",
 298         "Term-3",
 299         "Term-4",
 300         "Term-5",
 301         "Term-6",
 302         "Term-7"
 303 };
 304
 305
 306 /*
 307  * Global table of color definitions
 308  */
 309 byte angband_color_table[256][4] =
 310 {
 311         {0x00, 0x00, 0x00, 0x00},       /* TERM_DARK */
 312         {0x00, 0xFF, 0xFF, 0xFF},       /* TERM_WHITE */
 313         {0x00, 0x80, 0x80, 0x80},       /* TERM_SLATE */
 314         {0x00, 0xFF, 0x80, 0x00},       /* TERM_ORANGE */
 315         {0x00, 0xC0, 0x00, 0x00},       /* TERM_RED */
 316         {0x00, 0x00, 0x80, 0x40},       /* TERM_GREEN */
 317         {0x00, 0x00, 0x00, 0xFF},       /* TERM_BLUE */
 318         {0x00, 0x80, 0x40, 0x00},       /* TERM_UMBER */
 319         {0x00, 0x40, 0x40, 0x40},       /* TERM_L_DARK */
 320         {0x00, 0xC0, 0xC0, 0xC0},       /* TERM_L_WHITE */
 321         {0x00, 0xFF, 0x00, 0xFF},       /* TERM_VIOLET */
 322         {0x00, 0xFF, 0xFF, 0x00},       /* TERM_YELLOW */
 323         {0x00, 0xFF, 0x00, 0x00},       /* TERM_L_RED */
 324         {0x00, 0x00, 0xFF, 0x00},       /* TERM_L_GREEN */
 325         {0x00, 0x00, 0xFF, 0xFF},       /* TERM_L_BLUE */
 326         {0x00, 0xC0, 0x80, 0x40}        /* TERM_L_UMBER */
 327 };
 328
 329
 330 /*
 331  * Standard sound names
 332  */
 333 const concptr angband_sound_name[SOUND_MAX] =
 334 {
 335         "dummy",
 336         "hit",
 337         "miss",
 338         "flee",
 339         "drop",
 340         "kill",
 341         "level",
 342         "death",
 343         "study",
 344         "teleport",
 345         "shoot",
 346         "quaff",
 347         "zap",
 348         "walk",
 349         "tpother",
 350         "hitwall",
 351         "eat",
 352         "store1",
 353         "store2",
 354         "store3",
 355         "store4",
 356         "dig",
 357         "opendoor",
 358         "shutdoor",
 359         "tplevel",
 360         "scroll",
 361         "buy",
 362         "sell",
 363         "warn",
 364         "rocket",
 365         "n_kill",
 366         "u_kill",
 367         "quest",
 368         "heal",
 369         "x_heal",
 370         "bite",
 371         "claw",
 372         "m_spell",
 373         "summon",
 374         "breath",
 375         "ball",
 376         "m_heal",
 377         "atkspell",
 378         "evil",
 379         "touch",
 380         "sting",
 381         "crush",
 382         "slime",
 383         "wail",
 384         "winner",
 385         "fire",
 386         "acid",
 387         "elec",
 388         "cold",
 389         "illegal",
 390         "fail",
 391         "wakeup",
 392         "invuln",
 393         "fall",
 394         "pain",
 395         "destitem",
 396         "moan",
 397         "show",
 398         "unused",
 399         "explode",
 400         "glass",
 401         "reflect",
 402 };
 403
 404 /*
 405  * Standard music names
 406  */
 407 const concptr angband_music_basic_name[MUSIC_BASIC_MAX] =
 408 {
 409         "default",
 410         "gameover",
 411         "exit",
 412         "town",
 413         "field1",
 414         "field2",
 415         "field3",
 416         "dun_low",
 417         "dun_med",
 418         "dun_high",
 419         "feel1",
 420         "feel2",
 421         "winner",
 422         "build",
 423         "wild",
 424         "quest",
 425         "arena",
 426         "battle",
 427         "quest_clear",
 428         "final_quest_clear",
 429         "ambush",
 430 };
 431
 432
 433 /*
 434  * The array of "current_floor_ptr->grid_array grids" [MAX_WID][MAX_HGT].
 435  * Not completely allocated, that would be inefficient
 436  * Not completely hardcoded, that would overflow memory
 437  */
 438 floor_type floor;
 439 floor_type *current_floor_ptr = &floor;
 440
 441 /*
 442  * The array of saved floors
 443  */
 444 saved_floor_type saved_floors[MAX_SAVED_FLOORS];
 445
 446
 447 /*
 448  * Number of floor_id used from birth
 449  */
 450 FLOOR_IDX max_floor_id;
 451
 452
 453 world_type world;
 454 world_type *current_world_ptr = &world;
 455
 456
 457 /*
 458  * Sign for current process used in temporal files.
 459  * Actually it is the start time of current process.
 460  */
 461 u32b saved_floor_file_sign;
 462
 463
 464 /*
 465  * Maximum number of towns
 466  */
 467 TOWN_IDX max_towns;
 468
 469 /*
 470  * The towns [max_towns]
 471  */
 472 town_type *town_info;
 473
 474
 475 /*
 476  * The player's inventory [INVEN_TOTAL]
 477  */
 478 object_type *inventory;
 479
 480
 481 /*
 482  * The size of "alloc_kind_table" (at most max_k_idx * 4)
 483  */
 484 s16b alloc_kind_size;
 485
 486 /*
 487  * The entries in the "kind allocator table"
 488  */
 489 alloc_entry *alloc_kind_table;
 490
 491
 492 /*
 493  * The size of "alloc_race_table" (at most max_r_idx)
 494  */
 495 s16b alloc_race_size;
 496
 497 /*
 498  * The entries in the "race allocator table"
 499  */
 500 alloc_entry *alloc_race_table;
 501
 502
 503 /*
 504  * Specify attr/char pairs for visual special effects
 505  * Be sure to use "index & 0x7F" to avoid illegal access
 506  */
 507 TERM_COLOR misc_to_attr[256];
 508 SYMBOL_CODE misc_to_char[256];
 509
 510
 511 /*
 512  * Specify attr/char pairs for inventory items (by tval)
 513  * Be sure to use "index & 0x7F" to avoid illegal access
 514  */
 515 TERM_COLOR tval_to_attr[128];
 516 SYMBOL_CODE tval_to_char[128];
 517
 518
 519 /*
 520  * Keymaps for each "mode" associated with each keypress.
 521  */
 522 concptr keymap_act[KEYMAP_MODES][256];
 523
 524
 525
 526 /*** Player information ***/
 527
 528 /*
 529  * Static player info record
 530  */
 531 player_type p_body;
 532
 533 /*
 534  * Pointer to the player info
 535  */
 536 player_type *p_ptr = &p_body;
 537
 538 /*
 539  * Pointer to the player tables
 540  * (sex, race, class, magic)
 541  */
 542 const player_sex *sp_ptr;
 543 const player_race *rp_ptr;
 544 const player_class *cp_ptr;
 545 const player_seikaku *ap_ptr;
 546 const player_magic *mp_ptr;
 547
 548
 549 /*
 550  * The last character rolled,
 551  * holded for quick start
 552  */
 553 birther previous_char;
 554
 555
 556 /*
 557  * The vault generation arrays
 558  */
 559 vault_type *v_info;
 560 char *v_name;
 561 char *v_text;
 562
 563 /*
 564  * The skill table
 565  */
 566 skill_table *s_info;
 567
 568 /*
 569  * The magic info
 570  */
 571 player_magic *m_info;
 572
 573 /*
 574  * The terrain feature arrays
 575  */
 576 feature_type *f_info;
 577 char *f_name;
 578 char *f_tag;
 579
 580 /*
 581  * The object kind arrays
 582  */
 583 object_kind *k_info;
 584 char *k_name;
 585 char *k_text;
 586
 587 /*
 588  * The artifact arrays
 589  */
 590 artifact_type *a_info;
 591 char *a_name;
 592 char *a_text;
 593
 594 /*
 595  * The ego-item arrays
 596  */
 597 ego_item_type *e_info;
 598 char *e_name;
 599 char *e_text;
 600
 601
 602 /*
 603  * The monster race arrays
 604  */
 605 monster_race *r_info;
 606 char *r_name;
 607 char *r_text;
 608
 609
 610 /*
 611  * The dungeon arrays
 612  */
 613 dungeon_type *d_info;
 614 char *d_name;
 615 char *d_text;
 616
 617
 618 concptr ANGBAND_SYS = "xxx"; //!< Hack -- The special Angband "System Suffix" This variable is used to choose an appropriate "pref-xxx" file
 619
 620
 621 #ifdef JP
 622 concptr ANGBAND_KEYBOARD = "JAPAN"; //!< Hack -- The special Angband "Keyboard Suffix" This variable is used to choose an appropriate macro-trigger definition
 623 #else
 624 concptr ANGBAND_KEYBOARD = "0";
 625 #endif
 626
 627 concptr ANGBAND_GRAF = "ascii"; //!< Hack -- The special Angband "Graphics Suffix" This variable is used to choose an appropriate "graf-xxx" file
 628 concptr ANGBAND_DIR; //!< Path name: The main "lib" directory This variable is not actually used anywhere in the code
 629 concptr ANGBAND_DIR_APEX; //!< High score files (binary) These files may be portable between platforms
 630 concptr ANGBAND_DIR_BONE; //!< Bone files for player ghosts (ascii) These files are portable between platforms
 631 concptr ANGBAND_DIR_DATA; //!< Binary image files for the "*_info" arrays (binary) These files are not portable between platforms
 632 concptr ANGBAND_DIR_EDIT; //!< Textual template files for the "*_info" arrays (ascii) These files are portable between platforms
 633 concptr ANGBAND_DIR_SCRIPT; //!< Script files These files are portable between platforms.
 634 concptr ANGBAND_DIR_FILE; //!< Various extra files (ascii) These files may be portable between platforms
 635 concptr ANGBAND_DIR_HELP; //!< Help files (normal) for the online help (ascii) These files are portable between platforms
 636 concptr ANGBAND_DIR_INFO; //!< Help files (spoilers) for the online help (ascii) These files are portable between platforms
 637 concptr ANGBAND_DIR_PREF; //!< Default user "preference" files (ascii) These files are rarely portable between platforms
 638 concptr ANGBAND_DIR_SAVE; //!< Savefiles for current characters (binary)
 639 concptr ANGBAND_DIR_USER; //!< User "preference" files (ascii) These files are rarely portable between platforms
 640 concptr ANGBAND_DIR_XTRA; //!< Various extra files (binary) These files are rarely portable between platforms
 641
 642
 643 /*
 644  * Here is a "pseudo-hook" used during calls to "get_item()" and
 645  * "show_inven()" and "show_equip()", and the choice window routines.
 646  */
 647 OBJECT_TYPE_VALUE item_tester_tval;
 648
 649
 650 /*
 651  * Here is a "hook" used during calls to "get_item()" and
 652  * "show_inven()" and "show_equip()", and the choice window routines.
 653  */
 654 bool (*item_tester_hook)(object_type*);
 655
 656
 657
 658
 659 /*
 660  * Hack -- function hooks to restrict "get_mon_num_prep()" function
 661  */
 662 monsterrace_hook_type get_mon_num_hook;
 663 monsterrace_hook_type get_mon_num2_hook;
 664
 665
 666 /*
 667  * Hack -- function hook to restrict "get_obj_num_prep()" function
 668  */
 669 bool (*get_obj_num_hook)(KIND_OBJECT_IDX k_idx);
 670
 671 /*
 672  * Buildings
 673  */
 674 building_type building[MAX_BLDG];
 675
 676
 677 /*
 678  * Maximum number of quests
 679  */
 680 QUEST_IDX max_q_idx;
 681
 682 /*
 683  * Maximum number of monsters in r_info.txt
 684  */
 685 MONRACE_IDX max_r_idx;
 686
 687 /*
 688  * Maximum number of items in k_info.txt
 689  */
 690 KIND_OBJECT_IDX max_k_idx;
 691
 692 /*
 693  * Maximum number of vaults in v_info.txt
 694  */
 695 VAULT_IDX max_v_idx;
 696
 697 /*
 698  * Maximum number of terrain features in f_info.txt
 699  */
 700 FEAT_IDX max_f_idx;
 701
 702 /*
 703  * Maximum number of artifacts in a_info.txt
 704  */
 705 ARTIFACT_IDX max_a_idx;
 706
 707 /*
 708  * Maximum number of ego-items in e_info.txt
 709  */
 710 EGO_IDX max_e_idx;
 711
 712 /*
 713  * Maximum number of dungeon in e_info.txt
 714  */
 715 DUNGEON_IDX max_d_idx;
 716
 717
 718
 719 /*
 720  * Quest info
 721  */
 722 quest_type *quest;
 723
 724 /*
 725  * Quest text
 726  */
 727 char quest_text[10][80];
 728
 729 /*
 730  * Current line of the quest text
 731  */
 732 int quest_text_line;
 733
 734 /*
 735  * Default spell color table (quark index)
 736  */
 737 TERM_COLOR gf_color[MAX_GF];
 738
 739 /*
 740  * Flags for initialization
 741  */
 742 int init_flags;
 743
 744
 745 /*
 746  * The "highscore" file descriptor, if available.
 747  */
 748 int highscore_fd = -1;
 749
 750 bool can_save = FALSE;        /* Game can be saved */
 751
 752
 753 int cap_mon;
 754 int cap_mspeed;
 755 HIT_POINT cap_hp;
 756 HIT_POINT cap_maxhp;
 757 STR_OFFSET cap_nickname;
 758
 759 MONRACE_IDX battle_mon[4];
 760 int sel_monster;
 761 int battle_odds;
 762 PRICE kakekin;
 763 u32b mon_odds[4];
 764
 765 MONSTER_IDX pet_t_m_idx;
 766 MONSTER_IDX riding_t_m_idx;
 767
 768 MONSTER_IDX today_mon;
 769
 770 bool write_level;
 771
 772 u32b start_time;
 773
 774 bool sukekaku;
 775 bool new_mane;
 776
 777 bool mon_fight;
 778
 779 bool generate_encounter;
 780
 781 concptr screen_dump = NULL;
 782
 783 /*** Terrain feature variables ***/
 784
 785 /* Nothing */
 786 FEAT_IDX feat_none;
 787
 788 /* Floor */
 789 FEAT_IDX feat_floor;
 790
 791 /* Objects */
 792 FEAT_IDX feat_glyph;
 793 FEAT_IDX feat_explosive_rune;
 794 FEAT_IDX feat_mirror;
 795
 796 /* Stairs */
 797 FEAT_IDX feat_up_stair;
 798 FEAT_IDX feat_down_stair;
 799 FEAT_IDX feat_entrance;
 800
 801 /* Special traps */
 802 FEAT_IDX feat_trap_open;
 803 FEAT_IDX feat_trap_armageddon;
 804 FEAT_IDX feat_trap_piranha;
 805
 806 /* Rubble */
 807 FEAT_IDX feat_rubble;
 808
 809 /* Seams */
 810 FEAT_IDX feat_magma_vein;
 811 FEAT_IDX feat_quartz_vein;
 812
 813 /* Walls */
 814 FEAT_IDX feat_granite;
 815 FEAT_IDX feat_permanent;
 816
 817 /* Glass floor */
 818 FEAT_IDX feat_glass_floor;
 819
 820 /* Glass walls */
 821 FEAT_IDX feat_glass_wall;
 822 FEAT_IDX feat_permanent_glass_wall;
 823
 824 /* Pattern */
 825 FEAT_IDX feat_pattern_start;
 826 FEAT_IDX feat_pattern_1;
 827 FEAT_IDX feat_pattern_2;
 828 FEAT_IDX feat_pattern_3;
 829 FEAT_IDX feat_pattern_4;
 830 FEAT_IDX feat_pattern_end;
 831 FEAT_IDX feat_pattern_old;
 832 FEAT_IDX feat_pattern_exit;
 833 FEAT_IDX feat_pattern_corrupted;
 834
 835 /* Various */
 836 FEAT_IDX feat_black_market;
 837 FEAT_IDX feat_town;
 838
 839 /* Terrains */
 840 FEAT_IDX feat_deep_water;
 841 FEAT_IDX feat_shallow_water;
 842 FEAT_IDX feat_deep_lava;
 843 FEAT_IDX feat_shallow_lava;
 844 FEAT_IDX feat_heavy_cold_zone;
 845 FEAT_IDX feat_cold_zone;
 846 FEAT_IDX feat_heavy_electrical_zone;
 847 FEAT_IDX feat_electrical_zone;
 848 FEAT_IDX feat_deep_acid_puddle;
 849 FEAT_IDX feat_shallow_acid_puddle;
 850 FEAT_IDX feat_deep_poisonous_puddle;
 851 FEAT_IDX feat_shallow_poisonous_puddle;
 852 FEAT_IDX feat_dirt;
 853 FEAT_IDX feat_grass;
 854 FEAT_IDX feat_flower;
 855 FEAT_IDX feat_brake;
 856 FEAT_IDX feat_tree;
 857 FEAT_IDX feat_mountain;
 858 FEAT_IDX feat_swamp;
 859
 860 /* Unknown grid (not detected) */
 861 FEAT_IDX feat_undetected;
 862
 863 /*
 864  * Which dungeon ?
 865  */
 866 DEPTH *max_dlv;
 867
 868 FEAT_IDX feat_wall_outer;
 869 FEAT_IDX feat_wall_inner;
 870 FEAT_IDX feat_wall_solid;
 871 FEAT_IDX feat_ground_type[100], feat_wall_type[100];
 872
 873 COMMAND_CODE now_message;
 874 bool use_menu;
 875
 876 #ifdef CHUUKEI
 877 bool chuukei_server;
 878 bool chuukei_client;
 879 char *server_name;
 880 int server_port;
 881 #endif
 882
 883 /* for movie */
 884 bool browsing_movie;
 885
 886 #ifdef TRAVEL
 887 /* for travel */
 888 travel_type travel;
 889 #endif
 890
 891 /* for snipers */
 892 bool reset_concent = FALSE;   /* Concentration reset flag */
 893 bool is_fired = FALSE;
 894