OSDN Git Service

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