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