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