Files
vgstation13/code/ATMOSPHERICS/datum_pipe_network.dm
Exxion 09b5eee41b Fixes thermal plates (#27682)
* Cleanup

* Fixes thermal plates
2020-08-29 13:53:02 -03:00

147 lines
3.8 KiB
Plaintext

/datum/pipe_network
var/list/datum/gas_mixture/gases = list() //All of the gas_mixtures continuously connected in this network
var/volume = 0 //caches the total volume for atmos machines to use in gas calculations
var/list/obj/machinery/atmospherics/normal_members = list()
var/list/datum/pipeline/line_members = list()
//membership roster to go through for updates and what not
var/update = 1
var/datum/gas_mixture/air_transient = null
var/datum/gas_mixture/radiate = null
/datum/pipe_network/New()
air_transient = new()
..()
/datum/pipe_network/Destroy()
for(var/datum/pipeline/pipeline in line_members) //This will remove the pipeline references for us
pipeline.network = null
line_members = null
for(var/obj/machinery/atmospherics/objects in normal_members) //Procs for the different bases will remove the references
objects.unassign_network(src)
normal_members = null
pipe_networks -= src
if(air_transient)
qdel(air_transient)
air_transient = null
radiate = null //This is a ref to an external gas_mixture, so it should not be deleted
gases = null
..()
/datum/pipe_network/proc/process()
set waitfor = FALSE
//Equalize gases amongst pipe if called for
if(update)
update = 0
reconcile_air() //equalize_gases(gases)
radiate = null //Reset our last ticks calculation for the post-radiate() gases inside a thermal plate
#ifdef ATMOS_PIPELINE_PROCESSING
//Give pipelines their process call for pressure checking and what not. Have to remove pressure checks for the time being as pipes dont radiate heat - Mport
for(var/datum/pipeline/line_member in line_members)
line_member.process()
#endif
/datum/pipe_network/proc/build_network(obj/machinery/atmospherics/start_normal, obj/machinery/atmospherics/reference)
//Purpose: Generate membership roster
//Notes: Assuming that members will add themselves to appropriate roster in network_expandz()
if(!start_normal)
qdel(src)
return
start_normal.network_expand(src, reference)
update_network_gases()
if((normal_members.len>0)||(line_members.len>0))
pipe_networks |= src
else
qdel(src)
return
return 1
/datum/pipe_network/proc/merge(datum/pipe_network/giver)
if(giver==src)
return 0
normal_members |= giver.normal_members
line_members |= giver.line_members
for(var/obj/machinery/atmospherics/normal_member in giver.normal_members)
normal_member.reassign_network(giver, src)
for(var/datum/pipeline/line_member in giver.line_members)
line_member.network = src
giver.line_members = null
giver.normal_members = null
qdel(giver)
update_network_gases()
return 1
/datum/pipe_network/proc/update_network_gases()
//Go through membership roster and make sure gases is up to date
gases = list()
volume = 0
for(var/obj/machinery/atmospherics/normal_member in normal_members)
var/result = normal_member.return_network_air(src)
if(result)
gases += result
for(var/datum/pipeline/line_member in line_members)
gases += line_member.air
for(var/datum/gas_mixture/air in gases)
volume += air.volume
/datum/pipe_network/proc/reconcile_air()
//Perfectly equalize all gases members instantly
air_transient.multiply(0)
air_transient.volume = 0
for(var/datum/gas_mixture/gas in gases)
air_transient.volume += gas.volume
air_transient.merge(gas, FALSE)
if(air_transient.volume > 0)
//Allow air mixture to react
if(air_transient.react())
update = 1
air_transient.update_values()
for(var/datum/gas_mixture/gas in gases)
gas.copy_from(air_transient)
return 1
/proc/equalize_gases(list/datum/gas_mixture/gases)
//Perfectly equalize all gases members instantly
var/datum/gas_mixture/temp = new()
temp.volume = 0
for(var/datum/gas_mixture/gas in gases)
temp.volume += gas.volume
temp.merge(gas)
for(var/datum/gas_mixture/gas in gases)
gas.copy_from(temp)
return 1