hack.h revision 1.1 1 1.1 cgd /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
2 1.1 cgd /* hack.h - version 1.0.3 */
3 1.1 cgd
4 1.1 cgd #include "config.h"
5 1.1 cgd #include <string.h>
6 1.1 cgd
7 1.1 cgd #ifndef BSD
8 1.1 cgd #define index strchr
9 1.1 cgd #define rindex strrchr
10 1.1 cgd #endif BSD
11 1.1 cgd
12 1.1 cgd #define Null(type) ((struct type *) 0)
13 1.1 cgd
14 1.1 cgd #include "def.objclass.h"
15 1.1 cgd
16 1.1 cgd typedef struct {
17 1.1 cgd xchar x,y;
18 1.1 cgd } coord;
19 1.1 cgd
20 1.1 cgd #include "def.monst.h" /* uses coord */
21 1.1 cgd #include "def.gold.h"
22 1.1 cgd #include "def.trap.h"
23 1.1 cgd #include "def.obj.h"
24 1.1 cgd #include "def.flag.h"
25 1.1 cgd
26 1.1 cgd #define plur(x) (((x) == 1) ? "" : "s")
27 1.1 cgd
28 1.1 cgd #define BUFSZ 256 /* for getlin buffers */
29 1.1 cgd #define PL_NSIZ 32 /* name of player, ghost, shopkeeper */
30 1.1 cgd
31 1.1 cgd #include "def.rm.h"
32 1.1 cgd #include "def.permonst.h"
33 1.1 cgd
34 1.1 cgd extern long *alloc();
35 1.1 cgd
36 1.1 cgd extern xchar xdnstair, ydnstair, xupstair, yupstair; /* stairs up and down. */
37 1.1 cgd
38 1.1 cgd extern xchar dlevel;
39 1.1 cgd #define newstring(x) (char *) alloc((unsigned)(x))
40 1.1 cgd #include "hack.onames.h"
41 1.1 cgd
42 1.1 cgd #define ON 1
43 1.1 cgd #define OFF 0
44 1.1 cgd
45 1.1 cgd extern struct obj *invent, *uwep, *uarm, *uarm2, *uarmh, *uarms, *uarmg,
46 1.1 cgd *uleft, *uright, *fcobj;
47 1.1 cgd extern struct obj *uchain; /* defined iff PUNISHED */
48 1.1 cgd extern struct obj *uball; /* defined if PUNISHED */
49 1.1 cgd struct obj *o_at(), *getobj(), *sobj_at();
50 1.1 cgd
51 1.1 cgd struct prop {
52 1.1 cgd #define TIMEOUT 007777 /* mask */
53 1.1 cgd #define LEFT_RING W_RINGL /* 010000L */
54 1.1 cgd #define RIGHT_RING W_RINGR /* 020000L */
55 1.1 cgd #define INTRINSIC 040000L
56 1.1 cgd #define LEFT_SIDE LEFT_RING
57 1.1 cgd #define RIGHT_SIDE RIGHT_RING
58 1.1 cgd #define BOTH_SIDES (LEFT_SIDE | RIGHT_SIDE)
59 1.1 cgd long p_flgs;
60 1.1 cgd int (*p_tofn)(); /* called after timeout */
61 1.1 cgd };
62 1.1 cgd
63 1.1 cgd struct you {
64 1.1 cgd xchar ux, uy;
65 1.1 cgd schar dx, dy, dz; /* direction of move (or zap or ... ) */
66 1.1 cgd #ifdef QUEST
67 1.1 cgd schar di; /* direction of FF */
68 1.1 cgd xchar ux0, uy0; /* initial position FF */
69 1.1 cgd #endif QUEST
70 1.1 cgd xchar udisx, udisy; /* last display pos */
71 1.1 cgd char usym; /* usually '@' */
72 1.1 cgd schar uluck;
73 1.1 cgd #define LUCKMAX 10 /* on moonlit nights 11 */
74 1.1 cgd #define LUCKMIN (-10)
75 1.1 cgd int last_str_turn:3; /* 0: none, 1: half turn, 2: full turn */
76 1.1 cgd /* +: turn right, -: turn left */
77 1.1 cgd unsigned udispl:1; /* @ on display */
78 1.1 cgd unsigned ulevel:4; /* 1 - 14 */
79 1.1 cgd #ifdef QUEST
80 1.1 cgd unsigned uhorizon:7;
81 1.1 cgd #endif QUEST
82 1.1 cgd unsigned utrap:3; /* trap timeout */
83 1.1 cgd unsigned utraptype:1; /* defined if utrap nonzero */
84 1.1 cgd #define TT_BEARTRAP 0
85 1.1 cgd #define TT_PIT 1
86 1.1 cgd unsigned uinshop:6; /* used only in shk.c - (roomno+1) of shop */
87 1.1 cgd
88 1.1 cgd
89 1.1 cgd /* perhaps these #define's should also be generated by makedefs */
90 1.1 cgd #define TELEPAT LAST_RING /* not a ring */
91 1.1 cgd #define Telepat u.uprops[TELEPAT].p_flgs
92 1.1 cgd #define FAST (LAST_RING+1) /* not a ring */
93 1.1 cgd #define Fast u.uprops[FAST].p_flgs
94 1.1 cgd #define CONFUSION (LAST_RING+2) /* not a ring */
95 1.1 cgd #define Confusion u.uprops[CONFUSION].p_flgs
96 1.1 cgd #define INVIS (LAST_RING+3) /* not a ring */
97 1.1 cgd #define Invis u.uprops[INVIS].p_flgs
98 1.1 cgd #define Invisible (Invis && !See_invisible)
99 1.1 cgd #define GLIB (LAST_RING+4) /* not a ring */
100 1.1 cgd #define Glib u.uprops[GLIB].p_flgs
101 1.1 cgd #define PUNISHED (LAST_RING+5) /* not a ring */
102 1.1 cgd #define Punished u.uprops[PUNISHED].p_flgs
103 1.1 cgd #define SICK (LAST_RING+6) /* not a ring */
104 1.1 cgd #define Sick u.uprops[SICK].p_flgs
105 1.1 cgd #define BLIND (LAST_RING+7) /* not a ring */
106 1.1 cgd #define Blind u.uprops[BLIND].p_flgs
107 1.1 cgd #define WOUNDED_LEGS (LAST_RING+8) /* not a ring */
108 1.1 cgd #define Wounded_legs u.uprops[WOUNDED_LEGS].p_flgs
109 1.1 cgd #define STONED (LAST_RING+9) /* not a ring */
110 1.1 cgd #define Stoned u.uprops[STONED].p_flgs
111 1.1 cgd #define PROP(x) (x-RIN_ADORNMENT) /* convert ring to index in uprops */
112 1.1 cgd unsigned umconf:1;
113 1.1 cgd char *usick_cause;
114 1.1 cgd struct prop uprops[LAST_RING+10];
115 1.1 cgd
116 1.1 cgd unsigned uswallow:1; /* set if swallowed by a monster */
117 1.1 cgd unsigned uswldtim:4; /* time you have been swallowed */
118 1.1 cgd unsigned uhs:3; /* hunger state - see hack.eat.c */
119 1.1 cgd schar ustr,ustrmax;
120 1.1 cgd schar udaminc;
121 1.1 cgd schar uac;
122 1.1 cgd int uhp,uhpmax;
123 1.1 cgd long int ugold,ugold0,uexp,urexp;
124 1.1 cgd int uhunger; /* refd only in eat.c and shk.c */
125 1.1 cgd int uinvault;
126 1.1 cgd struct monst *ustuck;
127 1.1 cgd int nr_killed[CMNUM+2]; /* used for experience bookkeeping */
128 1.1 cgd };
129 1.1 cgd
130 1.1 cgd extern struct you u;
131 1.1 cgd
132 1.1 cgd extern char *traps[];
133 1.1 cgd extern char *monnam(), *Monnam(), *amonnam(), *Amonnam(),
134 1.1 cgd *doname(), *aobjnam();
135 1.1 cgd extern char readchar();
136 1.1 cgd extern char vowels[];
137 1.1 cgd
138 1.1 cgd extern xchar curx,cury; /* cursor location on screen */
139 1.1 cgd
140 1.1 cgd extern coord bhitpos; /* place where thrown weapon falls to the ground */
141 1.1 cgd
142 1.1 cgd extern xchar seehx,seelx,seehy,seely; /* where to see*/
143 1.1 cgd extern char *save_cm,*killer;
144 1.1 cgd
145 1.1 cgd extern xchar dlevel, maxdlevel; /* dungeon level */
146 1.1 cgd
147 1.1 cgd extern long moves;
148 1.1 cgd
149 1.1 cgd extern int multi;
150 1.1 cgd
151 1.1 cgd
152 1.1 cgd extern char lock[];
153 1.1 cgd
154 1.1 cgd
155 1.1 cgd #define DIST(x1,y1,x2,y2) (((x1)-(x2))*((x1)-(x2)) + ((y1)-(y2))*((y1)-(y2)))
156 1.1 cgd
157 1.1 cgd #define PL_CSIZ 20 /* sizeof pl_character */
158 1.1 cgd #define MAX_CARR_CAP 120 /* so that boulders can be heavier */
159 1.1 cgd #define MAXLEVEL 40
160 1.1 cgd #define FAR (COLNO+2) /* position outside screen */
161