GLOBAL_DATUM(ore_silo_default, /obj/machinery/ore_silo) GLOBAL_LIST_EMPTY(silo_access_logs) /obj/machinery/ore_silo name = "ore silo" desc = "An all-in-one bluespace storage and transmission system for the station's mineral distribution needs." icon = 'icons/obj/machines/ore_silo.dmi' icon_state = "silo" density = TRUE circuit = /obj/item/circuitboard/machine/ore_silo interaction_flags_machine = INTERACT_MACHINE_WIRES_IF_OPEN|INTERACT_MACHINE_ALLOW_SILICON|INTERACT_MACHINE_OPEN_SILICON|INTERACT_MACHINE_SET_MACHINE /// The machine UI's page of logs showing ore history. var/log_page = 1 /// List of all connected components that are on hold from accessing materials. var/list/holds = list() /// List of all components that are sharing ores with this silo. var/list/datum/component/remote_materials/ore_connected_machines = list() /// Material Container var/datum/component/material_container/materials /obj/machinery/ore_silo/Initialize(mapload) . = ..() var/static/list/materials_list = list( /datum/material/iron, /datum/material/glass, /datum/material/silver, /datum/material/gold, /datum/material/diamond, /datum/material/plasma, /datum/material/uranium, /datum/material/bananium, /datum/material/titanium, /datum/material/bluespace, /datum/material/plastic, ) materials = AddComponent( \ /datum/component/material_container, \ materials_list, \ INFINITY, \ container_signals = list( \ COMSIG_MATCONTAINER_ITEM_CONSUMED = TYPE_PROC_REF(/obj/machinery/ore_silo, on_item_consumed), \ COMSIG_MATCONTAINER_SHEETS_RETRIEVED = TYPE_PROC_REF(/obj/machinery/ore_silo, log_sheets_ejected), \ ), \ allowed_items = /obj/item/stack \ ) if (!GLOB.ore_silo_default && mapload && is_station_level(z)) GLOB.ore_silo_default = src /obj/machinery/ore_silo/Destroy() if (GLOB.ore_silo_default == src) GLOB.ore_silo_default = null for(var/datum/component/remote_materials/mats as anything in ore_connected_machines) mats.disconnect_from(src) ore_connected_machines = null materials = null return ..() /obj/machinery/ore_silo/proc/on_item_consumed(datum/component/material_container/container, obj/item/item_inserted, last_inserted_id, mats_consumed, amount_inserted, atom/context) SIGNAL_HANDLER silo_log(context, "deposited", amount_inserted, item_inserted.name, mats_consumed) SEND_SIGNAL(context, COMSIG_SILO_ITEM_CONSUMED, container, item_inserted, last_inserted_id, mats_consumed, amount_inserted) /obj/machinery/ore_silo/proc/log_sheets_ejected(datum/component/material_container/container, obj/item/stack/sheet/sheets, atom/context) SIGNAL_HANDLER silo_log(context, "ejected", -sheets.amount, "[sheets.singular_name]", sheets.custom_materials) /obj/machinery/ore_silo/screwdriver_act(mob/living/user, obj/item/tool) return default_deconstruction_screwdriver(user, icon_state, icon_state, tool) /obj/machinery/ore_silo/crowbar_act(mob/living/user, obj/item/tool) return default_deconstruction_crowbar(tool) /obj/machinery/ore_silo/ui_interact(mob/user) user.set_machine(src) var/datum/browser/popup = new(user, "ore_silo", null, 600, 550) popup.set_content(generate_ui()) popup.open() /obj/machinery/ore_silo/proc/generate_ui() var/list/ui = list("Ore Silo

Stored Material:

") var/any = FALSE for(var/M in materials.materials) var/datum/material/mat = M var/amount = materials.materials[M] var/sheets = round(amount) / SHEET_MATERIAL_AMOUNT var/ref = REF(M) if (sheets) if (sheets >= 1) ui += "Eject" else ui += "Eject" if (sheets >= 20) ui += "20x" else ui += "20x" ui += "[mat.name]: [sheets] sheets
" any = TRUE if(!any) ui += "Nothing!" ui += "

Connected Machines:

" for(var/datum/component/remote_materials/mats as anything in ore_connected_machines) var/atom/parent = mats.parent ui += "Remove" ui += "[holds[mats] ? "Allow" : "Hold"]" ui += " [parent.name] in [get_area_name(parent, TRUE)]
" if(!ore_connected_machines.len) ui += "Nothing!" ui += "

Access Logs:

" var/list/logs = GLOB.silo_access_logs[REF(src)] var/len = LAZYLEN(logs) var/num_pages = 1 + round((len - 1) / 30) var/page = clamp(log_page, 1, num_pages) if(num_pages > 1) for(var/i in 1 to num_pages) if(i == page) ui += "[i]" else ui += "[i]" ui += "
    " any = FALSE for(var/i in (page - 1) * 30 + 1 to min(page * 30, len)) var/datum/ore_silo_log/entry = logs[i] ui += "
  1. [entry.formatted]
    2. " any = TRUE if (!any) ui += "
  2. Nothing!
    3. " ui += "
" return ui.Join() /obj/machinery/ore_silo/Topic(href, href_list) if(..()) return add_fingerprint(usr) usr.set_machine(src) if(href_list["remove"]) var/datum/component/remote_materials/mats = locate(href_list["remove"]) in ore_connected_machines if (mats) mats.disconnect_from(src) updateUsrDialog() return TRUE else if(href_list["hold"]) var/datum/component/remote_materials/mats = locate(href_list["hold"]) in ore_connected_machines mats.toggle_holding() updateUsrDialog() return TRUE else if(href_list["ejectsheet"]) var/datum/material/eject_sheet = locate(href_list["ejectsheet"]) var/amount = text2num(href_list["eject_amt"]) materials.retrieve_sheets(amount, eject_sheet, drop_location()) return TRUE else if(href_list["page"]) log_page = text2num(href_list["page"]) || 1 updateUsrDialog() return TRUE /obj/machinery/ore_silo/multitool_act(mob/living/user, obj/item/multitool/I) . = ..() if (istype(I)) I.set_buffer(src) balloon_alert(user, "saved to multitool buffer") return TRUE /** * Creates a log entry for depositing/withdrawing from the silo both ingame and in text based log * * Arguments: * - [M][/obj/machinery]: The machine performing the action. * - action: Text that visually describes the action (smelted/deposited/resupplied...) * - amount: The amount of sheets/objects deposited/withdrawn by this action. Positive for depositing, negative for withdrawing. * - noun: Name of the object the action was performed with (sheet, units, ore...) * - [mats][list]: Assoc list in format (material datum = amount of raw materials). Wants the actual amount of raw (iron, glass...) materials involved in this action. If you have 10 metal sheets each worth 100 iron you would pass a list with the iron material datum = 1000 */ /obj/machinery/ore_silo/proc/silo_log(obj/machinery/M, action, amount, noun, list/mats) if (!length(mats)) return var/datum/ore_silo_log/entry = new(M, action, amount, noun, mats) var/list/datum/ore_silo_log/logs = GLOB.silo_access_logs[REF(src)] if(!LAZYLEN(logs)) GLOB.silo_access_logs[REF(src)] = logs = list(entry) else if(!logs[1].merge(entry)) logs.Insert(1, entry) updateUsrDialog() flick("silo_active", src) /obj/machinery/ore_silo/examine(mob/user) . = ..() . += span_notice("[src] can be linked to techfabs, circuit printers and protolathes with a multitool.") /datum/ore_silo_log var/name // for VV var/formatted // for display var/timestamp var/machine_name var/area_name var/action var/noun var/amount var/list/materials /datum/ore_silo_log/New(obj/machinery/M, _action, _amount, _noun, list/mats=list()) timestamp = station_time_timestamp() machine_name = M.name area_name = get_area_name(M, TRUE) action = _action amount = _amount noun = _noun materials = mats.Copy() format() var/list/data = list( "machine_name" = machine_name, "area_name" = AREACOORD(M), "action" = action, "amount" = abs(amount), "noun" = noun, "raw_materials" = get_raw_materials(""), "direction" = amount < 0 ? "withdrawn" : "deposited", ) logger.Log( LOG_CATEGORY_SILO, "[machine_name] in \[[AREACOORD(M)]\] [action] [abs(amount)]x [noun] | [get_raw_materials("")]", data, ) /datum/ore_silo_log/proc/merge(datum/ore_silo_log/other) if (other == src || action != other.action || noun != other.noun) return FALSE if (machine_name != other.machine_name || area_name != other.area_name) return FALSE timestamp = other.timestamp amount += other.amount for(var/each in other.materials) materials[each] += other.materials[each] format() return TRUE /datum/ore_silo_log/proc/format() name = "[machine_name]: [action] [amount]x [noun]" formatted = "([timestamp]) [machine_name] in [area_name]
[action] [abs(amount)]x [noun]
[get_raw_materials("")]" /datum/ore_silo_log/proc/get_raw_materials(separator) var/list/msg = list() for(var/key in materials) var/datum/material/M = key var/val = round(materials[key]) msg += separator separator = ", " msg += "[amount < 0 ? "-" : "+"][val] [M.name]" return msg.Join()