View difference between Paste ID: KhajdddU and 8HAp4VGC

-rednet.open "top"
+local f = fs.open("conf", "r")
 local conf = textutils.unserialise(f.readAll())
 f.close()
-    local t = {}
+
-    for sub in str:gmatch("[^" .. sep .. "]+") do
+rednet.open(conf.modem)
-        table.insert(t, sub)
+
-    end
+if conf.introspection then
-    return t
+	conf.introspection = peripheral.call(conf.introspection, "getInventory")
 	print(conf.introspection)
 end
 
-    local msg
+
-    repeat
+	local t = {}
-        rednet.broadcast(m, "mw")
+	for sub in str:gmatch("[^" .. sep .. "]+") do
-        _, msg = rednet.receive("mw", 1)
+		table.insert(t, sub)
-    until msg
+	end
-    return msg
+
 	return t
 end
 
 local function query(m)
-    write "|> "
+	local msg
-    local tokens = split(read(), " ")
+	repeat
-    local cmd = table.remove(tokens, 1)
+    	rednet.broadcast(m, "mw")
     	_, msg = rednet.receive("mw", 1)
-    if cmd == "w" then
+	until msg
-        local fst = table.remove(tokens, 1)
+	return msg
-        local qty = tonumber(fst)
+
 
-        if not qty then
+local function fetchItem(item, toGet)
-            table.insert(tokens, fst)
+	print(item, toGet)
-            qty = math.huge
+	local result
-        end
+	repeat
 		local toGetNow = 64
-        local item = table.concat(tokens, " ")
+		if toGet < 64 then toGetNow = toGet end
-        local sources, hasFound, result = {}, 0
+
-        repeat
+		result = query { cmd = "extract", dname = item, destInv = conf.name, qty = toGetNow }
-            result = query { cmd = "find", dname = item }
+		if result and type(result) == "table" and result[1] then
-            if result then
+			toGet = toGet - result[1]
-                table.insert(sources, { result[1], result[2] })
+		end
-                hasFound = hasFound + result[3].count
+
-            end
+		if conf.introspection then
-        until hasFound >= qty or not result
+			conf.introspection.pullItems(conf.name, 1)
 		end
 	until toGet <= 0 or result == "ERROR"
-    end
+
 
 function dump(slot)
 	if conf.introspection then
 		conf.introspection.pushItems(conf.name, slot)
 		slot = 1
 	end
 	query { cmd = "insert", fromInv = conf.name, fromSlot = slot }
 end
 
 function tryNumber(tokens)
 	local fst = table.remove(tokens, 1)
 	local qty = tonumber(fst)
 
 	if not qty then
 		table.insert(tokens, 1, fst)
 	end
 
 	return qty
 end
 
 local help = [[
 Welcome to the Multiplexed Warehousing CLI Terminal (Alpha).
 Commands:
 w [name] - withdraw all items whose names contain [name]
 w [qty] [name] - withdraw [qty] items whose names contain [name]
 c - Craft item, using the turtle's inventory as a grid (turtle.craft)
 d - Dump all items into storage
 d [slot] - Dump items in [slot] into storage
 r - Force connected storage server to reindex
 help - Display this
 This is an unstable alpha version and does not support a GUI or multiple storage servers.]]
 
 print "Multiplexed Warehousing: CLI Terminal"
 while true do
 	write "|> "
 	local tokens = split(read(), " ")
 	local cmd = table.remove(tokens, 1)
 
 	if cmd == "w" then
 		local qty = tryNumber(tokens)
 		if not qty then
 			qty = math.huge
 		end
 
 		local item = table.concat(tokens, " ")
 		fetchItem(item, qty)
     elseif cmd == "c" then
 		turtle.craft()
 	elseif cmd == "d" then
 		local slot = tryNumber(tokens)
 
 		if slot then dump(slot) else
 			local size = 16
 			if conf.introspection then size = conf.introspection.size() end
 			for i = 1, size do
 				dump(i)
 			end
 		end
 	elseif cmd == "r" then
 		query { cmd = "reindex" }
 	elseif cmd == "help" then
 		textutils.pagedPrint(help)
 	end
 end