-/* $NetBSD: dr_1.c,v 1.7 1998/08/30 09:19:40 veego Exp $ */
+/* $NetBSD: dr_1.c,v 1.27 2009/03/14 22:52:52 dholland Exp $ */
/*
* Copyright (c) 1983, 1993
* 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. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
+ * 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.
*
#if 0
static char sccsid[] = "@(#)dr_1.c 8.1 (Berkeley) 5/31/93";
#else
-__RCSID("$NetBSD: dr_1.c,v 1.7 1998/08/30 09:19:40 veego Exp $");
+__RCSID("$NetBSD: dr_1.c,v 1.27 2009/03/14 22:52:52 dholland Exp $");
#endif
#endif /* not lint */
-#include "driver.h"
+#include <ctype.h>
+#include <stdio.h>
#include <stdlib.h>
+#include <string.h>
+#include "extern.h"
+#include "driver.h"
+
+static int fightitout(struct ship *, struct ship *, int);
void
-unfoul()
+unfoul(void)
{
struct ship *sp;
struct ship *to;
nat = capship(sp)->nationality;
foreachship(to) {
if (nat != capship(to)->nationality &&
- !toughmelee(sp, to, 0, 0))
+ !is_toughmelee(sp, to, 0, 0))
continue;
for (i = fouled2(sp, to); --i >= 0;)
- if (die() <= 2)
+ if (dieroll() <= 2)
cleanfoul(sp, to, 0);
}
}
}
void
-boardcomp()
+boardcomp(void)
{
int crew[3];
struct ship *sp, *sq;
/* OBP */
sendbp(sp, sq, crew[0]*100, 0);
crew[0] = 0;
- } else if (crew[1]){
+ } else if (crew[1]) {
/* OBP */
sendbp(sp, sq, crew[1]*10, 0);
crew[1] = 0;
}
}
-int
-fightitout(from, to, key)
-struct ship *from, *to;
-int key;
+static int
+fightitout(struct ship *from, struct ship *to, int key)
{
struct ship *fromcap, *tocap;
int crewfrom[3], crewto[3], menfrom, mento;
int pcto, pcfrom, fromstrength, strengthto, frominjured, toinjured;
int topoints;
- int index, totalfrom = 0, totalto = 0;
+ int indx, totalfrom = 0, totalto = 0;
int count;
char message[60];
((fromstrength < strengthto * 3 && strengthto < fromstrength * 3)
|| fromstrength == -1) && count < 4;
count++) {
- index = fromstrength/10;
- if (index > 8)
- index = 8;
- toinjured = MT[index][2 - die() / 3];
+ indx = fromstrength/10;
+ if (indx > 8)
+ indx = 8;
+ toinjured = MT[indx][2 - dieroll() / 3];
totalto += toinjured;
- index = strengthto/10;
- if (index > 8)
- index = 8;
- frominjured = MT[index][2 - die() / 3];
+ indx = strengthto/10;
+ if (indx > 8)
+ indx = 8;
+ frominjured = MT[indx][2 - dieroll() / 3];
totalfrom += frominjured;
menfrom -= frominjured;
mento -= toinjured;
}
if (fromstrength >= strengthto * 3 || count == 4) {
unboard(to, from, 0);
- subtract(from, totalfrom, crewfrom, fromcap, pcfrom);
- subtract(to, totalto, crewto, tocap, pcto);
+ subtract(from, fromcap, totalfrom, crewfrom, pcfrom);
+ subtract(to, tocap, totalto, crewto, pcto);
makemsg(from, "boarders from %s repelled", to->shipname);
- (void) sprintf(message, "killed in melee: %d. %s: %d",
+ snprintf(message, sizeof(message),
+ "killed in melee: %d. %s: %d",
totalto, from->shipname, totalfrom);
- Write(W_SIGNAL, to, 1, (long) message, 0, 0, 0);
+ send_signal(to, message);
if (key)
return 1;
} else if (strengthto >= fromstrength * 3) {
unboard(from, to, 0);
- subtract(from, totalfrom, crewfrom, fromcap, pcfrom);
- subtract(to, totalto, crewto, tocap, pcto);
+ subtract(from, fromcap, totalfrom, crewfrom, pcfrom);
+ subtract(to, tocap, totalto, crewto, pcto);
if (key) {
if (fromcap != from)
- Write(W_POINTS, fromcap, 0,
+ send_points(fromcap,
fromcap->file->points -
from->file->struck
? from->specs->pts
- : 2 * from->specs->pts,
- 0, 0, 0);
+ : 2 * from->specs->pts);
-/* ptr1 points to the shipspec for the ship that was just unboarded.
- I guess that what is going on here is that the pointer is multiplied
- or something. */
-
- Write(W_CAPTURED, from, 0, to->file->index, 0, 0, 0);
+ send_captured(from, to->file->index);
topoints = 2 * from->specs->pts + to->file->points;
if (from->file->struck)
topoints -= from->specs->pts;
- Write(W_POINTS, to, 0, topoints, 0, 0, 0);
+ send_points(to, topoints);
mento = crewto[0] ? crewto[0] : crewto[1];
if (mento) {
- subtract(to, mento, crewto, tocap, pcto);
- subtract(from, - mento, crewfrom, to, 0);
+ subtract(to, tocap, mento, crewto, pcto);
+ subtract(from, to, - mento, crewfrom, 0);
}
- (void) sprintf(message, "captured by the %s!",
- to->shipname);
- Write(W_SIGNAL, from, 1, (long) message, 0, 0, 0);
- (void) sprintf(message, "killed in melee: %d. %s: %d",
+ snprintf(message, sizeof(message),
+ "captured by the %s!", to->shipname);
+ send_signal(from, message);
+ snprintf(message, sizeof(message),
+ "killed in melee: %d. %s: %d",
totalto, from->shipname, totalfrom);
- Write(W_SIGNAL, to, 1, (long) message, 0, 0, 0);
+ send_signal(to, message);
mento = 0;
return 0;
}
}
void
-resolve()
+resolve(void)
{
int thwart;
struct ship *sp, *sq;
if (sp->file->dir == 0)
continue;
for (sq = sp + 1; sq < ls; sq++)
- if (sq->file->dir && meleeing(sp, sq) && meleeing(sq, sp))
- (void) fightitout(sp, sq, 0);
+ if (sq->file->dir && meleeing(sp, sq) &&
+ meleeing(sq, sp))
+ fightitout(sp, sq, 0);
thwart = 2;
foreachship(sq) {
if (sq->file->dir && meleeing(sq, sp))
}
void
-compcombat()
+compcombat(void)
{
int n;
struct ship *sp;
struct ship *closest;
int crew[3], men = 0, target, temp;
int r, guns, ready, load, car;
- int index, rakehim, sternrake;
+ int indx, rakehim, sternrake;
int shootat, hit;
foreachship(sp) {
if (sp->file->DBP[n].turnsent)
men += sp->file->DBP[n].mensent;
}
- if (men){
+ if (men) {
crew[0] = men/100 ? 0 : crew[0] != 0;
crew[1] = (men%100)/10 ? 0 : crew[1] != 0;
crew[2] = men%10 ? 0 : crew[2] != 0;
closest = closestenemy(sp, r ? 'r' : 'l', 0);
if (closest == 0)
continue;
- if (range(closest, sp) > range(sp, closestenemy(sp, r ? 'r' : 'l', 1)))
+ if (range(closest, sp) >
+ range(sp, closestenemy(sp, r ? 'r' : 'l', 1)))
continue;
if (closest->file->struck)
continue;
if (temp > 8)
temp -= 8;
sternrake = temp > 4 && temp < 6;
- index = guns;
+ indx = guns;
if (target < 3)
- index += car;
- index = (index - 1) / 3;
- index = index > 8 ? 8 : index;
+ indx += car;
+ indx = (indx - 1) / 3;
+ indx = indx > 8 ? 8 : indx;
if (!rakehim)
- hit = HDT[index][target-1];
+ hit = HDT[indx][target-1];
else
- hit = HDTrake[index][target-1];
+ hit = HDTrake[indx][target-1];
if (rakehim && sternrake)
hit++;
- hit += QUAL[index][capship(sp)->specs->qual - 1];
- for (n = 0; n < 3 && sp->file->captured == 0; n++)
+ hit += QUAL[indx][capship(sp)->specs->qual - 1];
+ for (n = 0; n < 3 && sp->file->captured == 0; n++) {
if (!crew[n]) {
- if (index <= 5)
+ if (indx <= 5)
hit--;
else
hit -= 2;
}
+ }
if (ready & R_INITIAL) {
if (!r)
sp->file->readyL &= ~R_INITIAL;
else
sp->file->readyR &= ~R_INITIAL;
- if (index <= 3)
+ if (indx <= 3)
hit++;
else
hit += 2;
}
if (sp->file->captured != 0) {
- if (index <= 1)
+ if (indx <= 1)
hit--;
else
hit -= 2;
}
- hit += AMMO[index][load - 1];
+ hit += AMMO[indx][load - 1];
temp = sp->specs->class;
if ((temp >= 5 || temp == 1) && windspeed == 5)
hit--;
if (hit >= 0) {
if (load != L_GRAPE)
hit = hit > 10 ? 10 : hit;
- table(shootat, load, hit, closest, sp, die());
+ table(sp, closest, shootat, load, hit,
+ dieroll());
}
}
}
}
int
-next()
+next(void)
{
if (++turn % 55 == 0) {
if (alive)
bestship = s;
}
}
- if (best > 0.0) {
- char *p = getenv("WOTD");
- if (p == 0)
+ if (best > 0.0 && bestship) {
+ char *tp = getenv("WOTD");
+ const char *p;
+ if (tp == 0)
p = "Driver";
- if (islower(*p))
- *p = toupper(*p);
- (void) strncpy(bestship->file->captain, p,
+ else {
+ *tp = toupper((unsigned char)*tp);
+ p = tp;
+ }
+ strlcpy(bestship->file->captain, p,
sizeof bestship->file->captain);
- bestship->file->captain
- [sizeof bestship->file->captain - 1] = 0;
logger(bestship);
}
return -1;
}
- Write(W_TURN, SHIP(0), 0, turn, 0, 0, 0);
- if (turn % 7 == 0 && (die() >= cc->windchange || !windspeed)) {
- switch (die()) {
+ send_turn(turn);
+ if (turn % 7 == 0 && (dieroll() >= cc->windchange || !windspeed)) {
+ switch (dieroll()) {
case 1:
winddir = 1;
break;
if (winddir < 1)
winddir += 8;
if (windspeed)
- switch (die()) {
+ switch (dieroll()) {
case 1:
case 2:
windspeed--;
}
else
windspeed++;
- Write(W_WIND, SHIP(0), 0, winddir, windspeed, 0, 0);
+ send_wind( winddir, windspeed);
}
return 0;
}
git.ckatri.com / bsdgames-darwin.git / blobdiff