static int
playagain(void)
{
int j;
ship_t *ss;
for (ss = cpuship; ss < cpuship + SHIPTYPES; ss++)
for (j = 0; j < ss->length; j++) {
cgoto(ss->y + j * yincr[ss->dir], ss->x + j * xincr[ss->dir]);
(void) addch((chtype) ss->symbol);
}
if (awinna())
++cpuwon;
else
++plywon;
j = 18 + (int) strlen(name);
if (plywon >= 10)
++j;
if (cpuwon >= 10)
++j;
(void) mvprintw(1, (COLWIDTH - j) / 2,
"%s: %d Computer: %d", name, plywon, cpuwon);
prompt(2, (awinna())? "Want to be humiliated again, %s [yn]? "
: "Going to give me a chance for revenge, %s [yn]? ", name);
return (sgetc("YN") == 'Y');
}
int
main(int argc, char *argv[])
{
if (pledge("stdio rpath tty", NULL) == -1)
err(1, "pledge");
do_options(argc, argv);
intro();
do {
initgame();
while(awinna() == -1)
{
if (!blitz)
{
if (!salvo)
{
if(turn)
(void) cputurn();
else
(void) plyturn();
}
else /* salvo */
{
int i;
i = scount(turn);
while (i--)
{
if (turn)
{
if (cputurn() && awinna() != -1)
i = 0;
}
else
{
if (plyturn() && awinna() != -1)
i = 0;
}
}
}
}
else /* blitz */
while(turn ? cputurn() : plyturn())
{
if (turn) /* Pause between successive computer shots */
{
(void)refresh();
(void)sleep(1);
}
if (awinna() != -1)
break;
}
turn = OTHER;
}
} while
(playagain());
uninitgame(0);
return 0;
}
static bool
plyturn(void)
{
ship_t *ss;
bool hit;
NCURSES_CONST char *m = NULL;
prompt(1, "Where do you want to shoot? ", "");
for (;;) {
(void) getcoord(COMPUTER);
if (hits[PLAYER][curx][cury]) {
prompt(1, "You shelled this spot already! Try again.", "");
beep();
} else
break;
}
hit = IS_SHIP(board[COMPUTER][curx][cury]);
hits[PLAYER][curx][cury] = (hit ? MARK_HIT : MARK_MISS);
cgoto(cury, curx);
#ifdef A_COLOR
if (has_colors()) {
if (hit)
attron(COLOR_PAIR(COLOR_RED));
else
attron(COLOR_PAIR(COLOR_GREEN));
}
#endif /* A_COLOR */
(void) addch((chtype) hits[PLAYER][curx][cury]);
#ifdef A_COLOR
attrset(0);
#endif /* A_COLOR */
prompt(1, "You %s.", hit ? "scored a hit" : "missed");
if (hit && (ss = hitship(curx, cury))) {
switch (rnd(5)) {
case 0:
m = " You sank my %s!";
break;
case 1:
m = " I have this sinking feeling about my %s....";
break;
case 2:
m = " My %s has gone to Davy Jones's locker!";
break;
case 3:
m = " Glub, glub -- my %s is headed for the bottom!";
break;
case 4:
m = " You'll pick up survivors from my %s, I hope...!";
break;
}
(void) printw(m, ss->name);
(void) beep();
return (awinna() == -1);
}
return (hit);
}
int
main(int argc, char *argv[])
{
setlocale(LC_ALL, "");
do_options(argc, argv);
intro();
do {
initgame();
while (awinna() == -1) {
if (!blitz) {
if (!salvo) {
if (turn)
(void) cputurn();
else
(void) plyturn();
} else {
register int i;
i = scount(turn);
while (i--) {
if (turn) {
if (cputurn() && awinna() != -1)
i = 0;
} else {
if (plyturn() && awinna() != -1)
i = 0;
}
}
}
} else
while ((turn ? cputurn() : plyturn()) && awinna() == -1)
continue;
turn = OTHER;
}
} while
(playagain());
uninitgame(0);
/*NOTREACHED */
}
int
main(int argc, char **argv)
{
do_options(argc, argv);
intro();
do {
initgame();
while(awinna() == -1) {
if (!blitz) {
if (!salvo) {
if (turn)
cputurn();
else plyturn();
} else {
register int i;
i = scount(turn);
while (i--) {
if (turn)
if (cputurn())
if (awinna() != -1)
i = 0;
else
if(plyturn())
if (awinna() != -1)
i = 0;
}
}
} else {
while((turn) ? cputurn() : plyturn());
}
turn = OTHER;
}
} while(playagain());
uninitgame();
exit(0);
}
/*
* This code implements a fairly irregular FSM, so please forgive the rampant
* unstructuredness below. The five labels are states which need to be held
* between computer turns.
*/
static bool
cputurn(void)
{
#define POSSIBLE(x, y) (ONBOARD(x, y) && !hits[COMPUTER][x][y])
#define RANDOM_FIRE 0
#define RANDOM_HIT 1
#define HUNT_DIRECT 2
#define FIRST_PASS 3
#define REVERSE_JUMP 4
#define SECOND_PASS 5
static int next = RANDOM_FIRE;
static bool used[4];
static ship_t ts;
int navail, x, y, d, n;
int hit = S_MISS;
switch (next) {
case RANDOM_FIRE: /* last shot was random and missed */
refire:
randomfire(&x, &y);
if (!(hit = cpufire(x, y)))
next = RANDOM_FIRE;
else {
ts.x = x;
ts.y = y;
ts.hits = 1;
next = (hit == S_SUNK) ? RANDOM_FIRE : RANDOM_HIT;
}
break;
case RANDOM_HIT: /* last shot was random and hit */
used[E / 2] = used[S / 2] = used[W / 2] = used[N / 2] = FALSE;
/* FALLTHROUGH */
case HUNT_DIRECT: /* last shot hit, we're looking for ship's long axis */
for (d = navail = 0; d < 4; d++) {
x = ts.x + xincr[d * 2];
y = ts.y + yincr[d * 2];
if (!used[d] && POSSIBLE(x, y))
navail++;
else
used[d] = TRUE;
}
if (navail == 0) /* no valid places for shots adjacent... */
goto refire; /* ...so we must random-fire */
else {
for (d = 0, n = rnd(navail) + 1; n; n--)
while (used[d])
d++;
assert(d <= 4);
used[d] = FALSE;
x = ts.x + xincr[d * 2];
y = ts.y + yincr[d * 2];
assert(POSSIBLE(x, y));
if (!(hit = cpufire(x, y)))
next = HUNT_DIRECT;
else {
ts.x = x;
ts.y = y;
ts.dir = d * 2;
ts.hits++;
next = (hit == S_SUNK) ? RANDOM_FIRE : FIRST_PASS;
}
}
break;
case FIRST_PASS: /* we have a start and a direction now */
x = ts.x + xincr[ts.dir];
y = ts.y + yincr[ts.dir];
if (POSSIBLE(x, y) && (hit = cpufire(x, y))) {
ts.x = x;
ts.y = y;
ts.hits++;
next = (hit == S_SUNK) ? RANDOM_FIRE : FIRST_PASS;
} else
next = REVERSE_JUMP;
break;
case REVERSE_JUMP: /* nail down the ship's other end */
d = ts.dir + 4;
x = ts.x + ts.hits * xincr[d];
y = ts.y + ts.hits * yincr[d];
if (POSSIBLE(x, y) && (hit = cpufire(x, y))) {
ts.x = x;
ts.y = y;
ts.dir = d;
ts.hits++;
next = (hit == S_SUNK) ? RANDOM_FIRE : SECOND_PASS;
} else
next = RANDOM_FIRE;
break;
case SECOND_PASS: /* kill squares not caught on first pass */
x = ts.x + xincr[ts.dir];
y = ts.y + yincr[ts.dir];
if (POSSIBLE(x, y) && (hit = cpufire(x, y))) {
ts.x = x;
ts.y = y;
ts.hits++;
next = (hit == S_SUNK) ? RANDOM_FIRE : SECOND_PASS;
break;
} else
next = RANDOM_FIRE;
break;
}
/* check for continuation and/or winner */
if (salvo) {
(void) refresh();
(void) sleep(1);
}
if (awinna() != -1)
return (FALSE);
#ifdef DEBUG
(void) mvprintw(PROMPTLINE + 2, 0,
"New state %d, x=%d, y=%d, d=%d",
next, x, y, d);
#endif /* DEBUG */
return ((hit) ? TRUE : FALSE);
}
int
main(int argc, char **argv)
{
int ch;
/* revoke */
setgid(getgid());
while ((ch = getopt(argc, argv, "bsc")) != -1) {
switch (ch) {
case 'b':
blitz = 1;
break;
case 's':
salvo = 1;
break;
case 'c':
closepack = 1;
break;
case '?':
default:
usage();
}
}
argc -= optind;
argv += optind;
if (blitz && salvo)
usage();
intro();
do {
initgame();
while(awinna() == -1) {
if (blitz) {
while(turn ? cputurn() : plyturn())
continue;
} else if (salvo) {
int i;
i = scount(turn);
while (i--) {
if (turn) {
if (cputurn() && awinna() != -1)
i = 0;
} else {
if (plyturn() && awinna() != -1)
i = 0;
}
}
} else { /* Normal game */
if(turn)
cputurn();
else
plyturn();
}
turn = OTHER;
}
} while (playagain());
uninitgame();
exit(0);
}
