1: /*      $NetBSD: autover.c,v 1.5 2003/08/07 09:37:49 agc Exp $       */
    2: 
    3: /*
    4:  * Copyright (c) 1980, 1993
    5:  *      The Regents of the University of California.  All rights reserved.
    6:  *
    7:  * Redistribution and use in source and binary forms, with or without
    8:  * modification, are permitted provided that the following conditions
    9:  * are met:
   10:  * 1. Redistributions of source code must retain the above copyright
   11:  *    notice, this list of conditions and the following disclaimer.
   12:  * 2. Redistributions in binary form must reproduce the above copyright
   13:  *    notice, this list of conditions and the following disclaimer in the
   14:  *    documentation and/or other materials provided with the distribution.
   15:  * 3. Neither the name of the University nor the names of its contributors
   16:  *    may be used to endorse or promote products derived from this software
   17:  *    without specific prior written permission.
   18:  *
   19:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   20:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   21:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   22:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   23:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   24:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   25:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   26:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   27:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   28:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   29:  * SUCH DAMAGE.
   30:  */
   31: 
   32: #include <sys/cdefs.h>
   33: #ifndef lint
   34: #if 0
   35: static char sccsid[] = "@(#)autover.c   8.1 (Berkeley) 5/31/93";
   36: #else
   37: __RCSID("$NetBSD: autover.c,v 1.5 2003/08/07 09:37:49 agc Exp $");
   38: #endif
   39: #endif /* not lint */
   40: 
   41: #include <stdio.h>
   42: #include "trek.h"
   43: 
   44: /*
   45: **  Automatic Override
   46: **
   47: **      If we should be so unlucky as to be caught in a quadrant
   48: **      with a supernova in it, this routine is called.  It is
   49: **      called from checkcond().
   50: **
   51: **      It sets you to a random warp (guaranteed to be over 6.0)
   52: **      and starts sending you off "somewhere" (whereever that is).
   53: **
   54: **      Please note that it is VERY important that you reset your
   55: **      warp speed after the automatic override is called.  The new
   56: **      warp factor does not stay in effect for just this routine.
   57: **
   58: **      This routine will never try to send you more than sqrt(2)
   59: **      quadrants, since that is all that is needed.
   60: */
   61: 
   62: void
   63: autover()
   64: {
   65:         double                 dist;
   66:         int            course;
   67: 
   68:         printf("\07RED ALERT:  The %s is in a supernova quadrant\n", Ship.shipname);
   69:         printf("***  Emergency override attempts to hurl %s to safety\n", Ship.shipname);
   70:         /* let's get our ass out of here */
   71:         Ship.warp = 6.0 + 2.0 * franf();
   72:         Ship.warp2 = Ship.warp * Ship.warp;
   73:         Ship.warp3 = Ship.warp2 * Ship.warp;
   74:         dist = 0.75 * Ship.energy / (Ship.warp3 * (Ship.shldup + 1));
   75:         if (dist > 1.4142)
   76:                 dist = 1.4142;
   77:         course = ranf(360);
   78:         Etc.nkling = -1;
   79:         Ship.cond = RED;
   80:         warp(-1, course, dist);
   81:         attack(0);
   82: }