typedef struct {int x; int y;} coord;
-#define same(c1, c2) (c1.x == c2.x && c1.y == c2.y)
+#define square(i) ((i)*(i))
+#define same(c1, c2) ((c1.x == c2.x) && (c1.y == c2.y))
+#define distance(c1, c2) sqrt(square(c1.x - c2.x) + square(c1.y - c2.y))
typedef struct {
coord w;
typedef struct {
int snap, // snapshot taken
+ crew, // crew complement
+#define FULLCREW 428 /* BSD Trek was 387, that's wrong */
remkl, // remaining klingons
remcom, // remaining commanders
nscrem, // remaining super commanders
#define DDSP 14 // Added deep space probe
#define NDEVICES (15) // Number of devices
+#define damaged(dev) game.damage[dev] != 0.0
+
#define FOREVER 1e30
/* Define future events */
alive, // we are alive (not killed)
justin, // just entered quadrant
shldup, // shields are up
+ comhere, // commander here
+ ishere, // super-commander in quadrant
+ ientesc, // attempted escape from supercommander
+ ithere, // Tholian is here
resting, // rest time
+ icraft, // Kirk in Galileo
alldone, // game is now finished
neutz, // Romulan Neutral Zone
isarmed, // probe is armed
inorbit, // orbiting a planet
+ imine, // mining
+ icrystl, // dilithium crystals aboard
+ iseenit, // seen base attack report
thawed; // thawed game
int inkling, // initial number of klingons
inbase, // initial number of bases
condit, // condition (red/yellow/green/docked)
torps, // number of torpedoes
ship, // ship type -- 'E' is Enterprise
+ abandoned, // count of crew abandoned in space
length, // length of game
skill, // skill level
klhere, // klingons here
- comhere, // commanders here
casual, // causalties
nhelp, // calls for help
nkinks, // count of energy-barrier crossings
shldchg, // shield is changing (affects efficiency)
landed, // party on planet (1), on ship (-1)
iplnet, // planet # in quadrant
- imine, // mining
inplan, // initial planets
nenhere, // number of enemies in quadrant
- ishere, // super-commander in quandrant
irhere, // Romulans in quadrant
- icraft, // Kirk in Galileo
- ientesc, // attempted escape from supercommander
iscraft, // =1 if craft on ship, -1 if removed from game
isatb, // =1 if super commander is attacking base
iscate, // super commander is here
iattak, // attack recursion elimination (was cracks[4])
- icrystl, // dilithium crystals aboard
tourn, // tournament number
- ithere, // Tholian is here
- iseenit, // seen base attack report
proben, // number of moves for probe
nprobes; // number of probes available
double inresor, // initial resources
/* the Space Thingy's global state should *not* be saved! */
extern coord thing;
-extern int iqhere, iqengry;
+extern bool iqhere, iqengry;
typedef enum {FWON, FDEPLETE, FLIFESUP, FNRG, FBATTLE,
FNEG3, FNOVA, FSNOVAED, FABANDN, FDILITHIUM,
FMATERIALIZE, FPHASER, FLOST, FMINING, FDPLANET,
FPNOVA, FSSC, FSTRACTOR, FDRAY, FTRIBBLE,
- FHOLE} FINTYPE ;
+ FHOLE, FCREW} FINTYPE ;
enum loctype {neither, quadrant, sector};
#define IHR 'R'
/* Function prototypes */
void prelim(void);
-void attack(int);
+void attack(bool);
bool choose(bool);
-void setup(int);
+void setup(bool);
void score(void);
-void atover(int);
+void atover(bool);
int srscan(int);
void lrscan(void);
void phasers(void);
void photon(void);
void warp(bool);
void doshield(int);
-void dock(int);
+void dock(bool);
void dreprt(void);
-void chart(int);
+void chart(bool);
void rechart(void);
void impuls(void);
void wait(void);
void mayday(void);
void abandn(void);
void finish(FINTYPE);
-void dstrct(void);
+void selfdestruct(void);
void kaboom(void);
void freeze(bool);
-int thaw(void);
+bool thaw(void);
void plaque(void);
int scan(void);
#define IHEOL (0)
void prout(char *, ...);
void proutn(char *, ...);
void stars(void);
-void newqad(int);
+void newqad(bool);
bool ja(void);
void cramen(int);
void crmshp(void);
char *cramlc(enum loctype, coord w);
double expran(double);
double Rand(void);
-void iran(int, int *, int *);
-#define square(i) ((i)*(i))
-void dropin(int, coord*);
+coord iran(int);
+coord dropin(int);
void newcnd(void);
void sortkl(void);
void imove(void);
-void ram(int, int, coord);
-void crmena(int, int, int, coord w);
-void deadkl(coord, int, int, int);
+void ram(bool, int, coord);
+void crmena(bool, int, enum loctype, coord w);
+void deadkl(coord, int, coord);
void timwrp(void);
void movcom(void);
-void torpedo(double, double, int, int, double *, int, int);
+void torpedo(double, double, coord, double *, int, int);
void huh(void);
void pause_game(int);
-void nova(int, int);
-void snova(int, int);
+void nova(coord);
+void snova(bool, coord *);
void scom(bool *);
void hittem(double *);
void prouts(char *, ...);
void preport(void);
void orbit(void);
void sensor(void);
-void drawmaps(short);
+void drawmaps(int);
void beam(void);
void mine(void);
void usecrystals(void);
void shuttle(void);
void deathray(void);
void debugme(void);
-void attakreport(int);
+void attakreport(bool);
void movetho(void);
void probe(void);
void iostart(void);
void setwnd(WINDOW *);
void warble(void);
-void boom(int ii, int jj);
-void tracktorpedo(int ix, int iy, int l, int i, int n, int iquad);
+void boom(coord);
+void tracktorpedo(coord, int, int, int, int);
void cgetline(char *, int);
void waitfor(void);
void setpassword(void);
void makechart(void);
void enqueue(char *);
char *systemname(int);
-void newkling(int, coord *);
+coord newkling(int);
/* mode arguments for srscan() */
#define SCAN_FULL 1