Home | History | Annotate | Line # | Download | only in trek
trek.h revision 1.1
      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 */
     55 extern double	franf();	/* floating random number function */
     56 extern double	sqrt();		/* square root */
     57 extern double	sin(), cos();	/* trig functions */
     58 extern double	atan2();	/* fancy arc tangent function */
     59 extern double	log();		/* log base e */
     60 extern double	pow();		/* power function */
     61 extern double	fabs();		/* absolute value function */
     62 extern 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 
     71 struct 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 */
     99 extern char	*Systemname[NINHAB];
    100 
    101 /* quadrant definition */
    102 struct 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 */
    115 char	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 */
    139 struct device
    140 {
    141 	char	*name;		/* device name */
    142 	char	*person;	/* the person who fixes it */
    143 };
    144 
    145 struct 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 
    166 struct 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 
    185 struct event	Event[MAXEVENTS];	/* dynamic event list; one entry per pending event */
    186 
    187 /*****************************  KLINGONS  *******************************/
    188 
    189 struct 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 
    217 struct 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 */
    230 struct
    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 */
    258 struct
    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 */
    277 struct
    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 */
    288 struct
    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 */
    324 struct
    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 */
    337 struct
    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
    380 int	Trace;
    381