mirror of
https://github.com/ParadiseSS13/Paradise.git
synced 2025-12-30 04:02:33 +00:00
486 lines
15 KiB
Plaintext
486 lines
15 KiB
Plaintext
// the SMES
|
|
// stores power
|
|
|
|
#define SMESMAXCHARGELEVEL 200000
|
|
#define SMESMAXOUTPUT 200000
|
|
|
|
|
|
|
|
/obj/machinery/power/smes
|
|
name = "power storage unit"
|
|
desc = "A high-capacity superconducting magnetic energy storage (SMES) unit."
|
|
icon_state = "smes"
|
|
density = 1
|
|
anchored = 1
|
|
use_power = 0
|
|
var/output = 50000
|
|
var/lastout = 0
|
|
var/loaddemand = 0
|
|
var/capacity = 5e6
|
|
var/charge = 1e6
|
|
var/charging = 0
|
|
var/chargemode = 0
|
|
var/chargecount = 0
|
|
var/chargelevel = 50000
|
|
var/input_level_max = 200000 // cap on input_level
|
|
var/output_level_max = 200000 // cap on output_level
|
|
var/online = 1
|
|
var/name_tag = null
|
|
var/obj/machinery/power/terminal/terminal = null
|
|
var/list/overlay_images
|
|
|
|
/obj/machinery/power/smes/New()
|
|
..()
|
|
component_parts = list()
|
|
component_parts += new /obj/item/weapon/circuitboard/smes(null)
|
|
component_parts += new /obj/item/weapon/cell/high(null)
|
|
component_parts += new /obj/item/weapon/cell/high(null)
|
|
component_parts += new /obj/item/weapon/cell/high(null)
|
|
component_parts += new /obj/item/weapon/cell/high(null)
|
|
component_parts += new /obj/item/weapon/cell/high(null)
|
|
component_parts += new /obj/item/weapon/stock_parts/capacitor(null)
|
|
component_parts += new /obj/item/stack/cable_coil(null, 5)
|
|
RefreshParts()
|
|
spawn(5)
|
|
if(!powernet)
|
|
connect_to_network()
|
|
|
|
dir_loop:
|
|
for(var/d in cardinal)
|
|
var/turf/T = get_step(src, d)
|
|
for(var/obj/machinery/power/terminal/term in T)
|
|
if(term && term.dir == turn(d, 180))
|
|
terminal = term
|
|
break dir_loop
|
|
if(!terminal)
|
|
stat |= BROKEN
|
|
return
|
|
terminal.master = src
|
|
if(!terminal.powernet)
|
|
terminal.connect_to_network()
|
|
updateicon()
|
|
return
|
|
|
|
/obj/machinery/power/smes/RefreshParts()
|
|
var/IO = 0
|
|
var/C = 0
|
|
for(var/obj/item/weapon/stock_parts/capacitor/CP in component_parts)
|
|
IO += CP.rating
|
|
input_level_max = 200000 * IO
|
|
output_level_max = 200000 * IO
|
|
for(var/obj/item/weapon/cell/PC in component_parts)
|
|
C += PC.maxcharge
|
|
capacity = C / (15000) * 1e6
|
|
|
|
/obj/machinery/power/smes/proc/updateicon()
|
|
overlays.Cut()
|
|
if(stat & BROKEN) return
|
|
|
|
if(isnull(src.overlay_images))
|
|
src.overlay_images = new
|
|
src.overlay_images.len = 3
|
|
|
|
src.overlay_images[1] = image('icons/obj/power.dmi', "smes-op[online]")
|
|
src.overlay_images[2] = image('icons/obj/power.dmi', "smes-oc0")
|
|
src.overlay_images[3] = image('icons/obj/power.dmi', "smes-og1")
|
|
|
|
var/image/buffer
|
|
|
|
buffer = src.overlay_images[1]
|
|
buffer.icon_state = "smes-op[online]"
|
|
overlays += src.overlay_images[1]
|
|
|
|
if(!charging && chargemode)
|
|
buffer = src.overlay_images[2]
|
|
buffer.icon_state = "smes-oc0"
|
|
overlays += src.overlay_images[2]
|
|
else
|
|
buffer = src.overlay_images[2]
|
|
buffer.icon_state = "smes-oc1"
|
|
overlays += src.overlay_images[2]
|
|
|
|
var/clevel = chargedisplay()
|
|
if(clevel > 0)
|
|
buffer = src.overlay_images[3]
|
|
buffer.icon_state = "smes-og[clevel]"
|
|
overlays += src.overlay_images[3]
|
|
return
|
|
|
|
|
|
/obj/machinery/power/smes/attackby(obj/item/I, mob/user)
|
|
//opening using screwdriver
|
|
if(default_deconstruction_screwdriver(user, "[initial(icon_state)]-o", initial(icon_state), I))
|
|
update_icon()
|
|
return
|
|
|
|
//changing direction using wrench
|
|
if(default_change_direction_wrench(user, I))
|
|
terminal = null
|
|
var/turf/T = get_step(src, dir)
|
|
for(var/obj/machinery/power/terminal/term in T)
|
|
if(term && term.dir == turn(dir, 180))
|
|
terminal = term
|
|
terminal.master = src
|
|
user << "<span class='notice'>Terminal found.</span>"
|
|
break
|
|
if(!terminal)
|
|
user << "<span class='alert'>No power source found.</span>"
|
|
return
|
|
stat &= ~BROKEN
|
|
update_icon()
|
|
return
|
|
|
|
//exchanging parts using the RPE
|
|
if(exchange_parts(user, I))
|
|
return
|
|
|
|
//building and linking a terminal
|
|
if(istype(I, /obj/item/stack/cable_coil))
|
|
var/dir = get_dir(user,src)
|
|
if(dir & (dir-1))//we don't want diagonal click
|
|
return
|
|
|
|
if(terminal) //is there already a terminal ?
|
|
user << "<span class='alert'>This SMES already have a power terminal!</span>"
|
|
return
|
|
|
|
if(!panel_open) //is the panel open ?
|
|
user << "<span class='alert'>You must open the maintenance panel first!</span>"
|
|
return
|
|
|
|
var/turf/T = get_turf(user)
|
|
if (T.intact) //is the floor plating removed ?
|
|
user << "<span class='alert'>You must first remove the floor plating!</span>"
|
|
return
|
|
|
|
|
|
var/obj/item/stack/cable_coil/C = I
|
|
if(C.amount < 10)
|
|
user << "<span class='alert'>You need more wires.</span>"
|
|
return
|
|
|
|
user << "You start building the power terminal..."
|
|
playsound(src.loc, 'sound/items/Deconstruct.ogg', 50, 1)
|
|
|
|
if(do_after(user, 20) && C.amount >= 10)
|
|
var/obj/structure/cable/N = T.get_cable_node() //get the connecting node cable, if there's one
|
|
if (prob(50) && electrocute_mob(usr, N, N)) //animate the electrocution if uncautious and unlucky
|
|
var/datum/effect/effect/system/spark_spread/s = new /datum/effect/effect/system/spark_spread
|
|
s.set_up(5, 1, src)
|
|
s.start()
|
|
return
|
|
|
|
C.use(10)
|
|
user.visible_message(\
|
|
"<span class='alert'>[user.name] has built a power terminal!</span>",\
|
|
"You build the power terminal.")
|
|
|
|
//build the terminal and link it to the network
|
|
make_terminal(T)
|
|
terminal.connect_to_network()
|
|
return
|
|
|
|
//disassembling the terminal
|
|
if(istype(I, /obj/item/weapon/wirecutters) && terminal && panel_open)
|
|
var/turf/T = get_turf(terminal)
|
|
if (T.intact) //is the floor plating removed ?
|
|
user << "<span class='alert'>You must first expose the power terminal!</span>"
|
|
return
|
|
|
|
user << "You begin to dismantle the power terminal..."
|
|
playsound(src.loc, 'sound/items/Deconstruct.ogg', 50, 1)
|
|
|
|
if(do_after(user, 50))
|
|
if (prob(50) && electrocute_mob(usr, terminal.powernet, terminal)) //animate the electrocution if uncautious and unlucky
|
|
var/datum/effect/effect/system/spark_spread/s = new /datum/effect/effect/system/spark_spread
|
|
s.set_up(5, 1, src)
|
|
s.start()
|
|
return
|
|
|
|
//give the wires back and delete the terminal
|
|
new /obj/item/stack/cable_coil(T,10)
|
|
user.visible_message(\
|
|
"<span class='alert'>[user.name] cuts the cables and dismantles the power terminal.</span>",\
|
|
"You cut the cables and dismantle the power terminal.")
|
|
charging = 0 //stop inputting, since we have don't have a terminal anymore
|
|
del(terminal)
|
|
return
|
|
|
|
//crowbarring it !
|
|
default_deconstruction_crowbar(I)
|
|
|
|
/obj/machinery/power/smes/Destroy()
|
|
if(ticker && ticker.current_state == GAME_STATE_PLAYING)
|
|
var/area/area = get_area(src)
|
|
message_admins("SMES deleted at (<A HREF='?_src_=holder;adminplayerobservecoodjump=1;X=[x];Y=[y];Z=[z]'>[area.name]</a>)")
|
|
log_game("SMES deleted at ([area.name])")
|
|
investigate_log("<font color='red'>deleted</font> at ([area.name])","singulo")
|
|
if(terminal)
|
|
disconnect_terminal()
|
|
..()
|
|
|
|
// create a terminal object pointing towards the SMES
|
|
// wires will attach to this
|
|
/obj/machinery/power/smes/proc/make_terminal(var/turf/T)
|
|
terminal = new/obj/machinery/power/terminal(T)
|
|
terminal.dir = get_dir(T,src)
|
|
terminal.master = src
|
|
|
|
/obj/machinery/power/smes/proc/disconnect_terminal()
|
|
if(terminal)
|
|
terminal.master = null
|
|
terminal = null
|
|
|
|
/obj/machinery/power/smes/proc/chargedisplay()
|
|
return round(5.5*charge/capacity)
|
|
|
|
#define SMESRATE 0.05 // rate of internal charge to external power
|
|
|
|
|
|
/obj/machinery/power/smes/process()
|
|
if(stat & BROKEN)
|
|
return
|
|
|
|
//store machine state to see if we need to update the icon overlays
|
|
var/last_disp = chargedisplay()
|
|
var/last_chrg = charging
|
|
var/last_onln = online
|
|
|
|
if(terminal)
|
|
var/excess = terminal.surplus()
|
|
|
|
if(charging)
|
|
if(excess >= 0) // if there's power available, try to charge
|
|
|
|
var/load = min((capacity-charge)/SMESRATE, chargelevel) // charge at set rate, limited to spare capacity
|
|
|
|
charge += load * SMESRATE // increase the charge
|
|
|
|
add_load(load) // add the load to the terminal side network
|
|
|
|
else // if not enough capcity
|
|
charging = 0 // stop charging
|
|
chargecount = 0
|
|
|
|
else
|
|
if(chargemode)
|
|
if(chargecount > rand(3,6))
|
|
charging = 1
|
|
chargecount = 0
|
|
|
|
if(excess > chargelevel)
|
|
chargecount++
|
|
else
|
|
chargecount = 0
|
|
else
|
|
chargecount = 0
|
|
|
|
if(online) // if outputting
|
|
lastout = min( charge/SMESRATE, output) //limit output to that stored
|
|
|
|
charge -= lastout*SMESRATE // reduce the storage (may be recovered in /restore() if excessive)
|
|
|
|
add_avail(lastout) // add output to powernet (smes side)
|
|
|
|
if(charge < 0.0001)
|
|
online = 0 // stop output if charge falls to zero
|
|
|
|
// only update icon if state changed
|
|
if(last_disp != chargedisplay() || last_chrg != charging || last_onln != online)
|
|
updateicon()
|
|
|
|
return
|
|
|
|
// called after all power processes are finished
|
|
// restores charge level to smes if there was excess this ptick
|
|
|
|
|
|
/obj/machinery/power/smes/proc/restore()
|
|
if(stat & BROKEN)
|
|
return
|
|
|
|
if(!online)
|
|
loaddemand = 0
|
|
return
|
|
|
|
var/excess = powernet.netexcess // this was how much wasn't used on the network last ptick, minus any removed by other SMESes
|
|
|
|
excess = min(lastout, excess) // clamp it to how much was actually output by this SMES last ptick
|
|
|
|
excess = min((capacity-charge)/SMESRATE, excess) // for safety, also limit recharge by space capacity of SMES (shouldn't happen)
|
|
|
|
// now recharge this amount
|
|
|
|
var/clev = chargedisplay()
|
|
|
|
charge += excess * SMESRATE
|
|
powernet.netexcess -= excess // remove the excess from the powernet, so later SMESes don't try to use it
|
|
|
|
loaddemand = lastout-excess
|
|
|
|
if(clev != chargedisplay() )
|
|
updateicon()
|
|
return
|
|
|
|
|
|
/obj/machinery/power/smes/add_load(var/amount)
|
|
if(terminal && terminal.powernet)
|
|
terminal.powernet.newload += amount
|
|
|
|
|
|
/obj/machinery/power/smes/attack_ai(mob/user)
|
|
add_fingerprint(user)
|
|
ui_interact(user)
|
|
|
|
/obj/machinery/power/smes/attack_hand(mob/user)
|
|
add_fingerprint(user)
|
|
ui_interact(user)
|
|
|
|
/obj/machinery/power/smes/attack_alien(mob/living/carbon/alien/humanoid/user)
|
|
return
|
|
|
|
/obj/machinery/power/smes/ui_interact(mob/user, ui_key = "main", var/datum/nanoui/ui = null, var/force_open = 1)
|
|
|
|
if(stat & BROKEN)
|
|
return
|
|
|
|
// this is the data which will be sent to the ui
|
|
var/data[0]
|
|
data["nameTag"] = name_tag
|
|
data["storedCapacity"] = round(100.0*charge/capacity, 0.1)
|
|
data["charging"] = charging
|
|
data["chargeMode"] = chargemode
|
|
data["chargeLevel"] = chargelevel
|
|
data["chargeMax"] = input_level_max
|
|
data["outputOnline"] = online
|
|
data["outputLevel"] = output
|
|
data["outputMax"] = output_level_max
|
|
data["outputLoad"] = round(loaddemand)
|
|
|
|
// update the ui if it exists, returns null if no ui is passed/found
|
|
ui = nanomanager.try_update_ui(user, src, ui_key, ui, data, force_open)
|
|
if (!ui)
|
|
// the ui does not exist, so we'll create a new() one
|
|
// for a list of parameters and their descriptions see the code docs in \code\modules\nano\nanoui.dm
|
|
ui = new(user, src, ui_key, "smes.tmpl", "SMES Power Storage Unit", 540, 380)
|
|
// when the ui is first opened this is the data it will use
|
|
ui.set_initial_data(data)
|
|
// open the new ui window
|
|
ui.open()
|
|
// auto update every Master Controller tick
|
|
ui.set_auto_update(1)
|
|
|
|
|
|
/obj/machinery/power/smes/Topic(href, href_list)
|
|
..()
|
|
|
|
if (usr.stat || usr.restrained() )
|
|
return
|
|
if (!(istype(usr, /mob/living/carbon/human) || ticker) && ticker.mode.name != "monkey")
|
|
if(!istype(usr, /mob/living/silicon/ai))
|
|
usr << "\red You don't have the dexterity to do this!"
|
|
return
|
|
|
|
//world << "[href] ; [href_list[href]]"
|
|
|
|
if (!istype(src.loc, /turf) && !istype(usr, /mob/living/silicon/))
|
|
return 0 // Do not update ui
|
|
|
|
if( href_list["cmode"] )
|
|
chargemode = !chargemode
|
|
if(!chargemode)
|
|
charging = 0
|
|
updateicon()
|
|
|
|
else if( href_list["online"] )
|
|
online = !online
|
|
updateicon()
|
|
else if( href_list["input"] )
|
|
switch( href_list["input"] )
|
|
if("min")
|
|
chargelevel = 0
|
|
if("max")
|
|
chargelevel = input_level_max //30000
|
|
if("set")
|
|
chargelevel = input(usr, "Enter new input level (0-[input_level_max])", "SMES Input Power Control", chargelevel) as num
|
|
chargelevel = max(0, min(input_level_max, chargelevel)) // clamp to range
|
|
|
|
else if( href_list["output"] )
|
|
switch( href_list["output"] )
|
|
if("min")
|
|
output = 0
|
|
if("max")
|
|
output = output_level_max //30000
|
|
if("set")
|
|
output = input(usr, "Enter new output level (0-[output_level_max])", "SMES Output Power Control", output) as num
|
|
output = max(0, min(output_level_max, output)) // clamp to range
|
|
|
|
investigate_log("input/output; [chargelevel>output?"<font color='green'>":"<font color='red'>"][chargelevel]/[output]</font> | Output-mode: [online?"<font color='green'>on</font>":"<font color='red'>off</font>"] | Input-mode: [chargemode?"<font color='green'>auto</font>":"<font color='red'>off</font>"] by [usr.key]","singulo")
|
|
|
|
return 1
|
|
|
|
|
|
/obj/machinery/power/smes/proc/ion_act()
|
|
if(src.z == 1)
|
|
if(prob(1)) //explosion
|
|
world << "\red SMES explosion in [src.loc.loc]"
|
|
for(var/mob/M in viewers(src))
|
|
M.show_message("\red The [src.name] is making strange noises!", 3, "\red You hear sizzling electronics.", 2)
|
|
sleep(10*pick(4,5,6,7,10,14))
|
|
var/datum/effect/effect/system/harmless_smoke_spread/smoke = new /datum/effect/effect/system/harmless_smoke_spread()
|
|
smoke.set_up(3, 0, src.loc)
|
|
smoke.attach(src)
|
|
smoke.start()
|
|
explosion(src.loc, -1, 0, 1, 3, 0)
|
|
del(src)
|
|
return
|
|
if(prob(15)) //Power drain
|
|
world << "\red SMES power drain in [src.loc.loc]"
|
|
var/datum/effect/effect/system/spark_spread/s = new /datum/effect/effect/system/spark_spread
|
|
s.set_up(3, 1, src)
|
|
s.start()
|
|
if(prob(50))
|
|
emp_act(1)
|
|
else
|
|
emp_act(2)
|
|
if(prob(5)) //smoke only
|
|
world << "\red SMES smoke in [src.loc.loc]"
|
|
var/datum/effect/effect/system/harmless_smoke_spread/smoke = new /datum/effect/effect/system/harmless_smoke_spread()
|
|
smoke.set_up(3, 0, src.loc)
|
|
smoke.attach(src)
|
|
smoke.start()
|
|
|
|
|
|
/obj/machinery/power/smes/emp_act(severity)
|
|
online = 0
|
|
charging = 0
|
|
output = 0
|
|
charge -= 1e6/severity
|
|
if (charge < 0)
|
|
charge = 0
|
|
spawn(100)
|
|
output = initial(output)
|
|
charging = initial(charging)
|
|
online = initial(online)
|
|
..()
|
|
|
|
|
|
|
|
/obj/machinery/power/smes/magical
|
|
name = "magical power storage unit"
|
|
desc = "A high-capacity superconducting magnetic energy storage (SMES) unit. Magically produces power."
|
|
process()
|
|
capacity = INFINITY
|
|
charge = INFINITY
|
|
..()
|
|
|
|
/proc/rate_control(var/S, var/V, var/C, var/Min=1, var/Max=5, var/Limit=null)
|
|
var/href = "<A href='?src=\ref[S];rate control=1;[V]"
|
|
var/rate = "[href]=-[Max]'>-</A>[href]=-[Min]'>-</A> [(C?C : 0)] [href]=[Min]'>+</A>[href]=[Max]'>+</A>"
|
|
if(Limit) return "[href]=-[Limit]'>-</A>"+rate+"[href]=[Limit]'>+</A>"
|
|
return rate
|
|
|
|
|
|
|
|
#undef SMESRATE
|