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

Rebase of Hvy Metal I final version

Browse source 
Straightforward forward port.  Drop the code to reset track on
startup.  It's not necessary, and it breaks linking of empdump.
This commit is contained in:
Markus Armbruster 2008-01-19 15:19:13 +01:00
parent abd64835c7
commit 5d0f5e69ee
25 changed files with 349 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/lib/commands/mfir.c
View file

@ -330,6 +330,12 @@ multifire(void)
pr("Unit %d cannot fire!\n", fland.lnd_uid);
continue;
}
if (lchr[(int)fland.lnd_type].l_flags & L_HEAVY
&& target != targ_land) {
pr("%s is too ponderous to target ships!\n",
prland(&fland));
continue;
}
if (fland.lnd_item[I_GUN] == 0) {
pr("%s -- not enough guns\n", prland(&fland));
continue;
@ -349,6 +355,8 @@ multifire(void)
pr("Klick! ...\n");
continue;
}
lnd_unlimber(&fland);
if (target == targ_ship) {
if (chance(lnd_acc(&fland) / 100.0))
dam = ldround(dam / 2.0, 1);
@ -687,6 +695,9 @@ quiet_bigdef(int type, struct emp_qelem *list, natid own, natid aown,
/* Don't shoot yourself */
if (land.lnd_own == aown)
continue;
/* Too ponderous for counter-battery fire */
if (lchr[(int)land.lnd_type].l_flags & L_HEAVY)
continue;
rel = getrel(getnatp(land.lnd_own), own);
rel2 = getrel(getnatp(land.lnd_own), aown);
@ -708,6 +719,7 @@ quiet_bigdef(int type, struct emp_qelem *list, natid own, natid aown,
if (dam2 < 0)
continue;
lnd_unlimber(&land);
(*nfiring)++;
if (!fp)
add_to_flist(list, (struct empobj *)&land, dam2, 0);