mirror of
https://github.com/ParadiseSS13/Paradise.git
synced 2026-08-27 05:57:24 +01:00
Final parts of the air alarm rewrite.
This commit is contained in:
SkyMarshal
@@ -7,7 +7,7 @@
|
||||
|
||||
level = 1
|
||||
var/area_uid
|
||||
var/id_tag = null
|
||||
var/id_tag
|
||||
power_channel = ENVIRON
|
||||
|
||||
var/on = 0
|
||||
@@ -24,12 +24,6 @@
|
||||
|
||||
var/welded = 0 // Added for aliens -- TLE
|
||||
|
||||
var/frequency = 1439
|
||||
var/datum/radio_frequency/radio_connection
|
||||
|
||||
var/radio_filter_out
|
||||
var/radio_filter_in
|
||||
|
||||
New()
|
||||
var/area/A = get_area(loc)
|
||||
if (A.master)
|
||||
@@ -43,6 +37,12 @@
|
||||
broadcast_status()
|
||||
..()
|
||||
|
||||
Del()
|
||||
var/area/alarm_area = get_area(src)
|
||||
if(alarm_area && "\"[id_tag]\"" in alarm_area.master.air_vents)
|
||||
alarm_area.master.air_vents.Remove("\"[id_tag]\"")
|
||||
..()
|
||||
|
||||
high_volume
|
||||
name = "Large Air Vent"
|
||||
|
||||
@@ -50,6 +50,10 @@
|
||||
..()
|
||||
air_contents.volume = 1000
|
||||
|
||||
initialize()
|
||||
spawn(20)
|
||||
broadcast_status()
|
||||
|
||||
update_icon()
|
||||
if(welded)
|
||||
icon_state = "[level == 1 && istype(loc, /turf/simulated) ? "h" : "" ]weld"
|
||||
@@ -66,6 +70,7 @@
|
||||
|
||||
process()
|
||||
..()
|
||||
broadcast_status()
|
||||
if(stat & (NOPOWER|BROKEN))
|
||||
return
|
||||
if (!node)
|
||||
@@ -123,93 +128,76 @@
|
||||
|
||||
|
||||
|
||||
//Radio remote control
|
||||
|
||||
proc/broadcast_status()
|
||||
var/datum/signal/signal = new
|
||||
signal.transmission_method = 1 //radio signal
|
||||
signal.source = src
|
||||
|
||||
signal.data = list(
|
||||
"area" = src.area_uid,
|
||||
"tag" = src.id_tag,
|
||||
"device" = "AVP",
|
||||
"power" = on,
|
||||
"direction" = pump_direction?("release"):("siphon"),
|
||||
"checks" = pressure_checks,
|
||||
"internal" = internal_pressure_bound,
|
||||
"external" = external_pressure_bound,
|
||||
"timestamp" = world.time,
|
||||
"sigtype" = "status",
|
||||
"setting" = pump_speed
|
||||
)
|
||||
|
||||
var/area/alarm_area = get_area(src)
|
||||
if(alarm_area.master.master_air_alarm && alarm_area.master.master_air_alarm.master_is_operating())
|
||||
receive_signal(signal)
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
if(!id_tag)
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
alarm_area.master.master_air_alarm.register_env_machine(src)
|
||||
world << "No ID, air alarm. New ID = [id_tag]"
|
||||
else
|
||||
world << "No ID, no air alarm."
|
||||
else if(!"\"[id_tag]\"" in alarm_area.air_vents)
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
alarm_area.master.master_air_alarm.register_env_machine(src)
|
||||
world << "ID, air alarm. New ID = [id_tag]"
|
||||
else
|
||||
world << "ID = [id_tag], no air alarm."
|
||||
else if(stat & (NOPOWER|BROKEN))
|
||||
alarm_area.master.air_vents.Remove("\"[id_tag]\"")
|
||||
world << "Broken"
|
||||
else
|
||||
for(var/area/A in alarm_area.related)
|
||||
for(var/obj/machinery/alarm/AA in A)
|
||||
receive_signal(signal)
|
||||
|
||||
return 1
|
||||
world << "Trying to register (No alarm)"
|
||||
|
||||
|
||||
receive_signal(datum/signal/signal)
|
||||
proc/receive(var/list/signal)
|
||||
if(stat & (NOPOWER|BROKEN))
|
||||
return
|
||||
//log_admin("DEBUG \[[world.timeofday]\]: /obj/machinery/atmospherics/unary/vent_pump/receive_signal([signal.debug_print()])")
|
||||
if(!signal.data["tag"] || (signal.data["tag"] != id_tag) || (signal.data["sigtype"]!="command"))
|
||||
return 0
|
||||
|
||||
if("purge" in signal.data)
|
||||
if("purge" in signal)
|
||||
pressure_checks &= ~1
|
||||
pump_direction = 0
|
||||
|
||||
if("stabalize" in signal.data)
|
||||
if("stabalize" in signal)
|
||||
pressure_checks |= 1
|
||||
pump_direction = 1
|
||||
|
||||
if("power" in signal.data)
|
||||
on = text2num(signal.data["power"])
|
||||
if("power" in signal)
|
||||
on = text2num(signal["power"])
|
||||
|
||||
if("power_toggle" in signal.data)
|
||||
if("power_toggle" in signal)
|
||||
on = !on
|
||||
|
||||
if("checks" in signal.data)
|
||||
pressure_checks = text2num(signal.data["checks"])
|
||||
if("checks" in signal)
|
||||
pressure_checks = text2num(signal["checks"])
|
||||
|
||||
if("checks_toggle" in signal.data)
|
||||
if("checks_toggle" in signal)
|
||||
pressure_checks = (pressure_checks?0:3)
|
||||
|
||||
if("direction" in signal.data)
|
||||
pump_direction = text2num(signal.data["direction"])
|
||||
if("direction" in signal)
|
||||
pump_direction = text2num(signal["direction"])
|
||||
|
||||
if("set_internal_pressure" in signal.data)
|
||||
internal_pressure_bound = between(0, text2num(signal.data["set_internal_pressure"]), ONE_ATMOSPHERE*50)
|
||||
if("set_internal_pressure" in signal)
|
||||
internal_pressure_bound = between(0, text2num(signal["set_internal_pressure"]), ONE_ATMOSPHERE*50)
|
||||
|
||||
if("set_external_pressure" in signal.data)
|
||||
external_pressure_bound = between(0, text2num(signal.data["set_external_pressure"]), ONE_ATMOSPHERE*50)
|
||||
if("set_external_pressure" in signal)
|
||||
external_pressure_bound = between(0, text2num(signal["set_external_pressure"]), ONE_ATMOSPHERE*50)
|
||||
|
||||
if("adjust_internal_pressure" in signal.data)
|
||||
internal_pressure_bound = between(0, text2num(signal.data["adjust_internal_pressure"]), ONE_ATMOSPHERE*50)
|
||||
if("adjust_internal_pressure" in signal)
|
||||
internal_pressure_bound = between(0, text2num(signal["adjust_internal_pressure"]), ONE_ATMOSPHERE*50)
|
||||
|
||||
if("adjust_external_pressure" in signal.data)
|
||||
external_pressure_bound = between(0, text2num(signal.data["adjust_external_pressure"]), ONE_ATMOSPHERE*50)
|
||||
if("adjust_external_pressure" in signal)
|
||||
external_pressure_bound = between(0, text2num(signal["adjust_external_pressure"]), ONE_ATMOSPHERE*50)
|
||||
|
||||
if("init" in signal.data)
|
||||
name = signal.data["init"]
|
||||
if("init" in signal)
|
||||
name = signal["init"]
|
||||
return
|
||||
|
||||
if("status" in signal.data)
|
||||
spawn(2)
|
||||
broadcast_status()
|
||||
return //do not update_icon
|
||||
if("setting" in signal)
|
||||
pump_speed = text2num(signal["setting"])
|
||||
|
||||
if("setting" in signal.data)
|
||||
pump_speed = text2num(signal.data["setting"])
|
||||
|
||||
//log_admin("DEBUG \[[world.timeofday]\]: vent_pump/receive_signal: unknown command \"[signal.data["command"]]\"\n[signal.debug_print()]")
|
||||
//log_admin("DEBUG \[[world.timeofday]\]: vent_pump/receive_signal: unknown command \"[signal["command"]]\"\n[signal.debug_print()]")
|
||||
spawn(2)
|
||||
broadcast_status()
|
||||
update_icon()
|
||||
|
||||
@@ -8,8 +8,6 @@
|
||||
level = 1
|
||||
|
||||
var/id_tag = null
|
||||
var/frequency = 1439
|
||||
var/datum/radio_frequency/radio_connection
|
||||
|
||||
var/on = 0
|
||||
var/scrubbing = 1 //0 = siphoning, 1 = scrubbing
|
||||
@@ -22,8 +20,6 @@
|
||||
var/panic = 0 //is this scrubber panicked?
|
||||
|
||||
var/area_uid
|
||||
var/radio_filter_out
|
||||
var/radio_filter_in
|
||||
New()
|
||||
var/area/A = get_area(loc)
|
||||
if (A.master)
|
||||
@@ -37,6 +33,16 @@
|
||||
broadcast_status()
|
||||
..()
|
||||
|
||||
Del()
|
||||
var/area/alarm_area = get_area(src)
|
||||
if(alarm_area && "\"[id_tag]\"" in alarm_area.master.air_scrubbers)
|
||||
alarm_area.master.air_scrubbers.Remove("\"[id_tag]\"")
|
||||
..()
|
||||
|
||||
initialize()
|
||||
spawn(20)
|
||||
broadcast_status()
|
||||
|
||||
update_icon()
|
||||
if(node && on && !(stat & (NOPOWER|BROKEN)))
|
||||
if(scrubbing)
|
||||
@@ -48,40 +54,26 @@
|
||||
return
|
||||
|
||||
proc/broadcast_status()
|
||||
var/datum/signal/signal = new
|
||||
signal.transmission_method = 1 //radio signal
|
||||
signal.source = src
|
||||
signal.data = list(
|
||||
"area" = area_uid,
|
||||
"tag" = id_tag,
|
||||
"device" = "AScr",
|
||||
"timestamp" = world.time,
|
||||
"power" = on,
|
||||
"scrubbing" = scrubbing,
|
||||
"panic" = panic,
|
||||
"filter_co2" = scrub_CO2,
|
||||
"filter_toxins" = scrub_Toxins,
|
||||
"filter_n2o" = scrub_N2O,
|
||||
"sigtype" = "status",
|
||||
"setting" = scrub_rate
|
||||
)
|
||||
var/area/alarm_area = get_area(src)
|
||||
if(alarm_area.master.master_air_alarm && alarm_area.master.master_air_alarm.master_is_operating())
|
||||
receive_signal(signal)
|
||||
else
|
||||
for(var/area/A in alarm_area.related)
|
||||
for(var/obj/machinery/alarm/AA in A)
|
||||
receive_signal(signal)
|
||||
|
||||
return 1
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
if(!id_tag)
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
alarm_area.master.master_air_alarm.register_env_machine(src)
|
||||
else if(!"\"[id_tag]\"" in alarm_area.air_scrubbers)
|
||||
if(alarm_area.master.master_air_alarm)
|
||||
alarm_area.master.master_air_alarm.register_env_machine(src)
|
||||
else if(stat & (NOPOWER|BROKEN))
|
||||
alarm_area.master.air_scrubbers.Remove("\"[id_tag]\"")
|
||||
return
|
||||
|
||||
process()
|
||||
..()
|
||||
broadcast_status()
|
||||
if(stat & (NOPOWER|BROKEN))
|
||||
return
|
||||
if (!node)
|
||||
on = 0
|
||||
//broadcast_status()
|
||||
|
||||
if(!on)
|
||||
return 0
|
||||
|
||||
@@ -150,19 +142,17 @@
|
||||
return
|
||||
*/
|
||||
|
||||
receive_signal(datum/signal/signal)
|
||||
proc/receive(var/list/signal)
|
||||
if(stat & (NOPOWER|BROKEN))
|
||||
return
|
||||
if(!signal.data["tag"] || (signal.data["tag"] != id_tag) || (signal.data["sigtype"]!="command"))
|
||||
return 0
|
||||
|
||||
if("power" in signal.data)
|
||||
on = text2num(signal.data["power"])
|
||||
if("power_toggle" in signal.data)
|
||||
if("power" in signal)
|
||||
on = text2num(signal["power"])
|
||||
if("power_toggle" in signal)
|
||||
on = !on
|
||||
|
||||
if("panic_siphon" in signal.data) //must be before if("scrubbing" thing
|
||||
panic = text2num(signal.data["panic_siphon"])
|
||||
if("panic_siphon" in signal) //must be before if("scrubbing" thing
|
||||
panic = text2num(signal["panic_siphon"])
|
||||
if(panic)
|
||||
on = 1
|
||||
scrubbing = 0
|
||||
@@ -170,7 +160,7 @@
|
||||
else
|
||||
scrubbing = 1
|
||||
volume_rate = initial(volume_rate)
|
||||
if("toggle_panic_siphon" in signal.data)
|
||||
if("toggle_panic_siphon" in signal)
|
||||
panic = !panic
|
||||
if(panic)
|
||||
on = 1
|
||||
@@ -180,39 +170,33 @@
|
||||
scrubbing = 1
|
||||
volume_rate = initial(volume_rate)
|
||||
|
||||
if("scrubbing" in signal.data)
|
||||
scrubbing = text2num(signal.data["scrubbing"])
|
||||
if("toggle_scrubbing" in signal.data)
|
||||
if("scrubbing" in signal)
|
||||
scrubbing = text2num(signal["scrubbing"])
|
||||
if("toggle_scrubbing" in signal)
|
||||
scrubbing = !scrubbing
|
||||
|
||||
if("co2_scrub" in signal.data)
|
||||
scrub_CO2 = text2num(signal.data["co2_scrub"])
|
||||
if("toggle_co2_scrub" in signal.data)
|
||||
if("co2_scrub" in signal)
|
||||
scrub_CO2 = text2num(signal["co2_scrub"])
|
||||
if("toggle_co2_scrub" in signal)
|
||||
scrub_CO2 = !scrub_CO2
|
||||
|
||||
if("tox_scrub" in signal.data)
|
||||
scrub_Toxins = text2num(signal.data["tox_scrub"])
|
||||
if("toggle_tox_scrub" in signal.data)
|
||||
if("tox_scrub" in signal)
|
||||
scrub_Toxins = text2num(signal["tox_scrub"])
|
||||
if("toggle_tox_scrub" in signal)
|
||||
scrub_Toxins = !scrub_Toxins
|
||||
|
||||
if("n2o_scrub" in signal.data)
|
||||
scrub_N2O = text2num(signal.data["n2o_scrub"])
|
||||
if("toggle_n2o_scrub" in signal.data)
|
||||
if("n2o_scrub" in signal)
|
||||
scrub_N2O = text2num(signal["n2o_scrub"])
|
||||
if("toggle_n2o_scrub" in signal)
|
||||
scrub_N2O = !scrub_N2O
|
||||
|
||||
if("init" in signal.data)
|
||||
name = signal.data["init"]
|
||||
if("init" in signal)
|
||||
name = signal["init"]
|
||||
return
|
||||
|
||||
if("status" in signal.data)
|
||||
spawn(2)
|
||||
broadcast_status()
|
||||
return //do not update_icon
|
||||
if("setting" in signal)
|
||||
scrub_rate = text2num(signal["setting"])
|
||||
|
||||
if("setting" in signal.data)
|
||||
scrub_rate = text2num(signal.data["setting"])
|
||||
|
||||
// log_admin("DEBUG \[[world.timeofday]\]: vent_scrubber/receive_signal: unknown command \"[signal.data["command"]]\"\n[signal.debug_print()]")
|
||||
spawn(2)
|
||||
broadcast_status()
|
||||
update_icon()
|
||||
|
||||
@@ -63,7 +63,7 @@
|
||||
"panic_siphon",
|
||||
"scrubbing"
|
||||
)
|
||||
current.send_signal(device_id, list (href_list["command"] = text2num(href_list["val"])))
|
||||
current.send(device_id, list (href_list["command"] = text2num(href_list["val"])))
|
||||
spawn(3)
|
||||
src.updateUsrDialog()
|
||||
//if("adjust_threshold") //was a good idea but required very wide window
|
||||
@@ -156,18 +156,19 @@
|
||||
output += "<A href='?src=\ref[src];alarm=\ref[current];mode=[AALARM_MODE_PANIC]'><font color='red'><B>ACTIVATE PANIC SYPHON IN AREA</B></font></A>"
|
||||
if (AALARM_SCREEN_VENT)
|
||||
var/sensor_data = ""
|
||||
if(current.alarm_area.air_vent_names.len)
|
||||
for(var/id_tag in current.alarm_area.air_vent_names)
|
||||
var/long_name = current.alarm_area.air_vent_names[id_tag]
|
||||
var/list/data = current.alarm_area.air_vent_info[id_tag]
|
||||
if(current.alarm_area.air_vents.len)
|
||||
for(var/id_tag in current.alarm_area.air_vents)
|
||||
var/obj/machinery/atmospherics/unary/vent_pump/data = current.alarm_area.air_vents[id_tag]
|
||||
if(!data)
|
||||
continue
|
||||
sensor_data += {"
|
||||
<B>[long_name]</B><BR>
|
||||
<B>[id_tag]</B><BR>
|
||||
<B>Operating:</B>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=power;val=[!data["power"]]'>[data["power"]?"on":"off"]</A>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=power;val=[!data.on]'>[data.on?"on":"off"]</A>
|
||||
<BR>
|
||||
<B>Pressure checks:</B>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=checks;val=[data["checks"]^1]' [(data["checks"]&1)?"style='font-weight:bold;'":""]>external</A>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=checks;val=[data["checks"]^2]' [(data["checks"]&2)?"style='font-weight:bold;'":""]>internal</A>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=checks;val=[data.pressure_checks^1]' [(data.pressure_checks&1)?"style='font-weight:bold;'":""]>external</A>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=checks;val=[data.pressure_checks^2]' [(data.pressure_checks&2)?"style='font-weight:bold;'":""]>internal</A>
|
||||
<BR>
|
||||
<B>External pressure bound:</B>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=adjust_external_pressure;val=-1000'>-</A>
|
||||
@@ -181,7 +182,7 @@
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=adjust_external_pressure;val=+1000'>+</A>
|
||||
<BR>
|
||||
"}
|
||||
if (data["direction"] == "siphon")
|
||||
if (!data.pump_direction)
|
||||
sensor_data += {"
|
||||
<B>Direction:</B>
|
||||
siphoning
|
||||
@@ -193,33 +194,34 @@ siphoning
|
||||
output = {"<a href='?src=\ref[src];alarm=\ref[current];screen=[AALARM_SCREEN_MAIN]'>Main menu</a><br>[sensor_data]"}
|
||||
if (AALARM_SCREEN_SCRUB)
|
||||
var/sensor_data = ""
|
||||
if(current.alarm_area.air_scrub_names.len)
|
||||
for(var/id_tag in current.alarm_area.air_scrub_names)
|
||||
var/long_name = current.alarm_area.air_scrub_names[id_tag]
|
||||
var/list/data = current.alarm_area.air_scrub_info[id_tag]
|
||||
if(current.alarm_area.air_scrubbers.len)
|
||||
for(var/id_tag in current.alarm_area.air_scrubbers)
|
||||
var/obj/machinery/atmospherics/unary/vent_scrubber/data = current.alarm_area.air_scrubbers[id_tag]
|
||||
if(!data)
|
||||
continue
|
||||
|
||||
sensor_data += {"
|
||||
<B>[long_name]</B><BR>
|
||||
<B>[id_tag]</B><BR>
|
||||
<B>Operating:</B>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=power;val=[!data["power"]]'>[data["power"]?"on":"off"]</A><BR>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=power;val=[!data.on]'>[data.on?"on":"off"]</A><BR>
|
||||
<B>Type:</B>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=scrubbing;val=[!data["scrubbing"]]'>[data["scrubbing"]?"scrubbing":"syphoning"]</A><BR>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=scrubbing;val=[!data.scrubbing]'>[data.scrubbing?"scrubbing":"syphoning"]</A><BR>
|
||||
"}
|
||||
|
||||
if(data["scrubbing"])
|
||||
sensor_data += {"
|
||||
<B>Filtering:</B>
|
||||
Carbon Dioxide
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=co2_scrub;val=[!data["filter_co2"]]'>[data["filter_co2"]?"on":"off"]</A>;
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=co2_scrub;val=[!data.scrub_CO2]'>[data.scrub_CO2?"on":"off"]</A>;
|
||||
Toxins
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=tox_scrub;val=[!data["filter_toxins"]]'>[data["filter_toxins"]?"on":"off"]</A>;
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=tox_scrub;val=[!data.scrub_Toxins]'>[data.scrub_Toxins?"on":"off"]</A>;
|
||||
Nitrous Oxide
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=n2o_scrub;val=[!data["filter_n2o"]]'>[data["filter_n2o"]?"on":"off"]</A>
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=n2o_scrub;val=[!data.scrub_N2O]'>[data.scrub_N2O?"on":"off"]</A>
|
||||
<BR>
|
||||
"}
|
||||
sensor_data += {"
|
||||
<B>Panic syphon:</B> [data["panic"]?"<font color='red'><B>PANIC SYPHON ACTIVATED</B></font>":""]
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=panic_siphon;val=[!data["panic"]]'><font color='[(data["panic"]?"blue'>Dea":"red'>A")]ctivate</font></A><BR>
|
||||
<B>Panic syphon:</B> [data.panic?"<font color='red'><B>PANIC SYPHON ACTIVATED</B></font>":""]
|
||||
<A href='?src=\ref[src];alarm=\ref[current];id_tag=[id_tag];command=panic_siphon;val=[!data.panic]'><font color='[(data.panic?"blue'>Dea":"red'>A")]ctivate</font></A><BR>
|
||||
<HR>
|
||||
"}
|
||||
else
|
||||
@@ -234,7 +236,8 @@ Nitrous Oxide
|
||||
AALARM_MODE_SCRUBBING = "Filtering",
|
||||
AALARM_MODE_PANIC = "<font color='red'>PANIC</font>",
|
||||
AALARM_MODE_REPLACEMENT = "<font color='red'>REPLACE AIR</font>",
|
||||
AALARM_MODE_FILL = "<font color='red'>FILL</font>"
|
||||
AALARM_MODE_FILL = "<font color='red'>FILL</font>",
|
||||
AALARM_MODE_CYCLE = "<font color='red'>CYCLE</font>"
|
||||
)
|
||||
for (var/m=1,m<=modes.len,m++)
|
||||
if (current.mode==m)
|
||||
|
||||
+76
-122
@@ -30,7 +30,8 @@
|
||||
|
||||
#define AALARM_MODE_SCRUBBING 1
|
||||
#define AALARM_MODE_PANIC 2 //constantly sucks all air
|
||||
#define AALARM_MODE_REPLACEMENT 3 //sucks off all air, then refill and swithes to scrubbing
|
||||
#define AALARM_MODE_REPLACEMENT 5 //like scrubbing, but faster.
|
||||
#define AALARM_MODE_CYCLE 3 //sucks off all air, then refill and swithes to scrubbing
|
||||
#define AALARM_MODE_FILL 4 //emergency fill
|
||||
|
||||
#define AALARM_SCREEN_MAIN 1
|
||||
@@ -48,10 +49,8 @@
|
||||
//all air alarms in area are connected via magic
|
||||
/area
|
||||
var/obj/machinery/alarm/master_air_alarm
|
||||
var/list/air_vent_names
|
||||
var/list/air_scrub_names
|
||||
var/list/air_vent_info
|
||||
var/list/air_scrub_info
|
||||
var/list/air_vents
|
||||
var/list/air_scrubbers
|
||||
|
||||
/obj/machinery/alarm
|
||||
name = "alarm"
|
||||
@@ -156,10 +155,13 @@
|
||||
other_dangerlevel,
|
||||
temperature_dangerlevel)
|
||||
|
||||
|
||||
if (old_danger_level != danger_level)
|
||||
apply_danger_level(danger_level)
|
||||
|
||||
if (mode==AALARM_MODE_CYCLE && environment_pressure<ONE_ATMOSPHERE*0.05)
|
||||
mode=AALARM_MODE_FILL
|
||||
apply_mode()
|
||||
|
||||
|
||||
//atmos computer remote controll stuff
|
||||
switch(rcon_setting)
|
||||
@@ -186,11 +188,9 @@
|
||||
for (var/obj/machinery/alarm/AA in A)
|
||||
if (!(AA.stat & (NOPOWER|BROKEN)))
|
||||
alarm_area.master_air_alarm = AA
|
||||
if (!alarm_area.air_vent_names)
|
||||
alarm_area.air_vent_names = list()
|
||||
alarm_area.air_scrub_names = list()
|
||||
alarm_area.air_vent_info = list()
|
||||
alarm_area.air_scrub_info = list()
|
||||
if (!alarm_area.air_vents)
|
||||
alarm_area.air_vents = list()
|
||||
alarm_area.air_scrubbers = list()
|
||||
return 1
|
||||
return 0
|
||||
|
||||
@@ -216,101 +216,58 @@
|
||||
if (2)
|
||||
icon_state = "alarm1"
|
||||
|
||||
proc/send_signal(var/target, var/list/command)//sends signal 'command' to 'target'. Returns 0 if no radio connection, 1 otherwise
|
||||
|
||||
var/datum/signal/signal = new
|
||||
signal.transmission_method = 1 //radio signal
|
||||
signal.source = src
|
||||
|
||||
signal.data = command
|
||||
signal.data["tag"] = target
|
||||
signal.data["sigtype"] = "command"
|
||||
|
||||
var/obj/machinery/target_machine = machines[target]
|
||||
target_machine.receive_signal(signal)
|
||||
proc/send(var/target, var/list/command)//sends signal 'command' to 'target'. Returns 0 if no radio connection, 1 otherwise
|
||||
if(target in alarm_area.air_vents)
|
||||
var/obj/machinery/atmospherics/unary/vent_pump/target_machine = alarm_area.air_vents[target]
|
||||
target_machine.receive(command)
|
||||
|
||||
else if(target in alarm_area.air_scrubbers)
|
||||
var/obj/machinery/atmospherics/unary/vent_scrubber/target_machine = alarm_area.air_scrubbers[target]
|
||||
target_machine.receive(command)
|
||||
return 1
|
||||
|
||||
receive_signal(datum/signal/signal)
|
||||
if(stat & (NOPOWER|BROKEN))
|
||||
return
|
||||
if (alarm_area.master_air_alarm != src)
|
||||
if (master_is_operating())
|
||||
return
|
||||
elect_master()
|
||||
if (alarm_area.master_air_alarm != src)
|
||||
return
|
||||
if(!signal || signal.encryption)
|
||||
return
|
||||
var/id_tag = signal.data["tag"]
|
||||
if (!id_tag)
|
||||
return
|
||||
if (signal.data["area"] != area_uid)
|
||||
return
|
||||
if (signal.data["sigtype"] != "status")
|
||||
return
|
||||
|
||||
var/dev_type = signal.data["device"]
|
||||
if(!(id_tag in alarm_area.air_scrub_names) && !(id_tag in alarm_area.air_vent_names))
|
||||
register_env_machine(id_tag, dev_type)
|
||||
if(dev_type == "AScr")
|
||||
alarm_area.air_scrub_info[id_tag] = signal.data
|
||||
else if(dev_type == "AVP")
|
||||
alarm_area.air_vent_info[id_tag] = signal.data
|
||||
|
||||
proc/register_env_machine(var/m_id, var/device_type)
|
||||
var/new_name
|
||||
if (device_type=="AVP")
|
||||
new_name = "[alarm_area.name] Vent Pump #[alarm_area.air_vent_names.len+1]"
|
||||
alarm_area.air_vent_names[m_id] = new_name
|
||||
else if (device_type=="AScr")
|
||||
new_name = "[alarm_area.name] Air Scrubber #[alarm_area.air_scrub_names.len+1]"
|
||||
alarm_area.air_scrub_names[m_id] = new_name
|
||||
else
|
||||
return
|
||||
spawn (10)
|
||||
send_signal(m_id, list("init" = new_name) )
|
||||
|
||||
proc/refresh_all()
|
||||
for(var/id_tag in alarm_area.air_vent_names)
|
||||
var/list/I = alarm_area.air_vent_info[id_tag]
|
||||
if (I && I["timestamp"]+AALARM_REPORT_TIMEOUT/2 > world.time)
|
||||
continue
|
||||
send_signal(id_tag, list("status") )
|
||||
for(var/id_tag in alarm_area.air_scrub_names)
|
||||
var/list/I = alarm_area.air_scrub_info[id_tag]
|
||||
if (I && I["timestamp"]+AALARM_REPORT_TIMEOUT/2 > world.time)
|
||||
continue
|
||||
send_signal(id_tag, list("status") )
|
||||
|
||||
proc/register_env_machine(var/obj/machinery/source_machine)
|
||||
if (istype(source_machine, /obj/machinery/atmospherics/unary/vent_pump))
|
||||
var/new_name = "[alarm_area] Vent Pump #[alarm_area.air_vents.len+1]"
|
||||
alarm_area.air_vents += "\"[new_name]\""
|
||||
alarm_area.air_vents["\"[new_name]\""] = source_machine
|
||||
source_machine:id_tag = new_name
|
||||
source_machine.name = new_name
|
||||
else if (istype(source_machine, /obj/machinery/atmospherics/unary/vent_scrubber))
|
||||
var/new_name = "[alarm_area] Air Scrubber #[alarm_area.air_scrubbers.len+1]"
|
||||
alarm_area.air_scrubbers += "\"[new_name]\""
|
||||
alarm_area.air_scrubbers["\"[new_name]\""] = source_machine
|
||||
source_machine:id_tag = new_name
|
||||
source_machine.name = new_name
|
||||
return
|
||||
|
||||
proc/apply_mode()
|
||||
var/current_pressures = TLV["pressure"]
|
||||
var/target_pressure = (current_pressures[2] + current_pressures[3])/2
|
||||
switch(mode)
|
||||
if(AALARM_MODE_SCRUBBING)
|
||||
for(var/device_id in alarm_area.air_scrub_names)
|
||||
send_signal(device_id, list("power"= 1, "co2_scrub"= 1, "setting"= 1, "scrubbing"= 1, "panic_siphon"= 0) )
|
||||
for(var/device_id in alarm_area.air_vent_names)
|
||||
send_signal(device_id, list("power"= 1, "checks"= 1, "setting"= 1, "set_external_pressure"= target_pressure) )
|
||||
for(var/device_id in alarm_area.air_scrubbers)
|
||||
send(device_id, list("power"= 1, "co2_scrub"= 1, "setting"= 1, "scrubbing"= 1, "panic_siphon"= 0) )
|
||||
for(var/device_id in alarm_area.air_vents)
|
||||
send(device_id, list("power"= 1, "checks"= 1, "setting"= 1, "set_external_pressure"= target_pressure) )
|
||||
|
||||
if(AALARM_MODE_PANIC)
|
||||
for(var/device_id in alarm_area.air_scrub_names)
|
||||
send_signal(device_id, list("power"= 1, "panic_siphon"= 1) )
|
||||
for(var/device_id in alarm_area.air_vent_names)
|
||||
send_signal(device_id, list("power"= 0) )
|
||||
if(AALARM_MODE_PANIC, AALARM_MODE_CYCLE)
|
||||
for(var/device_id in alarm_area.air_scrubbers)
|
||||
send(device_id, list("power"= 1, "panic_siphon"= 1) )
|
||||
for(var/device_id in alarm_area.air_vents)
|
||||
send(device_id, list("power"= 0) )
|
||||
|
||||
if(AALARM_MODE_REPLACEMENT)
|
||||
for(var/device_id in alarm_area.air_scrub_names)
|
||||
send_signal(device_id, list("power"= 1, "co2_scrub"= 1, "setting"= 2, "scrubbing"= 1, "panic_siphon"= 0) )
|
||||
for(var/device_id in alarm_area.air_vent_names)
|
||||
send_signal(device_id, list("power"= 1, "checks"= 1, "setting"= 2, "set_external_pressure"= target_pressure) )
|
||||
for(var/device_id in alarm_area.air_scrubbers)
|
||||
send(device_id, list("power"= 1, "co2_scrub"= 1, "setting"= 2, "scrubbing"= 1, "panic_siphon"= 0) )
|
||||
for(var/device_id in alarm_area.air_vents)
|
||||
send(device_id, list("power"= 1, "checks"= 1, "setting"= 2, "set_external_pressure"= target_pressure) )
|
||||
|
||||
if(AALARM_MODE_FILL)
|
||||
for(var/device_id in alarm_area.air_scrub_names)
|
||||
send_signal(device_id, list("power"= 0) )
|
||||
for(var/device_id in alarm_area.air_vent_names)
|
||||
send_signal(device_id, list("power"= 1, "checks"= 1, "setting"= 2, "set_external_pressure"= target_pressure) )
|
||||
for(var/device_id in alarm_area.air_scrubbers)
|
||||
send(device_id, list("power"= 0) )
|
||||
for(var/device_id in alarm_area.air_vents)
|
||||
send(device_id, list("power"= 1, "checks"= 1, "setting"= 2, "set_external_pressure"= target_pressure) )
|
||||
|
||||
proc/apply_danger_level(var/new_danger_level)
|
||||
alarm_area.atmosalm = new_danger_level
|
||||
@@ -553,7 +510,6 @@
|
||||
if(!shorted)
|
||||
user << browse(return_text(user),"window=air_alarm")
|
||||
onclose(user, "air_alarm")
|
||||
refresh_all()
|
||||
|
||||
return
|
||||
|
||||
@@ -679,21 +635,20 @@ Toxins: <span class='dl[plasma_dangerlevel]'>[plasma_percent]</span>%<br>
|
||||
|
||||
if (AALARM_SCREEN_VENT)
|
||||
var/sensor_data = ""
|
||||
if(alarm_area.air_vent_names.len)
|
||||
for(var/id_tag in alarm_area.air_vent_names)
|
||||
var/long_name = alarm_area.air_vent_names[id_tag]
|
||||
var/list/data = alarm_area.air_vent_info[id_tag]
|
||||
if(alarm_area.air_vents.len)
|
||||
for(var/id_tag in alarm_area.air_vents)
|
||||
var/obj/machinery/atmospherics/unary/vent_pump/data = alarm_area.air_vents[id_tag]
|
||||
if(!data)
|
||||
continue;
|
||||
continue
|
||||
|
||||
sensor_data += {"
|
||||
<B>[long_name]</B><BR>
|
||||
<B>[id_tag]</B><BR>
|
||||
<B>Operating:</B>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=power;val=[!data["power"]]'>[data["power"]?"on":"off"]</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=power;val=[!data.on]'>[data.on?"on":"off"]</A>
|
||||
<BR>
|
||||
<B>Pressure checks:</B>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=checks;val=[data["checks"]^1]' [(data["checks"]&1)?"style='font-weight:bold;'":""]>external</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=checks;val=[data["checks"]^2]' [(data["checks"]&2)?"style='font-weight:bold;'":""]>internal</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=checks;val=[data.pressure_checks^1]' [(data.pressure_checks&1)?"style='font-weight:bold;'":""]>external</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=checks;val=[data.pressure_checks^2]' [(data.pressure_checks&2)?"style='font-weight:bold;'":""]>internal</A>
|
||||
<BR>
|
||||
<B>External pressure bound:</B>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=adjust_external_pressure;val=-1000'>-</A>
|
||||
@@ -707,7 +662,7 @@ Toxins: <span class='dl[plasma_dangerlevel]'>[plasma_percent]</span>%<br>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=adjust_external_pressure;val=+1000'>+</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=set_external_pressure;val=[ONE_ATMOSPHERE]'> (reset) </A>
|
||||
<BR>"}
|
||||
if (data["direction"] == "siphon")
|
||||
if (!data.pump_direction)
|
||||
sensor_data += {"
|
||||
<B>Direction:</B>
|
||||
siphoning
|
||||
@@ -721,35 +676,34 @@ siphoning
|
||||
|
||||
if (AALARM_SCREEN_SCRUB)
|
||||
var/sensor_data = ""
|
||||
if(alarm_area.air_scrub_names.len)
|
||||
for(var/id_tag in alarm_area.air_scrub_names)
|
||||
var/long_name = alarm_area.air_scrub_names[id_tag]
|
||||
var/list/data = alarm_area.air_scrub_info[id_tag]
|
||||
if(alarm_area.air_scrubbers.len)
|
||||
for(var/id_tag in alarm_area.air_scrubbers)
|
||||
var/obj/machinery/atmospherics/unary/vent_scrubber/data = alarm_area.air_scrubbers[id_tag]
|
||||
if(!data)
|
||||
continue
|
||||
|
||||
sensor_data += {"
|
||||
<B>[long_name]</B><BR>
|
||||
<B>[id_tag]</B><BR>
|
||||
<B>Operating:</B>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=power;val=[!data["power"]]'>[data["power"]?"on":"off"]</A><BR>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=power;val=[!data.on]'>[data.on ?"on":"off"]</A><BR>
|
||||
<B>Type:</B>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=scrubbing;val=[!data["scrubbing"]]'>[data["scrubbing"]?"scrubbing":"syphoning"]</A><BR>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=scrubbing;val=[!data.scrubbing]'>[data.scrubbing?"scrubbing":"syphoning"]</A><BR>
|
||||
"}
|
||||
|
||||
if(data["scrubbing"])
|
||||
if(data.scrubbing)
|
||||
sensor_data += {"
|
||||
<B>Filtering:</B>
|
||||
Carbon Dioxide
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=co2_scrub;val=[!data["filter_co2"]]'>[data["filter_co2"]?"on":"off"]</A>;
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=co2_scrub;val=[!data.scrub_CO2]'>[data.scrub_CO2?"on":"off"]</A>;
|
||||
Toxins
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=tox_scrub;val=[!data["filter_toxins"]]'>[data["filter_toxins"]?"on":"off"]</A>;
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=tox_scrub;val=[!data.scrub_Toxins]'>[data.scrub_Toxins?"on":"off"]</A>;
|
||||
Nitrous Oxide
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=n2o_scrub;val=[!data["filter_n2o"]]'>[data["filter_n2o"]?"on":"off"]</A>
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=n2o_scrub;val=[!data.scrub_N2O]'>[data.scrub_N2O?"on":"off"]</A>
|
||||
<BR>
|
||||
"}
|
||||
sensor_data += {"
|
||||
<B>Panic syphon:</B> [data["panic"]?"<font color='red'><B>PANIC SYPHON ACTIVATED</B></font>":"Disabled"]
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=panic_siphon;val=[!data["panic"]]'><font color='[(data["panic"]?"blue'>Dea":"red'>A")]ctivate</font></A><BR>
|
||||
<B>Panic syphon:</B> [data.panic?"<font color='red'><B>PANIC SYPHON ACTIVATED</B></font>":"Disabled"]
|
||||
<A href='?src=\ref[src];id_tag=[id_tag];command=panic_siphon;val=[!data.panic]'><font color='[(data.panic?"blue'>Dea":"red'>A")]ctivate</font></A><BR>
|
||||
<HR>
|
||||
"}
|
||||
else
|
||||
@@ -762,10 +716,11 @@ Nitrous Oxide
|
||||
var/list/modes = list(
|
||||
AALARM_MODE_SCRUBBING = "Filtering",
|
||||
AALARM_MODE_PANIC = "<font color='red'>PANIC</font>",
|
||||
AALARM_MODE_REPLACEMENT = "<font color='red'>REPLACE AIR</font>",
|
||||
AALARM_MODE_FILL = "<font color='red'>FILL</font>"
|
||||
AALARM_MODE_REPLACEMENT = "<font color='blue'>REPLACE AIR</font>",
|
||||
AALARM_MODE_FILL = "<font color='red'>FILL</font>",
|
||||
AALARM_MODE_CYCLE = "<font color='red'>CYCLE</font>",
|
||||
)
|
||||
for (var/m=1, m<=modes.len, m++)
|
||||
for (var/m in modes)
|
||||
if (mode==m)
|
||||
output += "<li><A href='?src=\ref[src];mode=[m]'><b>[modes[m]]</b></A> (selected)</li>"
|
||||
else
|
||||
@@ -835,8 +790,7 @@ table tr:first-child th:first-child { border: none;}
|
||||
if(href_list["command"])
|
||||
var/device_id = href_list["id_tag"]
|
||||
switch(href_list["command"])
|
||||
if(
|
||||
"power",
|
||||
if( "power",
|
||||
"adjust_external_pressure",
|
||||
"set_external_pressure",
|
||||
"checks",
|
||||
@@ -846,7 +800,7 @@ table tr:first-child th:first-child { border: none;}
|
||||
"panic_siphon",
|
||||
"scrubbing")
|
||||
|
||||
send_signal(device_id, list(href_list["command"] = text2num(href_list["val"]) ) )
|
||||
send(device_id, list(href_list["command"] = text2num(href_list["val"]) ) )
|
||||
|
||||
if("set_threshold")
|
||||
var/env = href_list["env"]
|
||||
|
||||
Reference in New Issue
Block a user