private static void SetToIdealTier(IColonizationResearchScenario colonizationResearch, ITieredProducer producer)
{
for (TechTier tier = TechTier.Tier4; tier >= TechTier.Tier0; --tier)
{
var suitability = StaticAnalysis.GetTierSuitability(colonizationResearch, producer.Output, tier, producer.MaximumTier, producer.Body);
if (suitability == TierSuitability.Ideal)
{
producer.Tier = tier;
break;
}
}
}
internal static void BuildStatusStrings(
bool isAutoMining,
string minerStatusMessage,
bool anyCrewDeficiencies,
bool anyDisabledParts,
SnackConsumption activeSnackConsumption,
Dictionary <string, double> resources,
Dictionary <string, double> storage,
List <ITieredProducer> tieredProducers,
List <ITieredCombiner> tieredCombiners,
int crewCount,
int crewDelta,
out string introLineMessage,
out string productionMessage,
out string unusedCapacityMessage,
out string limitedByMessage,
out List <ResearchData> progress)
{
ResearchSink researchSink = new ResearchSink();
TieredProduction.CalculateResourceUtilization(
crewCount + crewDelta, 1, tieredProducers, tieredCombiners, researchSink, resources, storage,
out double timePassed, out var _, out Dictionary <string, double> resourcesConsumed,
out Dictionary <string, double> resourcesProduced,
out IEnumerable <string> limitingResources,
out Dictionary <string, double> unusedProduction);
if (timePassed == 0)
{
var introMessageBuilder = new StringBuilder();
if (!activeSnackConsumption.IsAtHome)
{
Dictionary <int, List <ProtoCrewMember> > buckets = new Dictionary <int, List <ProtoCrewMember> >();
foreach (var crew in activeSnackConsumption.Vessel.GetVesselCrew())
{
var kerbalIsKnown = LifeSupportScenario.Instance.TryGetStatus(crew, out double daysSinceMeal, out double daysToGrouchy, out bool isGrouchy);
if (!kerbalIsKnown)
{
// Maybe if ! on kerban we complain about this?
// Debug.LogError($"Couldn't find a life support record for {crew.name}");
}
int bucketKey = isGrouchy ? -1 : (int)daysToGrouchy;
if (!buckets.TryGetValue(bucketKey, out var crewInBucket))
{
crewInBucket = new List <ProtoCrewMember>();
buckets.Add(bucketKey, crewInBucket);
}
crewInBucket.Add(crew);
}
CrewBlurbs.random = new System.Random(FlightGlobals.ActiveVessel.GetHashCode());
foreach (List <ProtoCrewMember> crewInBucket in buckets.Values)
{
// yeah yeah, recomputing this is wasteful & all...
LifeSupportScenario.Instance.TryGetStatus(crewInBucket[0], out double daysSinceMeal, out double daysToGrouchy, out bool isGrouchy);
if (isGrouchy)
{
introMessageBuilder.AppendLine(TextEffects.Red(CrewBlurbs.StarvingKerbals(crewInBucket)));
}
else if (daysToGrouchy < 2)
{
introMessageBuilder.AppendLine(CrewBlurbs.GrumpyKerbals(crewInBucket, daysToGrouchy, tieredProducers.Any()));
}
else
{
introMessageBuilder.AppendLine(CrewBlurbs.HungryKerbals(crewInBucket, daysToGrouchy, tieredProducers.Any()));
}
}
if (tieredProducers.Any())
{
introMessageBuilder.AppendLine();
introMessageBuilder.AppendLine("Nothing can be produced at this base until the snack situation gets fixed.");
}
}
introLineMessage = introMessageBuilder.ToString();
productionMessage = null;
unusedCapacityMessage = null;
limitedByMessage = null;
progress = new List <ResearchData>();
}
else if (crewCount == 0)
{
introLineMessage = "No kerbals are aboard to produce anything.";
productionMessage = null;
unusedCapacityMessage = null;
limitedByMessage = null;
progress = new List <ResearchData>();
}
else
{
if (resourcesConsumed.Any())
{
var consumptionBuilder = new StringBuilder();
if (minerStatusMessage != null)
{
consumptionBuilder.AppendLine(minerStatusMessage);
consumptionBuilder.AppendLine();
}
consumptionBuilder.AppendLine(TextEffects.DialogHeading(crewDelta == 0
? $"The crew of {crewCount + crewDelta} is using:"
: $"A crew of {crewCount + crewDelta} would use:"));
foreach (var resourceName in resourcesConsumed.Keys.OrderBy(n => n))
{
if (!isAutoMining || !IsCrushinResource(researchSink, resourceName))
{
double perDay = TieredProduction.UnitsPerSecondToUnitsPerDay(resourcesConsumed[resourceName]);
double daysLeft = resources[resourceName] / perDay;
consumptionBuilder.AppendLine($"{perDay:N1} {resourceName} per day ({daysLeft:N1} days left)");
}
}
introLineMessage = consumptionBuilder.ToString();
}
else
{
introLineMessage = $"This vessel can sustain a crew of {crewCount + crewDelta} indefinitely.";
}
if (resourcesProduced != null && resourcesProduced.Count > 0)
{
var productionMessageBuilder = new StringBuilder();
foreach (var resourceName in resourcesProduced.Keys.OrderBy(n => n))
{
double perDay = TieredProduction.UnitsPerSecondToUnitsPerDay(resourcesProduced[resourceName]);
productionMessageBuilder.AppendLine($"{perDay:N1} {resourceName}");
}
productionMessage = productionMessageBuilder.ToString();
}
else
{
productionMessage = null;
}
// Because of the way PksTieredCombiners work, we'll often end up with the non-tiered stuff
// showing up as a rate-limiter. While it's technically correct, it's not going to be a thing
// that the player will want to know about.
var localParts = ColonizationResearchScenario.Instance.TryGetTieredResourceByName("LocalParts");
if (localParts != null)
{
foreach (TechTier t in Enum.GetValues(typeof(TechTier)))
{
unusedProduction.Remove(localParts.TieredName(t));
}
}
unusedCapacityMessage = unusedProduction.Any()
? string.Join("\r\n", unusedProduction.Select(pair => $"{pair.Value:N1} {pair.Key}").ToArray())
: null;
List <string> shortfalls = new List <string>();
if (anyCrewDeficiencies)
{
shortfalls.Add("uncrewed parts");
}
if (anyDisabledParts)
{
shortfalls.Add("disabled parts");
}
shortfalls.AddRange(limitingResources);
shortfalls.AddRange(tieredCombiners
.Where(tc => tc.IsProductionEnabled)
.Select(tc => tc.NonTieredOutputResourceName)
.Where(resourceName => !storage.ContainsKey(resourceName))
.Distinct()
.Select(resourceName => $"storage for {resourceName}"));
shortfalls.AddRange(tieredProducers
.Where(tp => tp.IsProductionEnabled && tp.Output.CanBeStored)
.Select(tp => tp.Output.TieredName(tp.Tier))
.Where(resourceName => !storage.ContainsKey(resourceName))
.Distinct()
.Select(resourceName => $"storage for {resourceName}"));
limitedByMessage = shortfalls.Count == 0 ? null : string.Join(", ", shortfalls.ToArray());
var allResearchEntries = researchSink.Data.Values.ToList();
foreach (var group in tieredProducers
.Where(tp => !researchSink.Data.ContainsKey(tp.Output.ResearchCategory))
.GroupBy(tp => tp.Output.ResearchCategory))
{
var maxTier = group.Max(tp => tp.Tier);
var topTierProducers = group.Where(tp => tp.Tier == maxTier).ToArray();
ITieredProducer exampleProducer = group.FirstOrDefault(tp => tp.IsResearchEnabled && tp.IsProductionEnabled);
// We're looking for the best example of why research isn't enabled - maxtier is the top
exampleProducer = topTierProducers.FirstOrDefault(tp => tp.Tier == TechTier.Tier4);
if (exampleProducer == null)
{
exampleProducer = topTierProducers.FirstOrDefault(tp => tp.IsProductionEnabled);
}
if (exampleProducer == null)
{
exampleProducer = topTierProducers.First();
}
var researchEntry = ColonizationResearchScenario.Instance.GetResearchProgress(
exampleProducer.Output, exampleProducer.Body, exampleProducer.Tier,
exampleProducer.IsResearchEnabled ? "Production Blocked" : exampleProducer.ReasonWhyResearchIsDisabled);
allResearchEntries.Add(researchEntry);
}
progress = allResearchEntries;
}
}
