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 u32b seed_flavor;               /* Hack -- consistent object colors */
  92 u32b seed_town;                 /* Hack -- consistent town layout */
  93
  94 s16b command_cmd;               /* Current "Angband Command" */
  95
  96 s16b command_arg;               /* Gives argument of current command */
  97 s16b command_rep;               /* Gives repetition of current command */
  98 s16b command_dir;               /* Gives direction of current command */
  99
 100 s16b command_see;               /* See "object1.c" */
 101 s16b command_wrk;               /* See "object1.c" */
 102
 103 s16b command_gap = 999;         /* See "object1.c" */
 104
 105 s16b command_new;               /* Command chaining from inven/equip view */
 106
 107 s16b energy_use;                /* Energy use this turn */
 108
 109 bool msg_flag;                  /* Used in msg_print() for "buffering" */
 110
 111 s16b running;                   /* Current counter for running, if any */
 112 s16b resting;                   /* Current counter for resting, if any */
 113
 114 s16b cur_hgt;                   /* Current dungeon height */
 115 s16b cur_wid;                   /* Current dungeon width */
 116 s16b dun_level;                 /* Current dungeon level */
 117 s16b num_repro;                 /* Current reproducer count */
 118 s16b object_level;              /* Current object creation level */
 119 s16b monster_level;             /* Current monster creation level */
 120 s16b base_level;        /* Base dungeon level */
 121
 122 s32b turn;                              /* Current game turn */
 123 s32b dungeon_turn;                      /* Game turn in dungeon */
 124 s32b old_turn;                  /* Turn when level began (feelings) */
 125 s32b old_battle;
 126
 127 bool use_sound;                 /* The "sound" mode is enabled */
 128 bool use_graphics;              /* The "graphics" mode is enabled */
 129 bool use_bigtile = FALSE;
 130
 131 s16b signal_count;              /* Hack -- Count interupts */
 132
 133 bool inkey_base;                /* See the "inkey()" function */
 134 bool inkey_xtra;                /* See the "inkey()" function */
 135 bool inkey_scan;                /* See the "inkey()" function */
 136 bool inkey_flag;                /* See the "inkey()" function */
 137
 138 s16b coin_type;                 /* Hack -- force coin type */
 139
 140 bool opening_chest;             /* Hack -- prevent chest generation */
 141
 142 bool shimmer_monsters;  /* Hack -- optimize multi-hued monsters */
 143 bool shimmer_objects;   /* Hack -- optimize multi-hued objects */
 144
 145 bool repair_monsters;   /* Hack -- optimize detect monsters */
 146 bool repair_objects;    /* Hack -- optimize detect objects */
 147
 148 s16b inven_nxt;                 /* Hack -- unused */
 149 bool hack_mind;
 150 bool hack_mutation;
 151
 152 s16b inven_cnt;                 /* Number of items in inventory */
 153 s16b equip_cnt;                 /* Number of items in equipment */
 154
 155 s16b o_max = 1;                 /* Number of allocated objects */
 156 s16b o_cnt = 0;                 /* Number of live objects */
 157
 158 s16b m_max = 1;                 /* Number of allocated monsters */
 159 s16b m_cnt = 0;                 /* Number of live monsters */
 160
 161 s16b hack_m_idx = 0;    /* Hack -- see "process_monsters()" */
 162 s16b hack_m_idx_ii = 0;
 163 bool multi_rew = FALSE;
 164 char summon_kin_type;   /* Hack, by Julian Lighton: summon 'relatives' */
 165
 166 int total_friends = 0;
 167 s32b total_friend_levels = 0;
 168 s32b friend_align = 0;
 169
 170 int leaving_quest = 0;
 171 bool reinit_wilderness = FALSE;
 172
 173
 174 /*
 175  * Software options (set via the '=' command).  See "tables.c"
 176  */
 177
 178 /*** Input Options ***/
 179
 180 bool rogue_like_commands;       /* Rogue-like commands */
 181 bool always_pickup;     /* Pick things up by default */
 182 bool carry_query_flag;  /* Prompt before picking things up */
 183 bool quick_messages;    /* Activate quick messages */
 184 bool auto_more; /* Automatically clear '-more-' prompts */
 185 bool command_menu;      /* Enable command selection menu */
 186 bool other_query_flag;  /* Prompt for floor item selection */
 187 bool use_old_target;    /* Use old target by default */
 188 bool always_repeat;     /* Repeat obvious commands */
 189 bool confirm_destroy;   /* Prompt for destruction of known worthless items */
 190 bool confirm_wear;      /* Confirm to wear/wield known cursed items */
 191 bool confirm_quest;     /* Prompt before exiting a quest level */
 192 bool target_pet;        /* Allow targetting pets */
 193
 194 #ifdef ALLOW_EASY_OPEN
 195 bool easy_open; /* Automatically open doors */
 196 #endif
 197
 198 #ifdef ALLOW_EASY_DISARM
 199 bool easy_disarm;       /* Automatically disarm traps */
 200 #endif
 201
 202 #ifdef ALLOW_EASY_FLOOR
 203 bool easy_floor;        /* Display floor stacks in a list */
 204 #endif
 205
 206 bool use_command;       /* Allow unified use command */
 207 bool over_exert;        /* Allow casting spells when short of mana */
 208 bool numpad_as_cursorkey;       /* Use numpad keys as cursor key in editor mode */
 209
 210
 211 /*** Map Screen Options ***/
 212
 213 bool center_player;     /* Center map while walking (*slow*) */
 214 bool center_running;    /* Centering even while running */
 215 bool view_yellow_lite;  /* Use special colors for torch-lit grids */
 216 bool view_bright_lite;  /* Use special colors for 'viewable' grids */
 217 bool view_granite_lite; /* Use special colors for wall grids (slow) */
 218 bool view_special_lite; /* Use special colors for floor grids (slow) */
 219 bool view_reduce_view;  /* Reduce view-radius in town */
 220 bool fresh_before;      /* Flush output while continuous command */
 221 bool fresh_after;       /* Flush output after monster's move */
 222 bool fresh_message;     /* Flush output after every message */
 223 bool hilite_player;     /* Hilite the player with the cursor */
 224 bool display_path;      /* Display actual path before shooting */
 225
 226
 227 /*** Text Display Options ***/
 228
 229 bool plain_descriptions;        /* Plain object descriptions */
 230 bool plain_pickup;      /* Plain pickup messages(japanese only) */
 231 bool always_show_list;  /* Always show list when choosing items */
 232 bool depth_in_feet;     /* Show dungeon level in feet */
 233 bool show_labels;       /* Show labels in object listings */
 234 bool show_weights;      /* Show weights in object listings */
 235 bool show_item_graph;   /* Show items graphics */
 236 bool equippy_chars;     /* Display 'equippy' chars */
 237 bool display_mutations; /* Display mutations in 'C'haracter Display */
 238 bool compress_savefile; /* Compress messages in savefiles */
 239 bool abbrev_extra;      /* Describe obj's extra resistances by abbreviation */
 240 bool abbrev_all;        /* Describe obj's all resistances by abbreviation */
 241 bool exp_need;  /* Show the experience needed for next level */
 242
 243
 244 /*** Game-Play Options ***/
 245
 246 bool stack_force_notes; /* Merge inscriptions when stacking */
 247 bool stack_force_costs; /* Merge discounts when stacking */
 248 bool expand_list;       /* Expand the power of the list commands */
 249 bool view_perma_grids;  /* Map remembers all perma-lit grids */
 250 bool view_torch_grids;  /* Map remembers all torch-lit grids */
 251 bool view_unsafe_grids; /* Map marked by detect traps */
 252 bool small_levels;      /* Allow unusually small dungeon levels */
 253 bool always_small_levels;       /* Always create unusually small dungeon levels */
 254 bool empty_levels;      /* Allow empty 'arena' levels */
 255 bool bound_walls_perm;  /* Boundary walls become 'permanent wall' */
 256 bool last_words;        /* Leave last words when your character dies */
 257
 258 #ifdef WORLD_SCORE
 259 bool send_score;        /* Send score dump to the world score server */
 260 #endif
 261
 262 bool allow_debug_opts;  /* Allow use of debug/cheat options */
 263
 264
 265 /*** Disturbance Options ***/
 266
 267 bool find_ignore_stairs;        /* Run past stairs */
 268 bool find_ignore_doors; /* Run through open doors */
 269 bool find_cut;  /* Run past known corners */
 270 bool check_abort;       /* Check for user abort while continuous command */
 271 bool flush_failure;     /* Flush input on various failures */
 272 bool flush_disturb;     /* Flush input whenever disturbed */
 273 bool disturb_move;      /* Disturb whenever any monster moves */
 274 bool disturb_high;      /* Disturb whenever high-level monster moves */
 275 bool disturb_near;      /* Disturb whenever viewable monster moves */
 276 bool disturb_pets;      /* Disturb when visible pets move */
 277 bool disturb_panel;     /* Disturb whenever map panel changes */
 278 bool disturb_state;     /* Disturb whenever player state changes */
 279 bool disturb_minor;     /* Disturb whenever boring things happen */
 280 bool ring_bell; /* Audible bell (on errors, etc) */
 281 bool disturb_trap_detect;       /* Disturb when leaving trap detected area */
 282 bool alert_trap_detect; /* Alert when leaving trap detected area */
 283
 284
 285 /*** Birth Options ***/
 286
 287 bool manual_haggle;     /* Manually haggle in stores */
 288 bool easy_band; /* Easy Mode (*) */
 289 bool smart_learn;       /* Monsters learn from their mistakes (*) */
 290 bool smart_cheat;       /* Monsters exploit players weaknesses (*) */
 291 bool vanilla_town;      /* Use 'vanilla' town without quests and wilderness */
 292 bool lite_town; /* Use 'lite' town without a wilderness */
 293 bool ironman_shops;     /* Stores are permanently closed (*) */
 294 bool ironman_small_levels;      /* Always create unusually small dungeon levels (*) */
 295 bool ironman_downward;  /* Disable recall and use of up stairs (*) */
 296 bool ironman_empty_levels;      /* Always create empty 'arena' levels (*) */
 297 bool ironman_rooms;     /* Always generate very unusual rooms (*) */
 298 bool ironman_nightmare; /* Nightmare mode(it isn't even remotely fair!)(*) */
 299 bool left_hander;       /* Left-Hander */
 300 bool preserve_mode;     /* Preserve artifacts (*) */
 301 bool autoroller;        /* Allow use of autoroller for stats (*) */
 302 bool autochara; /* Autoroll for weight, height and social status */
 303 bool powerup_home;      /* Increase capacity of your home (*) */
 304
 305
 306 /*** Easy Object Auto-Destroyer ***/
 307
 308 bool destroy_items;     /* Use easy auto-destroyer */
 309 bool destroy_feeling;   /* Apply auto-destroy as sense feeling */
 310 bool destroy_identify;  /* Apply auto-destroy as identify an item */
 311 bool leave_worth;       /* Auto-destroyer leaves known worthy items */
 312 bool leave_equip;       /* Auto-destroyer leaves weapons and armour */
 313 bool leave_chest;       /* Auto-destroyer leaves closed chests */
 314 bool leave_wanted;      /* Auto-destroyer leaves wanted corpses */
 315 bool leave_corpse;      /* Auto-destroyer leaves corpses and skeletons */
 316 bool leave_junk;        /* Auto-destroyer leaves junk */
 317 bool leave_special;     /* Auto-destroyer leaves items your race/class needs */
 318
 319
 320 /*** Play-record Options ***/
 321
 322 bool record_fix_art;    /* Record fixed artifacts */
 323 bool record_rand_art;   /* Record random artifacts */
 324 bool record_destroy_uniq;       /* Record when destroy unique monster */
 325 bool record_fix_quest;  /* Record fixed quests */
 326 bool record_rand_quest; /* Record random quests */
 327 bool record_maxdeapth;  /* Record movements to deepest level */
 328 bool record_stair;      /* Record recall and stair movements */
 329 bool record_buy;        /* Record purchased items */
 330 bool record_sell;       /* Record sold items */
 331 bool record_danger;     /* Record hitpoint warning */
 332 bool record_arena;      /* Record arena victories */
 333 bool record_ident;      /* Record first identified items */
 334 bool record_named_pet;  /* Record informations of named pets */
 335
 336
 337 /* Cheating options */
 338
 339 bool cheat_peek;        /* Peek into object creation */
 340 bool cheat_hear;        /* Peek into monster creation */
 341 bool cheat_room;        /* Peek into dungeon creation */
 342 bool cheat_xtra;        /* Peek into something else */
 343 bool cheat_know;        /* Know complete monster info */
 344 bool cheat_live;        /* Allow player to avoid death */
 345 bool cheat_save;        /* Ask for saving death */
 346
 347
 348 /* Special options */
 349
 350 byte hitpoint_warn;     /* Hitpoint warning (0 to 9) */
 351 byte mana_warn; /* Mana color (0 to 9) */
 352
 353 byte delay_factor;      /* Delay factor (0 to 9) */
 354
 355 bool autosave_l;        /* Autosave before entering new levels */
 356 bool autosave_t;        /* Timed autosave */
 357 s16b autosave_freq;     /* Autosave frequency */
 358
 359
 360 /*
 361  * Dungeon variables
 362  */
 363
 364 byte feeling;                   /* Most recent feeling */
 365 s16b rating;                    /* Level's current rating */
 366
 367 bool good_item_flag;            /* True if "Artifact" on this level */
 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 };
 654
 655
 656 /*
 657  * The array of "cave grids" [MAX_WID][MAX_HGT].
 658  * Not completely allocated, that would be inefficient
 659  * Not completely hardcoded, that would overflow memory
 660  */
 661 cave_type *cave[MAX_HGT];
 662
 663
 664 /*
 665  * The array of saved floors
 666  */
 667 saved_floor_type saved_floors[MAX_SAVED_FLOORS];
 668
 669
 670 /*
 671  * Number of floor_id used from birth
 672  */
 673 s16b max_floor_id;
 674
 675
 676 /*
 677  * Sign for current process used in temporal files.
 678  * Actually it is the start time of current process.
 679  */
 680 u32b saved_floor_file_sign;
 681
 682
 683 /*
 684  * The array of dungeon items [max_o_idx]
 685  */
 686 object_type *o_list;
 687
 688 /*
 689  * The array of dungeon monsters [max_m_idx]
 690  */
 691 monster_type *m_list;
 692
 693
 694 /*
 695  * Maximum number of towns
 696  */
 697 u16b max_towns;
 698
 699 /*
 700  * The towns [max_towns]
 701  */
 702 town_type *town;
 703
 704
 705 /*
 706  * The player's inventory [INVEN_TOTAL]
 707  */
 708 object_type *inventory;
 709
 710
 711 /*
 712  * The size of "alloc_kind_table" (at most max_k_idx * 4)
 713  */
 714 s16b alloc_kind_size;
 715
 716 /*
 717  * The entries in the "kind allocator table"
 718  */
 719 alloc_entry *alloc_kind_table;
 720
 721
 722 /*
 723  * The size of "alloc_race_table" (at most max_r_idx)
 724  */
 725 s16b alloc_race_size;
 726
 727 /*
 728  * The entries in the "race allocator table"
 729  */
 730 alloc_entry *alloc_race_table;
 731
 732
 733 /*
 734  * Specify attr/char pairs for visual special effects
 735  * Be sure to use "index & 0x7F" to avoid illegal access
 736  */
 737 byte misc_to_attr[256];
 738 char misc_to_char[256];
 739
 740
 741 /*
 742  * Specify attr/char pairs for inventory items (by tval)
 743  * Be sure to use "index & 0x7F" to avoid illegal access
 744  */
 745 byte tval_to_attr[128];
 746 char tval_to_char[128];
 747
 748
 749 /*
 750  * Keymaps for each "mode" associated with each keypress.
 751  */
 752 cptr keymap_act[KEYMAP_MODES][256];
 753
 754
 755
 756 /*** Player information ***/
 757
 758 /*
 759  * Static player info record
 760  */
 761 player_type p_body;
 762
 763 /*
 764  * Pointer to the player info
 765  */
 766 player_type *p_ptr = &p_body;
 767
 768 /*
 769  * Pointer to the player tables
 770  * (sex, race, class, magic)
 771  */
 772 player_sex *sp_ptr;
 773 player_race *rp_ptr;
 774 player_class *cp_ptr;
 775 player_seikaku *ap_ptr;
 776 player_magic *mp_ptr;
 777
 778
 779 /*
 780  * The last character rolled,
 781  * holded for quick start
 782  */
 783 birther previous_char;
 784
 785
 786 /*
 787  * The vault generation arrays
 788  */
 789 vault_type *v_info;
 790 char *v_name;
 791 char *v_text;
 792
 793 /*
 794  * The skill table
 795  */
 796 skill_table *s_info;
 797
 798 /*
 799  * The magic info
 800  */
 801 player_magic *m_info;
 802
 803 /*
 804  * The terrain feature arrays
 805  */
 806 feature_type *f_info;
 807 char *f_name;
 808 char *f_tag;
 809
 810 /*
 811  * The object kind arrays
 812  */
 813 object_kind *k_info;
 814 char *k_name;
 815 char *k_text;
 816
 817 /*
 818  * The artifact arrays
 819  */
 820 artifact_type *a_info;
 821 char *a_name;
 822 char *a_text;
 823
 824 /*
 825  * The ego-item arrays
 826  */
 827 ego_item_type *e_info;
 828 char *e_name;
 829 char *e_text;
 830
 831
 832 /*
 833  * The monster race arrays
 834  */
 835 monster_race *r_info;
 836 char *r_name;
 837 char *r_text;
 838
 839
 840 /*
 841  * The dungeon arrays
 842  */
 843 dungeon_info_type *d_info;
 844 char *d_name;
 845 char *d_text;
 846
 847
 848 /*
 849  * Hack -- The special Angband "System Suffix"
 850  * This variable is used to choose an appropriate "pref-xxx" file
 851  */
 852 cptr ANGBAND_SYS = "xxx";
 853
 854 /*
 855  * Hack -- The special Angband "Keyboard Suffix"
 856  * This variable is used to choose an appropriate macro-trigger definition
 857  */
 858 #ifdef JP
 859 cptr ANGBAND_KEYBOARD = "JAPAN";
 860 #else
 861 cptr ANGBAND_KEYBOARD = "0";
 862 #endif
 863
 864 /*
 865  * Hack -- The special Angband "Graphics Suffix"
 866  * This variable is used to choose an appropriate "graf-xxx" file
 867  */
 868 cptr ANGBAND_GRAF = "ascii";
 869
 870 /*
 871  * Path name: The main "lib" directory
 872  * This variable is not actually used anywhere in the code
 873  */
 874 cptr ANGBAND_DIR;
 875
 876 /*
 877  * High score files (binary)
 878  * These files may be portable between platforms
 879  */
 880 cptr ANGBAND_DIR_APEX;
 881
 882 /*
 883  * Bone files for player ghosts (ascii)
 884  * These files are portable between platforms
 885  */
 886 cptr ANGBAND_DIR_BONE;
 887
 888 /*
 889  * Binary image files for the "*_info" arrays (binary)
 890  * These files are not portable between platforms
 891  */
 892 cptr ANGBAND_DIR_DATA;
 893
 894 /*
 895  * Textual template files for the "*_info" arrays (ascii)
 896  * These files are portable between platforms
 897  */
 898 cptr ANGBAND_DIR_EDIT;
 899
 900 /*
 901  * Script files
 902  * These files are portable between platforms.
 903  */
 904 cptr ANGBAND_DIR_SCRIPT;
 905
 906 /*
 907  * Various extra files (ascii)
 908  * These files may be portable between platforms
 909  */
 910 cptr ANGBAND_DIR_FILE;
 911
 912 /*
 913  * Help files (normal) for the online help (ascii)
 914  * These files are portable between platforms
 915  */
 916 cptr ANGBAND_DIR_HELP;
 917
 918 /*
 919  * Help files (spoilers) for the online help (ascii)
 920  * These files are portable between platforms
 921  */
 922 cptr ANGBAND_DIR_INFO;
 923
 924 /*
 925  * Default user "preference" files (ascii)
 926  * These files are rarely portable between platforms
 927  */
 928 cptr ANGBAND_DIR_PREF;
 929
 930 /*
 931  * Savefiles for current characters (binary)
 932  * These files are portable between platforms
 933  */
 934 cptr ANGBAND_DIR_SAVE;
 935
 936 /*
 937  * User "preference" files (ascii)
 938  * These files are rarely portable between platforms
 939  */
 940 cptr ANGBAND_DIR_USER;
 941
 942 /*
 943  * Various extra files (binary)
 944  * These files are rarely portable between platforms
 945  */
 946 cptr ANGBAND_DIR_XTRA;
 947
 948
 949 /*
 950  * Total Hack -- allow all items to be listed (even empty ones)
 951  * This is only used by "do_cmd_inven_e()" and is cleared there.
 952  */
 953 bool item_tester_full;
 954
 955 bool item_tester_no_ryoute = FALSE;
 956
 957 /*
 958  * Here is a "pseudo-hook" used during calls to "get_item()" and
 959  * "show_inven()" and "show_equip()", and the choice window routines.
 960  */
 961 byte item_tester_tval;
 962
 963
 964 /*
 965  * Here is a "hook" used during calls to "get_item()" and
 966  * "show_inven()" and "show_equip()", and the choice window routines.
 967  */
 968 bool (*item_tester_hook)(object_type*);
 969
 970
 971
 972 /*
 973  * Current "comp" function for ang_sort()
 974  */
 975 bool (*ang_sort_comp)(vptr u, vptr v, int a, int b);
 976
 977
 978 /*
 979  * Current "swap" function for ang_sort()
 980  */
 981 void (*ang_sort_swap)(vptr u, vptr v, int a, int b);
 982
 983
 984
 985 /*
 986  * Hack -- function hooks to restrict "get_mon_num_prep()" function
 987  */
 988 monster_hook_type get_mon_num_hook;
 989 monster_hook_type get_mon_num2_hook;
 990
 991
 992 /*
 993  * Hack -- function hook to restrict "get_obj_num_prep()" function
 994  */
 995 bool (*get_obj_num_hook)(int k_idx);
 996
 997
 998 /* Hack, monk armour */
 999 bool monk_armour_aux;
1000 bool monk_notify_aux;
1001
1002 #ifdef ALLOW_EASY_OPEN /* TNB */
1003 bool easy_open;
1004 #endif /* ALLOW_EASY_OPEN -- TNB */
1005
1006 #ifdef ALLOW_EASY_DISARM /* TNB */
1007 bool easy_disarm;
1008 #endif /* ALLOW_EASY_DISARM -- TNB */
1009
1010 #ifdef ALLOW_EASY_FLOOR /* TNB */
1011 bool easy_floor;
1012 #endif /* ALLOW_EASY_FLOOR -- TNB */
1013
1014 bool use_command;
1015 bool center_player;
1016 bool center_running;
1017
1018 /* Auto-destruction options */
1019 bool destroy_items;
1020 bool destroy_feeling;
1021 bool destroy_identify;
1022 bool leave_worth;
1023 bool leave_equip;
1024 bool leave_wanted;
1025 bool leave_corpse;
1026 bool leave_junk;
1027 bool leave_chest;
1028 bool leave_special;
1029
1030 /* Nikki */
1031 bool record_fix_art;
1032 bool record_rand_art;
1033 bool record_destroy_uniq;
1034 bool record_fix_quest;
1035 bool record_rand_quest;
1036 bool record_maxdeapth;
1037 bool record_stair;
1038 bool record_buy;
1039 bool record_sell;
1040 bool record_danger;
1041 bool record_arena;
1042 bool record_ident;
1043 bool record_named_pet;
1044 char record_o_name[MAX_NLEN];
1045 s32b record_turn;
1046
1047 /*
1048  * Wilderness
1049  */
1050 wilderness_type **wilderness;
1051
1052
1053 /*
1054  * Buildings
1055  */
1056 building_type building[MAX_BLDG];
1057
1058
1059 /*
1060  * Maximum number of quests
1061  */
1062 u16b max_quests;
1063
1064 /*
1065  * Maximum number of monsters in r_info.txt
1066  */
1067 u16b max_r_idx;
1068
1069 /*
1070  * Maximum number of items in k_info.txt
1071  */
1072 u16b max_k_idx;
1073
1074 /*
1075  * Maximum number of vaults in v_info.txt
1076  */
1077 u16b max_v_idx;
1078
1079 /*
1080  * Maximum number of terrain features in f_info.txt
1081  */
1082 u16b max_f_idx;
1083
1084 /*
1085  * Maximum number of artifacts in a_info.txt
1086  */
1087 u16b max_a_idx;
1088
1089 /*
1090  * Maximum number of ego-items in e_info.txt
1091  */
1092 u16b max_e_idx;
1093
1094 /*
1095  * Maximum number of dungeon in e_info.txt
1096  */
1097 u16b max_d_idx;
1098
1099 /*
1100  * Maximum number of objects in the level
1101  */
1102 u16b max_o_idx;
1103
1104 /*
1105  * Maximum number of monsters in the level
1106  */
1107 u16b max_m_idx;
1108
1109 /*
1110  * Maximum size of the wilderness
1111  */
1112 s32b max_wild_x;
1113 s32b max_wild_y;
1114
1115 /*
1116  * Quest info
1117  */
1118 quest_type *quest;
1119
1120 /*
1121  * Quest text
1122  */
1123 char quest_text[10][80];
1124
1125 /*
1126  * Current line of the quest text
1127  */
1128 int quest_text_line;
1129
1130 /*
1131  * Default spell color table (quark index)
1132  */
1133 s16b gf_color[MAX_GF];
1134
1135 /*
1136  * Flags for initialization
1137  */
1138 int init_flags;
1139
1140
1141 /*
1142  * The "highscore" file descriptor, if available.
1143  */
1144 int highscore_fd = -1;
1145
1146 int mutant_regenerate_mod = 100;
1147
1148 bool can_save = FALSE;        /* Game can be saved */
1149
1150 s16b world_monster;
1151 bool world_player;
1152
1153 int cap_mon;
1154 int cap_mspeed;
1155 int cap_hp;
1156 int cap_maxhp;
1157 u16b cap_nickname;
1158
1159 s16b battle_mon[4];
1160 int sel_monster;
1161 int battle_odds;
1162 int kakekin;
1163 u32b mon_odds[4];
1164
1165 int pet_t_m_idx;
1166 int riding_t_m_idx;
1167
1168 s16b kubi_r_idx[MAX_KUBI];
1169 s16b today_mon;
1170
1171 monster_type party_mon[MAX_PARTY_MON];
1172
1173 bool write_level;
1174
1175 u32b playtime;
1176 u32b start_time;
1177
1178 int tsuri_dir;
1179
1180 bool sukekaku;
1181 bool new_mane;
1182
1183 bool mon_fight;
1184
1185 bool ambush_flag;
1186 bool generate_encounter;
1187
1188 cptr screen_dump = NULL;
1189
1190 /*
1191  * Which dungeon ?
1192  */
1193 byte dungeon_type;
1194 s16b *max_dlv;
1195
1196 s16b feat_wall_outer;
1197 s16b feat_wall_inner;
1198 s16b feat_wall_solid;
1199 s16b floor_type[100], fill_type[100];
1200
1201 bool now_damaged;
1202 s16b now_message;
1203 bool use_menu;
1204
1205 #ifdef CHUUKEI
1206 bool chuukei_server;
1207 bool chuukei_client;
1208 char *server_name;
1209 int server_port;
1210 #endif