View difference between Paste ID: dW18BEeC and q3V2iE3d

-nextDirection = 2
+nextDirection = 3
 barrelDirection = 0
 chestDirection = 5
 craftingDirection = 4
 sorterDirection = "bottom"
 modemDirection = "back"
 
 sorter = peripheral.wrap(sorterDirection)
 rednet.open(modemDirection)
 
 
 items = {} --UUID, Amount
 
 function split(pString, pPattern) --("A_Small_Dog", "_")
   local Table = {}
   local fpat = "(.-)" .. pPattern
   local last_end = 1
   local s, e, cap = pString:find(fpat, 1)
   while s do
     if s ~= 1 or cap ~= "" then
       table.insert(Table, cap)
     end
     last_end = e + 1
     s, e, cap = pString:find(fpat, last_end)
   end
   if last_end <= #pString then
     cap = pString:sub(last_end)
     table.insert(Table, cap)
   end
   return Table
 end
 
 function save(table, name)
   local file = fs.open(name, "w")
   file.write(textutils.serialize(table))
   file.close()
 end
 
 function load(name)
   local file = fs.open(name, "r")
   if file ~= nil then
     local data = file.readAll()
     file.close()
     return textutils.unserialize(data)
   else
     return nil
   end
 end
 
 function reload()
   t = load("itemsData")
   if t == nil then
     for uuid, amount in pairs(sorter.list(barrelDirection)) do
       t = {uuid, 1}
     end
   end
   items = t
 end
 
 function barrelContains(uuid)
   if items[1] == uuid then
     return true
   else
     return false
   end
 end
 
 term.setCursorPos(1,1)
 term.clear()
 term.setCursorPos(1,1)
 
 reload()
 
 while true do
   event, param1, param2, param3 = os.pullEvent()
   if event == "isort_item" then
     if barrelContains(param1) then
       sorter.sort(barrelDirection)
       items[2] = items[2] + param2
       save(items, "itemsData")
     else
 -- Check if sorter next to is empty else sleep(1)
       sorter.sort(nextDirection)
     end
   elseif event == "rednet_message" then
     print("Received Message")
     message = split(param2, " ")
     if message[1] == "inv" then
       print("Message Contains Inv")
       if message [2] == "update" then
         reload()
       elseif message[2] == "getAmount" then
         print("Message Wants Amount")
         print("In Barrel" ..items[1])
         if tonumber(message[3]) == tonumber(items[1]) then
           print("Message Has Same Item")
           rMsg = "inv replyAmount " ..message[3] .." " ..items[2]
           rednet.send(param1, rMsg)
         end
       elseif message[2] == "withdraw" then
         if tonumber(message[3]) == tonumber(items[1]) then
           amount = tonumber(message[4])
           if amount < items[2] + 1 then
             sorter.extract(barrelDirection, tonumber(message[3]), chestDirection, amount)
             items[2] = items[2] - amount
             save(items, "itemsData")
             -- Handle no enough items reply
           end
         end
       elseif message[2] == "sendToCrafter" then
         if barrelContains(tonumber(message[3])) then
           sorter.extract(0, tonumber(message[3]), craftingDirection, tonumber(message[4]))
           items[2] = items[2] - tonumber(message[4])
           save(items, "itemsData")
           rednet.broadcast("inv crafterExtract " ..message[3])
         end
       end
     end
   end
 end