hdr.h revision 1.10 1 1.10 agc /* $NetBSD: hdr.h,v 1.10 2003/08/07 09:36:50 agc Exp $ */
2 1.2 cgd
3 1.1 jtc /*-
4 1.1 jtc * Copyright (c) 1991, 1993
5 1.1 jtc * The Regents of the University of California. All rights reserved.
6 1.1 jtc *
7 1.1 jtc * The game adventure was originally written in Fortran by Will Crowther
8 1.1 jtc * and Don Woods. It was later translated to C and enhanced by Jim
9 1.1 jtc * Gillogly. This code is derived from software contributed to Berkeley
10 1.1 jtc * by Jim Gillogly at The Rand Corporation.
11 1.1 jtc *
12 1.1 jtc * Redistribution and use in source and binary forms, with or without
13 1.1 jtc * modification, are permitted provided that the following conditions
14 1.1 jtc * are met:
15 1.1 jtc * 1. Redistributions of source code must retain the above copyright
16 1.1 jtc * notice, this list of conditions and the following disclaimer.
17 1.1 jtc * 2. Redistributions in binary form must reproduce the above copyright
18 1.1 jtc * notice, this list of conditions and the following disclaimer in the
19 1.1 jtc * documentation and/or other materials provided with the distribution.
20 1.10 agc * 3. Neither the name of the University nor the names of its contributors
21 1.1 jtc * may be used to endorse or promote products derived from this software
22 1.1 jtc * without specific prior written permission.
23 1.1 jtc *
24 1.1 jtc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 1.1 jtc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 1.1 jtc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 1.1 jtc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 1.1 jtc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 1.1 jtc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 1.1 jtc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 1.1 jtc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 1.1 jtc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 1.1 jtc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 1.1 jtc * SUCH DAMAGE.
35 1.1 jtc *
36 1.1 jtc * @(#)hdr.h 8.1 (Berkeley) 5/31/93
37 1.1 jtc */
38 1.1 jtc
39 1.1 jtc /* ADVENTURE -- Jim Gillogly, Jul 1977
40 1.1 jtc * This program is a re-write of ADVENT, written in FORTRAN mostly by
41 1.1 jtc * Don Woods of SAIL. In most places it is as nearly identical to the
42 1.1 jtc * original as possible given the language and word-size differences.
43 1.1 jtc * A few places, such as the message arrays and travel arrays were changed
44 1.1 jtc * to reflect the smaller core size and word size. The labels of the
45 1.1 jtc * original are reflected in this version, so that the comments of the
46 1.1 jtc * fortran are still applicable here.
47 1.1 jtc *
48 1.1 jtc * The data file distributed with the fortran source is assumed to be called
49 1.1 jtc * "glorkz" in the directory where the program is first run.
50 1.7 hubertf *
51 1.7 hubertf * The original FORTRAN version can be found at
52 1.7 hubertf * <URL:ftp://ftp.gmd.de/if-archive/games/source/advent-original.tar.gz>.
53 1.1 jtc */
54 1.1 jtc
55 1.1 jtc /* hdr.h: included by c advent files */
56 1.1 jtc
57 1.5 hubertf #include <signal.h>
58 1.5 hubertf
59 1.8 hubertf extern int datfd; /* message file descriptor */
60 1.8 hubertf extern volatile sig_atomic_t delhit;
61 1.8 hubertf extern int yea;
62 1.4 lukem extern char data_file[]; /* Virtual data file */
63 1.1 jtc
64 1.1 jtc #define TAB 011
65 1.1 jtc #define LF 012
66 1.6 hubertf #define FLUSHLINE do { int flushline_ch; while ((flushline_ch = getchar()) != EOF && flushline_ch != '\n'); } while (0)
67 1.1 jtc #define FLUSHLF while (next()!=LF)
68 1.1 jtc
69 1.8 hubertf extern int loc, newloc, oldloc, oldlc2, wzdark, gaveup, kq, k, k2;
70 1.8 hubertf extern char *wd1, *wd2; /* the complete words */
71 1.8 hubertf extern int verb, obj, spk;
72 1.1 jtc extern int blklin;
73 1.8 hubertf extern int saveday, savet, mxscor, latncy;
74 1.1 jtc
75 1.4 lukem #define SHORT 50 /* How short is a demo game? */
76 1.1 jtc
77 1.4 lukem #define MAXSTR 20 /* max length of user's words */
78 1.1 jtc
79 1.4 lukem #define HTSIZE 512 /* max number of vocab words */
80 1.8 hubertf extern struct hashtab { /* hash table for vocabulary */
81 1.4 lukem int val; /* word type &index (ktab) */
82 1.4 lukem char *atab; /* pointer to actual string */
83 1.4 lukem } voc[HTSIZE];
84 1.4 lukem #define SEED 1815622 /* "Encryption" seed */
85 1.1 jtc
86 1.1 jtc struct text
87 1.4 lukem {
88 1.4 lukem char *seekadr;/* Msg start in virtual disk */
89 1.4 lukem int txtlen; /* length of msg starting here */
90 1.4 lukem };
91 1.1 jtc
92 1.1 jtc #define RTXSIZ 205
93 1.8 hubertf extern struct text rtext[RTXSIZ]; /* random text messages */
94 1.1 jtc
95 1.1 jtc #define MAGSIZ 35
96 1.8 hubertf extern struct text mtext[MAGSIZ]; /* magic messages */
97 1.1 jtc
98 1.8 hubertf extern int clsses;
99 1.1 jtc #define CLSMAX 12
100 1.8 hubertf extern struct text ctext[CLSMAX]; /* classes of adventurer */
101 1.8 hubertf extern int cval[CLSMAX];
102 1.1 jtc
103 1.8 hubertf extern struct text ptext[101]; /* object descriptions */
104 1.1 jtc
105 1.4 lukem #define LOCSIZ 141 /* number of locations */
106 1.8 hubertf extern struct text ltext[LOCSIZ]; /* long loc description */
107 1.8 hubertf extern struct text stext[LOCSIZ]; /* short loc descriptions */
108 1.1 jtc
109 1.8 hubertf extern struct travlist { /* direcs & conditions of travel */
110 1.4 lukem struct travlist *next; /* ptr to next list entry */
111 1.4 lukem int conditions; /* m in writeup (newloc / 1000) */
112 1.4 lukem int tloc; /* n in writeup (newloc % 1000) */
113 1.4 lukem int tverb; /* the verb that takes you there */
114 1.4 lukem } *travel[LOCSIZ], *tkk; /* travel is closer to keys(...) */
115 1.1 jtc
116 1.8 hubertf extern int atloc[LOCSIZ];
117 1.1 jtc
118 1.8 hubertf extern int plac[101]; /* initial object placement */
119 1.8 hubertf extern int fixd[101], fixed[101]; /* location fixed? */
120 1.1 jtc
121 1.8 hubertf extern int actspk[35]; /* rtext msg for verb <n> */
122 1.1 jtc
123 1.8 hubertf extern int cond[LOCSIZ]; /* various condition bits */
124 1.1 jtc
125 1.4 lukem extern int setbit[16]; /* bit defn masks 1,2,4,... */
126 1.1 jtc
127 1.8 hubertf extern int hntmax;
128 1.8 hubertf extern int hints[20][5]; /* info on hints */
129 1.8 hubertf extern int hinted[20], hintlc[20];
130 1.1 jtc
131 1.8 hubertf extern int place[101], prop[101], links[201];
132 1.8 hubertf extern int abb[LOCSIZ];
133 1.1 jtc
134 1.8 hubertf extern int maxtrs, tally, tally2; /* treasure values */
135 1.1 jtc
136 1.1 jtc #define FALSE 0
137 1.1 jtc #define TRUE 1
138 1.1 jtc
139 1.8 hubertf extern int keys, lamp, grate, cage, rod, rod2, steps, /* mnemonics */
140 1.4 lukem bird, door, pillow, snake, fissur, tablet, clam, oyster,
141 1.4 lukem magzin, dwarf, knife, food, bottle, water, oil, plant, plant2,
142 1.4 lukem axe, mirror, dragon, chasm, troll, troll2, bear, messag,
143 1.4 lukem vend, batter, nugget, coins, chest, eggs, tridnt, vase,
144 1.4 lukem emrald, pyram, pearl, rug, chain, spices, back, look, cave,
145 1.4 lukem null, entrnc, dprssn, enter, stream, pour, say, lock, throw,
146 1.4 lukem find, invent;
147 1.4 lukem
148 1.8 hubertf extern int chloc, chloc2, dseen[7], dloc[7], /* dwarf stuff */
149 1.4 lukem odloc[7], dflag, daltlc;
150 1.4 lukem
151 1.8 hubertf extern int tk[21], stick, dtotal, attack;
152 1.8 hubertf extern int turns, lmwarn, iwest, knfloc, detail, /* various flags and
153 1.4 lukem * counters */
154 1.4 lukem abbnum, maxdie, numdie, holdng, dkill, foobar, bonus, clock1,
155 1.4 lukem clock2, saved, closng, panic, closed, scorng;
156 1.1 jtc
157 1.9 christos extern int demo, limit;
158 1.1 jtc
159 1.3 christos #define DECR(a,b,c,d,e) decr(a+'+',b+'-',c+'#',d+'&',e+'%')
160