Add space heaters (#25250)
This commit is contained in:
@@ -55,6 +55,7 @@ namespace Content.Server.Atmos.Piping.Unary.EntitySystems
|
||||
|
||||
private void OnThermoMachineUpdated(EntityUid uid, GasThermoMachineComponent thermoMachine, ref AtmosDeviceUpdateEvent args)
|
||||
{
|
||||
thermoMachine.LastEnergyDelta = 0f;
|
||||
if (!(_power.IsPowered(uid) && TryComp<ApcPowerReceiverComponent>(uid, out var receiver)))
|
||||
return;
|
||||
|
||||
@@ -100,12 +101,14 @@ namespace Content.Server.Atmos.Piping.Unary.EntitySystems
|
||||
if (thermoMachine.Atmospheric)
|
||||
{
|
||||
_atmosphereSystem.AddHeat(heatExchangeGasMixture, dQActual);
|
||||
thermoMachine.LastEnergyDelta = dQActual;
|
||||
}
|
||||
else
|
||||
{
|
||||
float dQLeak = dQActual * thermoMachine.EnergyLeakPercentage;
|
||||
float dQPipe = dQActual - dQLeak;
|
||||
_atmosphereSystem.AddHeat(heatExchangeGasMixture, dQPipe);
|
||||
thermoMachine.LastEnergyDelta = dQPipe;
|
||||
|
||||
if (dQLeak != 0f && _atmosphereSystem.GetContainingMixture(uid) is { } containingMixture)
|
||||
_atmosphereSystem.AddHeat(containingMixture, dQLeak);
|
||||
|
||||
58
Content.Server/Atmos/Portable/SpaceHeaterComponent.cs
Normal file
58
Content.Server/Atmos/Portable/SpaceHeaterComponent.cs
Normal file
@@ -0,0 +1,58 @@
|
||||
using Content.Shared.Atmos;
|
||||
using Content.Shared.Atmos.Piping.Portable.Components;
|
||||
using Content.Shared.Atmos.Visuals;
|
||||
|
||||
namespace Content.Server.Atmos.Portable;
|
||||
|
||||
[RegisterComponent]
|
||||
public sealed partial class SpaceHeaterComponent : Component
|
||||
{
|
||||
/// <summary>
|
||||
/// Current mode the space heater is in. Possible values : Auto, Heat and Cool
|
||||
/// </summary>
|
||||
[DataField, ViewVariables(VVAccess.ReadWrite)]
|
||||
public SpaceHeaterMode Mode = SpaceHeaterMode.Auto;
|
||||
|
||||
/// <summary>
|
||||
/// The power level the space heater is currently set to. Possible values : Low, Medium, High
|
||||
/// </summary>
|
||||
[DataField, ViewVariables(VVAccess.ReadWrite)]
|
||||
public SpaceHeaterPowerLevel PowerLevel = SpaceHeaterPowerLevel.Medium;
|
||||
|
||||
/// <summary>
|
||||
/// Maximum target temperature the device can be set to
|
||||
/// </summary>
|
||||
[DataField, ViewVariables(VVAccess.ReadWrite)]
|
||||
public float MaxTemperature = Atmospherics.T20C + 20;
|
||||
|
||||
/// <summary>
|
||||
/// Minimal target temperature the device can be set to
|
||||
/// </summary>
|
||||
[DataField, ViewVariables(VVAccess.ReadWrite)]
|
||||
public float MinTemperature = Atmospherics.T0C - 10;
|
||||
|
||||
/// <summary>
|
||||
/// Coefficient of performance. Output power / input power.
|
||||
/// Positive for heaters, negative for freezers.
|
||||
/// </summary>
|
||||
[DataField("heatingCoefficientOfPerformance")]
|
||||
[ViewVariables(VVAccess.ReadWrite)]
|
||||
public float HeatingCp = 1f;
|
||||
|
||||
[DataField("coolingCoefficientOfPerformance")]
|
||||
[ViewVariables(VVAccess.ReadWrite)]
|
||||
public float CoolingCp = -0.9f;
|
||||
|
||||
/// <summary>
|
||||
/// The delta from the target temperature after which the space heater switch mode while in Auto. Value should account for the thermomachine temperature tolerance.
|
||||
/// </summary>
|
||||
[DataField]
|
||||
[ViewVariables(VVAccess.ReadWrite)]
|
||||
public float AutoModeSwitchThreshold = 0.8f;
|
||||
|
||||
/// <summary>
|
||||
/// Current electrical power consumption, in watts, of the space heater at medium power level. Passed to the thermomachine component.
|
||||
/// </summary>
|
||||
[DataField, ViewVariables(VVAccess.ReadWrite)]
|
||||
public float PowerConsumption = 3500f;
|
||||
}
|
||||
191
Content.Server/Atmos/Portable/SpaceHeaterSystem.cs
Normal file
191
Content.Server/Atmos/Portable/SpaceHeaterSystem.cs
Normal file
@@ -0,0 +1,191 @@
|
||||
using Content.Server.Atmos.EntitySystems;
|
||||
using Content.Server.Atmos.Piping.Components;
|
||||
using Content.Server.Atmos.Piping.Unary.Components;
|
||||
using Content.Server.Popups;
|
||||
using Content.Server.Power.Components;
|
||||
using Content.Server.Power.EntitySystems;
|
||||
using Content.Shared.Atmos.Piping.Portable.Components;
|
||||
using Content.Shared.Atmos.Visuals;
|
||||
using Content.Shared.UserInterface;
|
||||
using Robust.Server.GameObjects;
|
||||
|
||||
namespace Content.Server.Atmos.Portable;
|
||||
|
||||
public sealed class SpaceHeaterSystem : EntitySystem
|
||||
{
|
||||
[Dependency] private readonly AtmosphereSystem _atmosphereSystem = default!;
|
||||
[Dependency] private readonly PopupSystem _popup = default!;
|
||||
[Dependency] private readonly PowerReceiverSystem _power = default!;
|
||||
[Dependency] private readonly SharedAppearanceSystem _appearance = default!;
|
||||
[Dependency] private readonly UserInterfaceSystem _userInterfaceSystem = default!;
|
||||
|
||||
public override void Initialize()
|
||||
{
|
||||
base.Initialize();
|
||||
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, ActivatableUIOpenAttemptEvent>(OnUIActivationAttempt);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, BeforeActivatableUIOpenEvent>(OnBeforeOpened);
|
||||
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, AtmosDeviceUpdateEvent>(OnDeviceUpdated);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, MapInitEvent>(OnInit);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, PowerChangedEvent>(OnPowerChanged);
|
||||
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, SpaceHeaterChangeModeMessage>(OnModeChanged);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, SpaceHeaterChangePowerLevelMessage>(OnPowerLevelChanged);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, SpaceHeaterChangeTemperatureMessage>(OnTemperatureChanged);
|
||||
SubscribeLocalEvent<SpaceHeaterComponent, SpaceHeaterToggleMessage>(OnToggle);
|
||||
}
|
||||
|
||||
private void OnInit(EntityUid uid, SpaceHeaterComponent spaceHeater, MapInitEvent args)
|
||||
{
|
||||
if (!TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
return;
|
||||
thermoMachine.Cp = spaceHeater.HeatingCp;
|
||||
thermoMachine.HeatCapacity = spaceHeater.PowerConsumption;
|
||||
}
|
||||
|
||||
private void OnBeforeOpened(EntityUid uid, SpaceHeaterComponent spaceHeater, BeforeActivatableUIOpenEvent args)
|
||||
{
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void OnUIActivationAttempt(EntityUid uid, SpaceHeaterComponent spaceHeater, ActivatableUIOpenAttemptEvent args)
|
||||
{
|
||||
if (!Comp<TransformComponent>(uid).Anchored)
|
||||
{
|
||||
_popup.PopupEntity(Loc.GetString("comp-space-heater-unanchored", ("device", Loc.GetString("comp-space-heater-device-name"))), uid, args.User);
|
||||
args.Cancel();
|
||||
}
|
||||
}
|
||||
|
||||
private void OnDeviceUpdated(EntityUid uid, SpaceHeaterComponent spaceHeater, ref AtmosDeviceUpdateEvent args)
|
||||
{
|
||||
if (!_power.IsPowered(uid)
|
||||
|| !TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
UpdateAppearance(uid);
|
||||
|
||||
// If in automatic temperature mode, check if we need to adjust the heat exchange direction
|
||||
if (spaceHeater.Mode == SpaceHeaterMode.Auto)
|
||||
{
|
||||
var environment = _atmosphereSystem.GetContainingMixture(uid);
|
||||
if (environment == null)
|
||||
return;
|
||||
|
||||
if (environment.Temperature <= thermoMachine.TargetTemperature - (thermoMachine.TemperatureTolerance + spaceHeater.AutoModeSwitchThreshold))
|
||||
{
|
||||
thermoMachine.Cp = spaceHeater.HeatingCp;
|
||||
}
|
||||
else if (environment.Temperature >= thermoMachine.TargetTemperature + (thermoMachine.TemperatureTolerance + spaceHeater.AutoModeSwitchThreshold))
|
||||
{
|
||||
thermoMachine.Cp = spaceHeater.CoolingCp;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
private void OnPowerChanged(EntityUid uid, SpaceHeaterComponent spaceHeater, ref PowerChangedEvent args)
|
||||
{
|
||||
UpdateAppearance(uid);
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void OnToggle(EntityUid uid, SpaceHeaterComponent spaceHeater, SpaceHeaterToggleMessage args)
|
||||
{
|
||||
ApcPowerReceiverComponent? powerReceiver = null;
|
||||
if (!Resolve(uid, ref powerReceiver))
|
||||
return;
|
||||
|
||||
_power.TogglePower(uid);
|
||||
|
||||
UpdateAppearance(uid);
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void OnTemperatureChanged(EntityUid uid, SpaceHeaterComponent spaceHeater, SpaceHeaterChangeTemperatureMessage args)
|
||||
{
|
||||
if (!TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
return;
|
||||
|
||||
thermoMachine.TargetTemperature += args.Temperature;
|
||||
|
||||
UpdateAppearance(uid);
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void OnModeChanged(EntityUid uid, SpaceHeaterComponent spaceHeater, SpaceHeaterChangeModeMessage args)
|
||||
{
|
||||
if (!TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
return;
|
||||
|
||||
spaceHeater.Mode = args.Mode;
|
||||
|
||||
if (spaceHeater.Mode == SpaceHeaterMode.Heat)
|
||||
thermoMachine.Cp = spaceHeater.HeatingCp;
|
||||
else if (spaceHeater.Mode == SpaceHeaterMode.Cool)
|
||||
thermoMachine.Cp = spaceHeater.CoolingCp;
|
||||
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void OnPowerLevelChanged(EntityUid uid, SpaceHeaterComponent spaceHeater, SpaceHeaterChangePowerLevelMessage args)
|
||||
{
|
||||
if (!TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
return;
|
||||
|
||||
spaceHeater.PowerLevel = args.PowerLevel;
|
||||
|
||||
switch (spaceHeater.PowerLevel)
|
||||
{
|
||||
case SpaceHeaterPowerLevel.Low:
|
||||
thermoMachine.HeatCapacity = spaceHeater.PowerConsumption / 2;
|
||||
break;
|
||||
|
||||
case SpaceHeaterPowerLevel.Medium:
|
||||
thermoMachine.HeatCapacity = spaceHeater.PowerConsumption;
|
||||
break;
|
||||
|
||||
case SpaceHeaterPowerLevel.High:
|
||||
thermoMachine.HeatCapacity = spaceHeater.PowerConsumption * 2;
|
||||
break;
|
||||
}
|
||||
|
||||
DirtyUI(uid, spaceHeater);
|
||||
}
|
||||
|
||||
private void DirtyUI(EntityUid uid, SpaceHeaterComponent? spaceHeater)
|
||||
{
|
||||
if (!Resolve(uid, ref spaceHeater)
|
||||
|| !TryComp<GasThermoMachineComponent>(uid, out var thermoMachine)
|
||||
|| !TryComp<ApcPowerReceiverComponent>(uid, out var powerReceiver))
|
||||
{
|
||||
return;
|
||||
}
|
||||
_userInterfaceSystem.TrySetUiState(uid, SpaceHeaterUiKey.Key,
|
||||
new SpaceHeaterBoundUserInterfaceState(spaceHeater.MinTemperature, spaceHeater.MaxTemperature, thermoMachine.TargetTemperature, !powerReceiver.PowerDisabled, spaceHeater.Mode, spaceHeater.PowerLevel));
|
||||
}
|
||||
|
||||
private void UpdateAppearance(EntityUid uid)
|
||||
{
|
||||
if (!_power.IsPowered(uid) || !TryComp<GasThermoMachineComponent>(uid, out var thermoMachine))
|
||||
{
|
||||
_appearance.SetData(uid, SpaceHeaterVisuals.State, SpaceHeaterState.Off);
|
||||
return;
|
||||
}
|
||||
|
||||
if (thermoMachine.LastEnergyDelta > 0)
|
||||
{
|
||||
_appearance.SetData(uid, SpaceHeaterVisuals.State, SpaceHeaterState.Heating);
|
||||
}
|
||||
else if (thermoMachine.LastEnergyDelta < 0)
|
||||
{
|
||||
_appearance.SetData(uid, SpaceHeaterVisuals.State, SpaceHeaterState.Cooling);
|
||||
}
|
||||
else
|
||||
{
|
||||
_appearance.SetData(uid, SpaceHeaterVisuals.State, SpaceHeaterState.StandBy);
|
||||
}
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user