[port] TGgases Try 2

Content.Server/ADT/Atmos/Reactions/BZProductionReaction.cs

@@ -0,0 +1,51 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class BZProductionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialNitrousOxide = mixture.GetMoles(Gas.NitrousOxide);
+        var initialPlasma = mixture.GetMoles(Gas.Plasma);
+
+        var environmentEfficiency = mixture.Volume / mixture.Pressure;
+        var ratioEfficiency = Math.Min(initialNitrousOxide / initialPlasma, 1);
+
+        var bZFormed = Math.Min(0.01f * ratioEfficiency * environmentEfficiency, Math.Min(initialNitrousOxide * 0.4f, initialPlasma * 0.8f));
+
+        if (initialNitrousOxide - bZFormed * 0.4f < 0 || initialPlasma - (0.8f - bZFormed) < 0 || bZFormed <= 0)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+
+        var amountDecomposed = 0.0f;
+        var nitrousOxideDecomposedFactor = Math.Max(4.0f * (initialPlasma / (initialNitrousOxide + initialPlasma) - 0.75f), 0);
+        if (nitrousOxideDecomposedFactor > 0)
+        {
+            amountDecomposed = 0.4f * bZFormed * nitrousOxideDecomposedFactor;
+            mixture.AdjustMoles(Gas.Oxygen, amountDecomposed);
+            mixture.AdjustMoles(Gas.Nitrogen, 0.5f * amountDecomposed);
+        }
+
+        mixture.AdjustMoles(Gas.BZ, Math.Max(0f, bZFormed * (1.0f - nitrousOxideDecomposedFactor)));
+        mixture.AdjustMoles(Gas.NitrousOxide, -0.4f * bZFormed);
+        mixture.AdjustMoles(Gas.Plasma, -0.8f * bZFormed * (1.0f - nitrousOxideDecomposedFactor));
+
+        var energyReleased = bZFormed * (Atmospherics.BZFormationEnergy + nitrousOxideDecomposedFactor * (Atmospherics.NitrousOxideDecompositionEnergy - Atmospherics.BZFormationEnergy));
+
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyReleased) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/HalonOxygenAbsorptionReaction.cs

@@ -0,0 +1,39 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class HalonOxygenAbsorptionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialHalon = mixture.GetMoles(Gas.Halon);
+        var initialOxygen = mixture.GetMoles(Gas.Oxygen);
+
+        var temperature = mixture.Temperature;
+
+        var heatEfficiency = Math.Min(temperature / (Atmospherics.FireMinimumTemperatureToExist * 10f), Math.Min(initialHalon, initialOxygen * 20f));
+        if (heatEfficiency <= 0f || initialHalon - heatEfficiency < 0f || initialOxygen - heatEfficiency * 20f < 0f)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+
+        mixture.AdjustMoles(Gas.Halon, -heatEfficiency);
+        mixture.AdjustMoles(Gas.Oxygen, -heatEfficiency * 20f);
+        mixture.AdjustMoles(Gas.CarbonDioxide, heatEfficiency * 5f);
+
+        var energyUsed = heatEfficiency * Atmospherics.HalonCombustionEnergy;
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyUsed) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/HealiumProductionReaction.cs

@@ -0,0 +1,40 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class HealiumProductionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialBZ = mixture.GetMoles(Gas.BZ);
+        var initialFrezon = mixture.GetMoles(Gas.Frezon);
+
+        var temperature = mixture.Temperature;
+        var heatEfficiency = Math.Min(temperature * 0.3f, Math.Min(initialFrezon * 2.75f, initialBZ * 0.25f));
+
+        if (heatEfficiency <= 0 || initialFrezon - heatEfficiency * 2.75f < 0 || initialBZ - heatEfficiency * 0.25f < 0)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+
+        mixture.AdjustMoles(Gas.Frezon, -heatEfficiency * 2.75f);
+        mixture.AdjustMoles(Gas.BZ, -heatEfficiency * 0.25f);
+        mixture.AdjustMoles(Gas.Healium, heatEfficiency * 3);
+
+        var energyReleased = heatEfficiency * Atmospherics.HealiumFormationEnergy;
+
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyReleased) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/HydrogenFireReaction.cs

@@ -0,0 +1,59 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions
+{
+    [UsedImplicitly]
+    [DataDefinition]
+    public sealed partial class HydrogenFireReaction : IGasReactionEffect
+    {
+        public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+        {
+            var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+            if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+                return ReactionResult.NoReaction;
+
+            var energyReleased = 0f;
+            var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+            var temperature = mixture.Temperature;
+            var location = holder as TileAtmosphere;
+            mixture.ReactionResults[GasReaction.Fire] = 0;
+
+            var initialOxygen = mixture.GetMoles(Gas.Oxygen);
+            var initialHydrogen = mixture.GetMoles(Gas.Hydrogen);
+
+            var burnedFuel = Math.Min(initialHydrogen / Atmospherics.FireH2BurnRateDelta, Math.Min(initialOxygen / (Atmospherics.FireH2BurnRateDelta * Atmospherics.H2OxygenFullBurn), Math.Min(initialHydrogen, initialOxygen * 0.5f)));
+
+            if (burnedFuel > 0)
+            {
+                energyReleased += Atmospherics.FireH2EnergyReleased * burnedFuel;
+
+                mixture.AdjustMoles(Gas.WaterVapor, burnedFuel);
+                mixture.AdjustMoles(Gas.Hydrogen, -burnedFuel);
+                mixture.AdjustMoles(Gas.Oxygen, -burnedFuel * 0.5f);
+
+                mixture.ReactionResults[GasReaction.Fire] += burnedFuel;
+            }
+
+            if (energyReleased > 0)
+            {
+                var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+                if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+                    mixture.Temperature = (temperature * oldHeatCapacity + energyReleased) / newHeatCapacity;
+            }
+
+            if (location != null)
+            {
+                temperature = mixture.Temperature;
+                if (temperature > Atmospherics.FireMinimumTemperatureToExist)
+                {
+                    atmosphereSystem.HotspotExpose(location.GridIndex, location.GridIndices, temperature, mixture.Volume);
+                }
+            }
+
+            return mixture.ReactionResults[GasReaction.Fire] != 0 ? ReactionResult.Reacting : ReactionResult.NoReaction;
+        }
+    }
+}

Content.Server/ADT/Atmos/Reactions/HyperNobliumProductionReaction.cs

@@ -0,0 +1,41 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class HyperNobliumProductionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialNitrogen = mixture.GetMoles(Gas.Nitrogen);
+        var initialTritium = mixture.GetMoles(Gas.Tritium);
+        var initialBZ = mixture.GetMoles(Gas.BZ);
+
+        var nobFormed = Math.Min((initialNitrogen + initialTritium) * 0.01f, Math.Min(initialTritium * 5f, initialNitrogen * 10f));
+        if (nobFormed <= 0 || (initialTritium - 5f) * nobFormed < 0 || (initialNitrogen - 10f) * nobFormed < 0)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+
+        var reductionFactor = Math.Clamp(initialTritium / (initialTritium + initialBZ), 0.001f, 1f);
+
+        mixture.AdjustMoles(Gas.Tritium, -5f * nobFormed * reductionFactor);
+        mixture.AdjustMoles(Gas.Nitrogen, -10f * nobFormed);
+        mixture.AdjustMoles(Gas.HyperNoblium, nobFormed);
+
+        var energyReleased = nobFormed * (Atmospherics.NobliumFormationEnergy / Math.Max(initialBZ, 1));
+
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyReleased) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/NitriumDecompositionReaction.cs

@@ -0,0 +1,39 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class NitriumDecompositionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialNitrium = mixture.GetMoles(Gas.Nitrium);
+
+        var temperature = mixture.Temperature;
+        var heatEfficiency = Math.Min(temperature / Atmospherics.NitriumDecompositionTempDivisor, initialNitrium);
+
+        if (heatEfficiency <= 0 || initialNitrium - heatEfficiency < 0)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+
+        mixture.AdjustMoles(Gas.Nitrium, -heatEfficiency);
+        mixture.AdjustMoles(Gas.Hydrogen, heatEfficiency);
+        mixture.AdjustMoles(Gas.Nitrogen, heatEfficiency);
+
+        var energyReleased = heatEfficiency * Atmospherics.NitriumDecompositionEnergy;
+
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyReleased) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/NitriumProductionReaction.cs

@@ -0,0 +1,41 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class NitriumProductionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialTritium = mixture.GetMoles(Gas.Tritium);
+        var initialNitrogen = mixture.GetMoles(Gas.Nitrogen);
+        var initialBZ = mixture.GetMoles(Gas.BZ);
+
+        var temperature = mixture.Temperature;
+        var heatEfficiency = Math.Min(temperature / Atmospherics.NitriumFormationTempDivisor, Math.Min(initialTritium, Math.Min(initialNitrogen, initialBZ * 0.05f)));
+
+        if (heatEfficiency <= 0 || initialTritium - heatEfficiency < 0 || initialNitrogen - heatEfficiency < 0 || initialBZ - heatEfficiency * 0.05f < 0)
+            return ReactionResult.NoReaction;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        mixture.AdjustMoles(Gas.Tritium, -heatEfficiency);
+        mixture.AdjustMoles(Gas.Nitrogen, -heatEfficiency);
+        mixture.AdjustMoles(Gas.BZ, -heatEfficiency * 0.05f);
+        mixture.AdjustMoles(Gas.Nitrium, heatEfficiency);
+
+        var energyUsed = heatEfficiency * Atmospherics.NitriumFormationEnergy;
+
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity - energyUsed) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}

Content.Server/ADT/Atmos/Reactions/PluoxiumProductionReaction.cs

@@ -0,0 +1,41 @@
+using Content.Server.Atmos.EntitySystems;
+using Content.Shared.Atmos;
+using Content.Shared.Atmos.Reactions;
+using JetBrains.Annotations;
+
+namespace Content.Server.Atmos.Reactions;
+
+[UsedImplicitly]
+public sealed partial class PluoxiumProductionReaction : IGasReactionEffect
+{
+    public ReactionResult React(GasMixture mixture, IGasMixtureHolder? holder, AtmosphereSystem atmosphereSystem, float heatScale)
+    {
+        var initialHyperNoblium = mixture.GetMoles(Gas.HyperNoblium);
+        if (initialHyperNoblium >= 5.0f && mixture.Temperature > 20f)
+            return ReactionResult.NoReaction;
+
+        var initialCarbonDioxide = mixture.GetMoles(Gas.CarbonDioxide);
+        var initialOxygen = mixture.GetMoles(Gas.Oxygen);
+        var initialTritium = mixture.GetMoles(Gas.Tritium);
+
+        var producedAmount = Math.Min(Atmospherics.PluoxiumMaxRate, Math.Min(initialCarbonDioxide, Math.Min(initialOxygen * 0.5f, initialTritium * 0.01f)));
+
+        if (producedAmount <= 0 || initialCarbonDioxide - producedAmount < 0 || initialOxygen - producedAmount * 0.5f < 0 || initialTritium - producedAmount * 0.01f < 0)
+            return ReactionResult.NoReaction;
+
+        mixture.AdjustMoles(Gas.CarbonDioxide, -producedAmount);
+        mixture.AdjustMoles(Gas.Oxygen, -producedAmount * 0.5f);
+        mixture.AdjustMoles(Gas.Tritium, -producedAmount * 0.01f);
+        mixture.AdjustMoles(Gas.Pluoxium, producedAmount);
+        mixture.AdjustMoles(Gas.Hydrogen, producedAmount * 0.01f);
+
+        var energyReleased = producedAmount * Atmospherics.PluoxiumFormationEnergy;
+
+        var oldHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        var newHeatCapacity = atmosphereSystem.GetHeatCapacity(mixture, true);
+        if (newHeatCapacity > Atmospherics.MinimumHeatCapacity)
+            mixture.Temperature = Math.Max((mixture.Temperature * oldHeatCapacity + energyReleased) / newHeatCapacity, Atmospherics.TCMB);
+
+        return ReactionResult.Reacting;
+    }
+}