View difference between Paste ID: ymf3tXqy and pGnazpYA

 Sensorside = "bottom"
 PIPE_SIDE = "right"
 
 function ClearPages()
     sleep(0.5)
     redstone.setBundledOutput("back",colors.combine(redstone.getBundledOutput("back"), colors.black))
     sleep(0.5)
     redstone.setBundledOutput("back",colors.subtract(redstone.getBundledOutput("back"), colors.black))
     sleep(2)
 end
 
 function ResetSignals()
     sleep(0.5)
     redstone.setBundledOutput("back",colors.subtract(redstone.getBundledOutput("back"), colors.orange))
     sleep(0.5)
     redstone.setBundledOutput("back",colors.combine(redstone.getBundledOutput("back"), colors.blue))
 end
 
 function RequestItems()
     -- IMPLEMENTATION
     function convertNBT(nbt)
         local conv = {}
         if (nbt == nil) then
             return nil
         elseif (nbt["type"] == "NBTTagCompound") or (nbt["type"] == "NBTTagList") then
             for key, value in pairs(nbt["value"]) do
                 conv[key] = convertNBT(value)
             end
         else
             conv = nbt["value"]
         end
         return conv
     end
 
     function getItems(pipe)
         pipe.getAvailableItems()
         local event, result = os.pullEvent("available_items_return")
         return result
     end
 
     -- Funktion inList anpassen, um Variablen zu verwenden
     function inList(item)
         local id = item.id
         local dmg = item.dmg
         local idKey = tostring(id)
         local exists, requestAmount = false, 0
 
         local variantKey = idKey .. ":" .. tostring(dmg)
         if REQUEST_IDS[variantKey] then
             exists = true
             requestAmount = REQUEST_IDS[variantKey]
         end
 
         return exists, requestAmount
     end
 
     -- MAIN
     local pipe = peripheral.wrap(PIPE_SIDE)
     for i, result in pairs(getItems(pipe)) do
         local iid, amount = unpack(result)
         local item = {
             id = pipe.getItemID(iid),
             dmg = pipe.getItemDamage(iid),
             nbt = convertNBT(pipe.getNBTTagCompound(iid))
         }
         local exists, requestAmount = inList(item)
         if exists then
             pipe.makeRequest(iid, requestAmount)
             sleep(0.15)
         end
     end
 end
 
 function ladeItems(page)
     local datei = fs.open("ItemsInPage" .. page, "r")  -- Datei im Lesemodus åB6ffnen
     if not datei then
         print("Fehler: Datei nicht gefunden")
         return
     end
 
     local items = {
         ItemName = {},
         ItemSize = {},
         ItemID_1 = {},
         ItemID_2 = {}
     }
 
     -- Schleife durch jede Zeile der Datei
     MaxItems = 0
     repeat
         local zeile = datei.readLine()
         if zeile then
             local itemName, itemSize, itemID = zeile:match("([^%-]+)%-([^%-]+)%-(.+)")
             if itemName and itemSize and itemID then
                 table.insert(items.ItemName, itemName)
                 table.insert(items.ItemSize, tonumber(itemSize))
                 table.insert(items.ItemID_1, tonumber(itemID:match("%d+")))
                 table.insert(items.ItemID_2, tonumber(itemID:match(":(%d+)")))
                 MaxItems = MaxItems + 1
             else
                 print("Fehlerhafte Zeile in der Datei: " .. zeile)
             end
         end
     until not zeile
 
     datei:close()  -- Datei schlieå9Fen
 
     return items
 end
 
 function RequestPage()
 	local ItemsInPage = ladeItems(Page)  -- Lade Items aus der Page
  	for a = 1, MaxItems do
         ItemID_1 = ItemsInPage.ItemID_1[a]
         ItemID_2 = ItemsInPage.ItemID_2[a]
         ItemSize = ItemsInPage.ItemSize[a]
 
         io.write(ItemsInPage.ItemName[a] .. " ")
         io.write(ItemsInPage.ItemID_1[a] .. ":")
         io.write(ItemsInPage.ItemID_2[a] .. " ")
         io.write(ItemsInPage.ItemSize[a] .. " ")
         io.write("\n")
 
         REQUEST_IDS = {
             [tostring(ItemID_1) .. ":" .. tostring(ItemID_2)] = ItemSize,}
         RequestItems()
         sleep(sle)
     end
 end
 
 ------programm start------
 sle = 0.1 --Sleep zwischen jeder Request
 os.loadAPI("ocs/apis/sensor")
 sen = sensor.wrap("bottom")
 
 redstone.setBundledOutput("back",colors.combine(redstone.getBundledOutput("back"), colors.orange))  --orange an
 sleep(0.5)
 redstone.setBundledOutput("back",colors.subtract(redstone.getBundledOutput("back"), colors.blue))   --blau aus
 
 while true do
     s = sen.getTargets()
     function getS()
         for v, k  in pairs(s) do
             if k.Name == "ME Wireless Access Point" then
                 target = v
             end
         end
         return target
     end
 
     f = getS()
     s1 = sen.getTargetDetails(target)
 
     local Page1 = 0
     local Page2 = 0
     local Page3 = 0
     local Page4 = 0
     local Page5 = 0
     local Page6 = 0
     local Page7 = 0
     local Page8 = 0
     local Page9 = 0
 
     for _, item in pairs(s1.Items) do
         if item.Name == "ME Wireless Access Terminal" then
             Page1 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Advanced Solar Panel" then
             Page2 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Remote Orderer" then
             Page3 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Cobblestone" then
             Page4 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "tile.machineBlock" then
             Page5 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "item.PipeItemsDiamond" then
             Page6 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Electric Furnace" then
             Page7 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Clay Dust" then
             Page8 = item.Size -- Werte ermittels und setzen
         end
         if item.Name == "Wooden Axe" then
             Page9 = item.Size -- Werte ermittels und setzen
         end
         if item.Size < 0 then
             os.reboot()
         end
     end
 
     term.setCursorPos(1,1)
     term.clear()
     print("1: "..Page1)
     print("2: "..Page2)
     print("3: "..Page3)
     print("4: "..Page4)
     print("5: "..Page5)
     print("6: "..Page6)
     print("7: "..Page7)
     print("8: "..Page8)
     print("9: "..Page9)
 
     reboot = 1
     if Page1 < 1 or Page2 < 1 or Page3 < 1 or Page4 < 1 or Page5 < 1 or Page6 < 1 or Page7 < 1 or Page8 < 1 or Page9 < 1 then
         ResetSignals()
         ClearPages()
 
         if Page1 < 1 then
             Page = 1
         elseif Page2 < 1 then
             Page = 2
         elseif Page3 < 1 then
             Page = 3
         elseif Page4 < 1 then
             Page = 4
         elseif Page4 < 1 then
             Page = 5
         elseif Page4 < 1 then
             Page = 6
         elseif Page4 < 1 then
             Page = 7
         elseif Page4 < 1 then
             Page = 8
         elseif Page4 < 1 then
             Page = 9
         end
 
         if Page1 < 1 or Page2 < 1 or Page3 < 1 or Page4 < 1 or Page5 < 1 or Page6 < 1 or Page7 < 1 or Page8 < 1 or Page9 < 1 then
             RequestPage()
             sleep(2)
             reboot = 0
         end
     end
 
     if reboot == 0 then
         os.reboot()
     end
     sleep(1)
 end