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

subs: Add unitsatxy() parameter only_count

Browse source 
Like shipsatxy().  To be used shortly.

Signed-off-by: Markus Armbruster <armbru@pond.sub.org>
This commit is contained in:
Markus Armbruster 2014-12-28 21:34:18 +01:00
parent c9fc05ae5b
commit 9b33a4c598
3 changed files with 13 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

2
include/prototypes.h
View file

@ -448,7 +448,7 @@ extern int roundrange(double);
/* list.c */
extern int shipsatxy(coord, coord, int, int, int);
extern int carriersatxy(coord, coord, natid);
extern int unitsatxy(coord, coord, int, int);
extern int unitsatxy(coord, coord, int, int, int);
extern int planesatxy(coord, coord, int, int);
extern int asw_shipsatxy(coord, coord, int, int, struct plnstr *,
struct shiplist **);

6
src/lib/commands/bomb.c
View file

@ -196,7 +196,7 @@ pin_bomb(struct emp_qelem *list, struct sctstr *target)
pr("Some subs are present in the sector.\n");
}
nplanes = planesatxy(target->sct_x, target->sct_y, 0, 0);
nunits = unitsatxy(target->sct_x, target->sct_y, 0, 0);
nunits = unitsatxy(target->sct_x, target->sct_y, 0, 0, 0);
retry:
p = getstring("Bomb what? (ship, plane, land unit, efficiency, commodities) ",
buf);
@ -612,7 +612,7 @@ land_bomb(struct emp_qelem *list, struct sctstr *target)
plp = (struct plist *)qp;
if (changed_plane_aborts(plp))
continue;
nunits = unitsatxy(target->sct_x, target->sct_y, 0, 0);
nunits = unitsatxy(target->sct_x, target->sct_y, 0, 0, 0);
if (nunits == 0) {
pr("%s could not find any units!\n", prplane(&plp->plane));
continue;
@ -628,7 +628,7 @@ land_bomb(struct emp_qelem *list, struct sctstr *target)
if (*q == '~')
break;
if (*q == '?') {
unitsatxy(target->sct_x, target->sct_y, 0, 0);
unitsatxy(target->sct_x, target->sct_y, 0, 0, 0);
continue;
}
n = atoi(q);

16
src/lib/subs/list.c
View file

@ -28,7 +28,7 @@
*
* Known contributors to this file:
* Dave Pare, 1986
* Markus Armbruster, 2003-2012
* Markus Armbruster, 2003-2014
*/
#include <config.h>
@ -119,7 +119,7 @@ carriersatxy(coord x, coord y, natid own)
}
int
unitsatxy(coord x, coord y, int wantflags, int nowantflags)
unitsatxy(coord x, coord y, int wantflags, int nowantflags, int only_count)
{
int first;
int units;
@ -152,12 +152,14 @@ unitsatxy(coord x, coord y, int wantflags, int nowantflags)
continue;
}
if (first) {
pr(" # owner eff type\n");
first = 0;
if (!only_count) {
if (first) {
pr(" # owner eff type\n");
first = 0;
}
pr("(#%3d) %10.10s %12.12s %s\n", ni.cur,
cname(land.lnd_own), effadv(land.lnd_effic), prland(&land));
}
pr("(#%3d) %10.10s %12.12s %s\n", ni.cur,
cname(land.lnd_own), effadv(land.lnd_effic), prland(&land));
units++;
}
return units;