src/types.h

   1 /* File: types.h */
   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: global type declarations */
  12
  13
  14 /*
  15  * This file should ONLY be included by "angband.h"
  16  */
  17
  18 /*
  19  * Note that "char" may or may not be signed, and that "signed char"
  20  * may or may not work on all machines.  So always use "s16b" or "s32b"
  21  * for signed values.  Also, note that unsigned values cause math problems
  22  * in many cases, so try to only use "u16b" and "u32b" for "bit flags",
  23  * unless you really need the extra bit of information, or you really
  24  * need to restrict yourself to a single byte for storage reasons.
  25  *
  26  * Also, if possible, attempt to restrict yourself to sub-fields of
  27  * known size (use "s16b" or "s32b" instead of "int", and "byte" instead
  28  * of "bool"), and attempt to align all fields along four-byte words, to
  29  * optimize storage issues on 32-bit machines.  Also, avoid "bit flags"
  30  * since these increase the code size and slow down execution.  When
  31  * you need to store bit flags, use one byte per flag, or, where space
  32  * is an issue, use a "byte" or "u16b" or "u32b", and add special code
  33  * to access the various bit flags.
  34  *
  35  * Many of these structures were developed to reduce the number of global
  36  * variables, facilitate structured program design, allow the use of ascii
  37  * template files, simplify access to indexed data, or facilitate efficient
  38  * clearing of many variables at once.
  39  *
  40  * Certain data is saved in multiple places for efficient access, currently,
  41  * this includes the tval/sval/weight fields in "object_type", various fields
  42  * in "header_type", and the "m_idx" and "o_idx" fields in "cave_type".  All
  43  * of these could be removed, but this would, in general, slow down the game
  44  * and increase the complexity of the code.
  45  */
  46
  47
  48
  49
  50
  51 /*
  52  * Information about terrain "features"
  53  */
  54
  55 typedef struct feature_type feature_type;
  56
  57 struct feature_type
  58 {
  59         u32b name;                      /* Name (offset) */
  60         u32b text;                      /* Text (offset) */
  61
  62         byte mimic;                     /* Feature to mimic */
  63
  64         byte extra;                     /* Extra byte (unused) */
  65
  66         s16b unused;            /* Extra bytes (unused) */
  67
  68         byte d_attr;            /* Default feature attribute */
  69         byte d_char;            /* Default feature character */
  70
  71
  72         byte x_attr;            /* Desired feature attribute */
  73         byte x_char;            /* Desired feature character */
  74 };
  75
  76
  77 /*
  78  * Information about object "kinds", including player knowledge.
  79  *
  80  * Only "aware" and "tried" are saved in the savefile
  81  */
  82
  83 typedef struct object_kind object_kind;
  84
  85 struct object_kind
  86 {
  87         u32b name;                      /* Name (offset) */
  88         u32b text;                      /* Text (offset) */
  89
  90         byte tval;                      /* Object type */
  91         byte sval;                      /* Object sub type */
  92
  93         s16b pval;                      /* Object extra info */
  94
  95         s16b to_h;                      /* Bonus to hit */
  96         s16b to_d;                      /* Bonus to damage */
  97         s16b to_a;                      /* Bonus to armor */
  98
  99         s16b ac;                        /* Base armor */
 100
 101         byte dd, ds;            /* Damage dice/sides */
 102
 103         s16b weight;            /* Weight */
 104
 105         s32b cost;                      /* Object "base cost" */
 106
 107         u32b flags[TR_FLAG_SIZE];       /* Flags */
 108
 109         u32b gen_flags;         /* flags for generate */
 110
 111         byte locale[4];         /* Allocation level(s) */
 112         byte chance[4];         /* Allocation chance(s) */
 113
 114         byte level;                     /* Level */
 115         byte extra;                     /* Something */
 116
 117
 118         byte d_attr;            /* Default object attribute */
 119         byte d_char;            /* Default object character */
 120
 121
 122         byte x_attr;            /* Desired object attribute */
 123         byte x_char;            /* Desired object character */
 124
 125
 126         byte flavor;                    /* Special object flavor (or zero) */
 127
 128         bool easy_know;         /* This object is always known (if aware) */
 129
 130
 131         bool aware;                     /* The player is "aware" of the item's effects */
 132
 133         bool tried;                     /* The player has "tried" one of the items */
 134 };
 135
 136
 137
 138 /*
 139  * Information about "artifacts".
 140  *
 141  * Note that the save-file only writes "cur_num" to the savefile.
 142  *
 143  * Note that "max_num" is always "1" (if that artifact "exists")
 144  */
 145
 146 typedef struct artifact_type artifact_type;
 147
 148 struct artifact_type
 149 {
 150         u32b name;                      /* Name (offset) */
 151         u32b text;                      /* Text (offset) */
 152
 153         byte tval;                      /* Artifact type */
 154         byte sval;                      /* Artifact sub type */
 155
 156         s16b pval;                      /* Artifact extra info */
 157
 158         s16b to_h;                      /* Bonus to hit */
 159         s16b to_d;                      /* Bonus to damage */
 160         s16b to_a;                      /* Bonus to armor */
 161
 162         s16b ac;                        /* Base armor */
 163
 164         byte dd, ds;            /* Damage when hits */
 165
 166         s16b weight;            /* Weight */
 167
 168         s32b cost;                      /* Artifact "cost" */
 169
 170         u32b flags[TR_FLAG_SIZE];       /* Artifact Flags */
 171
 172         u32b gen_flags;         /* flags for generate */
 173
 174         byte level;                     /* Artifact level */
 175         byte rarity;            /* Artifact rarity */
 176
 177         byte cur_num;           /* Number created (0 or 1) */
 178         byte max_num;           /* Unused (should be "1") */
 179
 180         s16b floor_id;          /* Leaved on this location last time */
 181 };
 182
 183
 184 /*
 185  * Information about "ego-items".
 186  */
 187
 188 typedef struct ego_item_type ego_item_type;
 189
 190 struct ego_item_type
 191 {
 192         u32b name;                      /* Name (offset) */
 193         u32b text;                      /* Text (offset) */
 194
 195         byte slot;                      /* Standard slot value */
 196         byte rating;            /* Rating boost */
 197
 198         byte level;                     /* Minimum level */
 199         byte rarity;            /* Object rarity */
 200
 201         byte max_to_h;          /* Maximum to-hit bonus */
 202         byte max_to_d;          /* Maximum to-dam bonus */
 203         byte max_to_a;          /* Maximum to-ac bonus */
 204
 205         byte max_pval;          /* Maximum pval */
 206
 207         s32b cost;                      /* Ego-item "cost" */
 208
 209         u32b flags[TR_FLAG_SIZE];       /* Ego-Item Flags */
 210
 211         u32b gen_flags;         /* flags for generate */
 212 };
 213
 214
 215
 216
 217 /*
 218  * Monster blow structure
 219  *
 220  *      - Method (RBM_*)
 221  *      - Effect (RBE_*)
 222  *      - Damage Dice
 223  *      - Damage Sides
 224  */
 225
 226 typedef struct monster_blow monster_blow;
 227
 228 struct monster_blow
 229 {
 230         byte method;
 231         byte effect;
 232         byte d_dice;
 233         byte d_side;
 234 };
 235
 236
 237 typedef struct mbe_info_type mbe_info_type;
 238
 239 struct mbe_info_type
 240 {
 241         int power;        /* The attack "power" */
 242         int explode_type; /* Explosion effect */
 243 };
 244
 245
 246 /*
 247  * Monster "race" information, including racial memories
 248  *
 249  * Note that "d_attr" and "d_char" are used for MORE than "visual" stuff.
 250  *
 251  * Note that "x_attr" and "x_char" are used ONLY for "visual" stuff.
 252  *
 253  * Note that "cur_num" (and "max_num") represent the number of monsters
 254  * of the given race currently on (and allowed on) the current level.
 255  * This information yields the "dead" flag for Unique monsters.
 256  *
 257  * Note that "max_num" is reset when a new player is created.
 258  * Note that "cur_num" is reset when a new level is created.
 259  *
 260  * Note that several of these fields, related to "recall", can be
 261  * scrapped if space becomes an issue, resulting in less "complete"
 262  * monster recall (no knowledge of spells, etc).  All of the "recall"
 263  * fields have a special prefix to aid in searching for them.
 264  */
 265
 266
 267 typedef struct monster_race monster_race;
 268
 269 struct monster_race
 270 {
 271         u32b name;                              /* Name (offset) */
 272 #ifdef JP
 273         u32b E_name;                    /* ±Ñ¸ìÌ¾ (offset) */
 274 #endif
 275         u32b text;                              /* Text (offset) */
 276
 277         byte hdice;                             /* Creatures hit dice count */
 278         byte hside;                             /* Creatures hit dice sides */
 279
 280         s16b ac;                                /* Armour Class */
 281
 282         s16b sleep;                             /* Inactive counter (base) */
 283         byte aaf;                               /* Area affect radius (1-100) */
 284         byte speed;                             /* Speed (normally 110) */
 285
 286         s32b mexp;                              /* Exp value for kill */
 287
 288         s16b extra;                             /* Unused (for now) */
 289
 290         byte freq_spell;                /* Spell frequency */
 291
 292         u32b flags1;                    /* Flags 1 (general) */
 293         u32b flags2;                    /* Flags 2 (abilities) */
 294         u32b flags3;                    /* Flags 3 (race/resist) */
 295         u32b flags4;                    /* Flags 4 (inate/breath) */
 296         u32b flags5;                    /* Flags 5 (normal spells) */
 297         u32b flags6;                    /* Flags 6 (special spells) */
 298         u32b flags7;                    /* Flags 7 (movement related abilities) */
 299         u32b flags8;                    /* Flags 8 (wilderness info) */
 300         u32b flags9;                    /* Flags 9 (drops info) */
 301         u32b flagsr;                    /* Flags R (resistances info) */
 302
 303         monster_blow blow[4];   /* Up to four blows per round */
 304
 305         s16b next_r_idx;
 306         u32b next_exp;
 307
 308         byte level;                             /* Level of creature */
 309         byte rarity;                    /* Rarity of creature */
 310
 311
 312         byte d_attr;                    /* Default monster attribute */
 313         byte d_char;                    /* Default monster character */
 314
 315
 316         byte x_attr;                    /* Desired monster attribute */
 317         byte x_char;                    /* Desired monster character */
 318
 319
 320         byte max_num;                   /* Maximum population allowed per level */
 321
 322         byte cur_num;                   /* Monster population on current level */
 323
 324         s16b floor_id;                  /* Location of unique monster */
 325
 326
 327         s16b r_sights;                  /* Count sightings of this monster */
 328         s16b r_deaths;                  /* Count deaths from this monster */
 329
 330         s16b r_pkills;                  /* Count monsters killed in this life */
 331         s16b r_tkills;                  /* Count monsters killed in all lives */
 332
 333         byte r_wake;                    /* Number of times woken up (?) */
 334         byte r_ignore;                  /* Number of times ignored (?) */
 335
 336         byte r_xtra1;                   /* Something (unused) */
 337         byte r_xtra2;                   /* Something (unused) */
 338
 339         byte r_drop_gold;               /* Max number of gold dropped at once */
 340         byte r_drop_item;               /* Max number of item dropped at once */
 341
 342         byte r_cast_spell;              /* Max number of other spells seen */
 343
 344         byte r_blows[4];                /* Number of times each blow type was seen */
 345
 346         u32b r_flags1;                  /* Observed racial flags */
 347         u32b r_flags2;                  /* Observed racial flags */
 348         u32b r_flags3;                  /* Observed racial flags */
 349         u32b r_flags4;                  /* Observed racial flags */
 350         u32b r_flags5;                  /* Observed racial flags */
 351         u32b r_flags6;                  /* Observed racial flags */
 352         /* u32b r_flags7; */                    /* Observed racial flags */
 353         u32b r_flagsr;                  /* Observed racial resistance flags */
 354 };
 355
 356
 357
 358 /*
 359  * Information about "vault generation"
 360  */
 361
 362 typedef struct vault_type vault_type;
 363
 364 struct vault_type
 365 {
 366         u32b name;                      /* Name (offset) */
 367         u32b text;                      /* Text (offset) */
 368
 369         byte typ;                       /* Vault type */
 370
 371         byte rat;                       /* Vault rating */
 372
 373         byte hgt;                       /* Vault height */
 374         byte wid;                       /* Vault width */
 375 };
 376
 377
 378 /*
 379  * Information about "skill"
 380  */
 381
 382 typedef struct skill_table skill_table;
 383
 384 struct skill_table
 385 {
 386         s16b w_start[5][64];      /* start weapon exp */
 387         s16b w_max[5][64];        /* max weapon exp */
 388         s16b s_start[10];         /* start skill */
 389         s16b s_max[10];           /* max skill */
 390 };
 391
 392
 393 /*
 394  * A single "grid" in a Cave
 395  *
 396  * Note that several aspects of the code restrict the actual cave
 397  * to a max size of 256 by 256.  In partcular, locations are often
 398  * saved as bytes, limiting each coordinate to the 0-255 range.
 399  *
 400  * The "o_idx" and "m_idx" fields are very interesting.  There are
 401  * many places in the code where we need quick access to the actual
 402  * monster or object(s) in a given cave grid.  The easiest way to
 403  * do this is to simply keep the index of the monster and object
 404  * (if any) with the grid, but this takes 198*66*4 bytes of memory.
 405  * Several other methods come to mind, which require only half this
 406  * amound of memory, but they all seem rather complicated, and would
 407  * probably add enough code that the savings would be lost.  So for
 408  * these reasons, we simply store an index into the "o_list" and
 409  * "m_list" arrays, using "zero" when no monster/object is present.
 410  *
 411  * Note that "o_idx" is the index of the top object in a stack of
 412  * objects, using the "next_o_idx" field of objects (see below) to
 413  * create the singly linked list of objects.  If "o_idx" is zero
 414  * then there are no objects in the grid.
 415  *
 416  * Note the special fields for the "MONSTER_FLOW" code.
 417  */
 418
 419 typedef struct cave_type cave_type;
 420
 421 struct cave_type
 422 {
 423         u16b info;              /* Hack -- cave flags */
 424
 425         byte feat;              /* Hack -- feature type */
 426
 427         s16b o_idx;             /* Object in this grid */
 428
 429         s16b m_idx;             /* Monster in this grid */
 430
 431         s16b special;   /* Special cave info */
 432
 433         byte mimic;             /* Feature to mimic */
 434
 435         byte cost;              /* Hack -- cost of flowing */
 436         byte dist;              /* Hack -- distance from player */
 437         byte when;              /* Hack -- when cost was computed */
 438 };
 439
 440
 441
 442 /*
 443  * Simple structure to hold a map location
 444  */
 445 typedef struct coord coord;
 446
 447 struct coord
 448 {
 449         byte y;
 450         byte x;
 451 };
 452
 453
 454
 455 /*
 456  * Object information, for a specific object.
 457  *
 458  * Note that a "discount" on an item is permanent and never goes away.
 459  *
 460  * Note that inscriptions are now handled via the "quark_str()" function
 461  * applied to the "note" field, which will return NULL if "note" is zero.
 462  *
 463  * Note that "object" records are "copied" on a fairly regular basis,
 464  * and care must be taken when handling such objects.
 465  *
 466  * Note that "object flags" must now be derived from the object kind,
 467  * the artifact and ego-item indexes, and the two "xtra" fields.
 468  *
 469  * Each cave grid points to one (or zero) objects via the "o_idx"
 470  * field (above).  Each object then points to one (or zero) objects
 471  * via the "next_o_idx" field, forming a singly linked list, which
 472  * in game terms, represents a "stack" of objects in the same grid.
 473  *
 474  * Each monster points to one (or zero) objects via the "hold_o_idx"
 475  * field (below).  Each object then points to one (or zero) objects
 476  * via the "next_o_idx" field, forming a singly linked list, which
 477  * in game terms, represents a pile of objects held by the monster.
 478  *
 479  * The "held_m_idx" field is used to indicate which monster, if any,
 480  * is holding the object.  Objects being held have "ix=0" and "iy=0".
 481  */
 482
 483 typedef struct object_type object_type;
 484
 485 struct object_type
 486 {
 487         s16b k_idx;                     /* Kind index (zero if "dead") */
 488
 489         byte iy;                        /* Y-position on map, or zero */
 490         byte ix;                        /* X-position on map, or zero */
 491
 492         byte tval;                      /* Item type (from kind) */
 493         byte sval;                      /* Item sub-type (from kind) */
 494
 495         s16b pval;                      /* Item extra-parameter */
 496
 497         byte discount;          /* Discount (if any) */
 498
 499         byte number;            /* Number of items */
 500
 501         s16b weight;            /* Item weight */
 502
 503         byte name1;                     /* Artifact type, if any */
 504         byte name2;                     /* Ego-Item type, if any */
 505
 506         byte xtra1;                     /* Extra info type (now unused) */
 507         byte xtra2;                     /* Extra info index */
 508         byte xtra3;                     /* Extra info */
 509         s16b xtra4;                     /* Extra info */
 510         s16b xtra5;                     /* Extra info */
 511
 512         s16b to_h;                      /* Plusses to hit */
 513         s16b to_d;                      /* Plusses to damage */
 514         s16b to_a;                      /* Plusses to AC */
 515
 516         s16b ac;                        /* Normal AC */
 517
 518         byte dd, ds;            /* Damage dice/sides */
 519
 520         s16b timeout;           /* Timeout Counter */
 521
 522         byte ident;                     /* Special flags  */
 523
 524         byte marked;            /* Object is marked */
 525
 526         u16b inscription;       /* Inscription index */
 527         u16b art_name;      /* Artifact name (random artifacts) */
 528
 529         byte feeling;          /* Game generated inscription number (eg, pseudo-id) */
 530
 531         u32b art_flags[TR_FLAG_SIZE];        /* Extra Flags for ego and artifacts */
 532
 533         u32b curse_flags;        /* Flags for curse */
 534
 535         s16b next_o_idx;        /* Next object in stack (if any) */
 536
 537         s16b held_m_idx;        /* Monster holding us (if any) */
 538
 539 #ifdef SCRIPT_OBJ_KIND
 540         char *name;
 541
 542         byte d_attr;            /* Default object attribute */
 543         byte d_char;            /* Default object character */
 544
 545
 546         byte x_attr;            /* Desired object attribute */
 547         byte x_char;            /* Desired object character */
 548
 549
 550         byte flavor;                    /* Special object flavor (or zero) */
 551
 552         bool easy_know;         /* This object is always known (if aware) */
 553
 554
 555         bool aware;                     /* The player is "aware" of the item's effects */
 556
 557         bool tried;                     /* The player has "tried" one of the items */
 558 #endif /* SCRIPT_OBJ_KIND */
 559 };
 560
 561
 562
 563 /*
 564  * Monster information, for a specific monster.
 565  *
 566  * Note: fy, fx constrain dungeon size to 256x256
 567  *
 568  * The "hold_o_idx" field points to the first object of a stack
 569  * of objects (if any) being carried by the monster (see above).
 570  */
 571
 572 typedef struct monster_type monster_type;
 573
 574 struct monster_type
 575 {
 576         s16b r_idx;             /* Monster race index */
 577         s16b ap_r_idx;          /* Monster race appearance index */
 578         byte sub_align;         /* Sub-alignment for a neutral monster */
 579
 580         byte fy;                /* Y location on map */
 581         byte fx;                /* X location on map */
 582
 583         s16b hp;                /* Current Hit points */
 584         s16b maxhp;             /* Max Hit points */
 585         s16b max_maxhp;         /* Max Max Hit points */
 586
 587         s16b csleep;            /* Inactive counter */
 588
 589         byte mspeed;            /* Monster "speed" */
 590         s16b energy_need;       /* Monster "energy" */
 591
 592         byte fast;              /* Monster is stunned */
 593         byte slow;              /* Monster is stunned */
 594         byte stunned;           /* Monster is stunned */
 595         byte confused;          /* Monster is confused */
 596         byte monfear;           /* Monster is afraid */
 597         byte invulner;          /* Monster is temporarily invulnerable */
 598
 599         byte cdis;              /* Current dis from player */
 600
 601         byte mflag;             /* Extra monster flags */
 602         byte mflag2;            /* Extra monster flags */
 603
 604         bool ml;                /* Monster is "visible" */
 605
 606         s16b hold_o_idx;        /* Object being held (if any) */
 607
 608         s16b target_y;          /* Can attack !los player */
 609         s16b target_x;          /* Can attack !los player */
 610
 611         u16b nickname;          /* Monster's Nickname */
 612
 613         u32b exp;
 614
 615 #ifdef WDT_TRACK_OPTIONS
 616
 617         byte ty;                        /* Y location of target */
 618         byte tx;                        /* X location of target */
 619
 620         byte t_dur;                     /* How long are we tracking */
 621
 622         byte t_bit;                     /* Up to eight bit flags */
 623
 624 #endif /* WDT_TRACK_OPTIONS */
 625
 626 #ifdef DRS_SMART_OPTIONS
 627
 628         u32b smart;                     /* Field for "smart_learn" */
 629
 630 #endif /* DRS_SMART_OPTIONS */
 631
 632 };
 633
 634
 635
 636
 637 /*
 638  * An entry for the object/monster allocation functions
 639  *
 640  * Pass 1 is determined from allocation information
 641  * Pass 2 is determined from allocation restriction
 642  * Pass 3 is determined from allocation calculation
 643  */
 644
 645 typedef struct alloc_entry alloc_entry;
 646
 647 struct alloc_entry
 648 {
 649         s16b index;             /* The actual index */
 650
 651         byte level;             /* Base dungeon level */
 652         byte prob1;             /* Probability, pass 1 */
 653         byte prob2;             /* Probability, pass 2 */
 654         byte prob3;             /* Probability, pass 3 */
 655
 656         u16b total;             /* Unused for now */
 657 };
 658
 659
 660
 661 /*
 662  * Available "options"
 663  *
 664  *      - Address of actual option variable (or NULL)
 665  *
 666  *      - Normal Value (TRUE or FALSE)
 667  *
 668  *      - Option Page Number (or zero)
 669  *
 670  *      - Savefile Set (or zero)
 671  *      - Savefile Bit in that set
 672  *
 673  *      - Textual name (or NULL)
 674  *      - Textual description
 675  */
 676
 677 typedef struct option_type option_type;
 678
 679 struct option_type
 680 {
 681         bool    *o_var;
 682
 683         byte    o_norm;
 684
 685         byte    o_page;
 686
 687         byte    o_set;
 688         byte    o_bit;
 689
 690         cptr    o_text;
 691         cptr    o_desc;
 692 };
 693
 694
 695 /*
 696  * Structure for the "quests"
 697  */
 698 typedef struct quest_type quest_type;
 699
 700 struct quest_type
 701 {
 702         s16b status;            /* Is the quest taken, completed, finished? */
 703
 704         s16b type;              /* The quest type */
 705
 706         char name[60];          /* Quest name */
 707         s16b level;             /* Dungeon level */
 708         s16b r_idx;             /* Monster race */
 709
 710         s16b cur_num;           /* Number killed */
 711         s16b max_num;           /* Number required */
 712
 713         s16b k_idx;             /* object index */
 714         s16b num_mon;           /* number of monsters on level */
 715
 716         byte flags;             /* quest flags */
 717         byte dungeon;           /* quest dungeon */
 718
 719         byte complev;           /* player level (complete) */
 720 };
 721
 722
 723 /*
 724  * A store owner
 725  */
 726 typedef struct owner_type owner_type;
 727
 728 struct owner_type
 729 {
 730         cptr owner_name;        /* Name */
 731
 732         s16b max_cost;          /* Purse limit */
 733
 734         byte max_inflate;       /* Inflation (max) */
 735         byte min_inflate;       /* Inflation (min) */
 736
 737         byte haggle_per;        /* Haggle unit */
 738
 739         byte insult_max;        /* Insult limit */
 740
 741         byte owner_race;        /* Owner race */
 742 };
 743
 744
 745
 746
 747 /*
 748  * A store, with an owner, various state flags, a current stock
 749  * of items, and a table of items that are often purchased.
 750  */
 751 typedef struct store_type store_type;
 752
 753 struct store_type
 754 {
 755         byte type;                              /* Store type */
 756
 757         byte owner;                             /* Owner index */
 758         byte extra;                             /* Unused for now */
 759
 760         s16b insult_cur;                /* Insult counter */
 761
 762         s16b good_buy;                  /* Number of "good" buys */
 763         s16b bad_buy;                   /* Number of "bad" buys */
 764
 765         s32b store_open;                /* Closed until this turn */
 766
 767         s32b last_visit;                /* Last visited on this turn */
 768
 769         s16b table_num;                 /* Table -- Number of entries */
 770         s16b table_size;                /* Table -- Total Size of Array */
 771         s16b *table;                    /* Table -- Legal item kinds */
 772
 773         s16b stock_num;                 /* Stock -- Number of entries */
 774         s16b stock_size;                /* Stock -- Total Size of Array */
 775         object_type *stock;             /* Stock -- Actual stock items */
 776 };
 777
 778
 779 /*
 780  * The "name" of spell 'N' is stored as spell_names[X][N],
 781  * where X is 0 for mage-spells and 1 for priest-spells.
 782  */
 783 typedef struct magic_type magic_type;
 784
 785 struct magic_type
 786 {
 787         byte slevel;            /* Required level (to learn) */
 788         byte smana;                     /* Required mana (to cast) */
 789         byte sfail;                     /* Minimum chance of failure */
 790         byte sexp;                      /* Encoded experience bonus */
 791 };
 792
 793
 794 /*
 795  * Information about the player's "magic"
 796  *
 797  * Note that a player with a "spell_book" of "zero" is illiterate.
 798  */
 799
 800 typedef struct player_magic player_magic;
 801
 802 struct player_magic
 803 {
 804         int spell_book;         /* Tval of spell books (if any) */
 805         int spell_xtra;         /* Something for later */
 806
 807         int spell_stat;         /* Stat for spells (if any)  */
 808         int spell_type;         /* Spell type (mage/priest) */
 809
 810         int spell_first;                /* Level of first spell */
 811         int spell_weight;               /* Weight that hurts spells */
 812
 813         magic_type info[MAX_MAGIC][32];    /* The available spells */
 814 };
 815
 816
 817
 818 /*
 819  * Player sex info
 820  */
 821
 822 typedef struct player_sex player_sex;
 823
 824 struct player_sex
 825 {
 826         cptr title;                     /* Type of sex */
 827         cptr winner;            /* Name of winner */
 828 #ifdef JP
 829         cptr E_title;           /* ±Ñ¸ìÀÊÌ */
 830         cptr E_winner;          /* ±Ñ¸ìÀÊÌ */
 831 #endif
 832 };
 833
 834
 835 /*
 836  * Player racial info
 837  */
 838
 839 typedef struct player_race player_race;
 840
 841 struct player_race
 842 {
 843         cptr title;                     /* Type of race */
 844
 845 #ifdef JP
 846         cptr E_title;           /* ±Ñ¸ì¼ïÂ² */
 847 #endif
 848         s16b r_adj[6];          /* Racial stat bonuses */
 849
 850         s16b r_dis;                     /* disarming */
 851         s16b r_dev;                     /* magic devices */
 852         s16b r_sav;                     /* saving throw */
 853         s16b r_stl;                     /* stealth */
 854         s16b r_srh;                     /* search ability */
 855         s16b r_fos;                     /* search frequency */
 856         s16b r_thn;                     /* combat (normal) */
 857         s16b r_thb;                     /* combat (shooting) */
 858
 859         byte r_mhp;                     /* Race hit-dice modifier */
 860         byte r_exp;                     /* Race experience factor */
 861
 862         byte b_age;                     /* base age */
 863         byte m_age;                     /* mod age */
 864
 865         byte m_b_ht;            /* base height (males) */
 866         byte m_m_ht;            /* mod height (males) */
 867         byte m_b_wt;            /* base weight (males) */
 868         byte m_m_wt;            /* mod weight (males) */
 869
 870         byte f_b_ht;            /* base height (females) */
 871         byte f_m_ht;            /* mod height (females)   */
 872         byte f_b_wt;            /* base weight (females) */
 873         byte f_m_wt;            /* mod weight (females) */
 874
 875         byte infra;                     /* Infra-vision range */
 876
 877         u32b choice;        /* Legal class choices */
 878 /*    byte choice_xtra;   */
 879 };
 880
 881
 882 /*
 883  * Player class info
 884  */
 885
 886 typedef struct player_class player_class;
 887
 888 struct player_class
 889 {
 890         cptr title;                     /* Type of class */
 891
 892 #ifdef JP
 893         cptr E_title;           /* ±Ñ¸ì¿¦¶È */
 894 #endif
 895         s16b c_adj[6];          /* Class stat modifier */
 896
 897         s16b c_dis;                     /* class disarming */
 898         s16b c_dev;                     /* class magic devices */
 899         s16b c_sav;                     /* class saving throws */
 900         s16b c_stl;                     /* class stealth */
 901         s16b c_srh;                     /* class searching ability */
 902         s16b c_fos;                     /* class searching frequency */
 903         s16b c_thn;                     /* class to hit (normal) */
 904         s16b c_thb;                     /* class to hit (bows) */
 905
 906         s16b x_dis;                     /* extra disarming */
 907         s16b x_dev;                     /* extra magic devices */
 908         s16b x_sav;                     /* extra saving throws */
 909         s16b x_stl;                     /* extra stealth */
 910         s16b x_srh;                     /* extra searching ability */
 911         s16b x_fos;                     /* extra searching frequency */
 912         s16b x_thn;                     /* extra to hit (normal) */
 913         s16b x_thb;                     /* extra to hit (bows) */
 914
 915         s16b c_mhp;                     /* Class hit-dice adjustment */
 916         s16b c_exp;                     /* Class experience factor */
 917
 918         byte pet_upkeep_div; /* Pet upkeep divider */
 919 };
 920
 921
 922 typedef struct player_seikaku player_seikaku;
 923 struct player_seikaku
 924 {
 925         cptr title;                     /* Type of seikaku */
 926
 927 #ifdef JP
 928         cptr E_title;           /* ±Ñ¸ìÀ³Ê */
 929 #endif
 930
 931         s16b a_adj[6];          /* seikaku stat bonuses */
 932
 933         s16b a_dis;                     /* seikaku disarming */
 934         s16b a_dev;                     /* seikaku magic devices */
 935         s16b a_sav;                     /* seikaku saving throw */
 936         s16b a_stl;                     /* seikaku stealth */
 937         s16b a_srh;                     /* seikaku search ability */
 938         s16b a_fos;                     /* seikaku search frequency */
 939         s16b a_thn;                     /* seikaku combat (normal) */
 940         s16b a_thb;                     /* seikaku combat (shooting) */
 941
 942         s16b a_mhp;                     /* Race hit-dice modifier */
 943
 944         byte no;                        /* ¤Î */
 945         byte sex;                       /* seibetu seigen */
 946 };
 947
 948
 949 /*
 950  * Most of the "player" information goes here.
 951  *
 952  * This stucture gives us a large collection of player variables.
 953  *
 954  * This structure contains several "blocks" of information.
 955  *   (1) the "permanent" info
 956  *   (2) the "variable" info
 957  *   (3) the "transient" info
 958  *
 959  * All of the "permanent" info, and most of the "variable" info,
 960  * is saved in the savefile.  The "transient" info is recomputed
 961  * whenever anything important changes.
 962  */
 963
 964 typedef struct player_type player_type;
 965
 966 struct player_type
 967 {
 968         s16b oldpy;             /* Previous player location -KMW- */
 969         s16b oldpx;             /* Previous player location -KMW- */
 970
 971         byte psex;                      /* Sex index */
 972         byte prace;                     /* Race index */
 973         byte pclass;            /* Class index */
 974         byte pseikaku;          /* Seikaku index */
 975         byte realm1;        /* First magic realm */
 976         byte realm2;        /* Second magic realm */
 977         byte oops;                      /* Unused */
 978
 979         byte hitdie;            /* Hit dice (sides) */
 980         u16b expfact;       /* Experience factor
 981                              * Note: was byte, causing overflow for Amberite
 982                              * characters (such as Amberite Paladins)
 983                              */
 984
 985         s16b age;                       /* Characters age */
 986         s16b ht;                        /* Height */
 987         s16b wt;                        /* Weight */
 988         s16b sc;                        /* Social Class */
 989
 990
 991         s32b au;                        /* Current Gold */
 992
 993         s32b max_max_exp;       /* Max max experience (only to calculate score) */
 994         s32b max_exp;           /* Max experience */
 995         s32b exp;                       /* Cur experience */
 996         u16b exp_frac;          /* Cur exp frac (times 2^16) */
 997
 998         s16b lev;                       /* Level */
 999
1000         s16b town_num;                  /* Current town number */
1001         s16b arena_number;              /* monster number in arena -KMW- */
1002         bool inside_arena;              /* Is character inside arena? */
1003         s16b inside_quest;              /* Inside quest level */
1004         bool inside_battle;             /* Is character inside tougijou? */
1005
1006         s16b rewards[MAX_BACT]; /* Status of rewards in town */
1007
1008         s32b wilderness_x;      /* Coordinates in the wilderness */
1009         s32b wilderness_y;
1010         bool wild_mode;
1011
1012         s16b mhp;                       /* Max hit pts */
1013         s16b chp;                       /* Cur hit pts */
1014         u16b chp_frac;          /* Cur hit frac (times 2^16) */
1015
1016         s16b msp;                       /* Max mana pts */
1017         s16b csp;                       /* Cur mana pts */
1018         u16b csp_frac;          /* Cur mana frac (times 2^16) */
1019
1020         s16b max_plv;           /* Max Player Level */
1021
1022         s16b stat_max[6];       /* Current "maximal" stat values */
1023         s16b stat_max_max[6];   /* Maximal "maximal" stat values */
1024         s16b stat_cur[6];       /* Current "natural" stat values */
1025
1026         s16b learned_spells;
1027         s16b add_spells;
1028
1029         u32b count;
1030
1031         s16b fast;              /* Timed -- Fast */
1032         s16b slow;              /* Timed -- Slow */
1033         s16b blind;             /* Timed -- Blindness */
1034         s16b paralyzed;         /* Timed -- Paralysis */
1035         s16b confused;          /* Timed -- Confusion */
1036         s16b afraid;            /* Timed -- Fear */
1037         s16b image;             /* Timed -- Hallucination */
1038         s16b poisoned;          /* Timed -- Poisoned */
1039         s16b cut;               /* Timed -- Cut */
1040         s16b stun;              /* Timed -- Stun */
1041
1042         s16b protevil;          /* Timed -- Protection */
1043         s16b invuln;            /* Timed -- Invulnerable */
1044         s16b ult_res;           /* Timed -- Ultimate Resistance */
1045         s16b hero;              /* Timed -- Heroism */
1046         s16b shero;             /* Timed -- Super Heroism */
1047         s16b shield;            /* Timed -- Shield Spell */
1048         s16b blessed;           /* Timed -- Blessed */
1049         s16b tim_invis;         /* Timed -- See Invisible */
1050         s16b tim_infra;         /* Timed -- Infra Vision */
1051         s16b tsuyoshi;          /* Timed -- Tsuyoshi Special */
1052         s16b ele_attack;        /* Timed -- Elemental Attack */
1053         s16b ele_immune;        /* Timed -- Elemental Immune */
1054
1055         s16b oppose_acid;       /* Timed -- oppose acid */
1056         s16b oppose_elec;       /* Timed -- oppose lightning */
1057         s16b oppose_fire;       /* Timed -- oppose heat */
1058         s16b oppose_cold;       /* Timed -- oppose cold */
1059         s16b oppose_pois;       /* Timed -- oppose poison */
1060
1061
1062         s16b tim_esp;       /* Timed ESP */
1063         s16b wraith_form;   /* Timed wraithform */
1064
1065         s16b resist_magic;  /* Timed Resist Magic (later) */
1066         s16b tim_regen;
1067         s16b kabenuke;
1068         s16b tim_stealth;
1069         s16b tim_ffall;
1070         s16b tim_sh_touki;
1071         s16b lightspeed;
1072         s16b tsubureru;
1073         s16b magicdef;
1074         s16b tim_res_nether;    /* Timed -- Nether resistance */
1075         s16b tim_res_time;      /* Timed -- Time resistance */
1076         byte mimic_form;
1077         s16b tim_mimic;
1078         s16b tim_sh_fire;
1079         s16b tim_sh_holy;
1080         s16b tim_eyeeye;
1081
1082         /* for mirror master */
1083         s16b tim_reflect;       /* Timed -- Reflect */
1084         s16b multishadow;       /* Timed -- Multi-shadow */
1085         s16b dustrobe;          /* Timed -- Robe of dust */
1086
1087         s16b chaos_patron;
1088         u32b muta1;
1089         u32b muta2;
1090         u32b muta3;
1091
1092         s16b virtues[8];
1093         s16b vir_types[8];
1094
1095         s16b word_recall;         /* Word of recall counter */
1096         s16b alter_reality;       /* Alter reality counter */
1097         byte recall_dungeon;      /* Dungeon set to be recalled */
1098
1099         s16b energy_need;         /* Energy needed for next move */
1100
1101         s16b food;                /* Current nutrition */
1102
1103         u32b special_attack;      /* Special attack capacity -LM- */
1104         u32b special_defense;     /* Special block capacity -LM- */
1105         byte action;              /* Currently action */
1106
1107         u32b spell_learned1;      /* bit mask of spells learned */
1108         u32b spell_learned2;      /* bit mask of spells learned */
1109         u32b spell_worked1;       /* bit mask of spells tried and worked */
1110         u32b spell_worked2;       /* bit mask of spells tried and worked */
1111         u32b spell_forgotten1;    /* bit mask of spells learned but forgotten */
1112         u32b spell_forgotten2;    /* bit mask of spells learned but forgotten */
1113         byte spell_order[64];     /* order spells learned/remembered/forgotten */
1114
1115         s16b spell_exp[64];       /* Proficiency of spells */
1116         s16b weapon_exp[5][64];   /* Proficiency of weapons */
1117         s16b skill_exp[10];       /* Proficiency of misc. skill */
1118
1119         s32b magic_num1[108];     /* Array for non-spellbook type magic */
1120         byte magic_num2[108];     /* Flags for non-spellbook type magics */
1121
1122         s16b mane_spell[MAX_MANE];
1123         s16b mane_dam[MAX_MANE];
1124         s16b mane_num;
1125
1126         s16b player_hp[PY_MAX_LEVEL];
1127         char died_from[80];       /* What killed the player */
1128         char history[4][60];      /* Textual "history" for the Player */
1129
1130         u16b total_winner;        /* Total winner */
1131         u16b panic_save;          /* Panic save */
1132
1133         u16b noscore;             /* Cheating flags */
1134
1135         bool wait_report_score;   /* Waiting to report score */
1136         bool is_dead;             /* Player is dead */
1137
1138         bool wizard;              /* Player is in wizard mode */
1139
1140         s16b riding;              /* Riding on a monster of this index */
1141         byte knowledge;           /* Knowledge about yourself */
1142         s32b visit;               /* Visited towns */
1143
1144         byte start_race;          /* Race at birth */
1145         s32b old_race1;           /* Record of race changes */
1146         s32b old_race2;           /* Record of race changes */
1147         s16b old_realm;           /* Record of realm changes */
1148
1149         s16b pet_follow_distance; /* Length of the imaginary "leash" for pets */
1150         s16b pet_extra_flags;     /* Various flags for controling pets */
1151
1152         s16b today_mon;           /* Wanted monster */
1153
1154         bool dtrap;               /* Whether you are on trap-safe grids */
1155         s16b floor_id;            /* Current floor location */
1156
1157         /*** Temporary fields ***/
1158
1159         bool playing;                   /* True if player is playing */
1160         bool leaving;                   /* True if player is leaving */
1161
1162         byte exit_bldg;                 /* Goal obtained in arena? -KMW- */
1163         byte leftbldg;                  /* did we just leave a special area? -KMW- */
1164
1165         bool leaving_dungeon;   /* True if player is leaving the dungeon */
1166         bool teleport_town;
1167         bool enter_dungeon;     /* Just enter the dungeon */
1168
1169         s16b health_who;        /* Health bar trackee */
1170
1171         s16b monster_race_idx;  /* Monster race trackee */
1172
1173         s16b object_kind_idx;   /* Object kind trackee */
1174
1175         s16b new_spells;        /* Number of spells available */
1176         s16b old_spells;
1177
1178         s16b old_food_aux;      /* Old value of food */
1179
1180         bool old_cumber_armor;
1181         bool old_cumber_glove;
1182         bool old_heavy_wield[2];
1183         bool old_heavy_shoot;
1184         bool old_icky_wield[2];
1185         bool old_riding_wield[2];
1186         bool old_riding_ryoute;
1187         bool old_monlite;
1188
1189         s16b old_lite;          /* Old radius of lite (if any) */
1190
1191         bool cumber_armor;      /* Mana draining armor */
1192         bool cumber_glove;      /* Mana draining gloves */
1193         bool heavy_wield[2];    /* Heavy weapon */
1194         bool heavy_shoot;       /* Heavy shooter */
1195         bool icky_wield[2];     /* Icky weapon */
1196         bool riding_wield[2];   /* Riding weapon */
1197         bool riding_ryoute;     /* Riding weapon */
1198         bool monlite;
1199
1200         s16b cur_lite;          /* Radius of lite (if any) */
1201
1202
1203         u32b notice;            /* Special Updates (bit flags) */
1204         u32b update;            /* Pending Updates (bit flags) */
1205         u32b redraw;            /* Normal Redraws (bit flags) */
1206         u32b window;            /* Window Redraws (bit flags) */
1207
1208         s16b stat_use[6];       /* Current modified stats */
1209         s16b stat_top[6];       /* Maximal modified stats */
1210
1211         bool sutemi;
1212         bool counter;
1213
1214         s32b align;                             /* Good/evil/neutral */
1215         s16b run_py;
1216         s16b run_px;
1217
1218
1219         /*** Extracted fields ***/
1220
1221         u32b total_weight;      /* Total weight being carried */
1222
1223         s16b stat_add[6];       /* Modifiers to stat values */
1224         s16b stat_ind[6];       /* Indexes into stat tables */
1225
1226         bool immune_acid;       /* Immunity to acid */
1227         bool immune_elec;       /* Immunity to lightning */
1228         bool immune_fire;       /* Immunity to fire */
1229         bool immune_cold;       /* Immunity to cold */
1230
1231         bool resist_acid;       /* Resist acid */
1232         bool resist_elec;       /* Resist lightning */
1233         bool resist_fire;       /* Resist fire */
1234         bool resist_cold;       /* Resist cold */
1235         bool resist_pois;       /* Resist poison */
1236
1237         bool resist_conf;       /* Resist confusion */
1238         bool resist_sound;      /* Resist sound */
1239         bool resist_lite;       /* Resist light */
1240         bool resist_dark;       /* Resist darkness */
1241         bool resist_chaos;      /* Resist chaos */
1242         bool resist_disen;      /* Resist disenchant */
1243         bool resist_shard;      /* Resist shards */
1244         bool resist_nexus;      /* Resist nexus */
1245         bool resist_blind;      /* Resist blindness */
1246         bool resist_neth;       /* Resist nether */
1247         bool resist_fear;       /* Resist fear */
1248         bool resist_time;       /* Resist time */
1249
1250         bool reflect;       /* Reflect 'bolt' attacks */
1251         bool sh_fire;       /* Fiery 'immolation' effect */
1252         bool sh_elec;       /* Electric 'immolation' effect */
1253         bool sh_cold;       /* Cold 'immolation' effect */
1254
1255         bool anti_magic;    /* Anti-magic */
1256         bool anti_tele;     /* Prevent teleportation */
1257
1258         bool sustain_str;       /* Keep strength */
1259         bool sustain_int;       /* Keep intelligence */
1260         bool sustain_wis;       /* Keep wisdom */
1261         bool sustain_dex;       /* Keep dexterity */
1262         bool sustain_con;       /* Keep constitution */
1263         bool sustain_chr;       /* Keep charisma */
1264
1265         u32b cursed;            /* Player is cursed */
1266
1267         bool can_swim;          /* No damage falling */
1268         bool ffall;             /* No damage falling */
1269         bool lite;              /* Permanent light */
1270         bool free_act;          /* Never paralyzed */
1271         bool see_inv;           /* Can see invisible */
1272         bool regenerate;        /* Regenerate hit pts */
1273         bool hold_life;         /* Resist life draining */
1274
1275         bool telepathy;         /* Telepathy */
1276         bool esp_animal;
1277         bool esp_undead;
1278         bool esp_demon;
1279         bool esp_orc;
1280         bool esp_troll;
1281         bool esp_giant;
1282         bool esp_dragon;
1283         bool esp_human;
1284         bool esp_evil;
1285         bool esp_good;
1286         bool esp_nonliving;
1287         bool esp_unique;
1288
1289         bool slow_digest;       /* Slower digestion */
1290         bool bless_blade;       /* Blessed blade */
1291         bool xtra_might;        /* Extra might bow */
1292         bool impact[2];         /* Earthquake blows */
1293         bool pass_wall;     /* Permanent wraithform */
1294         bool kill_wall;
1295         bool dec_mana;
1296         bool easy_spell;
1297         bool heavy_spell;
1298         bool warning;
1299         bool mighty_throw;
1300         bool see_nocto;         /* Noctovision */
1301
1302         s16b to_dd[2]; /* Extra dice/sides */
1303         s16b to_ds[2];
1304
1305         s16b dis_to_h[2];       /* Known bonus to hit (wield) */
1306         s16b dis_to_h_b;        /* Known bonus to hit (bow) */
1307         s16b dis_to_d[2];       /* Known bonus to dam (wield) */
1308         s16b dis_to_a;          /* Known bonus to ac */
1309
1310         s16b dis_ac;            /* Known base ac */
1311
1312         s16b to_h[2];                   /* Bonus to hit (wield) */
1313         s16b to_h_b;                    /* Bonus to hit (bow) */
1314         s16b to_h_m;                    /* Bonus to hit (misc) */
1315         s16b to_d[2];                   /* Bonus to dam (wield) */
1316         s16b to_d_m;                    /* Bonus to dam (misc) */
1317         s16b to_a;                      /* Bonus to ac */
1318
1319         s16b to_m_chance;               /* Minusses to cast chance */
1320
1321         bool ryoute;
1322         bool migite;
1323         bool hidarite;
1324         bool no_flowed;
1325
1326         s16b ac;                        /* Base ac */
1327
1328         s16b see_infra;         /* Infravision range */
1329
1330         s16b skill_dis;         /* Skill: Disarming */
1331         s16b skill_dev;         /* Skill: Magic Devices */
1332         s16b skill_sav;         /* Skill: Saving throw */
1333         s16b skill_stl;         /* Skill: Stealth factor */
1334         s16b skill_srh;         /* Skill: Searching ability */
1335         s16b skill_fos;         /* Skill: Searching frequency */
1336         s16b skill_thn;         /* Skill: To hit (normal) */
1337         s16b skill_thb;         /* Skill: To hit (shooting) */
1338         s16b skill_tht;         /* Skill: To hit (throwing) */
1339         s16b skill_dig;         /* Skill: Digging */
1340
1341         s16b num_blow[2];       /* Number of blows */
1342         s16b num_fire;          /* Number of shots */
1343
1344         byte tval_xtra;         /* Correct xtra tval */
1345
1346         byte tval_ammo;         /* Correct ammo tval */
1347
1348         byte pspeed;            /* Current speed */
1349 };
1350
1351
1352 /*
1353  * A structure to hold "rolled" information
1354  */
1355 typedef struct birther birther;
1356
1357 struct birther
1358 {
1359         byte psex;         /* Sex index */
1360         byte prace;        /* Race index */
1361         byte pclass;       /* Class index */
1362         byte pseikaku;     /* Seikaku index */
1363         byte realm1;       /* First magic realm */
1364         byte realm2;       /* Second magic realm */
1365
1366         s16b age;
1367         s16b ht;
1368         s16b wt;
1369         s16b sc;
1370
1371         s32b au;
1372
1373         s16b stat_max[6];       /* Current "maximal" stat values */
1374         s16b stat_max_max[6];   /* Maximal "maximal" stat values */
1375         s16b player_hp[PY_MAX_LEVEL];
1376
1377         s16b chaos_patron;
1378
1379         s16b vir_types[8];
1380
1381         char history[4][60];
1382
1383         byte quests;
1384         bool quick_ok;
1385 };
1386
1387
1388 /* For Monk martial arts */
1389
1390 typedef struct martial_arts martial_arts;
1391
1392 struct martial_arts
1393 {
1394         cptr    desc;       /* A verbose attack description */
1395         int     min_level;  /* Minimum level to use */
1396         int     chance;     /* Chance of 'success' */
1397         int     dd;         /* Damage dice */
1398         int     ds;         /* Damage sides */
1399         int     effect;     /* Special effects */
1400 };
1401
1402 typedef struct kamae kamae;
1403
1404 struct kamae
1405 {
1406         cptr    desc;       /* A verbose kamae description */
1407         int     min_level;  /* Minimum level to use */
1408         cptr    info;
1409 };
1410
1411 /* Mindcrafters */
1412 typedef struct mind_type mind_type;
1413 struct mind_type
1414 {
1415         int     min_lev;
1416         int     mana_cost;
1417         int     fail;
1418         cptr    name;
1419 };
1420
1421 typedef struct mind_power mind_power;
1422 struct mind_power
1423 {
1424         mind_type info[MAX_MIND_POWERS];
1425 };
1426
1427 /* Imitator */
1428
1429 typedef struct monster_power monster_power;
1430 struct monster_power
1431 {
1432         int     level;
1433         int     smana;
1434         int     fail;
1435         int     manedam;
1436         int     manefail;
1437         int     use_stat;
1438         cptr    name;
1439 };
1440
1441
1442 /*
1443  * A structure to describe a building.
1444  * From Kamband
1445  */
1446 typedef struct building_type building_type;
1447
1448 struct building_type
1449 {
1450         char name[20];                  /* proprietor name */
1451         char owner_name[20];            /* proprietor name */
1452         char owner_race[20];            /* proprietor race */
1453
1454         char act_names[8][30];          /* action names */
1455         s32b member_costs[8];           /* Costs for class members of building */
1456         s32b other_costs[8];                /* Costs for nonguild members */
1457         char letters[8];                /* action letters */
1458         s16b actions[8];                /* action codes */
1459         s16b action_restr[8];           /* action restrictions */
1460
1461         s16b member_class[MAX_CLASS];   /* which classes are part of guild */
1462         s16b member_race[MAX_RACES];    /* which classes are part of guild */
1463         s16b member_realm[MAX_MAGIC+1]; /* which realms are part of guild */
1464 };
1465
1466
1467 /* Border */
1468 typedef struct border_type border_type;
1469 struct border_type
1470 {
1471         byte    north[MAX_WID];
1472         byte    south[MAX_WID];
1473         byte    east[MAX_HGT];
1474         byte    west[MAX_HGT];
1475         byte    north_west;
1476         byte    north_east;
1477         byte    south_west;
1478         byte    south_east;
1479 };
1480
1481
1482 /*
1483  * A structure describing a wilderness area
1484  * with a terrain or a town
1485  */
1486 typedef struct wilderness_type wilderness_type;
1487 struct wilderness_type
1488 {
1489         int         terrain;
1490         int         town;
1491         int         road;
1492         u32b        seed;
1493         s16b        level;
1494         byte        entrance;
1495 };
1496
1497
1498 /*
1499  * A structure describing a town with
1500  * stores and buildings
1501  */
1502 typedef struct town_type town_type;
1503 struct town_type
1504 {
1505         char        name[32];
1506         u32b        seed;      /* Seed for RNG */
1507         store_type      *store;    /* The stores [MAX_STORES] */
1508         byte        numstores;
1509 };
1510
1511 /* Dungeons */
1512 typedef struct dun_type dun_type;
1513 struct dun_type
1514 {
1515         byte min_level; /* Minimum level in the dungeon */
1516         byte max_level; /* Maximum dungeon level allowed */
1517
1518         cptr name;      /* The name of the dungeon */
1519 };
1520
1521 /*
1522  * Sort-array element
1523  */
1524 typedef struct tag_type tag_type;
1525
1526 struct tag_type
1527 {
1528         int     tag;
1529         void    *pointer;
1530 };
1531
1532 typedef bool (*monster_hook_type)(int r_idx);
1533
1534
1535 /*
1536  * This seems like a pretty standard "typedef"
1537  */
1538 typedef int (*inven_func)(object_type *);
1539
1540
1541 /*
1542  * Semi-Portable High Score List Entry (128 bytes) -- BEN
1543  *
1544  * All fields listed below are null terminated ascii strings.
1545  *
1546  * In addition, the "number" fields are right justified, and
1547  * space padded, to the full available length (minus the "null").
1548  *
1549  * Note that "string comparisons" are thus valid on "pts".
1550  */
1551
1552 typedef struct high_score high_score;
1553
1554 struct high_score
1555 {
1556         char what[8];           /* Version info (string) */
1557
1558         char pts[10];           /* Total Score (number) */
1559
1560         char gold[10];          /* Total Gold (number) */
1561
1562         char turns[10];         /* Turns Taken (number) */
1563
1564         char day[10];           /* Time stamp (string) */
1565
1566         char who[16];           /* Player Name (string) */
1567
1568         char uid[8];            /* Player UID (number) */
1569
1570         char sex[2];            /* Player Sex (string) */
1571         char p_r[3];            /* Player Race (number) */
1572         char p_c[3];            /* Player Class (number) */
1573         char p_a[3];            /* Player Seikaku (number) */
1574
1575         char cur_lev[4];                /* Current Player Level (number) */
1576         char cur_dun[4];                /* Current Dungeon Level (number) */
1577         char max_lev[4];                /* Max Player Level (number) */
1578         char max_dun[4];                /* Max Dungeon Level (number) */
1579
1580         char how[40];           /* Method of death (string) */
1581 };
1582
1583 /* A structure for the != dungeon types */
1584 typedef struct dungeon_info_type dungeon_info_type;
1585 struct dungeon_info_type {
1586         u32b name;              /* Name */
1587         u32b text;              /* Description */
1588
1589         byte dy;
1590         byte dx;
1591
1592         byte floor1;            /* Floor tile 1 */
1593         byte floor_percent1;    /* Chance of type 1 */
1594         byte floor2;            /* Floor tile 2 */
1595         byte floor_percent2;    /* Chance of type 2 */
1596         byte floor3;            /* Floor tile 3 */
1597         byte floor_percent3;    /* Chance of type 3 */
1598         byte outer_wall;        /* Outer wall tile */
1599         byte inner_wall;        /* Inner wall tile */
1600         s16b stream1;           /* stream tile */
1601         s16b stream2;           /* stream tile */
1602         byte fill_type1;        /* Cave tile 1 */
1603         byte fill_percent1;     /* Chance of type 1 */
1604         byte fill_type2;        /* Cave tile 2 */
1605         byte fill_percent2;     /* Chance of type 2 */
1606         byte fill_type3;        /* Cave tile 3 */
1607         byte fill_percent3;     /* Chance of type 3 */
1608         s16b mindepth;          /* Minimal depth */
1609         s16b maxdepth;          /* Maximal depth */
1610         byte min_plev;          /* Minimal plev needed to enter -- it's an anti-cheating mesure */
1611         s16b pit;
1612         s16b nest;
1613         byte mode;              /* Mode of combinaison of the monster flags */
1614
1615         int min_m_alloc_level;  /* Minimal number of monsters per level */
1616         int max_m_alloc_chance; /* There is a 1/max_m_alloc_chance chance per round of creating a new monster */
1617
1618         u32b flags1;            /* Flags 1 */
1619
1620         u32b mflags1;           /* The monster flags that are allowed */
1621         u32b mflags2;
1622         u32b mflags3;
1623         u32b mflags4;
1624         u32b mflags5;
1625         u32b mflags6;
1626         u32b mflags7;
1627         u32b mflags8;
1628         u32b mflags9;
1629         u32b mflagsr;
1630
1631         char r_char[5];         /* Monster race allowed */
1632         int final_object;       /* The object you'll find at the bottom */
1633         int final_artifact;     /* The artifact you'll find at the bottom */
1634         int final_guardian;     /* The artifact's guardian. If an artifact is specified, then it's NEEDED */
1635
1636         byte special_div;       /* % of monsters affected by the flags/races allowed, to add some variety */
1637         int tunnel_percent;
1638         int obj_great;
1639         int obj_good;
1640 };
1641
1642
1643 /*
1644  *  A structure type for entry of auto-picker/destroyer
1645  */
1646 typedef struct {
1647         cptr name;          /* Items which have 'name' as part of its name match */
1648         cptr insc;          /* Items will be auto-inscribed as 'insc' */
1649         u32b flag[2];       /* Misc. keyword to be matched */
1650         byte action;        /* Auto-pickup or Destroy or Leave items */
1651         byte dice;          /* Weapons which have more than 'dice' dice match */
1652         byte bonus;         /* Items which have more than 'bonus' magical bonus match */
1653 } autopick_type;
1654
1655
1656 /*
1657  *  A structure type for the saved floor
1658  */
1659 typedef struct
1660 {
1661         s16b floor_id;        /* No recycle until 65536 IDs are all used */
1662         byte savefile_id;     /* ID for savefile (from 0 to MAX_SAVED_FLOOR) */
1663         s16b dun_level;
1664         s32b last_visit;      /* Time count of last visit. 0 for new floor. */
1665         u32b visit_mark;      /* Older has always smaller mark. */
1666         s16b upper_floor_id;  /* a floor connected with level teleportation */
1667         s16b lower_floor_id;  /* a floor connected with level tel. and trap door */
1668 } saved_floor_type;
1669
1670
1671 /*
1672  *  A structure type for terrain template of saving dungeon floor
1673  */
1674 typedef struct
1675 {
1676         u16b info;
1677         byte feat;
1678         byte mimic;
1679         s16b special;
1680         u16b occurrence;
1681 } cave_template_type;
1682
1683
1684 /*
1685  * A structure type for arena entry
1686  */
1687 typedef struct
1688 {
1689         s16b r_idx; /* Monster (0 means victory prizing) */
1690         byte tval;  /* tval of prize (0 means no prize) */
1691         byte sval;  /* sval of prize */
1692 } arena_type;