mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-10 18:22:39 +00:00
154 lines
4.7 KiB
Plaintext
154 lines
4.7 KiB
Plaintext
//node1, air1, network1 correspond to input
|
|
//node2, air2, network2 correspond to output
|
|
/obj/machinery/atmospherics/binary/circulator
|
|
name = "circulator"
|
|
desc = "A gas circulator turbine and heat exchanger."
|
|
icon = 'icons/obj/power.dmi'
|
|
icon_state = "circ-unassembled"
|
|
anchored = FALSE
|
|
unacidable = TRUE
|
|
pipe_flags = PIPING_DEFAULT_LAYER_ONLY|PIPING_ONE_PER_TURF
|
|
|
|
var/kinetic_efficiency = 0.04 //combined kinetic and kinetic-to-electric efficiency
|
|
var/volume_ratio = 0.2
|
|
|
|
var/recent_moles_transferred = 0
|
|
var/last_heat_capacity = 0
|
|
var/last_temperature = 0
|
|
var/last_pressure_delta = 0
|
|
var/last_worldtime_transfer = 0
|
|
var/last_stored_energy_transferred = 0
|
|
var/volume_capacity_used = 0
|
|
var/stored_energy = 0
|
|
var/temperature_overlay
|
|
|
|
density = TRUE
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/Initialize()
|
|
. = ..()
|
|
|
|
desc = initial(desc) + " Its outlet port is to the [dir2text(dir)]."
|
|
air1.volume = 400
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/proc/return_transfer_air()
|
|
var/datum/gas_mixture/removed
|
|
if(anchored && !(stat&BROKEN) && network1)
|
|
var/input_starting_pressure = air1.return_pressure()
|
|
var/output_starting_pressure = air2.return_pressure()
|
|
last_pressure_delta = max(input_starting_pressure - output_starting_pressure - 5, 0)
|
|
|
|
//only circulate air if there is a pressure difference (plus 5kPa kinetic, 10kPa static friction)
|
|
if(air1.temperature > 0 && last_pressure_delta > 5)
|
|
|
|
//Calculate necessary moles to transfer using PV = nRT
|
|
recent_moles_transferred = (last_pressure_delta*network1.volume/(air1.temperature * R_IDEAL_GAS_EQUATION))/3 //uses the volume of the whole network, not just itself
|
|
volume_capacity_used = min( (last_pressure_delta*network1.volume/3)/(input_starting_pressure*air1.volume) , 1) //how much of the gas in the input air volume is consumed
|
|
|
|
//Calculate energy generated from kinetic turbine
|
|
stored_energy += 1/ADIABATIC_EXPONENT * min(last_pressure_delta * network1.volume , input_starting_pressure*air1.volume) * (1 - volume_ratio**ADIABATIC_EXPONENT) * kinetic_efficiency
|
|
|
|
//Actually transfer the gas
|
|
removed = air1.remove(recent_moles_transferred)
|
|
if(removed)
|
|
last_heat_capacity = removed.heat_capacity()
|
|
last_temperature = removed.temperature
|
|
|
|
//Update the gas networks.
|
|
network1.update = 1
|
|
|
|
last_worldtime_transfer = world.time
|
|
else
|
|
recent_moles_transferred = 0
|
|
|
|
update_icon()
|
|
return removed
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/proc/return_stored_energy()
|
|
last_stored_energy_transferred = stored_energy
|
|
stored_energy = 0
|
|
return last_stored_energy_transferred
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/process()
|
|
..()
|
|
|
|
if(last_worldtime_transfer < world.time - 50)
|
|
recent_moles_transferred = 0
|
|
update_icon()
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/update_icon()
|
|
icon_state = anchored ? "circ-assembled" : "circ-unassembled"
|
|
cut_overlays()
|
|
if (stat & (BROKEN|NOPOWER) || !anchored)
|
|
return 1
|
|
if (last_pressure_delta > 0 && recent_moles_transferred > 0)
|
|
if (temperature_overlay)
|
|
add_overlay(temperature_overlay)
|
|
if (last_pressure_delta > 5*ONE_ATMOSPHERE)
|
|
add_overlay("circ-run")
|
|
else
|
|
add_overlay("circ-slow")
|
|
else
|
|
add_overlay("circ-off")
|
|
|
|
return 1
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/attackby(obj/item/W as obj, mob/user as mob)
|
|
if(W.has_tool_quality(TOOL_WRENCH))
|
|
playsound(src, W.usesound, 75, 1)
|
|
anchored = !anchored
|
|
user.visible_message("[user.name] [anchored ? "secures" : "unsecures"] the bolts holding [src.name] to the floor.", \
|
|
"You [anchored ? "secure" : "unsecure"] the bolts holding [src] to the floor.", \
|
|
"You hear a ratchet.")
|
|
|
|
if(anchored)
|
|
temperature_overlay = null
|
|
if(dir & (NORTH|SOUTH))
|
|
initialize_directions = NORTH|SOUTH
|
|
else if(dir & (EAST|WEST))
|
|
initialize_directions = EAST|WEST
|
|
|
|
atmos_init()
|
|
build_network()
|
|
if (node1)
|
|
node1.atmos_init()
|
|
node1.build_network()
|
|
if (node2)
|
|
node2.atmos_init()
|
|
node2.build_network()
|
|
else
|
|
if(node1)
|
|
node1.disconnect(src)
|
|
qdel(network1)
|
|
if(node2)
|
|
node2.disconnect(src)
|
|
qdel(network2)
|
|
|
|
node1 = null
|
|
node2 = null
|
|
|
|
else
|
|
..()
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/verb/rotate_clockwise()
|
|
set name = "Rotate Circulator Clockwise"
|
|
set category = "Object"
|
|
set src in view(1)
|
|
|
|
if (usr.stat || usr.restrained() || anchored)
|
|
return
|
|
|
|
src.set_dir(turn(src.dir, 270))
|
|
desc = initial(desc) + " Its outlet port is to the [dir2text(dir)]."
|
|
|
|
|
|
/obj/machinery/atmospherics/binary/circulator/verb/rotate_counterclockwise()
|
|
set name = "Rotate Circulator Counterclockwise"
|
|
set category = "Object"
|
|
set src in view(1)
|
|
|
|
if (usr.stat || usr.restrained() || anchored)
|
|
return
|
|
|
|
src.set_dir(turn(src.dir, 90))
|
|
desc = initial(desc) + " Its outlet port is to the [dir2text(dir)]."
|