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