X-Git-Url: https://jxself.org/git/?p=super-star-trek.git;a=blobdiff_plain;f=src%2Fbattle.c;h=7815b72b663a82a038d6f7c752d60836391a98d2;hp=ca77cd461236b245176ecd1ece01c966852ed06b;hb=ad6b6f3e8316dc43c8f80ca8bc57be091b0076c6;hpb=c0682ebb9ae828d035d59892a65e1849d85963b7 diff --git a/src/battle.c b/src/battle.c index ca77cd4..7815b72 100644 --- a/src/battle.c +++ b/src/battle.c @@ -1,6 +1,6 @@ #include "sst.h" -void doshield(int i) +void doshield(bool raise) /* change shield status */ { int key; @@ -8,7 +8,8 @@ void doshield(int i) game.ididit = false; - if (i == 2) action = SHUP; + if (raise) + action = SHUP; else { key = scan(); if (key == IHALPHA) { @@ -61,8 +62,8 @@ void doshield(int i) return; } game.shldup = true; - game.shldchg = 1; - if (game.condit != IHDOCKED) game.energy -= 50.0; + game.shldchg = true; + if (game.condition != docked) game.energy -= 50.0; prout(_("Shields raised.")); if (game.energy <= 0) { skip(1); @@ -78,7 +79,7 @@ void doshield(int i) return; } game.shldup=false; - game.shldchg=1; + game.shldchg=true; prout(_("Shields lowered.")); game.ididit = true; return; @@ -130,11 +131,66 @@ void doshield(int i) } } -void ram(bool ibumpd, int ienm, coord w) +static int randdevice(void) +/* choose a device to damage, at random. */ +{ + /* + * Quoth Eric Allman in the code of BSD-Trek: + * "Under certain conditions you can get a critical hit. This + * sort of hit damages devices. The probability that a given + * device is damaged depends on the device. Well protected + * devices (such as the computer, which is in the core of the + * ship and has considerable redundancy) almost never get + * damaged, whereas devices which are exposed (such as the + * warp engines) or which are particularly delicate (such as + * the transporter) have a much higher probability of being + * damaged." + * + * This is one place where OPTION_PLAIN does not restore the + * original behavior, which was equiprobable damage across + * all devices. If we wanted that, we'd return NDEVICES*Rand() + * and have done with it. Also, in the original game, DNAVYS + * and DCOMPTR were the same device. + * + * Instead, we use a table of weights similar to the one from BSD Trek. + * BSD doesn't have the shuttle, shield controller, death ray, or probes. + * We don't have a cloaking device. The shuttle got the allocation + * for the cloaking device, then we shaved a half-percent off + * everything to have some weight to give DSHCTRL/DDRAY/DDSP. + */ + static int weights[NDEVICES] = { + 105, /* DSRSENS: short range scanners 10.5% */ + 105, /* DLRSENS: long range scanners 10.5% */ + 120, /* DPHASER: phasers 12.0% */ + 120, /* DPHOTON: photon torpedoes 12.0% */ + 25, /* DLIFSUP: life support 2.5% */ + 65, /* DWARPEN: warp drive 6.5% */ + 70, /* DIMPULS: impulse engines 6.5% */ + 145, /* DSHIELD: deflector shields 14.5% */ + 30, /* DRADIO: subspace radio 3.0% */ + 45, /* DSHUTTL: shuttle 4.5% */ + 15, /* DCOMPTR: computer 1.5% */ + 20, /* NAVCOMP: navigation system 2.0% */ + 75, /* DTRANSP: transporter 7.5% */ + 20, /* DSHCTRL: high-speed shield controller 2.0% */ + 10, /* DDRAY: death ray 1.0% */ + 30, /* DDSP: deep-space probes 3.0% */ + }; + int sum, i, idx = Rand() * 1000.0; /* weights must sum to 1000 */ + + for (i = sum = 0; i < NDEVICES; i++) { + sum += weights[i]; + if (idx < sum) + return i; + } + return -1; /* we should never get here, but this quiets GCC */ +} + +void ram(bool ibumpd, feature ienm, coord w) /* make our ship ram something */ { - double type = 1.0, extradm; - int icas, m; + double hardness, extradm; + int icas, m, ncrits; prouts(_("***RED ALERT! RED ALERT!")); skip(1); @@ -143,11 +199,12 @@ void ram(bool ibumpd, int ienm, coord w) proutn("***"); crmshp(); switch (ienm) { - case IHR: type = 1.5; break; - case IHC: type = 2.0; break; - case IHS: type = 2.5; break; - case IHT: type = 0.5; break; - case IHQUEST: type = 4.0; break; + case IHR: hardness = 1.5; break; + case IHC: hardness = 2.0; break; + case IHS: hardness = 2.5; break; + case IHT: hardness = 0.5; break; + case IHQUEST: hardness = 4.0; break; + default: hardness = 1.0; break; } proutn(ibumpd ? _(" rammed by ") : _(" rams ")); crmena(false, ienm, sector, w); @@ -161,17 +218,24 @@ void ram(bool ibumpd, int ienm, coord w) prout(_("***Sickbay reports %d casualties"), icas); game.casual += icas; game.state.crew -= icas; - for (m=0; m < NDEVICES; m++) { - if (m == DDRAY) - continue; // Don't damage deathray - if (game.damage[m] < 0) + /* + * In the pre-SST2K version, all devices got equiprobably damaged, + * which was silly. Instead, pick up to half the devices at + * random according to our weighting table, + */ + ncrits = Rand() * (NDEVICES/2); + for (m=0; m < ncrits; m++) { + int dev = randdevice(); + if (game.damage[dev] < 0) continue; - extradm = (10.0*type*Rand()+1.0)*game.damfac; - game.damage[m] += game.optime + extradm; /* Damage for at least time of travel! */ + extradm = (10.0*hardness*Rand()+1.0)*game.damfac; + /* Damage for at least time of travel! */ + game.damage[dev] += game.optime + extradm; } game.shldup = false; + prout(_("***Shields are down.")); if (KLINGREM) { - pause_game(2); + pause_game(true); dreprt(); } else finish(FWON); @@ -196,7 +260,7 @@ void torpedo(double course, double r, coord in, double *hit, int i, int n) if (fabs(deltay) > bigger) bigger = fabs(deltay); deltax /= bigger; deltay /= bigger; - if (!damaged(DSRSENS) || game.condit==IHDOCKED) + if (!damaged(DSRSENS) || game.condition==docked) setwnd(srscan_window); else setwnd(message_window); @@ -225,7 +289,8 @@ void torpedo(double course, double r, coord in, double *hit, int i, int n) *hit = fabs(*hit); newcnd(); /* we're blown out of dock */ /* We may be displaced. */ - if (game.landed==1 || game.condit==IHDOCKED) return; /* Cheat if on a planet */ + if (game.landed || game.condition==docked) + return; /* Cheat if on a planet */ ang = angle + 2.5*(Rand()-0.5); temp = fabs(sin(ang)); if (fabs(cos(ang)) > temp) temp = fabs(cos(ang)); @@ -324,7 +389,7 @@ void torpedo(double course, double r, coord in, double *hit, int i, int n) game.iplnet = 0; game.plnet.x = game.plnet.y = 0; game.quad[w.x][w.y] = IHDOT; - if (game.landed==1) { + if (game.landed) { /* captain perishes on planet */ finish(FDPLANET); } @@ -338,12 +403,12 @@ void torpedo(double course, double r, coord in, double *hit, int i, int n) game.iplnet = 0; game.plnet.x = game.plnet.y = 0; game.quad[w.x][w.y] = IHDOT; - if (game.landed==1) { + if (game.landed) { /* captain perishes on planet */ finish(FDPLANET); } - prout("You have just destroyed an inhabited planet."); - prout("Celebratory rallies are being held on the Klingon homeworld."); + prout(_("You have just destroyed an inhabited planet.")); + prout(_("Celebratory rallies are being held on the Klingon homeworld.")); return; case IHSTAR: /* Hit a star */ if (Rand() > 0.10) { @@ -444,12 +509,12 @@ static void fry(double hit) ncrit = 1.0 + hit/(500.0+100.0*Rand()); proutn(_("***CRITICAL HIT--")); /* Select devices and cause damage */ - for (loop1 = 0; loop1 < ncrit && 0 < NDEVICES; loop1++) { + for (loop1 = 0; loop1 < ncrit; loop1++) { do { - j = NDEVICES*Rand(); + j = randdevice(); /* Cheat to prevent shuttle damage unless on ship */ } while - (game.damage[j]<0.0 || (j==DSHUTTL && game.iscraft!=1) || j==DDRAY); + (game.damage[j]<0.0 || (j==DSHUTTL && game.iscraft != onship)); cdam[loop1] = j; extradm = (hit*game.damfac)/(ncrit*(75.0+25.0*Rand())); game.damage[j] += extradm; @@ -492,7 +557,7 @@ void attack(bool torps_ok) if ((((game.comhere || game.ishere) && !game.justin) || game.skill == SKILL_EMERITUS) && torps_ok) movcom(); if (game.nenhere==0 || (game.nenhere==1 && iqhere && !iqengry)) return; pfac = 1.0/game.inshld; - if (game.shldchg == 1) chgfac = 0.25+0.5*Rand(); + if (game.shldchg) chgfac = 0.25+0.5*Rand(); skip(1); if (game.skill <= SKILL_FAIR) where = sector; for_local_enemies(loop) { @@ -500,7 +565,7 @@ void attack(bool torps_ok) /* compute hit strength and diminsh shield power */ r = Rand(); /* Increase chance of photon torpedos if docked or enemy energy low */ - if (game.condit == IHDOCKED) r *= 0.25; + if (game.condition == docked) r *= 0.25; if (game.kpower[loop] < 500) r *= 0.25; jay = game.ks[loop]; iquad = game.quad[jay.x][jay.y]; @@ -512,7 +577,7 @@ void attack(bool torps_ok) (iquad==IHQUEST && r > 0.05); if (itflag) { /* Enemy uses phasers */ - if (game.condit == IHDOCKED) continue; /* Don't waste the effort! */ + if (game.condition == docked) continue; /* Don't waste the effort! */ attempt = true; /* Attempt to attack */ dustfac = 0.8+0.05*Rand(); hit = game.kpower[loop]*pow(dustfac,game.kavgd[loop]); @@ -537,9 +602,9 @@ void attack(bool torps_ok) return; /* Supernova or finished */ if (hit == 0) continue; } - if (game.shldup || game.shldchg != 0 || game.condit==IHDOCKED) { + if (game.shldup || game.shldchg || game.condition==docked) { /* shields will take hits */ - double absorb, hitsh, propor = pfac*game.shield*(game.condit==IHDOCKED ? 2.1 : 1.0); + double absorb, hitsh, propor = pfac*game.shield*(game.condition==docked ? 2.1 : 1.0); if(propor < 0.1) propor = 0.1; hitsh = propor*chgfac*hit+1.0; atackd = true; @@ -547,7 +612,7 @@ void attack(bool torps_ok) if (absorb > game.shield) absorb = game.shield; game.shield -= absorb; hit -= hitsh; - if (game.condit==IHDOCKED) dock(false); + if (game.condition==docked) dock(false); if (propor > 0.1 && hit < 0.005*game.energy) continue; } /* It's a hit -- print out hit size */ @@ -570,7 +635,7 @@ void attack(bool torps_ok) hittot += hit; fry(hit); game.energy -= hit; - if (game.condit==IHDOCKED) + if (game.condition==docked) dock(false); } if (game.energy <= 0) { @@ -578,7 +643,7 @@ void attack(bool torps_ok) finish(FBATTLE); return; } - if (!attempt && game.condit == IHDOCKED) + if (!attempt && game.condition == docked) prout(_("***Enemies decide against attacking your ship.")); if (!atackd) return; percent = 100.0*pfac*game.shield+0.5; @@ -613,7 +678,7 @@ void attack(bool torps_ok) return; } -void deadkl(coord w, int type, coord mv) +void deadkl(coord w, feature type, coord mv) /* kill a Klingon, Tholian, Romulan, or Thingy */ { /* Added mv to allow enemy to "move" before dying */ @@ -660,10 +725,14 @@ void deadkl(coord w, int type, coord mv) case IHS: game.state.nscrem--; game.ishere = false; - game.state.kscmdr.x = game.state.kscmdr.y = game.isatb = game.iscate = 0; + game.state.kscmdr.x = game.state.kscmdr.y = game.isatb = 0; + game.iscate = false; unschedule(FSCMOVE); unschedule(FSCDBAS); break; + default: /* avoids a gcc warning */ + prout("*** Internal error, deadkl() called on %c\n", type); + break; } } @@ -674,7 +743,7 @@ void deadkl(coord w, int type, coord mv) game.state.remtime = game.state.remres/(game.state.remkl + 4*game.state.remcom); - /* Remove enemy ship from arrays describing local game.conditions */ + /* Remove enemy ship from arrays describing local conditions */ if (is_scheduled(FCDBAS) && game.battle.x==game.quadrant.x && game.battle.y==game.quadrant.y && type==IHC) unschedule(FCDBAS); for_local_enemies(i) @@ -818,7 +887,7 @@ void photon(void) /* Loop for moving torpedoes */ osuabor = false; for (i = 1; i <= n && !osuabor; i++) { - if (game.condit != IHDOCKED) game.torps--; + if (game.condition != docked) game.torps--; r = (Rand()+Rand())*0.5 -0.5; if (fabs(r) >= 0.47) { /* misfire! */ @@ -837,7 +906,7 @@ void photon(void) break; } } - if (game.shldup || game.condit == IHDOCKED) + if (game.shldup || game.condition == docked) r *= 1.0 + 0.0001*game.shield; torpedo(course[i], r, game.sector, &dummy, i, n); if (game.alldone || game.state.galaxy[game.quadrant.x][game.quadrant.y].supernova) @@ -867,7 +936,7 @@ static bool checkshctrl(double rpow) int icas; skip(1); - if (Rand() < .998) { + if (Rand() < 0.998) { prout(_("Shields lowered.")); return false; } @@ -910,14 +979,15 @@ void phasers(void) { double hits[21], rpow=0, extra, powrem, over, temp; int kz = 0, k=1, i, irec=0; /* Cheating inhibitor */ - bool ifast = false, no = false, ipoop = true, msgflag = true; + bool ifast = false, no = false, itarg = true, msgflag = true; enum {NOTSET, MANUAL, FORCEMAN, AUTOMATIC} automode = NOTSET; int key=0; skip(1); - /* SR sensors and Computer */ - if (damaged(DSRSENS) || damaged(DCOMPTR)) ipoop = false; - if (game.condit == IHDOCKED) { + /* SR sensors and Computer are needed fopr automode */ + if (damaged(DSRSENS) || damaged(DCOMPTR)) + itarg = false; + if (game.condition == docked) { prout(_("Phasers can't be fired through base shields.")); chew(); return; @@ -959,7 +1029,7 @@ void phasers(void) } } else if (isit("automatic")) { - if ((!ipoop) && game.nenhere != 0) { + if ((!itarg) && game.nenhere != 0) { automode = FORCEMAN; } else { @@ -982,7 +1052,7 @@ void phasers(void) prout(_("Energy will be expended into space.")); automode = AUTOMATIC; } - else if (!ipoop) + else if (!itarg) automode = FORCEMAN; else automode = AUTOMATIC; @@ -993,7 +1063,7 @@ void phasers(void) prout(_("Energy will be expended into space.")); automode = AUTOMATIC; } - else if (!ipoop) + else if (!itarg) automode = FORCEMAN; else proutn(_("Manual or automatic? ")); @@ -1017,7 +1087,7 @@ void phasers(void) irec+=fabs(game.kpower[i])/(PHASEFAC*pow(0.90,game.kdist[i]))* (1.01+0.05*Rand()) + 1.0; kz=1; - proutn(_("(%d) units required. "), irec); + proutn(_("%d units required. "), irec); chew(); proutn(_("Units to fire= ")); key = scan(); @@ -1079,7 +1149,7 @@ void phasers(void) chew(); key = IHEOL; if (damaged(DCOMPTR)) - prout(_("Battle comuter damaged, manual file only.")); + prout(_("Battle computer damaged, manual file only.")); else { skip(1); prouts(_("---WORKING---")); @@ -1113,7 +1183,7 @@ void phasers(void) } if (key == IHEOL) { chew(); - if (ipoop && k > kz) + if (itarg && k > kz) irec=(fabs(game.kpower[k])/(PHASEFAC*pow(0.9,game.kdist[k])))* (1.01+0.05*Rand()) + 1.0; kz = k; @@ -1127,7 +1197,7 @@ void phasers(void) key = scan(); } if (key == IHALPHA && isit("no")) { - no = 1; + no = true; key = scan(); continue; }