initial import of 386bsd-0.1 sources

1 files changed, 380 insertions, 0 deletions

diff --git a/trek/trek.h b/trek/trek.h
new file mode 100644
index 00000000..b798d0a1
--- /dev/null
+++ b/trek/trek.h
@@ -0,0 +1,380 @@
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *	This product includes software developed by the University of
+ *	California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ *	@(#)trek.h	5.5 (Berkeley) 6/1/90
+ */
+
+/*
+**  Global Declarations
+**
+**	Virtually all non-local variable declarations are made in this
+**	file.  Exceptions are those things which are initialized, which
+**	are defined in "externs.c", and things which are local to one
+**	program file.
+**
+**	So far as I know, nothing in here must be preinitialized to
+**	zero.
+**
+**	You may have problems from the loader if you move this to a
+**	different machine.  These things actually get allocated in each
+**	source file, which UNIX allows; however, you may (on other
+**	systems) have to change everything in here to be "extern" and
+**	actually allocate stuff in "externs.c"
+*/
+
+/* external function definitions */
+extern double	franf();	/* floating random number function */
+extern double	sqrt();		/* square root */
+extern double	sin(), cos();	/* trig functions */
+extern double	atan2();	/* fancy arc tangent function */
+extern double	log();		/* log base e */
+extern double	pow();		/* power function */
+extern double	fabs();		/* absolute value function */
+extern double	exp();		/* exponential function */
+
+/*********************  GALAXY  **************************/
+
+/* galactic parameters */
+# define	NSECTS		10	/* dimensions of quadrant in sectors */
+# define	NQUADS		8	/* dimension of galazy in quadrants */
+# define	NINHAB		32	/* number of quadrants which are inhabited */
+
+struct quad		/* definition for each quadrant */
+{
+	char	bases;		/* number of bases in this quadrant */
+	char	klings;		/* number of Klingons in this quadrant */
+	char	holes;		/* number of black holes in this quadrant */
+	int	scanned;	/* star chart entry (see below) */
+	char	stars;		/* number of stars in this quadrant */
+	char	qsystemname;	/* starsystem name (see below) */
+};
+
+# define	Q_DISTRESSED	0200
+# define	Q_SYSTEM	077
+
+/*  systemname conventions:
+ *	1 -> NINHAB	index into Systemname table for live system.
+ *	+ Q_DISTRESSED	distressed starsystem -- systemname & Q_SYSTEM
+ *			is the index into the Event table which will
+ *			have the system name
+ *	0		dead or nonexistent starsystem
+ *
+ *  starchart ("scanned") conventions:
+ *	0 -> 999	taken as is
+ *	-1		not yet scanned ("...")
+ *	1000		supernova ("///")
+ *	1001		starbase + ??? (".1.")
+*/
+
+/* ascii names of systems */
+extern char	*Systemname[NINHAB];
+
+/* quadrant definition */
+struct quad	Quad[NQUADS][NQUADS];
+
+/* defines for sector map  (below) */
+# define	EMPTY		'.'
+# define	STAR		'*'
+# define	BASE		'#'
+# define	ENTERPRISE	'E'
+# define	QUEENE		'Q'
+# define	KLINGON		'K'
+# define	INHABIT		'@'
+# define	HOLE		' '
+
+/* current sector map */
+char	Sect[NSECTS][NSECTS];
+
+
+/************************ DEVICES ******************************/
+
+# define	NDEV		16	/* max number of devices */
+
+/* device tokens */
+# define	WARP		0	/* warp engines */
+# define	SRSCAN		1	/* short range scanners */
+# define	LRSCAN		2	/* long range scanners */
+# define	PHASER		3	/* phaser control */
+# define	TORPED		4	/* photon torpedo control */
+# define	IMPULSE		5	/* impulse engines */
+# define	SHIELD		6	/* shield control */
+# define	COMPUTER	7	/* on board computer */
+# define	SSRADIO		8	/* subspace radio */
+# define	LIFESUP		9	/* life support systems */
+# define	SINS		10	/* Space Inertial Navigation System */
+# define	CLOAK		11	/* cloaking device */
+# define	XPORTER		12	/* transporter */
+# define	SHUTTLE		13	/* shuttlecraft */
+
+/* device names */
+struct device
+{
+	char	*name;		/* device name */
+	char	*person;	/* the person who fixes it */
+};
+
+struct device	Device[NDEV];
+
+/***************************  EVENTS  ****************************/
+
+# define	NEVENTS		12	/* number of different event types */
+
+# define	E_LRTB		1	/* long range tractor beam */
+# define	E_KATSB		2	/* Klingon attacks starbase */
+# define	E_KDESB		3	/* Klingon destroys starbase */
+# define	E_ISSUE		4	/* distress call is issued */
+# define	E_ENSLV		5	/* Klingons enslave a quadrant */
+# define	E_REPRO		6	/* a Klingon is reproduced */
+# define	E_FIXDV		7	/* fix a device */
+# define	E_ATTACK	8	/* Klingon attack during rest period */
+# define	E_SNAP		9	/* take a snapshot for time warp */
+# define	E_SNOVA		10	/* supernova occurs */
+
+# define	E_GHOST		0100	/* ghost of a distress call if ssradio out */
+# define	E_HIDDEN	0200	/* event that is unreportable because ssradio out */
+# define	E_EVENT		077	/* mask to get event code */
+
+struct event
+{
+	char	x, y;			/* coordinates */
+	double	date;			/* trap stardate */
+	char	evcode;			/* event type */
+	char	systemname;		/* starsystem name */
+};
+/* systemname conventions:
+ *	1 -> NINHAB	index into Systemname table for reported distress calls
+ *
+ * evcode conventions:
+ *	1 -> NEVENTS-1	event type
+ *	+ E_HIDDEN	unreported (SSradio out)
+ *	+ E_GHOST	actually already expired
+ *	0		unallocated
+ */
+
+# define	MAXEVENTS	25	/* max number of concurrently pending events */
+
+struct event	Event[MAXEVENTS];	/* dynamic event list; one entry per pending event */
+
+/*****************************  KLINGONS  *******************************/
+
+struct kling
+{
+	char	x, y;		/* coordinates */
+	int	power;		/* power left */
+	double	dist;		/* distance to Enterprise */
+	double	avgdist;	/* average over this move */
+	char	srndreq;	/* set if surrender has been requested */
+};
+
+# define	MAXKLQUAD	9	/* maximum klingons per quadrant */
+
+/********************** MISCELLANEOUS ***************************/
+
+/* condition codes */
+# define	GREEN		0
+# define	DOCKED		1
+# define	YELLOW		2
+# define	RED		3
+
+/* starbase coordinates */
+# define	MAXBASES	9	/* maximum number of starbases in galaxy */
+
+/*  distress calls  */
+# define	MAXDISTR	5	/* maximum concurrent distress calls */
+
+/* phaser banks */
+# define	NBANKS		6	/* number of phaser banks */
+
+struct xy
+{
+	char	x, y;		/* coordinates */
+};
+
+
+/*
+ *	note that much of the stuff in the following structs CAN NOT
+ *	be moved around!!!!
+ */
+
+
+/* information regarding the state of the starship */
+struct
+{
+	double	warp;		/* warp factor */
+	double	warp2;		/* warp factor squared */
+	double	warp3;		/* warp factor cubed */
+	char	shldup;		/* shield up flag */
+	char	cloaked;	/* set if cloaking device on */
+	int	energy;		/* starship's energy */
+	int	shield;		/* energy in shields */
+	double	reserves;	/* life support reserves */
+	int	crew;		/* ship's complement */
+	int	brigfree;	/* space left in brig */
+	char	torped;		/* torpedoes */
+	char	cloakgood;	/* set if we have moved */
+	int	quadx;		/* quadrant x coord */
+	int	quady;		/* quadrant y coord */
+	int	sectx;		/* sector x coord */
+	int	secty;		/* sector y coord */
+	char	cond;		/* condition code */
+	char	sinsbad;	/* Space Inertial Navigation System condition */
+	char	*shipname;	/* name of current starship */
+	char	ship;		/* current starship */
+	int	distressed;	/* number of distress calls */
+}	Ship;
+
+/* sinsbad is set if SINS is working but not calibrated */
+
+/* game related information, mostly scoring */
+struct
+{
+	int	killk;		/* number of klingons killed */
+	int	deaths;		/* number of deaths onboard Enterprise */
+	char	negenbar;	/* number of hits on negative energy barrier */
+	char	killb;		/* number of starbases killed */
+	int	kills;		/* number of stars killed */
+	char	skill;		/* skill rating of player */
+	char	length;		/* length of game */
+	char	killed;		/* set if you were killed */
+	char	killinhab;	/* number of inhabited starsystems killed */
+	char	tourn;		/* set if a tournament game */
+	char	passwd[15];	/* game password */
+	char	snap;		/* set if snapshot taken */
+	char	helps;		/* number of help calls */
+	int	captives;	/* total number of captives taken */
+}	Game;
+
+/* per move information */
+struct
+{
+	char	free;		/* set if a move is free */
+	char	endgame;	/* end of game flag */
+	char	shldchg;	/* set if shields changed this move */
+	char	newquad;	/* set if just entered this quadrant */
+	char	resting;	/* set if this move is a rest */
+	double	time;		/* time used this move */
+}	Move;
+
+/* parametric information */
+struct
+{
+	char	bases;		/* number of starbases */
+	char	klings;		/* number of klingons */
+	double	date;		/* stardate */
+	double	time;		/* time left */
+	double	resource;	/* Federation resources */
+	int	energy;		/* starship's energy */
+	int	shield;		/* energy in shields */
+	double	reserves;	/* life support reserves */
+	int	crew;		/* size of ship's complement */
+	int	brigfree;	/* max possible number of captives */
+	char	torped;		/* photon torpedos */
+	double	damfac[NDEV];	/* damage factor */
+	double	dockfac;	/* docked repair time factor */
+	double	regenfac;	/* regeneration factor */
+	int	stopengy;	/* energy to do emergency stop */
+	int	shupengy;	/* energy to put up shields */
+	int	klingpwr;	/* Klingon initial power */
+	int	warptime;	/* time chewer multiplier */
+	double	phasfac;	/* Klingon phaser power eater factor */
+	char	moveprob[6];	/* probability that a Klingon moves */
+	double	movefac[6];	/* Klingon move distance multiplier */
+	double	eventdly[NEVENTS];	/* event time multipliers */
+	double	navigcrud[2];	/* navigation crudup factor */
+	int	cloakenergy;	/* cloaking device energy per stardate */
+	double	damprob[NDEV];	/* damage probability */
+	double	hitfac;		/* Klingon attack factor */
+	int	klingcrew;	/* number of Klingons in a crew */
+	double	srndrprob;	/* surrender probability */
+	int	energylow;	/* low energy mark (cond YELLOW) */
+}	Param;
+
+/* Sum of damage probabilities must add to 1000 */
+
+/* other information kept in a snapshot */
+struct
+{
+	char	bases;		/* number of starbases */
+	char	klings;		/* number of klingons */
+	double	date;		/* stardate */
+	double	time;		/* time left */
+	double	resource;	/* Federation resources */
+	char	distressed;	/* number of currently distressed quadrants */
+	struct event	*eventptr[NEVENTS];	/* pointer to event structs */
+	struct xy	base[MAXBASES];		/* locations of starbases */
+}	Now;
+
+/* Other stuff, not dumped in a snapshot */
+struct
+{
+	struct kling	klingon[MAXKLQUAD];	/* sorted Klingon list */
+	char		nkling;			/* number of Klingons in this sector */
+						/* < 0 means automatic override mode */
+	char		fast;			/* set if speed > 300 baud */
+	struct xy	starbase;	/* starbase in current quadrant */
+	char		snapshot[sizeof Quad + sizeof Event + sizeof Now];	/* snapshot for time warp */
+	char		statreport;		/* set to get a status report on a srscan */
+}	Etc;
+
+/*
+ *	eventptr is a pointer to the event[] entry of the last
+ *	scheduled event of each type.  Zero if no such event scheduled.
+ */
+
+/* Klingon move indicies */
+# define	KM_OB		0	/* Old quadrant, Before attack */
+# define	KM_OA		1	/* Old quadrant, After attack */
+# define	KM_EB		2	/* Enter quadrant, Before attack */
+# define	KM_EA		3	/* Enter quadrant, After attack */
+# define	KM_LB		4	/* Leave quadrant, Before attack */
+# define	KM_LA		5	/* Leave quadrant, After attack */
+
+/* you lose codes */
+# define	L_NOTIME	1	/* ran out of time */
+# define	L_NOENGY	2	/* ran out of energy */
+# define	L_DSTRYD	3	/* destroyed by a Klingon */
+# define	L_NEGENB	4	/* ran into the negative energy barrier */
+# define	L_SUICID	5	/* destroyed in a nova */
+# define	L_SNOVA		6	/* destroyed in a supernova */
+# define	L_NOLIFE	7	/* life support died (so did you) */
+# define	L_NOHELP	8	/* you could not be rematerialized */
+# define	L_TOOFAST	9	/* pretty stupid going at warp 10 */
+# define	L_STAR		10	/* ran into a star */
+# define	L_DSTRCT	11	/* self destructed */
+# define	L_CAPTURED	12	/* captured by Klingons */
+# define	L_NOCREW	13	/* you ran out of crew */
+
+/******************  COMPILE OPTIONS  ***********************/
+
+/* Trace info */
+# define	xTRACE		1
+int	Trace;