From 233fce87cdd0889ad6cf23f48c641d5ac7e6b2de Mon Sep 17 00:00:00 2001 From: Ron Koenderink Date: Thu, 22 Dec 2005 17:26:54 +0000 Subject: [PATCH] (nat_cap): Scale BTU production by capital's work. Closes #101189. --- src/lib/player/init_nats.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/lib/player/init_nats.c b/src/lib/player/init_nats.c index cfcfa944..6422de1f 100644 --- a/src/lib/player/init_nats.c +++ b/src/lib/player/init_nats.c @@ -74,7 +74,7 @@ nat_cap(int btu) { struct sctstr sect; struct natstr *np; - double d; + double d, eff; double civ; int delta; @@ -103,10 +103,10 @@ nat_cap(int btu) civ = sect.sct_item[I_CIVIL]; if (civ > 999) civ = 999; - if ((sect.sct_effic) && (sect.sct_type != SCT_MOUNT)) - delta = roundavg(d * civ * sect.sct_effic * btu_build_rate); - else /* Assume 1/2% efficiency minimum */ - delta = roundavg(d * civ * btu_build_rate / 2.0); + eff = sect.sct_effic * sect.sct_work / 100.0; + if (eff < 0.5 || sect.sct_type == SCT_MOUNT) + eff = 0.5; + delta = roundavg(d * civ * eff * btu_build_rate); if (delta + btu > max_btus) np->nat_btu = max_btus;