300 lines
5.8 KiB
C
300 lines
5.8 KiB
C
/* $NetBSD: fly.c,v 1.15 2012/10/13 19:58:53 dholland Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1983, 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. 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.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#ifndef lint
|
|
#if 0
|
|
static char sccsid[] = "@(#)fly.c 8.2 (Berkeley) 4/28/95";
|
|
#else
|
|
__RCSID("$NetBSD: fly.c,v 1.15 2012/10/13 19:58:53 dholland Exp $");
|
|
#endif
|
|
#endif /* not lint */
|
|
|
|
#include "extern.h"
|
|
#undef UP
|
|
#include <curses.h>
|
|
#include <assert.h>
|
|
|
|
#define MIDR (LINES/2 - 1)
|
|
#define MIDC (COLS/2 - 1)
|
|
|
|
static int row, column;
|
|
static int dr = 0, dc = 0;
|
|
static char destroyed;
|
|
int ourclock = 120; /* time for all the flights in the game */
|
|
static char cross = 0;
|
|
static sig_t oldsig;
|
|
|
|
static void blast(void);
|
|
static void endfly(void);
|
|
static void moveenemy(int);
|
|
static void notarget(void);
|
|
static void screen(void);
|
|
static void succumb(int);
|
|
static void target(void);
|
|
|
|
static void
|
|
succumb(int dummy __unused)
|
|
{
|
|
if (oldsig == SIG_DFL) {
|
|
endfly();
|
|
exit(1);
|
|
}
|
|
if (oldsig != SIG_IGN) {
|
|
endfly();
|
|
(*oldsig) (SIGINT);
|
|
}
|
|
}
|
|
|
|
int
|
|
visual(void)
|
|
{
|
|
destroyed = 0;
|
|
if (initscr() == NULL) {
|
|
puts("Whoops! No more memory...");
|
|
return (0);
|
|
}
|
|
oldsig = signal(SIGINT, succumb);
|
|
cbreak();
|
|
noecho();
|
|
screen();
|
|
row = rnd(LINES - 3) + 1;
|
|
column = rnd(COLS - 2) + 1;
|
|
moveenemy(0);
|
|
for (;;) {
|
|
switch (getchar()) {
|
|
|
|
case 'h':
|
|
case 'r':
|
|
dc = -1;
|
|
fuel--;
|
|
break;
|
|
|
|
case 'H':
|
|
case 'R':
|
|
dc = -5;
|
|
fuel -= 10;
|
|
break;
|
|
|
|
case 'l':
|
|
dc = 1;
|
|
fuel--;
|
|
break;
|
|
|
|
case 'L':
|
|
dc = 5;
|
|
fuel -= 10;
|
|
break;
|
|
|
|
case 'j':
|
|
case 'u':
|
|
dr = 1;
|
|
fuel--;
|
|
break;
|
|
|
|
case 'J':
|
|
case 'U':
|
|
dr = 5;
|
|
fuel -= 10;
|
|
break;
|
|
|
|
case 'k':
|
|
case 'd':
|
|
dr = -1;
|
|
fuel--;
|
|
break;
|
|
|
|
case 'K':
|
|
case 'D':
|
|
dr = -5;
|
|
fuel -= 10;
|
|
break;
|
|
|
|
case '+':
|
|
if (cross) {
|
|
cross = 0;
|
|
notarget();
|
|
} else
|
|
cross = 1;
|
|
break;
|
|
|
|
case ' ':
|
|
case 'f':
|
|
if (torps) {
|
|
torps -= 2;
|
|
blast();
|
|
if (row == MIDR && column < MIDC + 2 &&
|
|
column > MIDC - 2) {
|
|
destroyed = 1;
|
|
alarm(0);
|
|
}
|
|
} else
|
|
mvaddstr(0, 0, "*** Out of torpedoes. ***");
|
|
break;
|
|
|
|
case 'q':
|
|
endfly();
|
|
return (0);
|
|
|
|
default:
|
|
mvaddstr(0, 26, "Commands = r,R,l,L,u,U,d,D,f,+,q");
|
|
continue;
|
|
|
|
case EOF:
|
|
break;
|
|
}
|
|
if (destroyed) {
|
|
endfly();
|
|
return (1);
|
|
}
|
|
if (ourclock <= 0) {
|
|
endfly();
|
|
die();
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
screen(void)
|
|
{
|
|
int r, c, n;
|
|
int i;
|
|
|
|
clear();
|
|
i = rnd(100);
|
|
for (n = 0; n < i; n++) {
|
|
r = rnd(LINES - 3) + 1;
|
|
c = rnd(COLS);
|
|
mvaddch(r, c, '.');
|
|
}
|
|
mvaddstr(LINES - 1 - 1, 21, "TORPEDOES FUEL TIME");
|
|
refresh();
|
|
}
|
|
|
|
static void
|
|
target(void)
|
|
{
|
|
int n;
|
|
|
|
move(MIDR, MIDC - 10);
|
|
addstr("------- + -------");
|
|
for (n = MIDR - 4; n < MIDR - 1; n++) {
|
|
mvaddch(n, MIDC, '|');
|
|
mvaddch(n + 6, MIDC, '|');
|
|
}
|
|
}
|
|
|
|
static void
|
|
notarget(void)
|
|
{
|
|
int n;
|
|
|
|
move(MIDR, MIDC - 10);
|
|
addstr(" ");
|
|
for (n = MIDR - 4; n < MIDR - 1; n++) {
|
|
mvaddch(n, MIDC, ' ');
|
|
mvaddch(n + 6, MIDC, ' ');
|
|
}
|
|
}
|
|
|
|
static void
|
|
blast(void)
|
|
{
|
|
int n;
|
|
|
|
alarm(0);
|
|
move(LINES - 1, 24);
|
|
printw("%3d", torps);
|
|
for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
|
|
mvaddch(n, MIDC + MIDR - n, '/');
|
|
mvaddch(n, MIDC - MIDR + n, '\\');
|
|
refresh();
|
|
}
|
|
mvaddch(MIDR, MIDC, '*');
|
|
for (n = LINES - 1 - 2; n >= MIDR + 1; n--) {
|
|
mvaddch(n, MIDC + MIDR - n, ' ');
|
|
mvaddch(n, MIDC - MIDR + n, ' ');
|
|
refresh();
|
|
}
|
|
alarm(1);
|
|
}
|
|
|
|
static void
|
|
moveenemy(int dummy __unused)
|
|
{
|
|
double d;
|
|
int oldr, oldc;
|
|
|
|
oldr = row;
|
|
oldc = column;
|
|
if (fuel > 0) {
|
|
if (row + dr <= LINES - 3 && row + dr > 0)
|
|
row += dr;
|
|
if (column + dc < COLS - 1 && column + dc > 0)
|
|
column += dc;
|
|
} else
|
|
if (fuel < 0) {
|
|
fuel = 0;
|
|
mvaddstr(0, 60, "*** Out of fuel ***");
|
|
}
|
|
d = (double) ((row - MIDR) * (row - MIDR) + (column - MIDC) *
|
|
(column - MIDC));
|
|
if (d < 16) {
|
|
row += (rnd(9) - 4) % (4 - abs(row - MIDR));
|
|
column += (rnd(9) - 4) % (4 - abs(column - MIDC));
|
|
}
|
|
ourclock--;
|
|
mvaddstr(oldr, oldc - 1, " ");
|
|
if (cross)
|
|
target();
|
|
mvaddstr(row, column - 1, "/-\\");
|
|
move(LINES - 1, 24);
|
|
printw("%3d", torps);
|
|
move(LINES - 1, 42);
|
|
printw("%3d", fuel);
|
|
move(LINES - 1, 57);
|
|
printw("%3d", ourclock);
|
|
refresh();
|
|
signal(SIGALRM, moveenemy);
|
|
alarm(1);
|
|
}
|
|
|
|
static void
|
|
endfly(void)
|
|
{
|
|
alarm(0);
|
|
signal(SIGALRM, SIG_DFL);
|
|
mvcur(0, COLS - 1, LINES - 1, 0);
|
|
endwin();
|
|
signal(SIGTSTP, SIG_DFL);
|
|
signal(SIGINT, oldsig);
|
|
}
|