empire/empserver
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(retreat_ship1): Fix test for seamines. Before, retreating ships

Browse source 
could sweep and hit landmines.  The bug fixed in rev. 1.35 is believed
to have masked this bug.  Charge mobility for sweeping.  Closes
#1346756.
This commit is contained in:
Markus Armbruster 2006-03-28 05:51:49 +00:00
parent b60b62780e
commit 5663713be9
1 changed files with 8 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/lib/subs/retreat.c
View file

@ -268,7 +268,8 @@ retreat_ship1(struct shpstr *sp, char code, int orig)
mines = sect.sct_mines;
changed = 0;
if ((mcp->m_flags & M_SWEEP) && mines > 0 && !player->owner) {
if ((mcp->m_flags & M_SWEEP) && sect.sct_type == SCT_WATER) {
sp->shp_mobil -= mobcost;
max = mcp->m_item[I_SHELL];
shells = sp->shp_item[I_SHELL];
for (m = 0; mines > 0 && m < 5; m++) {
@ -284,14 +285,15 @@ retreat_ship1(struct shpstr *sp, char code, int orig)
"%s cleared %d mine%s in %s while retreating\n",
prship(sp), sect.sct_mines-mines, splur(sect.sct_mines-mines),
xyas(newx, newy, sp->shp_own));
}
sect.sct_mines = mines;
sect.sct_item[I_SHELL] = shells;
sp->shp_item[I_SHELL] = shells;
putsect(&sect);
}
if (changed)
writemap(sp->shp_own);
}
if (mines > 0 && !player->owner && chance(DMINE_HITCHANCE(mines))) {
if (sect.sct_type == SCT_WATER && mines > 0
&& chance(DMINE_HITCHANCE(mines))) {
wu(0, sp->shp_own,
"%s %s,\nand hit a mine in %s while retreating!\n",
prship(sp), conditions[findcondition(code)].desc[orig],