OSDN Git Service

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