|
|
1.1 root 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 are permitted provided
6: * that: (1) source distributions retain this entire copyright notice and
7: * comment, and (2) distributions including binaries display the following
8: * acknowledgement: ``This product includes software developed by the
9: * University of California, Berkeley and its contributors'' in the
10: * documentation or other materials provided with the distribution and in
11: * all advertising materials mentioning features or use of this software.
12: * Neither the name of the University nor the names of its contributors may
13: * be used to endorse or promote products derived from this software without
14: * specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
16: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
17: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)setwarp.c 5.4 (Berkeley) 6/1/90";
22: #endif /* not lint */
23:
24: # include "trek.h"
25: # include "getpar.h"
26:
27: /*
28: ** SET WARP FACTOR
29: **
30: ** The warp factor is set for future move commands. It is
31: ** checked for consistancy.
32: */
33:
34: setwarp()
35: {
36: double warpfac;
37:
38: warpfac = getfltpar("Warp factor");
39: if (warpfac < 0.0)
40: return;
41: if (warpfac < 1.0)
42: return (printf("Minimum warp speed is 1.0\n"));
43: if (warpfac > 10.0)
44: return (printf("Maximum speed is warp 10.0\n"));
45: if (warpfac > 6.0)
46: printf("Damage to warp engines may occur above warp 6.0\n");
47: Ship.warp = warpfac;
48: Ship.warp2 = Ship.warp * warpfac;
49: Ship.warp3 = Ship.warp2 * warpfac;
50: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.