Oops, fix lagg's type in LINT64.
[dragonfly.git] / games / battlestar / fly.c
blob8f308a541a7cc35de8d1b37aedbb09eba1696418
1 /*-
2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
29 * @(#)fly.c 8.1 (Berkeley) 5/31/93
30 * $FreeBSD: src/games/battlestar/fly.c,v 1.6.2.1 2001/03/05 11:45:36 kris Exp $
33 #include "externs.h"
34 #undef UP
35 #include <curses.h>
37 #define MIDR (LINES / 2 - 1)
38 #define MIDC (COLS / 2 - 1)
40 int row, column;
41 int dr = 0, dc = 0;
42 char destroyed;
43 int gclock = 120; /* gtime for all the flights in the game */
44 char cross = 0;
45 sig_t oldsig;
47 static void blast(void);
48 static void endfly(void);
49 static void moveenemy(int);
50 static void notarget(void);
51 static void succumb(int);
52 static void screen(void);
53 static void target(void);
55 static void
56 succumb(int sig __unused)
58 if (oldsig == SIG_DFL) {
59 endfly();
60 exit(1);
62 if (oldsig != SIG_IGN) {
63 endfly();
64 (*oldsig)(SIGINT);
68 int
69 visual(void)
71 destroyed = 0;
72 if (initscr() == NULL) {
73 puts("Whoops! No more memory...");
74 return (0);
76 oldsig = signal(SIGINT, succumb);
77 cbreak();
78 noecho();
79 screen();
80 row = rnd(LINES - 3) + 1;
81 column = rnd(COLS - 2) + 1;
82 moveenemy(0);
83 for (;;) {
84 switch (getchar()) {
85 case 'h':
86 case 'r':
87 dc = -1;
88 fuel--;
89 break;
91 case 'H':
92 case 'R':
93 dc = -5;
94 fuel -= 10;
95 break;
97 case 'l':
98 dc = 1;
99 fuel--;
100 break;
102 case 'L':
103 dc = 5;
104 fuel -= 10;
105 break;
107 case 'j':
108 case 'u':
109 dr = 1;
110 fuel--;
111 break;
113 case 'J':
114 case 'U':
115 dr = 5;
116 fuel -= 10;
117 break;
119 case 'k':
120 case 'd':
121 dr = -1;
122 fuel--;
123 break;
125 case 'K':
126 case 'D':
127 dr = -5;
128 fuel -= 10;
129 break;
131 case '+':
132 if (cross) {
133 cross = 0;
134 notarget();
135 } else
136 cross = 1;
137 break;
139 case ' ':
140 case 'f':
141 if (torps) {
142 torps -= 2;
143 blast();
144 if (row == MIDR && column - MIDC < 2 &&
145 MIDC - column < 2) {
146 destroyed = 1;
147 alarm(0);
149 } else
150 mvaddstr(0, 0, "*** Out of torpedoes. ***");
151 break;
153 case 'q':
154 endfly();
155 return (0);
157 default:
158 mvaddstr(0, 26, "Commands = r,R,l,L,u,U,d,D,f,+,q");
159 continue;
161 case EOF:
162 break;
164 if (destroyed) {
165 endfly();
166 return (1);
168 if (gclock <= 0) {
169 endfly();
170 die(0);
173 /* NOTREACHED */
174 return (1);
177 static void
178 screen(void)
180 int r, c, n;
181 int i;
183 clear();
184 i = rnd(100);
185 for (n = 0; n < i; n++) {
186 r = rnd(LINES - 3) + 1;
187 c = rnd(COLS);
188 mvaddch(r, c, '.');
190 mvaddstr(LINES - 1 - 1, 21, "TORPEDOES FUEL TIME");
191 refresh();
194 static void
195 target(void)
197 int n;
199 move(MIDR, MIDC - 10);
200 addstr("------- + -------");
201 for (n = MIDR - 4; n < MIDR - 1; n++) {
202 mvaddch(n, MIDC, '|');
203 mvaddch(n + 6, MIDC, '|');
207 static void
208 notarget(void)
210 int n;
212 move(MIDR, MIDC - 10);
213 addstr(" ");
214 for (n = MIDR - 4; n < MIDR - 1; n++) {
215 mvaddch(n, MIDC, ' ');
216 mvaddch(n + 6, MIDC, ' ');
220 static void
221 blast(void)
223 int n;
225 alarm(0);
226 move(LINES - 1, 24);
227 printw((char *)(uintptr_t)(const void *)"%3d", torps);
228 for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
229 mvaddch(n, MIDC + MIDR - n, '/');
230 mvaddch(n, MIDC - MIDR + n, '\\');
231 refresh();
233 mvaddch(MIDR, MIDC, '*');
234 for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
235 mvaddch(n, MIDC + MIDR - n, ' ');
236 mvaddch(n, MIDC - MIDR + n, ' ');
237 refresh();
239 alarm(1);
242 static void
243 moveenemy(__unused int sig)
245 double d;
246 int oldr, oldc;
248 sig = 0;
249 oldr = row;
250 oldc = column;
251 if (fuel > 0) {
252 if (row + dr <= LINES - 3 && row + dr > 0)
253 row += dr;
254 if (column + dc < COLS - 1 && column + dc > 0)
255 column += dc;
256 } else if (fuel < 0) {
257 fuel = 0;
258 mvaddstr(0, 60, "*** Out of fuel ***");
260 d = (double)((row - MIDR) * (row - MIDR) + (column - MIDC) *
261 (column - MIDC));
262 if (d < 16) {
263 row += (rnd(9) - 4) % (4 - abs(row - MIDR));
264 column += (rnd(9) - 4) % (4 - abs(column - MIDC));
266 gclock--;
267 mvaddstr(oldr, oldc - 1, " ");
268 if (cross)
269 target();
270 mvaddstr(row, column - 1, "/-\\");
271 move(LINES - 1, 24);
272 printw((char *)(uintptr_t)(const void *)"%3d", torps);
273 move(LINES - 1, 42);
274 printw((char *)(uintptr_t)(const void *)"%3d", fuel);
275 move(LINES - 1, 57);
276 printw((char *)(uintptr_t)(const void *)"%3d", gclock);
277 refresh();
278 signal(SIGALRM, moveenemy);
279 alarm(1);
282 static void
283 endfly(void)
285 alarm(0);
286 signal(SIGALRM, SIG_DFL);
287 mvcur(0, COLS - 1, LINES - 1, 0);
288 endwin();
289 setlinebuf(stdout);
290 signal(SIGTSTP, SIG_DFL);
291 signal(SIGINT, oldsig);