usr/src/games/trek/setwarp.c

/*
 * Copyright (c) 1980 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms are permitted
 * provided that the above copyright notice and this paragraph are
 * duplicated in all such forms and that any documentation,
 * advertising materials, and other materials related to such
 * distribution and use acknowledge that the software was developed
 * by the University of California, Berkeley.  The name of the
 * University may not be used to endorse or promote products derived
 * from this software without specific prior written permission.
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */

#ifndef lint
static char sccsid[] = "@(#)setwarp.c   5.3 (Berkeley) %G%";
#endif /* not lint */

# include       "trek.h"
# include       "getpar.h"

/*
**  SET WARP FACTOR
**
**      The warp factor is set for future move commands.  It is
**      checked for consistancy.
*/

setwarp()
{
        double  warpfac;

        warpfac = getfltpar("Warp factor");
        if (warpfac < 0.0)
                return;
        if (warpfac < 1.0)
                return (printf("Minimum warp speed is 1.0\n"));
        if (warpfac > 10.0)
                return (printf("Maximum speed is warp 10.0\n"));
        if (warpfac > 6.0)
                printf("Damage to warp engines may occur above warp 6.0\n");
        Ship.warp = warpfac;
        Ship.warp2 = Ship.warp * warpfac;
        Ship.warp3 = Ship.warp2 * warpfac;
}