OSDN Git Service

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