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

(total_work): Remove redundant conversion to int.

Browse source 
(total_work): New parameter maxpop.  Callers changed.
(newe, prod): Use total_work().  Old code failed to limit military
workers, thus didn't match the update.
(do_feed): Simplify.
This commit is contained in:
Markus Armbruster 2005-02-20 19:36:41 +00:00
parent 43d07b458d
commit 5ba8cab9b5
6 changed files with 40 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

16
src/lib/update/human.c
View file

@ -65,19 +65,17 @@ do_feed(struct sctstr *sp, struct natstr *np, short *vec,
int people;
int work_avail;
int starved, sctwork;
int needed, dummy;
int civvies, uws;
int mil;
int needed;
int maxpop;
/* grow people & stuff */
sctwork = sp->sct_work;
maxpop = max_pop(np->nat_level[NAT_RLEV], sp);
civvies = (vec[I_CIVIL] > maxpop) ? maxpop : vec[I_CIVIL];
uws = (vec[I_UW] > maxpop) ? maxpop : vec[I_UW];
mil = (vec[I_MILIT] > maxpop) ? maxpop : vec[I_MILIT];
work_avail = new_work(sp, total_work(sctwork, etu, civvies, mil, uws));
work_avail = new_work(sp,
total_work(sctwork, etu,
vec[I_CIVIL], vec[I_MILIT], vec[I_UW],
maxpop));
people = vec[I_CIVIL] + vec[I_MILIT] + vec[I_UW];
if (sp->sct_type != SCT_SANCT) {
@ -126,7 +124,7 @@ do_feed(struct sctstr *sp, struct natstr *np, short *vec,
sctwork = 100;
if (!player->simulation)
sp->sct_work = sctwork;
dummy = grow_people(sp, etu, np, &work_avail, sctwork, vec);
grow_people(sp, etu, np, &work_avail, sctwork, vec);
}
} else
sctwork = sp->sct_work = 100;
@ -307,7 +305,7 @@ grow_people(struct sctstr *sp, int etu,
*/
if (opt_NOFOOD == 0 && (newciv || newuw))
vec[I_FOOD] -= roundavg((newciv + newuw) * babyeat);
*workp += total_work(sctwork, etu, newciv, 0, newuw);
*workp += total_work(sctwork, etu, newciv, 0, newuw, ITEM_MAX);
return newciv + newuw;
}

13
src/lib/update/populace.c
View file

@ -131,9 +131,14 @@ populace(struct natstr *np, struct sctstr *sp, int etu)
}
int
total_work(int sctwork, int etu, int civil,
int milit, int uw)
total_work(int sctwork, int etu, int civil, int milit, int uw, int maxpop)
{
return ((int)((((civil * sctwork) / 100.0 +
(milit * 2 / 5.0) + uw)) * etu) / 100);
if (civil > maxpop)
civil = maxpop;
if (milit > maxpop)
milit = maxpop;
if (uw > maxpop)
uw = maxpop;
return (civil * sctwork / 100.0 + milit * 0.4 + uw) * etu / 100.0;
}

19
src/lib/update/ship.c
View file

@ -172,7 +172,8 @@ upd_ship(struct shpstr *sp, int etus,
oil_gained = roundavg(total_work(100, etus,
sp->shp_item[I_CIVIL],
sp->shp_item[I_MILIT],
sp->shp_item[I_UW])
sp->shp_item[I_UW],
ITEM_MAX)
* (double)sp->shp_effic / 100.0
* (double)sectp->sct_oil / 100.0
* prod_eff(product, sp->shp_tech));
@ -190,13 +191,15 @@ upd_ship(struct shpstr *sp, int etus,
}
if ((mp->m_flags & M_FOOD) && sectp->sct_type == SCT_WATER) {
product = &pchr[P_FOOD];
sp->shp_item[I_FOOD] += roundavg(total_work(100, etus,
sp->shp_item[I_CIVIL],
sp->shp_item[I_MILIT],
sp->shp_item[I_UW])
* (double)sp->shp_effic / 100.0
* (double)sectp->sct_fertil / 100.0
* prod_eff(product, sp->shp_tech));
sp->shp_item[I_FOOD]
+= roundavg(total_work(100, etus,
sp->shp_item[I_CIVIL],
sp->shp_item[I_MILIT],
sp->shp_item[I_UW],
ITEM_MAX)
* sp->shp_effic / 100.0
* sectp->sct_fertil / 100.0
* prod_eff(product, sp->shp_tech));
}
if ((n = feed_ship(sp, etus, &needed, 1)) > 0) {
wu(0, sp->shp_own, "%d starved on %s\n", n, prship(sp));