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