src/variable.c

   1 /* File: variable.c */
   2
   3 /*
   4  * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke
   5  *
   6  * This software may be copied and distributed for educational, research,
   7  * and not for profit purposes provided that this copyright and statement
   8  * are included in all such copies.  Other copyrights may also apply.
   9  */
  10
  11 /* Purpose: Angband variables */
  12
  13 #include "angband.h"
  14
  15
  16 /*
  17  * Hack -- Link a copyright message into the executable
  18  */
  19 cptr 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
  29 int max_macrotrigger = 0;
  30 cptr macro_template = NULL;
  31 cptr macro_modifier_chr;
  32 cptr macro_modifier_name[MAX_MACRO_MOD];
  33 cptr macro_trigger_name[MAX_MACRO_TRIG];
  34 cptr macro_trigger_keycode[2][MAX_MACRO_TRIG];
  35
  36 /* ¥ì¥Ù¥ë¥¢¥Ã¥×¤Î»þ¤Ë¾å¾ºÎÌ¤òÉ½¼¨¤¹¤ë¤Î¤Ë»È¤¦ */
  37 int level_up = 0;
  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 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 s16b command_arg;               /* Gives argument of current command */
  99 s16b command_rep;               /* Gives repetition of current command */
 100 s16b command_dir;               /* Gives direction of current command */
 101
 102 s16b command_see;               /* See "object1.c" */
 103 s16b command_wrk;               /* See "object1.c" */
 104
 105 s16b command_gap = 999;         /* See "object1.c" */
 106
 107 s16b command_new;               /* Command chaining from inven/equip view */
 108
 109 s16b energy_use;                /* Energy use this turn */
 110
 111 bool msg_flag;                  /* Used in msg_print() for "buffering" */
 112
 113 s16b running;                   /* Current counter for running, if any */
 114 s16b resting;                   /* Current counter for resting, if any */
 115
 116 s16b cur_hgt;                   /* Current dungeon height */
 117 s16b cur_wid;                   /* Current dungeon width */
 118 s16b dun_level;                 /* Current dungeon level */
 119 s16b num_repro;                 /* Current reproducer count */
 120 s16b object_level;              /* Current object creation level */
 121 s16b monster_level;             /* Current monster creation level */
 122 s16b base_level;        /* Base dungeon level */
 123
 124 s32b turn;                              /* Current game turn */
 125 s32b turn_limit;                /* Limit of game turn */
 126 s32b dungeon_turn;                      /* Game turn in dungeon */
 127 s32b dungeon_turn_limit;        /* Limit of game turn in dungeon */
 128 s32b old_turn;                  /* Turn when level began */
 129 s32b old_battle;
 130
 131 bool use_sound;                 /* The "sound" mode is enabled */
 132 bool use_graphics;              /* The "graphics" mode is enabled */
 133 bool use_bigtile = FALSE;
 134
 135 s16b signal_count;              /* Hack -- Count interupts */
 136
 137 bool inkey_base;                /* See the "inkey()" function */
 138 bool inkey_xtra;                /* See the "inkey()" function */
 139 bool inkey_scan;                /* See the "inkey()" function */
 140 bool inkey_flag;                /* See the "inkey()" function */
 141 bool get_com_no_macros = FALSE; /* Expand macros in "get_com" or not */
 142
 143 s16b coin_type;                 /* Hack -- force coin type */
 144
 145 bool opening_chest;             /* Hack -- prevent chest generation */
 146
 147 bool shimmer_monsters;  /* Hack -- optimize multi-hued monsters */
 148 bool shimmer_objects;   /* Hack -- optimize multi-hued objects */
 149
 150 bool repair_monsters;   /* Hack -- optimize detect monsters */
 151 bool repair_objects;    /* Hack -- optimize detect objects */
 152
 153 s16b inven_nxt;                 /* Hack -- unused */
 154 bool hack_mind;
 155 bool hack_mutation;
 156
 157 s16b inven_cnt;                 /* Number of items in inventory */
 158 s16b equip_cnt;                 /* Number of items in equipment */
 159
 160 s16b o_max = 1;                 /* Number of allocated objects */
 161 s16b o_cnt = 0;                 /* Number of live objects */
 162
 163 s16b m_max = 1;                 /* Number of allocated monsters */
 164 s16b m_cnt = 0;                 /* Number of live monsters */
 165
 166 s16b hack_m_idx = 0;    /* Hack -- see "process_monsters()" */
 167 s16b hack_m_idx_ii = 0;
 168 bool multi_rew = FALSE;
 169 char summon_kin_type;   /* Hack, by Julian Lighton: summon 'relatives' */
 170
 171 int total_friends = 0;
 172 s32b friend_align = 0;
 173
 174 int leaving_quest = 0;
 175 bool reinit_wilderness = FALSE;
 176
 177
 178 /*
 179  * Software options (set via the '=' command).  See "tables.c"
 180  */
 181
 182 /*** Input Options ***/
 183
 184 bool rogue_like_commands;       /* Rogue-like commands */
 185 bool always_pickup;     /* Pick things up by default */
 186 bool carry_query_flag;  /* Prompt before picking things up */
 187 bool quick_messages;    /* Activate quick messages */
 188 bool auto_more; /* Automatically clear '-more-' prompts */
 189 bool command_menu;      /* Enable command selection menu */
 190 bool other_query_flag;  /* Prompt for floor item selection */
 191 bool use_old_target;    /* Use old target by default */
 192 bool always_repeat;     /* Repeat obvious commands */
 193 bool confirm_destroy;   /* Prompt for destruction of known worthless items */
 194 bool confirm_wear;      /* Confirm to wear/wield known cursed items */
 195 bool confirm_quest;     /* Prompt before exiting a quest level */
 196 bool target_pet;        /* Allow targetting pets */
 197
 198 #ifdef ALLOW_EASY_OPEN
 199 bool easy_open; /* Automatically open doors */
 200 #endif
 201
 202 #ifdef ALLOW_EASY_DISARM
 203 bool easy_disarm;       /* Automatically disarm traps */
 204 #endif
 205
 206 #ifdef ALLOW_EASY_FLOOR
 207 bool easy_floor;        /* Display floor stacks in a list */
 208 #endif
 209
 210 bool use_command;       /* Allow unified use command */
 211 bool over_exert;        /* Allow casting spells when short of mana */
 212 bool numpad_as_cursorkey;       /* Use numpad keys as cursor key in editor mode */
 213
 214
 215 /*** Map Screen Options ***/
 216
 217 bool center_player;     /* Center map while walking (*slow*) */
 218 bool center_running;    /* Centering even while running */
 219 bool view_yellow_lite;  /* Use special colors for torch-lit grids */
 220 bool view_bright_lite;  /* Use special colors for 'viewable' grids */
 221 bool view_granite_lite; /* Use special colors for wall grids (slow) */
 222 bool view_special_lite; /* Use special colors for floor grids (slow) */
 223 bool view_perma_grids;  /* Map remembers all perma-lit grids */
 224 bool view_torch_grids;  /* Map remembers all torch-lit grids */
 225 bool view_unsafe_grids; /* Map marked by detect traps */
 226 bool view_reduce_view;  /* Reduce view-radius in town */
 227 bool fresh_before;      /* Flush output while continuous command */
 228 bool fresh_after;       /* Flush output after monster's move */
 229 bool fresh_message;     /* Flush output after every message */
 230 bool hilite_player;     /* Hilite the player with the cursor */
 231 bool display_path;      /* Display actual path before shooting */
 232
 233
 234 /*** Text Display Options ***/
 235
 236 bool plain_descriptions;        /* Plain object descriptions */
 237 bool plain_pickup;      /* Plain pickup messages(japanese only) */
 238 bool always_show_list;  /* Always show list when choosing items */
 239 bool depth_in_feet;     /* Show dungeon level in feet */
 240 bool show_labels;       /* Show labels in object listings */
 241 bool show_weights;      /* Show weights in object listings */
 242 bool show_item_graph;   /* Show items graphics */
 243 bool equippy_chars;     /* Display 'equippy' chars */
 244 bool display_mutations; /* Display mutations in 'C'haracter Display */
 245 bool compress_savefile; /* Compress messages in savefiles */
 246 bool abbrev_extra;      /* Describe obj's extra resistances by abbreviation */
 247 bool abbrev_all;        /* Describe obj's all resistances by abbreviation */
 248 bool exp_need;  /* Show the experience needed for next level */
 249 bool ignore_unview;     /* Ignore whenever any monster does */
 250
 251
 252 /*** Game-Play Options ***/
 253
 254 bool stack_force_notes; /* Merge inscriptions when stacking */
 255 bool stack_force_costs; /* Merge discounts when stacking */
 256 bool expand_list;       /* Expand the power of the list commands */
 257 bool small_levels;      /* Allow unusually small dungeon levels */
 258 bool always_small_levels;       /* Always create unusually small dungeon levels */
 259 bool empty_levels;      /* Allow empty 'arena' levels */
 260 bool bound_walls_perm;  /* Boundary walls become 'permanent wall' */
 261 bool last_words;        /* Leave last words when your character dies */
 262
 263 #ifdef WORLD_SCORE
 264 bool send_score;        /* Send score dump to the world score server */
 265 #endif
 266
 267 bool allow_debug_opts;  /* Allow use of debug/cheat options */
 268
 269
 270 /*** Disturbance Options ***/
 271
 272 bool find_ignore_stairs;        /* Run past stairs */
 273 bool find_ignore_doors; /* Run through open doors */
 274 bool find_cut;  /* Run past known corners */
 275 bool check_abort;       /* Check for user abort while continuous command */
 276 bool flush_failure;     /* Flush input on various failures */
 277 bool flush_disturb;     /* Flush input whenever disturbed */
 278 bool disturb_move;      /* Disturb whenever any monster moves */
 279 bool disturb_high;      /* Disturb whenever high-level monster moves */
 280 bool disturb_near;      /* Disturb whenever viewable monster moves */
 281 bool disturb_pets;      /* Disturb when visible pets move */
 282 bool disturb_panel;     /* Disturb whenever map panel changes */
 283 bool disturb_state;     /* Disturb whenever player state changes */
 284 bool disturb_minor;     /* Disturb whenever boring things happen */
 285 bool ring_bell; /* Audible bell (on errors, etc) */
 286 bool disturb_trap_detect;       /* Disturb when leaving trap detected area */
 287 bool alert_trap_detect; /* Alert when leaving trap detected area */
 288
 289
 290 /*** Birth Options ***/
 291
 292 bool manual_haggle;     /* Manually haggle in stores */
 293 bool easy_band; /* Easy Mode (*) */
 294 bool smart_learn;       /* Monsters learn from their mistakes (*) */
 295 bool smart_cheat;       /* Monsters exploit players weaknesses (*) */
 296 bool vanilla_town;      /* Use 'vanilla' town without quests and wilderness */
 297 bool lite_town; /* Use 'lite' town without a wilderness */
 298 bool ironman_shops;     /* Stores are permanently closed (*) */
 299 bool ironman_small_levels;      /* Always create unusually small dungeon levels (*) */
 300 bool ironman_downward;  /* Disable recall and use of up stairs (*) */
 301 bool ironman_empty_levels;      /* Always create empty 'arena' levels (*) */
 302 bool ironman_rooms;     /* Always generate very unusual rooms (*) */
 303 bool ironman_nightmare; /* Nightmare mode(it isn't even remotely fair!)(*) */
 304 bool left_hander;       /* Left-Hander */
 305 bool preserve_mode;     /* Preserve artifacts (*) */
 306 bool autoroller;        /* Allow use of autoroller for stats (*) */
 307 bool autochara; /* Autoroll for weight, height and social status */
 308 bool powerup_home;      /* Increase capacity of your home (*) */
 309
 310
 311 /*** Easy Object Auto-Destroyer ***/
 312
 313 bool destroy_items;     /* Use easy auto-destroyer */
 314 bool destroy_feeling;   /* Apply auto-destroy as sense feeling */
 315 bool destroy_identify;  /* Apply auto-destroy as identify an item */
 316 bool leave_worth;       /* Auto-destroyer leaves known worthy items */
 317 bool leave_equip;       /* Auto-destroyer leaves weapons and armour */
 318 bool leave_chest;       /* Auto-destroyer leaves closed chests */
 319 bool leave_wanted;      /* Auto-destroyer leaves wanted corpses */
 320 bool leave_corpse;      /* Auto-destroyer leaves corpses and skeletons */
 321 bool leave_junk;        /* Auto-destroyer leaves junk */
 322 bool leave_special;     /* Auto-destroyer leaves items your race/class needs */
 323
 324
 325 /*** Play-record Options ***/
 326
 327 bool record_fix_art;    /* Record fixed artifacts */
 328 bool record_rand_art;   /* Record random artifacts */
 329 bool record_destroy_uniq;       /* Record when destroy unique monster */
 330 bool record_fix_quest;  /* Record fixed quests */
 331 bool record_rand_quest; /* Record random quests */
 332 bool record_maxdepth;   /* Record movements to deepest level */
 333 bool record_stair;      /* Record recall and stair movements */
 334 bool record_buy;        /* Record purchased items */
 335 bool record_sell;       /* Record sold items */
 336 bool record_danger;     /* Record hitpoint warning */
 337 bool record_arena;      /* Record arena victories */
 338 bool record_ident;      /* Record first identified items */
 339 bool record_named_pet;  /* Record informations of named pets */
 340
 341
 342 /* Cheating options */
 343
 344 bool cheat_peek;        /* Peek into object creation */
 345 bool cheat_hear;        /* Peek into monster creation */
 346 bool cheat_room;        /* Peek into dungeon creation */
 347 bool cheat_xtra;        /* Peek into something else */
 348 bool cheat_know;        /* Know complete monster info */
 349 bool cheat_live;        /* Allow player to avoid death */
 350 bool cheat_save;        /* Ask for saving death */
 351
 352
 353 /* Special options */
 354
 355 byte hitpoint_warn;     /* Hitpoint warning (0 to 9) */
 356 byte mana_warn; /* Mana color (0 to 9) */
 357
 358 byte delay_factor;      /* Delay factor (0 to 9) */
 359
 360 bool autosave_l;        /* Autosave before entering new levels */
 361 bool autosave_t;        /* Timed autosave */
 362 s16b autosave_freq;     /* Autosave frequency */
 363
 364
 365 /*
 366  * Dungeon variables
 367  */
 368
 369 bool closing_flag;              /* Dungeon is closing */
 370
 371
 372 /*
 373  * Dungeon size info
 374  */
 375
 376 s16b panel_row_min, panel_row_max;
 377 s16b panel_col_min, panel_col_max;
 378 s16b panel_col_prt, panel_row_prt;
 379
 380 /*
 381  * Player location in dungeon
 382  */
 383 int py;
 384 int px;
 385
 386 /*
 387  * Targetting variables
 388  */
 389 s16b target_who;
 390 s16b target_col;
 391 s16b target_row;
 392
 393
 394 /*
 395  * User info
 396  */
 397 int player_uid;
 398 int player_euid;
 399 int player_egid;
 400
 401 /*
 402  * Current player's character name
 403  */
 404 char player_name[32];
 405
 406 /*
 407  * Stripped version of "player_name"
 408  */
 409 char player_base[32];
 410
 411
 412 /*
 413  * Buffer to hold the current savefile name
 414  * 'savefile' holds full path name. 'savefile_base' holds only base name.
 415  */
 416 char savefile[1024];
 417 char savefile_base[40];
 418
 419 /*
 420  * Array of grids lit by player lite (see "cave.c")
 421  */
 422 s16b lite_n;
 423 s16b lite_y[LITE_MAX];
 424 s16b lite_x[LITE_MAX];
 425
 426 /*
 427  * Array of grids lit by player lite (see "cave.c")
 428  */
 429 s16b mon_lite_n;
 430 s16b mon_lite_y[MON_LITE_MAX];
 431 s16b mon_lite_x[MON_LITE_MAX];
 432
 433 /*
 434  * Array of grids viewable to the player (see "cave.c")
 435  */
 436 s16b view_n;
 437 byte view_y[VIEW_MAX];
 438 byte view_x[VIEW_MAX];
 439
 440 /*
 441  * Array of grids for use by various functions (see "cave.c")
 442  */
 443 s16b temp_n;
 444 byte temp_y[TEMP_MAX];
 445 byte temp_x[TEMP_MAX];
 446
 447 /*
 448  * Array of grids for delayed visual updating (see "cave.c")
 449  */
 450 s16b redraw_n = 0;
 451 byte redraw_y[REDRAW_MAX];
 452 byte redraw_x[REDRAW_MAX];
 453
 454
 455 /*
 456  * Number of active macros.
 457  */
 458 s16b macro__num;
 459
 460 /*
 461  * Array of macro patterns [MACRO_MAX]
 462  */
 463 cptr *macro__pat;
 464
 465 /*
 466  * Array of macro actions [MACRO_MAX]
 467  */
 468 cptr *macro__act;
 469
 470 /*
 471  * Array of macro types [MACRO_MAX]
 472  */
 473 bool *macro__cmd;
 474
 475 /*
 476  * Current macro action [1024]
 477  */
 478 char *macro__buf;
 479
 480
 481 /*
 482  * The number of quarks
 483  */
 484 s16b quark__num;
 485
 486 /*
 487  * The pointers to the quarks [QUARK_MAX]
 488  */
 489 cptr *quark__str;
 490
 491
 492 /*
 493  * The next "free" index to use
 494  */
 495 u16b message__next;
 496
 497 /*
 498  * The index of the oldest message (none yet)
 499  */
 500 u16b message__last;
 501
 502 /*
 503  * The next "free" offset
 504  */
 505 u16b message__head;
 506
 507 /*
 508  * The offset to the oldest used char (none yet)
 509  */
 510 u16b message__tail;
 511
 512 /*
 513  * The array of offsets, by index [MESSAGE_MAX]
 514  */
 515 u16b *message__ptr;
 516
 517 /*
 518  * The array of chars, by offset [MESSAGE_BUF]
 519  */
 520 char *message__buf;
 521
 522
 523 /*
 524  * The array of normal options
 525  */
 526 u32b option_flag[8];
 527 u32b option_mask[8];
 528
 529
 530 /*
 531  * The array of window options
 532  */
 533 u32b window_flag[8];
 534 u32b window_mask[8];
 535
 536
 537 /*
 538  * The array of window pointers
 539  */
 540 term *angband_term[8];
 541
 542
 543 /*
 544  * Standard window names
 545  */
 546 char angband_term_name[8][16] =
 547 {
 548         "Hengband",
 549         "Term-1",
 550         "Term-2",
 551         "Term-3",
 552         "Term-4",
 553         "Term-5",
 554         "Term-6",
 555         "Term-7"
 556 };
 557
 558
 559 /*
 560  * Global table of color definitions
 561  */
 562 byte angband_color_table[256][4] =
 563 {
 564         {0x00, 0x00, 0x00, 0x00},       /* TERM_DARK */
 565         {0x00, 0xFF, 0xFF, 0xFF},       /* TERM_WHITE */
 566         {0x00, 0x80, 0x80, 0x80},       /* TERM_SLATE */
 567         {0x00, 0xFF, 0x80, 0x00},       /* TERM_ORANGE */
 568         {0x00, 0xC0, 0x00, 0x00},       /* TERM_RED */
 569         {0x00, 0x00, 0x80, 0x40},       /* TERM_GREEN */
 570         {0x00, 0x00, 0x00, 0xFF},       /* TERM_BLUE */
 571         {0x00, 0x80, 0x40, 0x00},       /* TERM_UMBER */
 572         {0x00, 0x40, 0x40, 0x40},       /* TERM_L_DARK */
 573         {0x00, 0xC0, 0xC0, 0xC0},       /* TERM_L_WHITE */
 574         {0x00, 0xFF, 0x00, 0xFF},       /* TERM_VIOLET */
 575         {0x00, 0xFF, 0xFF, 0x00},       /* TERM_YELLOW */
 576         {0x00, 0xFF, 0x00, 0x00},       /* TERM_L_RED */
 577         {0x00, 0x00, 0xFF, 0x00},       /* TERM_L_GREEN */
 578         {0x00, 0x00, 0xFF, 0xFF},       /* TERM_L_BLUE */
 579         {0x00, 0xC0, 0x80, 0x40}        /* TERM_L_UMBER */
 580 };
 581
 582
 583 /*
 584  * Standard sound names
 585  */
 586 char angband_sound_name[SOUND_MAX][16] =
 587 {
 588         "",
 589         "hit",
 590         "miss",
 591         "flee",
 592         "drop",
 593         "kill",
 594         "level",
 595         "death",
 596         "study",
 597         "teleport",
 598         "shoot",
 599         "quaff",
 600         "zap",
 601         "walk",
 602         "tpother",
 603         "hitwall",
 604         "eat",
 605         "store1",
 606         "store2",
 607         "store3",
 608         "store4",
 609         "dig",
 610         "opendoor",
 611         "shutdoor",
 612         "tplevel",
 613         "scroll",
 614         "buy",
 615         "sell",
 616         "warn",
 617         "rocket",
 618         "n_kill",
 619         "u_kill",
 620         "quest",
 621         "heal",
 622         "x_heal",
 623         "bite",
 624         "claw",
 625         "m_spell",
 626         "summon",
 627         "breath",
 628         "ball",
 629         "m_heal",
 630         "atkspell",
 631         "evil",
 632         "touch",
 633         "sting",
 634         "crush",
 635         "slime",
 636         "wail",
 637         "winner",
 638         "fire",
 639         "acid",
 640         "elec",
 641         "cold",
 642         "illegal",
 643         "fail",
 644         "wakeup",
 645         "invuln",
 646         "fall",
 647         "pain",
 648         "destitem",
 649         "moan",
 650         "show",
 651         "unused",
 652         "explode",
 653         "glass",
 654 };
 655
 656
 657 /*
 658  * The array of "cave grids" [MAX_WID][MAX_HGT].
 659  * Not completely allocated, that would be inefficient
 660  * Not completely hardcoded, that would overflow memory
 661  */
 662 cave_type *cave[MAX_HGT];
 663
 664
 665 /*
 666  * The array of saved floors
 667  */
 668 saved_floor_type saved_floors[MAX_SAVED_FLOORS];
 669
 670
 671 /*
 672  * Number of floor_id used from birth
 673  */
 674 s16b max_floor_id;
 675
 676
 677 /*
 678  * Sign for current process used in temporal files.
 679  * Actually it is the start time of current process.
 680  */
 681 u32b saved_floor_file_sign;
 682
 683
 684 /*
 685  * The array of dungeon items [max_o_idx]
 686  */
 687 object_type *o_list;
 688
 689 /*
 690  * The array of dungeon monsters [max_m_idx]
 691  */
 692 monster_type *m_list;
 693
 694 /*
 695  * The array to process dungeon monsters [max_m_idx]
 696  */
 697 s16b *mproc_list[MAX_MTIMED];
 698 s16b mproc_max[MAX_MTIMED]; /* Number of monsters to be processed */
 699
 700
 701 /*
 702  * Maximum number of towns
 703  */
 704 u16b max_towns;
 705
 706 /*
 707  * The towns [max_towns]
 708  */
 709 town_type *town;
 710
 711
 712 /*
 713  * The player's inventory [INVEN_TOTAL]
 714  */
 715 object_type *inventory;
 716
 717
 718 /*
 719  * The size of "alloc_kind_table" (at most max_k_idx * 4)
 720  */
 721 s16b alloc_kind_size;
 722
 723 /*
 724  * The entries in the "kind allocator table"
 725  */
 726 alloc_entry *alloc_kind_table;
 727
 728
 729 /*
 730  * The size of "alloc_race_table" (at most max_r_idx)
 731  */
 732 s16b alloc_race_size;
 733
 734 /*
 735  * The entries in the "race allocator table"
 736  */
 737 alloc_entry *alloc_race_table;
 738
 739
 740 /*
 741  * Specify attr/char pairs for visual special effects
 742  * Be sure to use "index & 0x7F" to avoid illegal access
 743  */
 744 byte misc_to_attr[256];
 745 char misc_to_char[256];
 746
 747
 748 /*
 749  * Specify attr/char pairs for inventory items (by tval)
 750  * Be sure to use "index & 0x7F" to avoid illegal access
 751  */
 752 byte tval_to_attr[128];
 753 char tval_to_char[128];
 754
 755
 756 /*
 757  * Keymaps for each "mode" associated with each keypress.
 758  */
 759 cptr keymap_act[KEYMAP_MODES][256];
 760
 761
 762
 763 /*** Player information ***/
 764
 765 /*
 766  * Static player info record
 767  */
 768 player_type p_body;
 769
 770 /*
 771  * Pointer to the player info
 772  */
 773 player_type *p_ptr = &p_body;
 774
 775 /*
 776  * Pointer to the player tables
 777  * (sex, race, class, magic)
 778  */
 779 player_sex *sp_ptr;
 780 player_race *rp_ptr;
 781 player_class *cp_ptr;
 782 player_seikaku *ap_ptr;
 783 player_magic *mp_ptr;
 784
 785
 786 /*
 787  * The last character rolled,
 788  * holded for quick start
 789  */
 790 birther previous_char;
 791
 792
 793 /*
 794  * The vault generation arrays
 795  */
 796 vault_type *v_info;
 797 char *v_name;
 798 char *v_text;
 799
 800 /*
 801  * The skill table
 802  */
 803 skill_table *s_info;
 804
 805 /*
 806  * The magic info
 807  */
 808 player_magic *m_info;
 809
 810 /*
 811  * The terrain feature arrays
 812  */
 813 feature_type *f_info;
 814 char *f_name;
 815 char *f_tag;
 816
 817 /*
 818  * The object kind arrays
 819  */
 820 object_kind *k_info;
 821 char *k_name;
 822 char *k_text;
 823
 824 /*
 825  * The artifact arrays
 826  */
 827 artifact_type *a_info;
 828 char *a_name;
 829 char *a_text;
 830
 831 /*
 832  * The ego-item arrays
 833  */
 834 ego_item_type *e_info;
 835 char *e_name;
 836 char *e_text;
 837
 838
 839 /*
 840  * The monster race arrays
 841  */
 842 monster_race *r_info;
 843 char *r_name;
 844 char *r_text;
 845
 846
 847 /*
 848  * The dungeon arrays
 849  */
 850 dungeon_info_type *d_info;
 851 char *d_name;
 852 char *d_text;
 853
 854
 855 /*
 856  * Hack -- The special Angband "System Suffix"
 857  * This variable is used to choose an appropriate "pref-xxx" file
 858  */
 859 cptr ANGBAND_SYS = "xxx";
 860
 861 /*
 862  * Hack -- The special Angband "Keyboard Suffix"
 863  * This variable is used to choose an appropriate macro-trigger definition
 864  */
 865 #ifdef JP
 866 cptr ANGBAND_KEYBOARD = "JAPAN";
 867 #else
 868 cptr ANGBAND_KEYBOARD = "0";
 869 #endif
 870
 871 /*
 872  * Hack -- The special Angband "Graphics Suffix"
 873  * This variable is used to choose an appropriate "graf-xxx" file
 874  */
 875 cptr ANGBAND_GRAF = "ascii";
 876
 877 /*
 878  * Path name: The main "lib" directory
 879  * This variable is not actually used anywhere in the code
 880  */
 881 cptr ANGBAND_DIR;
 882
 883 /*
 884  * High score files (binary)
 885  * These files may be portable between platforms
 886  */
 887 cptr ANGBAND_DIR_APEX;
 888
 889 /*
 890  * Bone files for player ghosts (ascii)
 891  * These files are portable between platforms
 892  */
 893 cptr ANGBAND_DIR_BONE;
 894
 895 /*
 896  * Binary image files for the "*_info" arrays (binary)
 897  * These files are not portable between platforms
 898  */
 899 cptr ANGBAND_DIR_DATA;
 900
 901 /*
 902  * Textual template files for the "*_info" arrays (ascii)
 903  * These files are portable between platforms
 904  */
 905 cptr ANGBAND_DIR_EDIT;
 906
 907 /*
 908  * Script files
 909  * These files are portable between platforms.
 910  */
 911 cptr ANGBAND_DIR_SCRIPT;
 912
 913 /*
 914  * Various extra files (ascii)
 915  * These files may be portable between platforms
 916  */
 917 cptr ANGBAND_DIR_FILE;
 918
 919 /*
 920  * Help files (normal) for the online help (ascii)
 921  * These files are portable between platforms
 922  */
 923 cptr ANGBAND_DIR_HELP;
 924
 925 /*
 926  * Help files (spoilers) for the online help (ascii)
 927  * These files are portable between platforms
 928  */
 929 cptr ANGBAND_DIR_INFO;
 930
 931 /*
 932  * Default user "preference" files (ascii)
 933  * These files are rarely portable between platforms
 934  */
 935 cptr ANGBAND_DIR_PREF;
 936
 937 /*
 938  * Savefiles for current characters (binary)
 939  * These files are portable between platforms
 940  */
 941 cptr ANGBAND_DIR_SAVE;
 942
 943 /*
 944  * User "preference" files (ascii)
 945  * These files are rarely portable between platforms
 946  */
 947 cptr ANGBAND_DIR_USER;
 948
 949 /*
 950  * Various extra files (binary)
 951  * These files are rarely portable between platforms
 952  */
 953 cptr ANGBAND_DIR_XTRA;
 954
 955
 956 /*
 957  * Total Hack -- allow all items to be listed (even empty ones)
 958  * This is only used by "do_cmd_inven_e()" and is cleared there.
 959  */
 960 bool item_tester_full;
 961
 962 bool item_tester_no_ryoute = FALSE;
 963
 964 /*
 965  * Here is a "pseudo-hook" used during calls to "get_item()" and
 966  * "show_inven()" and "show_equip()", and the choice window routines.
 967  */
 968 byte item_tester_tval;
 969
 970
 971 /*
 972  * Here is a "hook" used during calls to "get_item()" and
 973  * "show_inven()" and "show_equip()", and the choice window routines.
 974  */
 975 bool (*item_tester_hook)(object_type*);
 976
 977
 978
 979 /*
 980  * Current "comp" function for ang_sort()
 981  */
 982 bool (*ang_sort_comp)(vptr u, vptr v, int a, int b);
 983
 984
 985 /*
 986  * Current "swap" function for ang_sort()
 987  */
 988 void (*ang_sort_swap)(vptr u, vptr v, int a, int b);
 989
 990
 991
 992 /*
 993  * Hack -- function hooks to restrict "get_mon_num_prep()" function
 994  */
 995 monster_hook_type get_mon_num_hook;
 996 monster_hook_type get_mon_num2_hook;
 997
 998
 999 /*
1000  * Hack -- function hook to restrict "get_obj_num_prep()" function
1001  */
1002 bool (*get_obj_num_hook)(int k_idx);
1003
1004
1005 /* Hack, monk armour */
1006 bool monk_armour_aux;
1007 bool monk_notify_aux;
1008
1009 #ifdef ALLOW_EASY_OPEN /* TNB */
1010 bool easy_open;
1011 #endif /* ALLOW_EASY_OPEN -- TNB */
1012
1013 #ifdef ALLOW_EASY_DISARM /* TNB */
1014 bool easy_disarm;
1015 #endif /* ALLOW_EASY_DISARM -- TNB */
1016
1017 #ifdef ALLOW_EASY_FLOOR /* TNB */
1018 bool easy_floor;
1019 #endif /* ALLOW_EASY_FLOOR -- TNB */
1020
1021 bool use_command;
1022 bool center_player;
1023 bool center_running;
1024
1025 /* Auto-destruction options */
1026 bool destroy_items;
1027 bool destroy_feeling;
1028 bool destroy_identify;
1029 bool leave_worth;
1030 bool leave_equip;
1031 bool leave_wanted;
1032 bool leave_corpse;
1033 bool leave_junk;
1034 bool leave_chest;
1035 bool leave_special;
1036
1037 /* Nikki */
1038 bool record_fix_art;
1039 bool record_rand_art;
1040 bool record_destroy_uniq;
1041 bool record_fix_quest;
1042 bool record_rand_quest;
1043 bool record_maxdepth;
1044 bool record_stair;
1045 bool record_buy;
1046 bool record_sell;
1047 bool record_danger;
1048 bool record_arena;
1049 bool record_ident;
1050 bool record_named_pet;
1051 char record_o_name[MAX_NLEN];
1052 s32b record_turn;
1053
1054 /*
1055  * Wilderness
1056  */
1057 wilderness_type **wilderness;
1058
1059
1060 /*
1061  * Buildings
1062  */
1063 building_type building[MAX_BLDG];
1064
1065
1066 /*
1067  * Maximum number of quests
1068  */
1069 u16b max_quests;
1070
1071 /*
1072  * Maximum number of monsters in r_info.txt
1073  */
1074 u16b max_r_idx;
1075
1076 /*
1077  * Maximum number of items in k_info.txt
1078  */
1079 u16b max_k_idx;
1080
1081 /*
1082  * Maximum number of vaults in v_info.txt
1083  */
1084 u16b max_v_idx;
1085
1086 /*
1087  * Maximum number of terrain features in f_info.txt
1088  */
1089 u16b max_f_idx;
1090
1091 /*
1092  * Maximum number of artifacts in a_info.txt
1093  */
1094 u16b max_a_idx;
1095
1096 /*
1097  * Maximum number of ego-items in e_info.txt
1098  */
1099 u16b max_e_idx;
1100
1101 /*
1102  * Maximum number of dungeon in e_info.txt
1103  */
1104 u16b max_d_idx;
1105
1106 /*
1107  * Maximum number of objects in the level
1108  */
1109 u16b max_o_idx;
1110
1111 /*
1112  * Maximum number of monsters in the level
1113  */
1114 u16b max_m_idx;
1115
1116 /*
1117  * Maximum size of the wilderness
1118  */
1119 s32b max_wild_x;
1120 s32b max_wild_y;
1121
1122 /*
1123  * Quest info
1124  */
1125 quest_type *quest;
1126
1127 /*
1128  * Quest text
1129  */
1130 char quest_text[10][80];
1131
1132 /*
1133  * Current line of the quest text
1134  */
1135 int quest_text_line;
1136
1137 /*
1138  * Default spell color table (quark index)
1139  */
1140 s16b gf_color[MAX_GF];
1141
1142 /*
1143  * Flags for initialization
1144  */
1145 int init_flags;
1146
1147
1148 /*
1149  * The "highscore" file descriptor, if available.
1150  */
1151 int highscore_fd = -1;
1152
1153 int mutant_regenerate_mod = 100;
1154
1155 bool can_save = FALSE;        /* Game can be saved */
1156
1157 s16b world_monster;
1158 bool world_player;
1159
1160 int cap_mon;
1161 int cap_mspeed;
1162 int cap_hp;
1163 int cap_maxhp;
1164 u16b cap_nickname;
1165
1166 s16b battle_mon[4];
1167 int sel_monster;
1168 int battle_odds;
1169 int kakekin;
1170 u32b mon_odds[4];
1171
1172 int pet_t_m_idx;
1173 int riding_t_m_idx;
1174
1175 s16b kubi_r_idx[MAX_KUBI];
1176 s16b today_mon;
1177
1178 bool write_level;
1179
1180 u32b playtime;
1181 u32b start_time;
1182
1183 int tsuri_dir;
1184
1185 bool sukekaku;
1186 bool new_mane;
1187
1188 bool mon_fight;
1189
1190 bool ambush_flag;
1191 bool generate_encounter;
1192
1193 cptr screen_dump = NULL;
1194
1195 /*** Terrain feature variables ***/
1196
1197 /* Nothing */
1198 s16b feat_none;
1199
1200 /* Floor */
1201 s16b feat_floor;
1202
1203 /* Objects */
1204 s16b feat_glyph;
1205 s16b feat_explosive_rune;
1206 s16b feat_mirror;
1207
1208 /* Doors */
1209 door_type feat_door[MAX_DOOR_TYPES];
1210
1211 /* Stairs */
1212 s16b feat_up_stair;
1213 s16b feat_down_stair;
1214 s16b feat_entrance;
1215
1216 /* Special traps */
1217 s16b feat_trap_open;
1218 s16b feat_trap_armageddon;
1219 s16b feat_trap_piranha;
1220
1221 /* Rubble */
1222 s16b feat_rubble;
1223
1224 /* Seams */
1225 s16b feat_magma_vein;
1226 s16b feat_quartz_vein;
1227
1228 /* Walls */
1229 s16b feat_granite;
1230 s16b feat_permanent;
1231
1232 /* Glass floor */
1233 s16b feat_glass_floor;
1234
1235 /* Glass walls */
1236 s16b feat_glass_wall;
1237 s16b feat_permanent_glass_wall;
1238
1239 /* Pattern */
1240 s16b feat_pattern_start;
1241 s16b feat_pattern_1;
1242 s16b feat_pattern_2;
1243 s16b feat_pattern_3;
1244 s16b feat_pattern_4;
1245 s16b feat_pattern_end;
1246 s16b feat_pattern_old;
1247 s16b feat_pattern_exit;
1248 s16b feat_pattern_corrupted;
1249
1250 /* Various */
1251 s16b feat_black_market;
1252 s16b feat_town;
1253
1254 /* Terrains */
1255 s16b feat_deep_water;
1256 s16b feat_shallow_water;
1257 s16b feat_deep_lava;
1258 s16b feat_shallow_lava;
1259 s16b feat_dirt;
1260 s16b feat_grass;
1261 s16b feat_flower;
1262 s16b feat_brake;
1263 s16b feat_tree;
1264 s16b feat_mountain;
1265 s16b feat_swamp;
1266
1267 /* Unknown grid (not detected) */
1268 s16b feat_undetected;
1269
1270 /*
1271  * Which dungeon ?
1272  */
1273 byte dungeon_type;
1274 s16b *max_dlv;
1275
1276 s16b feat_wall_outer;
1277 s16b feat_wall_inner;
1278 s16b feat_wall_solid;
1279 s16b floor_type[100], fill_type[100];
1280
1281 bool now_damaged;
1282 s16b now_message;
1283 bool use_menu;
1284
1285 #ifdef CHUUKEI
1286 bool chuukei_server;
1287 bool chuukei_client;
1288 char *server_name;
1289 int server_port;
1290 #endif
1291
1292 /* for movie */
1293 bool browsing_movie;
1294
1295 #ifdef TRAVEL
1296 /* for travel */
1297 travel_type travel;
1298 #endif
1299
1300 /* for snipers */
1301 int snipe_type = SP_NONE;
1302 bool reset_concent = FALSE;   /* Concentration reset flag */
1303 bool is_fired = FALSE;