386BSD 0.1 development
[unix-history] / usr / othersrc / games / trek / trek.h
CommitLineData
f54f2bac
WJ
1/*
2 * Copyright (c) 1980 Regents of the University of California.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 *
33 * @(#)trek.h 5.5 (Berkeley) 6/1/90
34 */
35
36/*
37** Global Declarations
38**
39** Virtually all non-local variable declarations are made in this
40** file. Exceptions are those things which are initialized, which
41** are defined in "externs.c", and things which are local to one
42** program file.
43**
44** So far as I know, nothing in here must be preinitialized to
45** zero.
46**
47** You may have problems from the loader if you move this to a
48** different machine. These things actually get allocated in each
49** source file, which UNIX allows; however, you may (on other
50** systems) have to change everything in here to be "extern" and
51** actually allocate stuff in "externs.c"
52*/
53
54/* external function definitions */
55extern double franf(); /* floating random number function */
56extern double sqrt(); /* square root */
57extern double sin(), cos(); /* trig functions */
58extern double atan2(); /* fancy arc tangent function */
59extern double log(); /* log base e */
60extern double pow(); /* power function */
61extern double fabs(); /* absolute value function */
62extern double exp(); /* exponential function */
63
64/********************* GALAXY **************************/
65
66/* galactic parameters */
67# define NSECTS 10 /* dimensions of quadrant in sectors */
68# define NQUADS 8 /* dimension of galazy in quadrants */
69# define NINHAB 32 /* number of quadrants which are inhabited */
70
71struct quad /* definition for each quadrant */
72{
73 char bases; /* number of bases in this quadrant */
74 char klings; /* number of Klingons in this quadrant */
75 char holes; /* number of black holes in this quadrant */
76 int scanned; /* star chart entry (see below) */
77 char stars; /* number of stars in this quadrant */
78 char qsystemname; /* starsystem name (see below) */
79};
80
81# define Q_DISTRESSED 0200
82# define Q_SYSTEM 077
83
84/* systemname conventions:
85 * 1 -> NINHAB index into Systemname table for live system.
86 * + Q_DISTRESSED distressed starsystem -- systemname & Q_SYSTEM
87 * is the index into the Event table which will
88 * have the system name
89 * 0 dead or nonexistent starsystem
90 *
91 * starchart ("scanned") conventions:
92 * 0 -> 999 taken as is
93 * -1 not yet scanned ("...")
94 * 1000 supernova ("///")
95 * 1001 starbase + ??? (".1.")
96*/
97
98/* ascii names of systems */
99extern char *Systemname[NINHAB];
100
101/* quadrant definition */
102struct quad Quad[NQUADS][NQUADS];
103
104/* defines for sector map (below) */
105# define EMPTY '.'
106# define STAR '*'
107# define BASE '#'
108# define ENTERPRISE 'E'
109# define QUEENE 'Q'
110# define KLINGON 'K'
111# define INHABIT '@'
112# define HOLE ' '
113
114/* current sector map */
115char Sect[NSECTS][NSECTS];
116
117
118/************************ DEVICES ******************************/
119
120# define NDEV 16 /* max number of devices */
121
122/* device tokens */
123# define WARP 0 /* warp engines */
124# define SRSCAN 1 /* short range scanners */
125# define LRSCAN 2 /* long range scanners */
126# define PHASER 3 /* phaser control */
127# define TORPED 4 /* photon torpedo control */
128# define IMPULSE 5 /* impulse engines */
129# define SHIELD 6 /* shield control */
130# define COMPUTER 7 /* on board computer */
131# define SSRADIO 8 /* subspace radio */
132# define LIFESUP 9 /* life support systems */
133# define SINS 10 /* Space Inertial Navigation System */
134# define CLOAK 11 /* cloaking device */
135# define XPORTER 12 /* transporter */
136# define SHUTTLE 13 /* shuttlecraft */
137
138/* device names */
139struct device
140{
141 char *name; /* device name */
142 char *person; /* the person who fixes it */
143};
144
145struct device Device[NDEV];
146
147/*************************** EVENTS ****************************/
148
149# define NEVENTS 12 /* number of different event types */
150
151# define E_LRTB 1 /* long range tractor beam */
152# define E_KATSB 2 /* Klingon attacks starbase */
153# define E_KDESB 3 /* Klingon destroys starbase */
154# define E_ISSUE 4 /* distress call is issued */
155# define E_ENSLV 5 /* Klingons enslave a quadrant */
156# define E_REPRO 6 /* a Klingon is reproduced */
157# define E_FIXDV 7 /* fix a device */
158# define E_ATTACK 8 /* Klingon attack during rest period */
159# define E_SNAP 9 /* take a snapshot for time warp */
160# define E_SNOVA 10 /* supernova occurs */
161
162# define E_GHOST 0100 /* ghost of a distress call if ssradio out */
163# define E_HIDDEN 0200 /* event that is unreportable because ssradio out */
164# define E_EVENT 077 /* mask to get event code */
165
166struct event
167{
168 char x, y; /* coordinates */
169 double date; /* trap stardate */
170 char evcode; /* event type */
171 char systemname; /* starsystem name */
172};
173/* systemname conventions:
174 * 1 -> NINHAB index into Systemname table for reported distress calls
175 *
176 * evcode conventions:
177 * 1 -> NEVENTS-1 event type
178 * + E_HIDDEN unreported (SSradio out)
179 * + E_GHOST actually already expired
180 * 0 unallocated
181 */
182
183# define MAXEVENTS 25 /* max number of concurrently pending events */
184
185struct event Event[MAXEVENTS]; /* dynamic event list; one entry per pending event */
186
187/***************************** KLINGONS *******************************/
188
189struct kling
190{
191 char x, y; /* coordinates */
192 int power; /* power left */
193 double dist; /* distance to Enterprise */
194 double avgdist; /* average over this move */
195 char srndreq; /* set if surrender has been requested */
196};
197
198# define MAXKLQUAD 9 /* maximum klingons per quadrant */
199
200/********************** MISCELLANEOUS ***************************/
201
202/* condition codes */
203# define GREEN 0
204# define DOCKED 1
205# define YELLOW 2
206# define RED 3
207
208/* starbase coordinates */
209# define MAXBASES 9 /* maximum number of starbases in galaxy */
210
211/* distress calls */
212# define MAXDISTR 5 /* maximum concurrent distress calls */
213
214/* phaser banks */
215# define NBANKS 6 /* number of phaser banks */
216
217struct xy
218{
219 char x, y; /* coordinates */
220};
221
222
223/*
224 * note that much of the stuff in the following structs CAN NOT
225 * be moved around!!!!
226 */
227
228
229/* information regarding the state of the starship */
230struct
231{
232 double warp; /* warp factor */
233 double warp2; /* warp factor squared */
234 double warp3; /* warp factor cubed */
235 char shldup; /* shield up flag */
236 char cloaked; /* set if cloaking device on */
237 int energy; /* starship's energy */
238 int shield; /* energy in shields */
239 double reserves; /* life support reserves */
240 int crew; /* ship's complement */
241 int brigfree; /* space left in brig */
242 char torped; /* torpedoes */
243 char cloakgood; /* set if we have moved */
244 int quadx; /* quadrant x coord */
245 int quady; /* quadrant y coord */
246 int sectx; /* sector x coord */
247 int secty; /* sector y coord */
248 char cond; /* condition code */
249 char sinsbad; /* Space Inertial Navigation System condition */
250 char *shipname; /* name of current starship */
251 char ship; /* current starship */
252 int distressed; /* number of distress calls */
253} Ship;
254
255/* sinsbad is set if SINS is working but not calibrated */
256
257/* game related information, mostly scoring */
258struct
259{
260 int killk; /* number of klingons killed */
261 int deaths; /* number of deaths onboard Enterprise */
262 char negenbar; /* number of hits on negative energy barrier */
263 char killb; /* number of starbases killed */
264 int kills; /* number of stars killed */
265 char skill; /* skill rating of player */
266 char length; /* length of game */
267 char killed; /* set if you were killed */
268 char killinhab; /* number of inhabited starsystems killed */
269 char tourn; /* set if a tournament game */
270 char passwd[15]; /* game password */
271 char snap; /* set if snapshot taken */
272 char helps; /* number of help calls */
273 int captives; /* total number of captives taken */
274} Game;
275
276/* per move information */
277struct
278{
279 char free; /* set if a move is free */
280 char endgame; /* end of game flag */
281 char shldchg; /* set if shields changed this move */
282 char newquad; /* set if just entered this quadrant */
283 char resting; /* set if this move is a rest */
284 double time; /* time used this move */
285} Move;
286
287/* parametric information */
288struct
289{
290 char bases; /* number of starbases */
291 char klings; /* number of klingons */
292 double date; /* stardate */
293 double time; /* time left */
294 double resource; /* Federation resources */
295 int energy; /* starship's energy */
296 int shield; /* energy in shields */
297 double reserves; /* life support reserves */
298 int crew; /* size of ship's complement */
299 int brigfree; /* max possible number of captives */
300 char torped; /* photon torpedos */
301 double damfac[NDEV]; /* damage factor */
302 double dockfac; /* docked repair time factor */
303 double regenfac; /* regeneration factor */
304 int stopengy; /* energy to do emergency stop */
305 int shupengy; /* energy to put up shields */
306 int klingpwr; /* Klingon initial power */
307 int warptime; /* time chewer multiplier */
308 double phasfac; /* Klingon phaser power eater factor */
309 char moveprob[6]; /* probability that a Klingon moves */
310 double movefac[6]; /* Klingon move distance multiplier */
311 double eventdly[NEVENTS]; /* event time multipliers */
312 double navigcrud[2]; /* navigation crudup factor */
313 int cloakenergy; /* cloaking device energy per stardate */
314 double damprob[NDEV]; /* damage probability */
315 double hitfac; /* Klingon attack factor */
316 int klingcrew; /* number of Klingons in a crew */
317 double srndrprob; /* surrender probability */
318 int energylow; /* low energy mark (cond YELLOW) */
319} Param;
320
321/* Sum of damage probabilities must add to 1000 */
322
323/* other information kept in a snapshot */
324struct
325{
326 char bases; /* number of starbases */
327 char klings; /* number of klingons */
328 double date; /* stardate */
329 double time; /* time left */
330 double resource; /* Federation resources */
331 char distressed; /* number of currently distressed quadrants */
332 struct event *eventptr[NEVENTS]; /* pointer to event structs */
333 struct xy base[MAXBASES]; /* locations of starbases */
334} Now;
335
336/* Other stuff, not dumped in a snapshot */
337struct
338{
339 struct kling klingon[MAXKLQUAD]; /* sorted Klingon list */
340 char nkling; /* number of Klingons in this sector */
341 /* < 0 means automatic override mode */
342 char fast; /* set if speed > 300 baud */
343 struct xy starbase; /* starbase in current quadrant */
344 char snapshot[sizeof Quad + sizeof Event + sizeof Now]; /* snapshot for time warp */
345 char statreport; /* set to get a status report on a srscan */
346} Etc;
347
348/*
349 * eventptr is a pointer to the event[] entry of the last
350 * scheduled event of each type. Zero if no such event scheduled.
351 */
352
353/* Klingon move indicies */
354# define KM_OB 0 /* Old quadrant, Before attack */
355# define KM_OA 1 /* Old quadrant, After attack */
356# define KM_EB 2 /* Enter quadrant, Before attack */
357# define KM_EA 3 /* Enter quadrant, After attack */
358# define KM_LB 4 /* Leave quadrant, Before attack */
359# define KM_LA 5 /* Leave quadrant, After attack */
360
361/* you lose codes */
362# define L_NOTIME 1 /* ran out of time */
363# define L_NOENGY 2 /* ran out of energy */
364# define L_DSTRYD 3 /* destroyed by a Klingon */
365# define L_NEGENB 4 /* ran into the negative energy barrier */
366# define L_SUICID 5 /* destroyed in a nova */
367# define L_SNOVA 6 /* destroyed in a supernova */
368# define L_NOLIFE 7 /* life support died (so did you) */
369# define L_NOHELP 8 /* you could not be rematerialized */
370# define L_TOOFAST 9 /* pretty stupid going at warp 10 */
371# define L_STAR 10 /* ran into a star */
372# define L_DSTRCT 11 /* self destructed */
373# define L_CAPTURED 12 /* captured by Klingons */
374# define L_NOCREW 13 /* you ran out of crew */
375
376/****************** COMPILE OPTIONS ***********************/
377
378/* Trace info */
379# define xTRACE 1
380int Trace;