void events(void)
/* run through the event queue looking for things to do */
{
- int istract=0, evcode, i=0, j, k, l;
+ int evcode, i=0, j, k, l;
double fintim = game.state.date + game.optime, datemin, xtime, repair, yank=0;
- bool radio_was_broken, ictbeam = false, ipage = false;
+ bool radio_was_broken, ictbeam = false, ipage = false, istract = false;
struct quadrant *pdest, *q;
coord w, hold;
event *ev, *ev2;
radio_was_broken = damaged(DRADIO);
+ hold.x = hold.y = 0;
for (;;) {
/* Select earliest extraneous event, evcode==0 if no events */
evcode = FSPY;
break;
case FSPY: /* Check with spy to see if S.C. should tractor beam */
if (game.state.nscrem == 0 ||
- ictbeam+istract > 0 ||
+ ictbeam || istract ||
game.condit==IHDOCKED || game.isatb==1 || game.iscate==1) return;
if (game.ientesc ||
(game.energy < 2000 && game.torps < 4 && game.shield < 1250) ||
(game.energy < 2500 || damaged(DPHASER)) &&
(game.torps < 5 || damaged(DPHOTON)))) {
/* Tractor-beam her! */
- istract=1;
- yank = square(game.state.kscmdr.x-game.quadrant.x) + square(game.state.kscmdr.y-game.quadrant.y);
+ istract = true;
+ yank = distance(game.state.kscmdr, game.quadrant);
/********* fall through to FTBEAM code ***********/
}
else return;
/* If Kirk & Co. screwing around on planet, handle */
atover(true); /* atover(true) is Grab */
if (game.alldone) return;
- if (game.icraft == 1) { /* Caught in Galileo? */
+ if (game.icraft) { /* Caught in Galileo? */
finish(FSTRACTOR);
return;
}
game.quadrant = game.state.kscmdr;
else
game.quadrant = game.state.kcmdr[i];
- iran(QUADSIZE, &game.sector.x, &game.sector.y);
+ game.sector = iran(QUADSIZE);
crmshp();
proutn(_(" is pulled to "));
proutn(cramlc(quadrant, game.quadrant));
break;
case FSCMOVE: /* Supercommander moves */
schedule(FSCMOVE, 0.2777);
- if (game.ientesc+istract==0 &&
- game.isatb != 1 &&
- (game.iscate != 1 || !game.justin)) scom(&ipage);
+ if (!game.ientesc && !istract && game.isatb != 1 &&
+ (game.iscate != 1 || !game.justin))
+ scom(&ipage);
break;
case FDSPROB: /* Move deep space probe */
schedule(FDSPROB, 0.01);
which has some stars which are inhabited and
not already under attack, which is not
supernova'ed, and which has some Klingons in it */
- iran(GALSIZE, &w.x, &w.y);
+ w = iran(GALSIZE);
q = &game.state.galaxy[w.x][w.y];
} while (--i &&
(same(game.quadrant, w) || q->planet == NOPLANET ||
game.state.remkl++;
q->klingons++;
if (same(game.quadrant, w))
- newkling(++game.klhere, &hold);
+ newkling(++game.klhere);
/* recompute time left */
game.state.remtime = game.state.remres/(game.state.remkl+4*game.state.remcom);
kount++;
break;
case IHK: /* kill klingon */
- deadkl(scratch,iquad, scratch.x, scratch.y);
+ deadkl(scratch,iquad, scratch);
break;
case IHC: /* Damage/destroy big enemies */
case IHS:
if (same(game.ks[ll], scratch)) break;
game.kpower[ll] -= 800.0; /* If firepower is lost, die */
if (game.kpower[ll] <= 0.0) {
- deadkl(scratch, iquad, scratch.x, scratch.y);
+ deadkl(scratch, iquad, scratch);
break;
}
newc.x = scratch.x + scratch.x - hits[mm][1];
proutn(_(", blasted into "));
crmena(false, IHBLANK, sector, newc);
skip(1);
- deadkl(scratch, iquad, newc.x, newc.y);
+ deadkl(scratch, iquad, newc);
break;
}
if (iquad1 != IHDOT) {
game.quad[scratch.x][scratch.y] = IHDOT;
game.quad[newc.x][newc.y] = iquad;
game.ks[ll] = newc;
- game.kavgd[ll] = sqrt(square(game.sector.x-newc.x)+square(game.sector.y-newc.y));
- game.kdist[ll] = game.kavgd[ll];
+ game.kdist[ll] = game.kavgd[ll] = distance(game.sector, newc);
skip(1);
break;
}
prouts("***************");
skip(1);
stars();
- game.alldone=1;
+ game.alldone = true;
}
}