wyvern/IO.lua

42 lines
1.2 KiB
Lua
Raw Normal View History

2018-08-14 21:13:12 +00:00
local d = require "luadash"
local w = require "lib"
local conf = w.load_config({
"chest",
2018-08-14 21:13:42 +00:00
"items",
"sleep_time"
2018-08-14 21:13:12 +00:00
}, {
2018-08-14 21:17:54 +00:00
sleep_time = 1,
2018-08-14 21:13:12 +00:00
items = {}
})
w.init()
local chest = peripheral.wrap(conf.chest)
while true do
2018-08-14 21:21:42 +00:00
local stacks_stored = d.map(chest.list(), w.to_wyvern_item)
2018-08-14 21:13:12 +00:00
local items_stored = w.collate_stacks(stacks_stored)
for item_name, quantity_desired in pairs(conf.items) do
local quantity_stocked = items_stored[item_name] or 0
if quantity_desired > quantity_stocked then -- if we have fewer items than are desired, extract some from store
local request = w.string_to_item(item_name)
request.type = "extract"
request.destination_inventory = w.chest
2018-08-14 21:28:57 +00:00
w.unwrap(w.query_by_type("storage", request), "extracting items")
2018-08-14 21:13:12 +00:00
end
end
for slot, item in pairs(stacks_stored) do
2018-08-14 21:22:29 +00:00
if not conf.items[w.get_internal_identifier(item)] then -- if item is not in want list, send it back to storage
2018-08-14 21:28:57 +00:00
w.unwrap(w.query_by_type("storage", {
2018-08-14 21:13:12 +00:00
type = "insert",
from_inventory = conf.chest,
from_slot = slot
2018-08-14 21:28:57 +00:00
}), "inserting items")
2018-08-14 21:13:12 +00:00
end
end
2018-08-14 21:13:42 +00:00
sleep(conf.sleep_time)
2018-08-14 21:13:12 +00:00
end