src/variable.c

   1 /* File: variable.c */
   2
   3 /* Purpose: Angband variables */
   4
   5 /*
   6  * Copyright (c) 1989 James E. Wilson, Robert A. Koeneke
   7  *
   8  * This software may be copied and distributed for educational, research, and
   9  * not for profit purposes provided that this copyright and statement are
  10  * included in all such copies.
  11  */
  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 char *macro_template = NULL;
  31 char *macro_modifier_chr;
  32 char *macro_modifier_name[MAX_MACRO_MOD];
  33 char *macro_trigger_name[MAX_MACRO_TRIG];
  34 char *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 autopick_type autopick_list[MAX_AUTOPICK];
  44 autopick_type autopick_entry_last_destroyed;
  45
  46 /*
  47  * Executable version
  48  */
  49 byte version_major = VERSION_MAJOR;
  50 byte version_minor = VERSION_MINOR;
  51 byte version_patch = VERSION_PATCH;
  52 byte version_extra = VERSION_EXTRA;
  53
  54 /*
  55  * Savefile version
  56  */
  57 byte sf_major;                  /* Savefile's "version_major" */
  58 byte sf_minor;                  /* Savefile's "version_minor" */
  59 byte sf_patch;                  /* Savefile's "version_patch" */
  60 byte sf_extra;                  /* Savefile's "version_extra" */
  61 u32b sf_version;                /* Savefile's "version" */
  62
  63 byte z_major;           /* Savefile version for Hengband */
  64 byte z_minor;
  65 byte z_patch;
  66
  67 /*
  68  * Savefile information
  69  */
  70 u32b sf_xtra;                   /* Operating system info */
  71 u32b sf_when;                   /* Time when savefile created */
  72 u16b sf_lives;                  /* Number of past "lives" with this file */
  73 u16b sf_saves;                  /* Number of "saves" during this life */
  74
  75 /*
  76  * Run-time arguments
  77  */
  78 bool arg_fiddle;                        /* Command arg -- Request fiddle mode */
  79 bool arg_wizard;                        /* Command arg -- Request wizard mode */
  80 bool arg_sound;                         /* Command arg -- Request special sounds */
  81 byte arg_graphics;                      /* Command arg -- Request graphics mode */
  82 bool arg_monochrome;            /* Command arg -- Request monochrome mode */
  83 bool arg_force_original;        /* Command arg -- Request original keyset */
  84 bool arg_force_roguelike;       /* Command arg -- Request roguelike keyset */
  85 bool arg_bigtile = FALSE;       /* Command arg -- Request big tile mode */
  86
  87 /*
  88  * Various things
  89  */
  90 bool character_generated;       /* The character exists */
  91 bool character_dungeon;         /* The character has a dungeon */
  92 bool character_loaded;          /* The character was loaded from a savefile */
  93 bool character_saved;           /* The character was just saved to a savefile */
  94
  95 bool character_icky;            /* The game is in an icky full screen mode */
  96 bool character_xtra;            /* The game is in an icky startup mode */
  97
  98 u32b seed_flavor;               /* Hack -- consistent object colors */
  99 u32b seed_town;                 /* Hack -- consistent town layout */
 100
 101 s16b command_cmd;               /* Current "Angband Command" */
 102
 103 s16b command_arg;               /* Gives argument of current command */
 104 s16b command_rep;               /* Gives repetition of current command */
 105 s16b command_dir;               /* Gives direction of current command */
 106
 107 s16b command_see;               /* See "cmd1.c" */
 108 s16b command_wrk;               /* See "cmd1.c" */
 109
 110 s16b command_gap = 50;  /* See "cmd1.c" */
 111
 112 s16b command_new;               /* Command chaining from inven/equip view */
 113
 114 s16b energy_use;                /* Energy use this turn */
 115
 116 byte create_up_stair;   /* Auto-create "up stairs" */
 117 byte create_down_stair; /* Auto-create "down stairs" */
 118
 119 bool msg_flag;                  /* Used in msg_print() for "buffering" */
 120
 121 bool alive;                             /* True if game is running */
 122
 123 bool death;                             /* True if player has died */
 124
 125 s16b running;                   /* Current counter for running, if any */
 126 s16b resting;                   /* Current counter for resting, if any */
 127
 128 s16b cur_hgt;                   /* Current dungeon height */
 129 s16b cur_wid;                   /* Current dungeon width */
 130 s16b dun_level;                 /* Current dungeon level */
 131 s16b num_repro;                 /* Current reproducer count */
 132 s16b object_level;              /* Current object creation level */
 133 s16b monster_level;             /* Current monster creation level */
 134 s16b base_level;        /* Base dungeon level */
 135
 136 s32b turn;                              /* Current game turn */
 137 s32b dungeon_turn;                      /* Game turn in dungeon */
 138 s32b old_turn;                  /* Turn when level began (feelings) */
 139 s32b old_battle;
 140
 141 bool wizard;                    /* Is the player currently in Wizard mode? */
 142
 143 bool use_sound;                 /* The "sound" mode is enabled */
 144 bool use_graphics;              /* The "graphics" mode is enabled */
 145 bool use_bigtile = FALSE;
 146
 147 u16b total_winner;              /* Semi-Hack -- Game has been won */
 148
 149 u16b panic_save;                /* Track some special "conditions" */
 150 u16b noscore;                   /* Track various "cheating" conditions */
 151 bool wait_report_score;         /* Waiting to report score */
 152
 153 s16b signal_count;              /* Hack -- Count interupts */
 154
 155 bool inkey_base;                /* See the "inkey()" function */
 156 bool inkey_xtra;                /* See the "inkey()" function */
 157 bool inkey_scan;                /* See the "inkey()" function */
 158 bool inkey_flag;                /* See the "inkey()" function */
 159 bool inkey_special;             /* See the "inkey()" function */
 160
 161 s16b coin_type;                 /* Hack -- force coin type */
 162
 163 bool opening_chest;             /* Hack -- prevent chest generation */
 164
 165 bool shimmer_monsters;  /* Hack -- optimize multi-hued monsters */
 166 bool shimmer_objects;   /* Hack -- optimize multi-hued objects */
 167
 168 bool repair_monsters;   /* Hack -- optimize detect monsters */
 169 bool repair_objects;    /* Hack -- optimize detect objects */
 170
 171 s16b inven_nxt;                 /* Hack -- unused */
 172 bool hack_mind;
 173 bool hack_mutation;
 174
 175 s16b inven_cnt;                 /* Number of items in inventory */
 176 s16b equip_cnt;                 /* Number of items in equipment */
 177
 178 s16b o_max = 1;                 /* Number of allocated objects */
 179 s16b o_cnt = 0;                 /* Number of live objects */
 180
 181 s16b m_max = 1;                 /* Number of allocated monsters */
 182 s16b m_cnt = 0;                 /* Number of live monsters */
 183
 184 s16b hack_m_idx = 0;    /* Hack -- see "process_monsters()" */
 185 s16b hack_m_idx_ii = 0;
 186 bool multi_rew = FALSE;
 187 char summon_kin_type;   /* Hack, by Julian Lighton: summon 'relatives' */
 188
 189 int total_friends = 0;
 190 s32b total_friend_levels = 0;
 191 s32b friend_align = 0;
 192
 193 int leaving_quest = 0;
 194
 195
 196 /*
 197  * Software options (set via the '=' command).  See "tables.c"
 198  */
 199
 200
 201 /* Option Set 1 -- User Interface */
 202
 203 bool rogue_like_commands;       /* Rogue-like commands */
 204 bool quick_messages;            /* Activate quick messages */
 205 bool auto_more;
 206 bool command_menu;
 207 bool other_query_flag;          /* Prompt for various information */
 208 bool carry_query_flag;          /* Prompt before picking things up */
 209 bool use_old_target;            /* Use old target by default */
 210 bool always_pickup;                     /* Pick things up by default */
 211 bool always_repeat;                     /* Repeat obvious commands */
 212 bool depth_in_feet;                     /* Show dungeon level in feet */
 213
 214 bool stack_force_notes;         /* Merge inscriptions when stacking */
 215 bool stack_force_costs;         /* Merge discounts when stacking */
 216
 217 bool show_labels;                       /* Show labels in object listings */
 218 bool show_weights;                      /* Show weights in object listings */
 219 bool show_choices;                      /* Show choices in certain sub-windows */
 220
 221 bool ring_bell;                         /* Ring the bell (on errors, etc) */
 222
 223 bool show_item_graph;
 224
 225
 226 /* Option Set 2 -- Disturbance */
 227
 228 bool find_ignore_stairs;        /* Run past stairs */
 229 bool find_ignore_doors;         /* Run through open doors */
 230 bool find_cut;                          /* Run past known corners */
 231 bool find_examine;                      /* Run into potential corners */
 232
 233 bool disturb_move;                      /* Disturb whenever any monster moves */
 234 bool disturb_near;                      /* Disturb whenever viewable monster moves */
 235 bool disturb_panel;                     /* Disturb whenever map panel changes */
 236 bool disturb_state;                     /* Disturn whenever player state changes */
 237 bool disturb_minor;                     /* Disturb whenever boring things happen */
 238
 239 bool alert_hitpoint;            /* Alert user to critical hitpoints */
 240 bool disturb_trap_detect;       /* Disturb when leaving trap detected area */
 241 bool alert_trap_detect;         /* Alert when leaving trap detected area */
 242 bool last_words;                /* Get last words upon dying */
 243 bool over_exert;
 244 bool small_levels;              /* Allow unusually small dungeon levels */
 245 bool always_small_levels;               /* Use always unusually small dungeon levels */
 246 bool empty_levels;              /* Allow empty 'arena' levels */
 247 bool player_symbols;            /* Use varying symbols for the player char */
 248 bool equippy_chars;             /* Back by popular demand... */
 249 bool display_mutations;         /* Skip mutations screen even if we have it */
 250 bool plain_descriptions;        /* Plain object descriptions */
 251 bool stupid_monsters;           /* Monsters use old AI */
 252 bool confirm_destroy;           /* Known worthless items are destroyed without confirmation */
 253 bool confirm_stairs;            /* Prompt before staircases... */
 254 bool confirm_wear;              /* Confirm before putting on known cursed items */
 255 bool disturb_pets;              /* Pets moving nearby disturb us */
 256
 257
 258
 259 /* Option Set 3 -- Game-Play */
 260
 261 bool manual_haggle;                     /* Auto-haggle in stores */
 262
 263 bool auto_scum;                         /* Auto-scum for good levels */
 264
 265 bool stack_allow_items;         /* Allow weapons and armor to stack */
 266
 267 bool expand_look;                       /* Expand the power of the look command */
 268 bool expand_list;                       /* Expand the power of the list commands */
 269
 270 bool view_perma_grids;          /* Map remembers all perma-lit grids */
 271 bool view_torch_grids;          /* Map remembers all torch-lit grids */
 272 bool view_unsafe_grids;         /* Map marked by detect traps */
 273
 274 bool dungeon_align;                     /* Generate dungeons with aligned rooms */
 275 bool dungeon_stair;                     /* Generate dungeons with connected stairs */
 276
 277 bool track_follow;                      /* Monsters follow the player */
 278 bool track_target;                      /* Monsters target the player */
 279
 280 bool smart_learn;                       /* Monsters learn from their mistakes */
 281 bool smart_cheat;                       /* Monsters exploit player weaknesses */
 282
 283
 284 /* Option Set 4 -- Efficiency */
 285
 286 bool view_reduce_lite;          /* Reduce lite-radius when running */
 287 bool view_reduce_view;          /* Reduce view-radius in town */
 288
 289 bool check_abort;                       /* Avoid checking for user abort */
 290
 291 bool flush_failure;                     /* Flush input on any failure */
 292 bool flush_disturb;                     /* Flush input on disturbance */
 293
 294 bool fresh_before;                      /* Flush output before normal commands */
 295 bool fresh_after;                       /* Flush output after normal commands */
 296 bool fresh_message;                     /* Flush output after all messages */
 297
 298 bool compress_savefile;         /* Compress messages in savefiles */
 299
 300 bool hilite_player;                     /* Hilite the player with the cursor */
 301
 302 bool view_yellow_lite;          /* Use special colors for torch-lit grids */
 303 bool view_bright_lite;          /* Use special colors for 'viewable' grids */
 304
 305 bool view_granite_lite;         /* Use special colors for wall grids (slow) */
 306 bool view_special_lite;         /* Use special colors for floor grids (slow) */
 307 bool new_ascii_graphics;
 308 bool display_path;
 309 bool target_pet;
 310 bool plain_pickup;
 311
 312 bool always_show_list;
 313 bool powerup_home;
 314 bool change_numeral;
 315 bool send_score;
 316
 317 /* Cheating options */
 318
 319 bool cheat_peek;                /* Peek into object creation */
 320 bool cheat_hear;                /* Peek into monster creation */
 321 bool cheat_room;                /* Peek into dungeon creation */
 322 bool cheat_xtra;                /* Peek into something else */
 323 bool cheat_know;                /* Know complete monster info */
 324 bool cheat_live;                /* Allow player to avoid death */
 325
 326
 327 /* Special options */
 328
 329 byte hitpoint_warn;             /* Hitpoint warning (0 to 9) */
 330
 331 byte delay_factor;              /* Delay factor (0 to 9) */
 332
 333 bool autosave_l;        /* Autosave before entering new levels */
 334 bool autosave_t;        /* Timed autosave */
 335 s16b autosave_freq;     /* Autosave frequency */
 336
 337
 338 /*
 339  * Dungeon variables
 340  */
 341
 342 byte feeling;                   /* Most recent feeling */
 343 s16b rating;                    /* Level's current rating */
 344
 345 bool good_item_flag;            /* True if "Artifact" on this level */
 346
 347 bool closing_flag;              /* Dungeon is closing */
 348
 349
 350 /*
 351  * Dungeon size info
 352  */
 353
 354 s16b panel_row_min, panel_row_max;
 355 s16b panel_col_min, panel_col_max;
 356 s16b panel_col_prt, panel_row_prt;
 357
 358 /*
 359  * Player location in dungeon
 360  */
 361 int py;
 362 int px;
 363
 364 /*
 365  * Targetting variables
 366  */
 367 s16b target_who;
 368 s16b target_col;
 369 s16b target_row;
 370
 371
 372 /*
 373  * User info
 374  */
 375 int player_uid;
 376 int player_euid;
 377 int player_egid;
 378
 379 /*
 380  * Current player's character name
 381  */
 382 char player_name[32];
 383
 384 /*
 385  * Stripped version of "player_name"
 386  */
 387 char player_base[32];
 388
 389 /*
 390  * What killed the player
 391  */
 392 char died_from[80];
 393
 394 /*
 395  * Hack -- Textual "history" for the Player
 396  */
 397 char history[4][60];
 398
 399 /*
 400  * Buffer to hold the current savefile name
 401  * 'savefile' holds full path name. 'savefile_base' holds only base name.
 402  */
 403 char savefile[1024];
 404 char savefile_base[40];
 405
 406 /*
 407  * Array of grids lit by player lite (see "cave.c")
 408  */
 409 s16b lite_n;
 410 s16b lite_y[LITE_MAX];
 411 s16b lite_x[LITE_MAX];
 412
 413 /*
 414  * Array of grids lit by player lite (see "cave.c")
 415  */
 416 s16b mon_lite_n;
 417 s16b mon_lite_y[LITE_MAX];
 418 s16b mon_lite_x[LITE_MAX];
 419
 420 /*
 421  * Array of grids viewable to the player (see "cave.c")
 422  */
 423 s16b view_n;
 424 byte view_y[VIEW_MAX];
 425 byte view_x[VIEW_MAX];
 426
 427 /*
 428  * Array of grids for use by various functions (see "cave.c")
 429  */
 430 s16b temp_n;
 431 byte temp_y[TEMP_MAX];
 432 byte temp_x[TEMP_MAX];
 433
 434
 435 /*
 436  * Number of active macros.
 437  */
 438 s16b macro__num;
 439
 440 /*
 441  * Array of macro patterns [MACRO_MAX]
 442  */
 443 cptr *macro__pat;
 444
 445 /*
 446  * Array of macro actions [MACRO_MAX]
 447  */
 448 cptr *macro__act;
 449
 450 /*
 451  * Array of macro types [MACRO_MAX]
 452  */
 453 bool *macro__cmd;
 454
 455 /*
 456  * Current macro action [1024]
 457  */
 458 char *macro__buf;
 459
 460
 461 /*
 462  * The number of quarks
 463  */
 464 s16b quark__num;
 465
 466 /*
 467  * The pointers to the quarks [QUARK_MAX]
 468  */
 469 cptr *quark__str;
 470
 471
 472 /*
 473  * The next "free" index to use
 474  */
 475 u16b message__next;
 476
 477 /*
 478  * The index of the oldest message (none yet)
 479  */
 480 u16b message__last;
 481
 482 /*
 483  * The next "free" offset
 484  */
 485 u16b message__head;
 486
 487 /*
 488  * The offset to the oldest used char (none yet)
 489  */
 490 u16b message__tail;
 491
 492 /*
 493  * The array of offsets, by index [MESSAGE_MAX]
 494  */
 495 u16b *message__ptr;
 496
 497 /*
 498  * The array of chars, by offset [MESSAGE_BUF]
 499  */
 500 char *message__buf;
 501
 502
 503 /*
 504  * The array of normal options
 505  */
 506 u32b option_flag[8];
 507 u32b option_mask[8];
 508
 509
 510 /*
 511  * The array of window options
 512  */
 513 u32b window_flag[8];
 514 u32b window_mask[8];
 515
 516
 517 /*
 518  * The array of window pointers
 519  */
 520 term *angband_term[8];
 521
 522
 523 /*
 524  * Standard window names
 525  */
 526 char angband_term_name[8][16] =
 527 {
 528         "Hengband",
 529         "Term-1",
 530         "Term-2",
 531         "Term-3",
 532         "Term-4",
 533         "Term-5",
 534         "Term-6",
 535         "Term-7"
 536 };
 537
 538
 539 /*
 540  * Global table of color definitions
 541  */
 542 byte angband_color_table[256][4] =
 543 {
 544         {0x00, 0x00, 0x00, 0x00},       /* TERM_DARK */
 545         {0x00, 0xFF, 0xFF, 0xFF},       /* TERM_WHITE */
 546         {0x00, 0x80, 0x80, 0x80},       /* TERM_SLATE */
 547         {0x00, 0xFF, 0x80, 0x00},       /* TERM_ORANGE */
 548         {0x00, 0xC0, 0x00, 0x00},       /* TERM_RED */
 549         {0x00, 0x00, 0x80, 0x40},       /* TERM_GREEN */
 550         {0x00, 0x00, 0x00, 0xFF},       /* TERM_BLUE */
 551         {0x00, 0x80, 0x40, 0x00},       /* TERM_UMBER */
 552         {0x00, 0x40, 0x40, 0x40},       /* TERM_L_DARK */
 553         {0x00, 0xC0, 0xC0, 0xC0},       /* TERM_L_WHITE */
 554         {0x00, 0xFF, 0x00, 0xFF},       /* TERM_VIOLET */
 555         {0x00, 0xFF, 0xFF, 0x00},       /* TERM_YELLOW */
 556         {0x00, 0xFF, 0x00, 0x00},       /* TERM_L_RED */
 557         {0x00, 0x00, 0xFF, 0x00},       /* TERM_L_GREEN */
 558         {0x00, 0x00, 0xFF, 0xFF},       /* TERM_L_BLUE */
 559         {0x00, 0xC0, 0x80, 0x40}        /* TERM_L_UMBER */
 560 };
 561
 562
 563 /*
 564  * Standard sound names
 565  */
 566 char angband_sound_name[SOUND_MAX][16] =
 567 {
 568         "",
 569         "hit",
 570         "miss",
 571         "flee",
 572         "drop",
 573         "kill",
 574         "level",
 575         "death",
 576         "study",
 577         "teleport",
 578         "shoot",
 579         "quaff",
 580         "zap",
 581         "walk",
 582         "tpother",
 583         "hitwall",
 584         "eat",
 585         "store1",
 586         "store2",
 587         "store3",
 588         "store4",
 589         "dig",
 590         "opendoor",
 591         "shutdoor",
 592         "tplevel",
 593         "scroll",
 594         "buy",
 595         "sell",
 596         "warn",
 597         "rocket",
 598         "n_kill",
 599         "u_kill",
 600         "quest",
 601         "heal",
 602         "x_heal",
 603         "bite",
 604         "claw",
 605         "m_spell",
 606         "summon",
 607         "breath",
 608         "ball",
 609         "m_heal",
 610         "atkspell",
 611         "evil",
 612         "touch",
 613         "sting",
 614         "crush",
 615         "slime",
 616         "wail",
 617         "winner",
 618         "fire",
 619         "acid",
 620         "elec",
 621         "cold",
 622         "illegal",
 623         "fail",
 624         "wakeup",
 625         "invuln",
 626         "fall",
 627         "pain",
 628         "destitem",
 629         "moan",
 630         "show",
 631         "unused",
 632         "explode",
 633 };
 634
 635
 636 /*
 637  * The array of "cave grids" [MAX_WID][MAX_HGT].
 638  * Not completely allocated, that would be inefficient
 639  * Not completely hardcoded, that would overflow memory
 640  */
 641 cave_type *cave[MAX_HGT];
 642
 643 /*
 644  * The array of dungeon items [max_o_idx]
 645  */
 646 object_type *o_list;
 647
 648 /*
 649  * The array of dungeon monsters [max_m_idx]
 650  */
 651 monster_type *m_list;
 652
 653
 654 /*
 655  * Maximum number of towns
 656  */
 657 u16b max_towns;
 658
 659 /*
 660  * The towns [max_towns]
 661  */
 662 town_type *town;
 663
 664
 665 /*
 666  * The player's inventory [INVEN_TOTAL]
 667  */
 668 object_type *inventory;
 669
 670
 671 /*
 672  * The size of "alloc_kind_table" (at most max_k_idx * 4)
 673  */
 674 s16b alloc_kind_size;
 675
 676 /*
 677  * The entries in the "kind allocator table"
 678  */
 679 alloc_entry *alloc_kind_table;
 680
 681
 682 /*
 683  * The size of "alloc_race_table" (at most max_r_idx)
 684  */
 685 s16b alloc_race_size;
 686
 687 /*
 688  * The entries in the "race allocator table"
 689  */
 690 alloc_entry *alloc_race_table;
 691
 692
 693 /*
 694  * Specify attr/char pairs for visual special effects
 695  * Be sure to use "index & 0x7F" to avoid illegal access
 696  */
 697 byte misc_to_attr[256];
 698 char misc_to_char[256];
 699
 700
 701 /*
 702  * Specify attr/char pairs for inventory items (by tval)
 703  * Be sure to use "index & 0x7F" to avoid illegal access
 704  */
 705 byte tval_to_attr[128];
 706 char tval_to_char[128];
 707
 708
 709 /*
 710  * Keymaps for each "mode" associated with each keypress.
 711  */
 712 cptr keymap_act[KEYMAP_MODES][256];
 713
 714
 715
 716 /*** Player information ***/
 717
 718 /*
 719  * Static player info record
 720  */
 721 player_type p_body;
 722
 723 /*
 724  * Pointer to the player info
 725  */
 726 player_type *p_ptr = &p_body;
 727
 728 /*
 729  * Pointer to the player tables
 730  * (sex, race, class, magic)
 731  */
 732 player_sex *sp_ptr;
 733 player_race *rp_ptr;
 734 player_class *cp_ptr;
 735 player_seikaku *ap_ptr;
 736 player_magic *mp_ptr;
 737
 738
 739 /*
 740  * More spell info
 741  */
 742 u32b spell_learned1;    /* bit mask of spells learned */
 743 u32b spell_learned2;    /* bit mask of spells learned */
 744 u32b spell_worked1;     /* bit mask of spells tried and worked */
 745 u32b spell_worked2;     /* bit mask of spells tried and worked */
 746 u32b spell_forgotten1;  /* bit mask of spells learned but forgotten */
 747 u32b spell_forgotten2;  /* bit mask of spells learned but forgotten */
 748 byte spell_order[64];   /* order spells learned/remembered/forgotten */
 749
 750
 751 /*
 752  * Calculated base hp values for player at each level,
 753  * store them so that drain life + restore life does not
 754  * affect hit points.  Also prevents shameless use of backup
 755  * savefiles for hitpoint acquirement.
 756  */
 757 s16b player_hp[PY_MAX_LEVEL];
 758
 759
 760 /*
 761  * The last character rolled,
 762  * holded for quick start
 763  */
 764 birther previous_char;
 765
 766
 767 /*
 768  * The vault generation arrays
 769  */
 770 vault_type *v_info;
 771 char *v_name;
 772 char *v_text;
 773
 774 /*
 775  * The skill table
 776  */
 777 skill_table *s_info;
 778 char *s_name;
 779 char *s_text;
 780
 781 /*
 782  * The magic info
 783  */
 784 player_magic *m_info;
 785 char *m_name;
 786 char *m_text;
 787
 788 /*
 789  * The terrain feature arrays
 790  */
 791 feature_type *f_info;
 792 char *f_name;
 793 char *f_text;
 794
 795 /*
 796  * The object kind arrays
 797  */
 798 object_kind *k_info;
 799 char *k_name;
 800 char *k_text;
 801
 802 /*
 803  * The artifact arrays
 804  */
 805 artifact_type *a_info;
 806 char *a_name;
 807 char *a_text;
 808
 809 /*
 810  * The ego-item arrays
 811  */
 812 ego_item_type *e_info;
 813 char *e_name;
 814 char *e_text;
 815
 816
 817 /*
 818  * The monster race arrays
 819  */
 820 monster_race *r_info;
 821 char *r_name;
 822 char *r_text;
 823
 824
 825 /*
 826  * The dungeon arrays
 827  */
 828 dungeon_info_type *d_info;
 829 char *d_name;
 830 char *d_text;
 831
 832
 833 /*
 834  * Hack -- The special Angband "System Suffix"
 835  * This variable is used to choose an appropriate "pref-xxx" file
 836  */
 837 cptr ANGBAND_SYS = "xxx";
 838
 839 /*
 840  * Hack -- The special Angband "Keyboard Suffix"
 841  * This variable is used to choose an appropriate macro-trigger definition
 842  */
 843 #ifdef JP
 844 cptr ANGBAND_KEYBOARD = "JAPAN";
 845 #else
 846 cptr ANGBAND_KEYBOARD = "0";
 847 #endif
 848
 849 /*
 850  * Hack -- The special Angband "Graphics Suffix"
 851  * This variable is used to choose an appropriate "graf-xxx" file
 852  */
 853 cptr ANGBAND_GRAF = "ascii";
 854
 855 /*
 856  * Path name: The main "lib" directory
 857  * This variable is not actually used anywhere in the code
 858  */
 859 cptr ANGBAND_DIR;
 860
 861 /*
 862  * High score files (binary)
 863  * These files may be portable between platforms
 864  */
 865 cptr ANGBAND_DIR_APEX;
 866
 867 /*
 868  * Bone files for player ghosts (ascii)
 869  * These files are portable between platforms
 870  */
 871 cptr ANGBAND_DIR_BONE;
 872
 873 /*
 874  * Binary image files for the "*_info" arrays (binary)
 875  * These files are not portable between platforms
 876  */
 877 cptr ANGBAND_DIR_DATA;
 878
 879 /*
 880  * Textual template files for the "*_info" arrays (ascii)
 881  * These files are portable between platforms
 882  */
 883 cptr ANGBAND_DIR_EDIT;
 884
 885 /*
 886  * Script files
 887  * These files are portable between platforms.
 888  */
 889 cptr ANGBAND_DIR_SCRIPT;
 890
 891 /*
 892  * Various extra files (ascii)
 893  * These files may be portable between platforms
 894  */
 895 cptr ANGBAND_DIR_FILE;
 896
 897 /*
 898  * Help files (normal) for the online help (ascii)
 899  * These files are portable between platforms
 900  */
 901 cptr ANGBAND_DIR_HELP;
 902
 903 /*
 904  * Help files (spoilers) for the online help (ascii)
 905  * These files are portable between platforms
 906  */
 907 cptr ANGBAND_DIR_INFO;
 908
 909 /*
 910  * Default user "preference" files (ascii)
 911  * These files are rarely portable between platforms
 912  */
 913 cptr ANGBAND_DIR_PREF;
 914
 915 /*
 916  * Savefiles for current characters (binary)
 917  * These files are portable between platforms
 918  */
 919 cptr ANGBAND_DIR_SAVE;
 920
 921 /*
 922  * User "preference" files (ascii)
 923  * These files are rarely portable between platforms
 924  */
 925 cptr ANGBAND_DIR_USER;
 926
 927 /*
 928  * Various extra files (binary)
 929  * These files are rarely portable between platforms
 930  */
 931 cptr ANGBAND_DIR_XTRA;
 932
 933
 934 /*
 935  * Total Hack -- allow all items to be listed (even empty ones)
 936  * This is only used by "do_cmd_inven_e()" and is cleared there.
 937  */
 938 bool item_tester_full;
 939
 940 bool item_tester_no_ryoute = FALSE;
 941
 942 /*
 943  * Here is a "pseudo-hook" used during calls to "get_item()" and
 944  * "show_inven()" and "show_equip()", and the choice window routines.
 945  */
 946 byte item_tester_tval;
 947
 948
 949 /*
 950  * Here is a "hook" used during calls to "get_item()" and
 951  * "show_inven()" and "show_equip()", and the choice window routines.
 952  */
 953 bool (*item_tester_hook)(object_type*);
 954
 955
 956
 957 /*
 958  * Current "comp" function for ang_sort()
 959  */
 960 bool (*ang_sort_comp)(vptr u, vptr v, int a, int b);
 961
 962
 963 /*
 964  * Current "swap" function for ang_sort()
 965  */
 966 void (*ang_sort_swap)(vptr u, vptr v, int a, int b);
 967
 968
 969
 970 /*
 971  * Hack -- function hooks to restrict "get_mon_num_prep()" function
 972  */
 973 monster_hook_type get_mon_num_hook;
 974 monster_hook_type get_mon_num2_hook;
 975
 976
 977 /*
 978  * Hack -- function hook to restrict "get_obj_num_prep()" function
 979  */
 980 bool (*get_obj_num_hook)(int k_idx);
 981
 982
 983 /* Hack, monk armour */
 984 bool monk_armour_aux;
 985 bool monk_notify_aux;
 986
 987 #ifdef ALLOW_EASY_OPEN /* TNB */
 988 bool easy_open;
 989 #endif /* ALLOW_EASY_OPEN -- TNB */
 990
 991 #ifdef ALLOW_EASY_DISARM /* TNB */
 992 bool easy_disarm;
 993 #endif /* ALLOW_EASY_DISARM -- TNB */
 994
 995 #ifdef ALLOW_EASY_FLOOR /* TNB */
 996 bool easy_floor;
 997 #endif /* ALLOW_EASY_FLOOR -- TNB */
 998
 999 bool use_command;
1000 bool center_player;
1001 bool center_running;
1002
1003 /* Auto-destruction options */
1004 bool destroy_items;
1005 bool leave_worth;
1006 bool leave_equip;
1007 bool leave_wanted;
1008 bool leave_corpse;
1009 bool leave_junk;
1010 bool leave_chest;
1011
1012 /* Nikki */
1013 bool record_fix_art;
1014 bool record_rand_art;
1015 bool record_destroy_uniq;
1016 bool record_fix_quest;
1017 bool record_rand_quest;
1018 bool record_maxdeapth;
1019 bool record_stair;
1020 bool record_buy;
1021 bool record_sell;
1022 bool record_danger;
1023 bool record_arena;
1024 bool record_ident;
1025 bool record_named_pet;
1026 char record_o_name[MAX_NLEN];
1027 s32b record_turn;
1028
1029 /*
1030  * Wilderness
1031  */
1032 wilderness_type **wilderness;
1033
1034
1035 /*
1036  * Buildings
1037  */
1038 building_type building[MAX_BLDG];
1039
1040
1041 /*
1042  * Maximum number of quests
1043  */
1044 u16b max_quests;
1045
1046 /*
1047  * Maximum number of monsters in r_info.txt
1048  */
1049 u16b max_r_idx;
1050
1051 /*
1052  * Maximum number of items in k_info.txt
1053  */
1054 u16b max_k_idx;
1055
1056 /*
1057  * Maximum number of vaults in v_info.txt
1058  */
1059 u16b max_v_idx;
1060
1061 /*
1062  * Maximum number of terrain features in f_info.txt
1063  */
1064 u16b max_f_idx;
1065
1066 /*
1067  * Maximum number of artifacts in a_info.txt
1068  */
1069 u16b max_a_idx;
1070
1071 /*
1072  * Maximum number of ego-items in e_info.txt
1073  */
1074 u16b max_e_idx;
1075
1076 /*
1077  * Maximum number of dungeon in e_info.txt
1078  */
1079 u16b max_d_idx;
1080
1081 /*
1082  * Maximum number of objects in the level
1083  */
1084 u16b max_o_idx;
1085
1086 /*
1087  * Maximum number of monsters in the level
1088  */
1089 u16b max_m_idx;
1090
1091 /*
1092  * Maximum size of the wilderness
1093  */
1094 s32b max_wild_x;
1095 s32b max_wild_y;
1096
1097 /*
1098  * Quest info
1099  */
1100 quest_type *quest;
1101
1102 /*
1103  * Quest text
1104  */
1105 char quest_text[10][80];
1106
1107 /*
1108  * Current line of the quest text
1109  */
1110 int quest_text_line;
1111
1112 /*
1113  * Default spell color table (quark index)
1114  */
1115 s16b gf_color[MAX_GF];
1116
1117 /*
1118  * Flags for initialization
1119  */
1120 int init_flags;
1121
1122
1123 /*
1124  * The "highscore" file descriptor, if available.
1125  */
1126 int highscore_fd = -1;
1127
1128 int mutant_regenerate_mod = 100;
1129
1130 /*
1131  * Startup options
1132  */
1133 bool easy_band;
1134 bool vanilla_town;            /* Use "vanilla" town without set quests */
1135 bool ironman_shops;           /* Stores are permanently closed */
1136 bool ironman_small_levels;    /* Always create unusually small dungeon levels */
1137 bool ironman_downward;        /* Don't allow climbing upwards/recalling */
1138 bool ironman_autoscum;        /* Permanently enable the autoscummer */
1139 bool lite_town;               /* Use "lite" town without wilderness */
1140 bool ironman_empty_levels;    /* Always create empty 'arena' levels */
1141 bool terrain_streams;         /* Create terrain 'streamers' in the dungeon */
1142 bool munchkin_death;          /* Ask for saving death */
1143 bool ironman_rooms;           /* Always generate very unusual rooms */
1144 bool ironman_nightmare;                 /* Play the game in Nightmare mode */
1145 bool left_hander;
1146 bool preserve_mode;
1147 bool autoroller;
1148 bool autochara;
1149
1150
1151 bool can_save = FALSE;        /* Game can be saved */
1152
1153 s16b spell_exp[64];           /* mahou keikenchi */
1154
1155 s16b weapon_exp[5][64];       /* weapon keikenchi */
1156
1157 s16b skill_exp[10];           /* ginou keikenchi */
1158
1159 bool world_monster;
1160 bool world_player;
1161
1162 s16b mane_spell[MAX_MANE];
1163 s16b mane_dam[MAX_MANE];
1164 s16b mane_num;
1165
1166 int cap_mon;
1167 int cap_mspeed;
1168 int cap_hp;
1169 int cap_maxhp;
1170 u16b cap_nickname;
1171
1172 s16b battle_mon[4];
1173 int sel_monster;
1174 int battle_odds;
1175 int kakekin;
1176 u32b mon_odds[4];
1177
1178 int pet_t_m_idx;
1179 int riding_t_m_idx;
1180
1181 s16b kubi_r_idx[MAX_KUBI];
1182 s16b today_mon;
1183
1184 monster_type party_mon[21];
1185
1186 bool write_level;
1187
1188 u32b playtime;
1189 u32b start_time;
1190
1191 int tsuri_dir;
1192
1193 bool sukekaku;
1194 bool new_mane;
1195
1196 bool mon_fight;
1197
1198 bool ambush_flag;
1199 bool generate_encounter;
1200
1201 cptr screen_dump = NULL;
1202
1203 /*
1204  * Which dungeon ?
1205  */
1206 byte dungeon_type;
1207 s16b *max_dlv;
1208
1209 byte feat_wall_outer;
1210 byte feat_wall_inner;
1211 byte feat_wall_solid;
1212 byte floor_type[100], fill_type[100];
1213
1214 bool now_damaged;
1215 s16b now_message;
1216 bool use_menu;
1217
1218 #ifdef CHUUKEI
1219 bool chuukei_server;
1220 bool chuukei_client;
1221 char *server_name;
1222 int server_port;
1223 #endif