summaryrefslogtreecommitdiffstats
path: root/games/trek/autover.c
diff options
context:
space:
mode:
authorjkh <jkh@FreeBSD.org>1994-09-04 04:03:31 +0000
committerjkh <jkh@FreeBSD.org>1994-09-04 04:03:31 +0000
commit057afceb86e030ad65b0130436860d9a18066186 (patch)
treea0ced9c9b9278eb776d89cd2565c27ddcf020b51 /games/trek/autover.c
parenteedec95276cdb8aef98e92c5371000f10b8d6ba7 (diff)
downloadFreeBSD-src-057afceb86e030ad65b0130436860d9a18066186.zip
FreeBSD-src-057afceb86e030ad65b0130436860d9a18066186.tar.gz
Bring in the 4.4 Lite games directory, modulo man page changes and segregation
of the x11 based games. I'm not going to tag the originals with bsd_44_lite and do this in two stages since it's just not worth it for this collection, and I've got directory renames to deal with that way. Bleah. Submitted by: jkh
Diffstat (limited to 'games/trek/autover.c')
-rw-r--r--games/trek/autover.c77
1 files changed, 77 insertions, 0 deletions
diff --git a/games/trek/autover.c b/games/trek/autover.c
new file mode 100644
index 0000000..db7d19c
--- /dev/null
+++ b/games/trek/autover.c
@@ -0,0 +1,77 @@
+/*
+ * Copyright (c) 1980, 1993
+ * The 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.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)autover.c 8.1 (Berkeley) 5/31/93";
+#endif /* not lint */
+
+# include "trek.h"
+
+/*
+** Automatic Override
+**
+** If we should be so unlucky as to be caught in a quadrant
+** with a supernova in it, this routine is called. It is
+** called from checkcond().
+**
+** It sets you to a random warp (guaranteed to be over 6.0)
+** and starts sending you off "somewhere" (whereever that is).
+**
+** Please note that it is VERY important that you reset your
+** warp speed after the automatic override is called. The new
+** warp factor does not stay in effect for just this routine.
+**
+** This routine will never try to send you more than sqrt(2)
+** quadrants, since that is all that is needed.
+*/
+
+autover()
+{
+ double dist;
+ register int course;
+
+ printf("\07RED ALERT: The %s is in a supernova quadrant\n", Ship.shipname);
+ printf("*** Emergency override attempts to hurl %s to safety\n", Ship.shipname);
+ /* let's get our ass out of here */
+ Ship.warp = 6.0 + 2.0 * franf();
+ Ship.warp2 = Ship.warp * Ship.warp;
+ Ship.warp3 = Ship.warp2 * Ship.warp;
+ dist = 0.75 * Ship.energy / (Ship.warp3 * (Ship.shldup + 1));
+ if (dist > 1.4142)
+ dist = 1.4142;
+ course = ranf(360);
+ Etc.nkling = -1;
+ Ship.cond = RED;
+ warp(-1, course, dist);
+ attack(0);
+}
OpenPOWER on IntegriCloud