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

(prod): Round the final cost instead of truncating along the way.

Browse source 
(prod, produce): Simplify calculation TECH_POP cost factor slightly.
This commit is contained in:
Markus Armbruster 2006-05-21 08:48:16 +00:00
parent 898d1422fa
commit 739b5ac6fb
2 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/lib/commands/prod.c
View file

@ -78,7 +78,7 @@ prod(void)
int work;
int totpop;
int act; /* actual production */
int cost;
double cost;
int i;
int max; /* production w/infinite materials */
int nsect;
@ -250,12 +250,12 @@ prod(void)
} else
mtake = take = 0.0;
cost = (int)(take * (double)pp->p_cost);
cost = take * pp->p_cost;
if (opt_TECH_POP) {
if (pp->p_level == NAT_TLEV) {
totpop = count_pop(sect.sct_own);
if (totpop > 50000)
cost = (int)((double)cost * (double)totpop / 50000.0);
cost *= totpop / 50000.0;
}
}
@ -333,7 +333,7 @@ prod(void)
}
pr(" %.2f", prodeff);
pr(" $%-5d", cost);
pr(" $%-5.0f", cost);
for (i = 0; i < 3; i++) {
if (i < MAXPRCON && cmnem[i])
pr("%4d%c", cuse[i], cmnem[i]);