mirror of
https://github.com/vgstation-coders/vgstation13.git
synced 2025-12-10 10:21:11 +00:00
517 lines
14 KiB
Plaintext
517 lines
14 KiB
Plaintext
/obj/machinery/atmoalter/siphs/New()
|
|
..()
|
|
src.gas = new /datum/gas_mixture()
|
|
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/proc/releaseall()
|
|
src.t_status = 1
|
|
src.t_per = max_valve
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/proc/reset(valve, auto)
|
|
if(c_status!=0)
|
|
return
|
|
|
|
if (valve < 0)
|
|
src.t_per = -valve
|
|
src.t_status = 1
|
|
else
|
|
if (valve > 0)
|
|
src.t_per = valve
|
|
src.t_status = 2
|
|
else
|
|
src.t_status = 3
|
|
if (auto)
|
|
src.t_status = 4
|
|
src.setstate()
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/proc/release(amount, flag)
|
|
/*
|
|
var/T = src.loc
|
|
if (!( istype(T, /turf) ))
|
|
return
|
|
if (locate(/obj/move, T))
|
|
T = locate(/obj/move, T)
|
|
if (!( amount ))
|
|
return
|
|
if (!( flag ))
|
|
amount = min(amount, max_valve)
|
|
src.gas.turf_add(T, amount)
|
|
return
|
|
*/ //TODO: FIX
|
|
|
|
/obj/machinery/atmoalter/siphs/proc/siphon(amount, flag)
|
|
/*
|
|
var/T = src.loc
|
|
if (!( istype(T, /turf) ))
|
|
return
|
|
if (locate(/obj/move, T))
|
|
T = locate(/obj/move, T)
|
|
if (!( amount ))
|
|
return
|
|
if (!( flag ))
|
|
amount = min(amount, 900000.0)
|
|
src.gas.turf_take(T, amount)
|
|
return
|
|
*/ //TODO: FIX
|
|
|
|
/obj/machinery/atmoalter/siphs/proc/setstate()
|
|
|
|
if(stat & NOPOWER)
|
|
icon_state = "siphon:0"
|
|
return
|
|
|
|
if (src.holding)
|
|
src.icon_state = "siphon:T"
|
|
else
|
|
if (src.t_status != 3)
|
|
src.icon_state = "siphon:1"
|
|
else
|
|
src.icon_state = "siphon:0"
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/fullairsiphon/New()
|
|
/*
|
|
..()
|
|
if(!empty)
|
|
src.gas.oxygen = 2.73E7
|
|
src.gas.n2 = 1.027E8
|
|
return
|
|
*/ //TODO: FIX
|
|
|
|
/obj/machinery/atmoalter/siphs/fullairsiphon/port/reset(valve, auto)
|
|
|
|
if (valve < 0)
|
|
src.t_per = -valve
|
|
src.t_status = 1
|
|
else
|
|
if (valve > 0)
|
|
src.t_per = valve
|
|
src.t_status = 2
|
|
else
|
|
src.t_status = 3
|
|
if (auto)
|
|
src.t_status = 4
|
|
src.setstate()
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/fullairsiphon/air_vent/attackby(W as obj, user as mob)
|
|
|
|
if (istype(W, /obj/item/weapon/screwdriver))
|
|
if (src.c_status)
|
|
src.anchored = 1
|
|
src.c_status = 0
|
|
else
|
|
if (locate(/obj/machinery/connector, src.loc))
|
|
src.anchored = 1
|
|
src.c_status = 3
|
|
else
|
|
if (istype(W, /obj/item/weapon/wrench))
|
|
src.alterable = !( src.alterable )
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/fullairsiphon/air_vent/setstate()
|
|
|
|
|
|
if(stat & NOPOWER)
|
|
icon_state = "vent-p"
|
|
return
|
|
|
|
if (src.t_status == 4)
|
|
src.icon_state = "vent2"
|
|
else
|
|
if (src.t_status == 3)
|
|
src.icon_state = "vent0"
|
|
else
|
|
src.icon_state = "vent1"
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/fullairsiphon/air_vent/reset(valve, auto)
|
|
|
|
if (auto)
|
|
src.t_status = 4
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/process()
|
|
/*
|
|
if(stat & NOPOWER) return
|
|
|
|
if(src.gas.temperature >= 3000)
|
|
src.melt()
|
|
|
|
if (src.t_status != 3)
|
|
var/turf/T = src.loc
|
|
if (istype(T, /turf))
|
|
if (locate(/obj/move, T))
|
|
T = locate(/obj/move, T)
|
|
if (T.firelevel < 900000.0)
|
|
src.gas.turf_add_all_oxy(T)
|
|
|
|
else
|
|
T = null
|
|
switch(src.t_status)
|
|
if(1.0)
|
|
if( !portable() ) use_power(50, ENVIRON)
|
|
if (src.holding)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.holding.gas.transfer_from(src.gas, t)
|
|
else
|
|
if (T)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.gas.turf_add(T, t)
|
|
if(2.0)
|
|
if( !portable() ) use_power(50, ENVIRON)
|
|
if (src.holding)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = src.maximum - t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.gas.transfer_from(src.holding.gas, t)
|
|
else
|
|
if (T)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = src.maximum - t1
|
|
var/t = src.t_per
|
|
if (t > t2)
|
|
t = t2
|
|
src.gas.turf_take(T, t)
|
|
if(4.0)
|
|
if( !portable() ) use_power(50, ENVIRON)
|
|
if (T)
|
|
if (T.firelevel > 900000.0)
|
|
src.f_time = world.time + 400
|
|
else
|
|
if (world.time > src.f_time)
|
|
src.gas.extract_toxs(T)
|
|
if( !portable() ) use_power(150, ENVIRON)
|
|
var/contain = src.gas.total_moles()
|
|
if (contain > 1.3E8)
|
|
src.gas.turf_add(T, 1.3E8 - contain)
|
|
|
|
src.setstate()
|
|
src.updateDialog()
|
|
return
|
|
*/ //TODO: FIX
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/air_filter/setstate()
|
|
|
|
if(stat & NOPOWER)
|
|
icon_state = "vent-p"
|
|
return
|
|
|
|
if (src.t_status == 4)
|
|
src.icon_state = "vent2"
|
|
else
|
|
if (src.t_status == 3)
|
|
src.icon_state = "vent0"
|
|
else
|
|
src.icon_state = "vent1"
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/air_filter/attackby(W as obj, user as mob)
|
|
|
|
if (istype(W, /obj/item/weapon/screwdriver))
|
|
if (src.c_status)
|
|
src.anchored = 1
|
|
src.c_status = 0
|
|
else
|
|
if (locate(/obj/machinery/connector, src.loc))
|
|
src.anchored = 1
|
|
src.c_status = 3
|
|
else
|
|
if (istype(W, /obj/item/weapon/wrench))
|
|
src.alterable = !( src.alterable )
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/air_filter/reset(valve, auto)
|
|
|
|
if (auto)
|
|
src.t_status = 4
|
|
src.setstate()
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/port/setstate()
|
|
|
|
if(stat & NOPOWER)
|
|
icon_state = "scrubber:0"
|
|
return
|
|
|
|
if (src.holding)
|
|
src.icon_state = "scrubber:T"
|
|
else
|
|
if (src.t_status != 3)
|
|
src.icon_state = "scrubber:1"
|
|
else
|
|
src.icon_state = "scrubber:0"
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/scrubbers/port/reset(valve, auto)
|
|
|
|
if (valve < 0)
|
|
src.t_per = -valve
|
|
src.t_status = 1
|
|
else
|
|
if (valve > 0)
|
|
src.t_per = valve
|
|
src.t_status = 2
|
|
else
|
|
src.t_status = 3
|
|
if (auto)
|
|
src.t_status = 4
|
|
src.setstate()
|
|
return
|
|
|
|
//true if the siphon is portable (therfore no power needed)
|
|
|
|
/obj/machinery/proc/portable()
|
|
return istype(src, /obj/machinery/atmoalter/siphs/fullairsiphon/port) || istype(src, /obj/machinery/atmoalter/siphs/scrubbers/port)
|
|
|
|
/obj/machinery/atmoalter/siphs/power_change()
|
|
|
|
if( portable() )
|
|
return
|
|
|
|
if(!powered(ENVIRON))
|
|
spawn(rand(0,15))
|
|
stat |= NOPOWER
|
|
setstate()
|
|
else
|
|
stat &= ~NOPOWER
|
|
setstate()
|
|
|
|
|
|
/obj/machinery/atmoalter/siphs/process()
|
|
/*
|
|
// var/dbg = (suffix=="d") && Debug
|
|
|
|
if(stat & NOPOWER) return
|
|
|
|
if (src.t_status != 3)
|
|
var/turf/T = src.loc
|
|
if (istype(T, /turf))
|
|
if (locate(/obj/move, T))
|
|
T = locate(/obj/move, T)
|
|
else
|
|
T = null
|
|
switch(src.t_status)
|
|
if(1.0)
|
|
if( !portable() ) use_power(50, ENVIRON)
|
|
if (src.holding)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.holding.gas.transfer_from(src.gas, t)
|
|
else
|
|
if (T)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.gas.turf_add(T, t)
|
|
if(2.0)
|
|
if( !portable() ) use_power(50, ENVIRON)
|
|
if (src.holding)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = src.maximum - t1
|
|
var/t = src.t_per
|
|
if (src.t_per > t2)
|
|
t = t2
|
|
src.gas.transfer_from(src.holding.gas, t)
|
|
else
|
|
if (T)
|
|
var/t1 = src.gas.total_moles()
|
|
var/t2 = src.maximum - t1
|
|
var/t = src.t_per
|
|
if (t > t2)
|
|
t = t2
|
|
//var/g = gas.total_moles()
|
|
//if(dbg) world.log << "VP0 : [t] from turf: [gas.total_moles()]"
|
|
//if(dbg) Air()
|
|
|
|
src.gas.turf_take(T, t)
|
|
//if(dbg) world.log << "VP1 : now [gas.total_moles()]"
|
|
|
|
//if(dbg) world.log << "[gas.total_moles()-g] ([t]) from turf to siph"
|
|
|
|
//if(dbg) Air()
|
|
if(4.0)
|
|
if( !portable() )
|
|
use_power(50, ENVIRON)
|
|
|
|
if (T)
|
|
if (T.firelevel > 900000.0)
|
|
src.f_time = world.time + 300
|
|
else
|
|
if (world.time > src.f_time)
|
|
var/difference = CELLSTANDARD - (T.oxygen + T.n2)
|
|
if (difference > 0)
|
|
var/t1 = src.gas.total_moles()
|
|
if (difference > t1)
|
|
difference = t1
|
|
src.gas.turf_add(T, difference)
|
|
|
|
src.updateDialog()
|
|
|
|
src.setstate()
|
|
return
|
|
*/ //TODO: FIX
|
|
|
|
/obj/machinery/atmoalter/siphs/attack_ai(user as mob)
|
|
src.add_hiddenprint(user)
|
|
return src.attack_hand(user)
|
|
|
|
/obj/machinery/atmoalter/siphs/attack_paw(user as mob)
|
|
|
|
return src.attack_hand(user)
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/attack_hand(var/mob/user as mob)
|
|
|
|
if(stat & NOPOWER) return
|
|
|
|
if(src.portable() && istype(user, /mob/living/silicon/ai)) //AI can't use portable siphons
|
|
return
|
|
|
|
user.machine = src
|
|
var/tt
|
|
switch(src.t_status)
|
|
if(1.0)
|
|
tt = text("Releasing <A href='?src=\ref[];t=2'>Siphon</A> <A href='?src=\ref[];t=3'>Stop</A>", src, src)
|
|
if(2.0)
|
|
tt = text("<A href='?src=\ref[];t=1'>Release</A> Siphoning <A href='?src=\ref[];t=3'>Stop</A>", src, src)
|
|
if(3.0)
|
|
tt = text("<A href='?src=\ref[];t=1'>Release</A> <A href='?src=\ref[];t=2'>Siphon</A> Stopped <A href='?src=\ref[];t=4'>Automatic</A>", src, src, src)
|
|
else
|
|
tt = "Automatic equalizers are on!"
|
|
var/ct = null
|
|
switch(src.c_status)
|
|
if(1.0)
|
|
ct = text("Releasing <A href='?src=\ref[];c=2'>Accept</A> <A href='?src=\ref[];c=3'>Stop</A>", src, src)
|
|
if(2.0)
|
|
ct = text("<A href='?src=\ref[];c=1'>Release</A> Accepting <A href='?src=\ref[];c=3'>Stop</A>", src, src)
|
|
if(3.0)
|
|
ct = text("<A href='?src=\ref[];c=1'>Release</A> <A href='?src=\ref[];c=2'>Accept</A> Stopped", src, src)
|
|
else
|
|
ct = "Disconnected"
|
|
var/at = null
|
|
if (src.t_status == 4)
|
|
at = text("Automatic On <A href='?src=\ref[];t=3'>Stop</A>", src)
|
|
var/dat = text("<TT><B>Canister Valves</B> []<BR>\n\t<FONT color = 'blue'><B>Contains/Capacity</B> [] / []</FONT><BR>\n\tUpper Valve Status: [] []<BR>\n\t\t<A href='?src=\ref[];tp=-[]'>M</A> <A href='?src=\ref[];tp=-10000'>-</A> <A href='?src=\ref[];tp=-1000'>-</A> <A href='?src=\ref[];tp=-100'>-</A> <A href='?src=\ref[];tp=-1'>-</A> [] <A href='?src=\ref[];tp=1'>+</A> <A href='?src=\ref[];tp=100'>+</A> <A href='?src=\ref[];tp=1000'>+</A> <A href='?src=\ref[];tp=10000'>+</A> <A href='?src=\ref[];tp=[]'>M</A><BR>\n\tPipe Valve Status: []<BR>\n\t\t<A href='?src=\ref[];cp=-[]'>M</A> <A href='?src=\ref[];cp=-10000'>-</A> <A href='?src=\ref[];cp=-1000'>-</A> <A href='?src=\ref[];cp=-100'>-</A> <A href='?src=\ref[];cp=-1'>-</A> [] <A href='?src=\ref[];cp=1'>+</A> <A href='?src=\ref[];cp=100'>+</A> <A href='?src=\ref[];cp=1000'>+</A> <A href='?src=\ref[];cp=10000'>+</A> <A href='?src=\ref[];cp=[]'>M</A><BR>\n<BR>\n\n<A href='?src=\ref[];mach_close=siphon'>Close</A><BR>\n\t</TT>", (!( src.alterable ) ? "<B>Valves are locked. Unlock with wrench!</B>" : "You can lock this interface with a wrench."), num2text(src.gas.return_pressure(), 10), num2text(src.maximum, 10), (src.t_status == 4 ? text("[]", at) : text("[]", tt)), (src.holding ? text("<BR>(<A href='?src=\ref[];tank=1'>Tank ([]</A>)", src, src.holding.air_contents.return_pressure()) : null), src, num2text(max_valve, 7), src, src, src, src, src.t_per, src, src, src, src, src, num2text(max_valve, 7), ct, src, num2text(max_valve, 7), src, src, src, src, src.c_per, src, src, src, src, src, num2text(max_valve, 7), user)
|
|
user << browse(dat, "window=siphon;size=600x300")
|
|
onclose(user, "siphon")
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/Topic(href, href_list)
|
|
..()
|
|
|
|
if (usr.stat || usr.restrained())
|
|
return
|
|
if ((!( src.alterable )) && (!istype(usr, /mob/living/silicon/ai)))
|
|
return
|
|
if (((get_dist(src, usr) <= 1 || usr.telekinesis == 1) && istype(src.loc, /turf)) || (istype(usr, /mob/living/silicon/ai)))
|
|
usr.machine = src
|
|
if (href_list["c"])
|
|
var/c = text2num(href_list["c"])
|
|
switch(c)
|
|
if(1.0)
|
|
src.c_status = 1
|
|
if(2.0)
|
|
src.c_status = 2
|
|
if(3.0)
|
|
src.c_status = 3
|
|
else
|
|
else
|
|
if (href_list["t"])
|
|
var/t = text2num(href_list["t"])
|
|
if (src.t_status == 0)
|
|
return
|
|
switch(t)
|
|
if(1.0)
|
|
src.t_status = 1
|
|
if(2.0)
|
|
src.t_status = 2
|
|
if(3.0)
|
|
src.t_status = 3
|
|
if(4.0)
|
|
src.t_status = 4
|
|
src.f_time = 1
|
|
else
|
|
else
|
|
if (href_list["tp"])
|
|
var/tp = text2num(href_list["tp"])
|
|
src.t_per += tp
|
|
src.t_per = min(max(round(src.t_per), 0), max_valve)
|
|
else
|
|
if (href_list["cp"])
|
|
var/cp = text2num(href_list["cp"])
|
|
src.c_per += cp
|
|
src.c_per = min(max(round(src.c_per), 0), max_valve)
|
|
else
|
|
if (href_list["tank"])
|
|
var/cp = text2num(href_list["tank"])
|
|
if (cp == 1)
|
|
src.holding.loc = src.loc
|
|
src.holding = null
|
|
if (src.t_status == 2)
|
|
src.t_status = 3
|
|
src.updateUsrDialog()
|
|
|
|
src.add_fingerprint(usr)
|
|
else
|
|
usr << browse(null, "window=canister")
|
|
return
|
|
return
|
|
|
|
/obj/machinery/atmoalter/siphs/attackby(var/obj/W as obj, mob/user as mob)
|
|
|
|
if (istype(W, /obj/item/weapon/tank))
|
|
if (src.holding)
|
|
return
|
|
var/obj/item/weapon/tank/T = W
|
|
user.drop_item()
|
|
T.loc = src
|
|
src.holding = T
|
|
else
|
|
if (istype(W, /obj/item/weapon/screwdriver))
|
|
var/obj/machinery/connector/con = locate(/obj/machinery/connector, src.loc)
|
|
if (src.c_status)
|
|
src.anchored = 0
|
|
src.c_status = 0
|
|
user.show_message("\blue You have disconnected the siphon.")
|
|
if(con)
|
|
con.connected = null
|
|
else
|
|
if (con && !con.connected)
|
|
src.anchored = 1
|
|
src.c_status = 3
|
|
user.show_message("\blue You have connected the siphon.")
|
|
con.connected = src
|
|
else
|
|
user.show_message("\blue There is nothing here to connect to the siphon.")
|
|
|
|
|
|
else
|
|
if (istype(W, /obj/item/weapon/wrench))
|
|
src.alterable = !( src.alterable )
|
|
if (src.alterable)
|
|
user << "\blue You unlock the interface!"
|
|
else
|
|
user << "\blue You lock the interface!"
|
|
return
|
|
|
|
|