return 0;
}
+/*
+** Abandon Ship
+**
+** The ship is abandoned. If your current ship is the Faire
+** Queene, or if your shuttlecraft is dead, you're out of
+** luck. You need the shuttlecraft in order for the captain
+** (that's you!!) to escape.
+**
+** Your crew can beam to an inhabited starsystem in the
+** quadrant, if there is one and if the transporter is working.
+** If there is no inhabited starsystem, or if the transporter
+** is out, they are left to die in outer space.
+**
+** If there are no starbases left, you are captured by the
+** Klingons, who torture you mercilessly. However, if there
+** is at least one starbase, you are returned to the
+** Federation in a prisoner of war exchange. Of course, this
+** can't happen unless you have taken some prisoners.
+**
+*/
+
void abandn(void)
{
int nb, l;
+ struct quadrant *q;
chew();
if (game.condit==IHDOCKED) {
prouts("***ALL HANDS ABANDON SHIP!");
skip(2);
prout("Captain and crew escape in shuttle craft.");
- prout("Remainder of ship's complement beam down");
- prout("to nearest habitable planet.");
if (game.state.rembase==0) {
/* Oops! no place to go... */
finish(FABANDN);
return;
}
+ q = &game.state.galaxy[game.quadrant.x][game.quadrant.y];
+ /* Dispose of crew */
+ if (!(game.options & OPTION_WORLDS) && !damaged(DTRANSP)) {
+ prout("Remainder of ship's complement beam down");
+ prout("to nearest habitable planet.");
+ } else if (q->planet != NOPLANET && !damaged(DTRANSP)) {
+ prout("Remainder of ship's complement beam down");
+ prout("to %s.", systemname(q->planet));
+ } else {
+ prout("Entire crew of %d left to die in outer space.");
+ }
+
/* If at least one base left, give 'em the Faerie Queene */
skip(1);
game.icrystl = 0; /* crystals are lost */
prout("still useable.");
if (game.icrystl!=0) prout("The dilithium crystals have been moved.");
game.imine=0;
- game.iscraft=0; /* Gallileo disappears */
+ game.iscraft=0; /* Galileo disappears */
/* Resupply ship */
game.condit=IHDOCKED;
for (l = 0; l < NDEVICES; l++)
game.shield = game.inshld = 1250.0;
game.torps = game.intorps = 6;
game.lsupres=game.inlsr=3.0;
- game.shldup=0;
+ game.shldup=false;
game.warpfac=5.0;
game.wfacsq=25.0;
return;
game.ship = IHE;
game.energy = game.inenrg = 5000.0;
game.shield = game.inshld = 2500.0;
- game.shldchg = game.shldup = 0;
+ game.shldchg = 0;
+ game.shldup = false;
game.inlsr = 4.0;
game.lsupres = 4.0;
iran(GALSIZE, &game.quadrant.x, &game.quadrant.y);
// Set up assorted game parameters
game.battle.x = game.battle.y = 0;
game.state.date = game.indate = 100.0*(int)(31.0*Rand()+20.0);
- game.nkinks = game.nhelp = game.resting = game.casual = 0;
+ game.nkinks = game.nhelp = game.casual = 0;
+ game.resting = false;
game.isatb = game.iscate = game.imine = game.icrystl = game.icraft = game.state.nplankl = 0;
game.state.starkl = game.state.basekl = 0;
game.iscraft = 1;
unschedule(FDSPROB);
if ((game.options & OPTION_WORLDS) && game.skill >= SKILL_GOOD)
schedule(FDISTR, expran(1.0 + game.intime));
+ else
+ unschedule(FDISTR);
unschedule(FENSLV);
unschedule(FREPRO);
// Starchart is functional but we've never seen it
if (game.state.nscrem) prout(" YOU'LL NEED IT.");
waitfor();
newqad(0);
- if (game.nenhere-iqhere-game.ithere) game.shldup=1.0;
+ if (game.nenhere-iqhere-game.ithere) game.shldup = true;
if (game.neutz) attack(0); // bad luck to start in a Romulan Neutral Zone
}
// Check for RNZ
if (game.irhere > 0 && game.klhere == 0 && (here->planet == NOPLANET || game.state.plnets[here->planet].inhabited == UNINHABITED)) {
game.neutz = 1;
- if (game.damage[DRADIO] <= 0.0) {
+ if (!damaged(DRADIO)) {
skip(1);
prout("LT. Uhura- \"Captain, an urgent message.");
prout(" I'll put it on audio.\" CLICK");
game.kdist[game.nenhere] = game.kavgd[game.nenhere] =
sqrt(square(game.sector.x-w.x) + square(game.sector.y-w.y));
game.kpower[game.nenhere] = Rand()*6000.0 +500.0 +250.0*game.skill;
- if (game.damage[DSRSENS] == 0.0) {
+ if (!damaged(DSRSENS)) {
skip(1);
prout("MR. SPOCK- \"Captain, this is most unusual.");
prout(" Please examine your short-range scan.\"");
}
} while (sw);
}
+
+void setpassword(void)
+{
+ if (!(game.options & OPTION_CURSES)) {
+ while (TRUE) {
+ scan();
+ strcpy(game.passwd, citem);
+ chew();
+ if (*game.passwd != 0) break;
+ proutn(_("Please type in a secret password-"));
+ }
+ } else {
+ int i;
+ for(i=0;i<3;i++) game.passwd[i]=(char)(97+(int)(Rand()*25));
+ game.passwd[3]=0;
+ }
+}