View difference between Paste ID: 2Pvr9RnY and b2fc4912

 -- Adapted from Marval's pastebin b2fc4912 but converted to English via ChatGPT
-Z = {1,2,3,5,6,7,9,10,11}
+-- All credit goes to Marval.  This v.5 is untested as of yet, and likely needs some post-AI tweaking.
-x={}
+
-tCraft={}
+-- Initialize the peripheral analyzer on the right side of the turtle
-function oddaj()
+
-for i=1,16 do
+
 -- Define crafting slot positions
-if turtle.getItemCount(i)>0 then
+local craftingSlots = {1,2,3,5,6,7,9,10,11}
-turtle.select(i)
+
-turtle.drop()
+-- Initialize the tables
 local x = {}
 local tCraft = {}
 
-function zlicz(recka2)
+-- Function to drop all items from the turtle's inventory
-ZLICZ={}
+local function dropAllItems()
-for i=1,9 do
+    for i = 1, 16 do
-ZLICZ[i]={ID,META,COUNT}
+        if turtle.getItemCount(i) > 0 then
             turtle.select(i)
-for i=1,9 do
+            turtle.drop()
-if recka2[i][1] == nil then
+        end
-else
+    end
-ZLICZ[1].ID = recka2[i][1]
+
-ZLICZ[1].META = recka2[i][2]
+
-ZLICZ[1].COUNT = 1
+-- Function to count items in the crafting grid
-w = i
+local function countItems(craftingGrid)
-break
+    local countList = {}
     for i = 1, 9 do
         countList[i] = {ID = nil, META = nil, COUNT = 0}
-k = 1
+    end
-for i = w+1,9 do
+
-	check = false
+    -- Find the first non-empty slot
-	if recka2[i][1] == nil then
+    local startIndex = 0
-	else
+    for i = 1, 9 do
-	X = recka2[i][1]
+        if craftingGrid[i][1] ~= nil then
-	Y = recka2[i][2]
+            countList[1].ID = craftingGrid[i][1]
-	--print("Wyraz nr " ..i.. " wynosi " ..X.."")
+            countList[1].META = craftingGrid[i][2]
-		for j = 1,k do
+            countList[1].COUNT = 1
-			if X == ZLICZ[j].ID and Y == ZLICZ[j].META then
+            startIndex = i
-				ZLICZ[j].COUNT = ZLICZ[j].COUNT + 1
+            break
-				--print("Zwiekszam ilosc liczb "..X.." o jeden")
+        end
-				check = true
+    end
-			end
+
-
+    -- Count the rest of the items
-		end
+    local itemCount = 1
-	if check == false then
+    for i = startIndex + 1, 9 do
-		k = k+1
+        local itemFound = false
-		ZLICZ[k].ID = X
+        if craftingGrid[i][1] ~= nil then
-		ZLICZ[k].META = Y
+            local itemId = craftingGrid[i][1]
-		--print("Dopisuje element o nr " ..k.. " o wartosci "..X.."")
+            local itemMeta = craftingGrid[i][2]
-		ZLICZ[k].COUNT = 1
+
-
+            for j = 1, itemCount do
-	end
+                if itemId == countList[j].ID and itemMeta == countList[j].META then
-	end
+                    countList[j].COUNT = countList[j].COUNT + 1
                     itemFound = true
-return ZLICZ,k
+                    break
                 end
-function sprawdz(dane,rekordy)
+            end
-sprawdzenie = true
+
-for i=1,rekordy do
+            if not itemFound then
-slot = 0
+                itemCount = itemCount + 1
-X = 0
+                countList[itemCount].ID = itemId
-Y = 0
+                countList[itemCount].META = itemMeta
-ilosc = 0
+                countList[itemCount].COUNT = 1
---print("Poszukuje bloku o ID rownym " ..dane[i].ID.. "")
+            end
-repeat
+        end
-slot = slot + 1
+    end
-X = analyzer.getBlockIdAt(slot)
+
-Y = analyzer.getBlockMetadataAt(slot)
+    return countList, itemCount
-if X == dane[i].ID and dane[i].META == nil then
+
-ilosc = ilosc + analyzer.getBlockCountAt(slot)
+-- Function to check if all required items are available
-elseif X == dane[i].ID and Y == dane[i].META then
+local function checkAvailability(items, recordCount)
---print("znalazlem w slocie "..slot.." blok o ID rownym "..ID.."")
+    local isAvailable = true
-ilosc = ilosc + analyzer.getBlockCountAt(slot)
+    local missingItem = nil
 
-until slot == 109
+    for i = 1, recordCount do
-if ilosc < dane[i].COUNT then
+        local slot = 0
-sprawdzenie = false
+        local itemId = 0
-if dane[i].META == nil then
+        local itemMeta = 0
-brak = dane[i].ID
+        local itemCount = 0
-else
+
-brak = ""..dane[i].ID..":"..dane[i].META..""
+        repeat
             slot = slot + 1
-print("braklo itemu o ID: "..dane[i].ID.." w liczbie: "..dane[i].COUNT - ilosc.."")
+            itemId = analyzer.getBlockIdAt(slot)
             itemMeta = analyzer.getBlockMetadataAt(slot)
 
-return sprawdzenie, brak
+            if itemId == items[i].ID and (items[i].META == nil or itemMeta == items[i].META) then
                 itemCount = itemCount + analyzer.getBlockCountAt(slot)
-function craft(recka3)
+            end
-for i=1,9 do
+        until slot == 109
-if recka3[i][1] == nil then
+
-else
+        if itemCount < items[i].COUNT then
-slot = 0
+            isAvailable = false
-repeat
+            missingItem = items[i].META == nil and items[i].ID or (items[i].ID .. ":" .. items[i].META)
-slot = slot +1
+            print("Missing item ID: " .. missingItem .. " in quantity: " .. items[i].COUNT - itemCount)
-X = analyzer.getBlockIdAt(slot)
+            break
-Y = analyzer.getBlockMetadataAt(slot)
+        end
-until (X == recka3[i][1] and recka3[i][2] == nil) or (X == recka3[i][1] and Y == recka3[i][2])
+    end
---print("Znalazlem w slocie "..slot.."")
+
-ilosc = analyzer.getBlockCountAt(slot)
+    return isAvailable, missingItem
-turtle.select(Z[i])
+
-analyzer.takeAt(slot)
+
-turtle.drop(ilosc - 1)
+-- Function to perform the crafting operation
 local function craft(items)
     for i = 1, 9 do
-turtle.craft()
+        if items[i][1] ~= nil then
-oddaj()
+            local slot = 0
             repeat
-function craftuj(recka)
+                slot = slot + 1
-print("craftuje "..b.."")
+                local itemId = analyzer.getBlockIdAt(slot)
-a = false
+                local itemMeta = analyzer.getBlockMetadataAt(slot)
-while not a do
+            until (itemId == items[i][1] and (items[i][2] == nil or itemMeta == items[i][2]))
-a,b = sprawdz(zlicz(recka))
+
-if a == false then
+            local itemCount = analyzer.getBlockCountAt(slot)
-print("braklo "..b.."")
+            turtle.select(craftingSlots[i])
-b = tostring(b)
+            analyzer.takeAt(slot)
-crafting()
+            turtle.drop(itemCount - 1)
-a = false
+        end
-else
+    end
-craft(recka)
+
     turtle.craft()
     dropAllItems()
 end
-function crafting()
+
-if tCraft[b] then
+-- Function to manage the crafting process
-    craftuj(tCraft[b])
+local function manageCrafting(recipe)
-	else
+    print("Crafting " .. b)
-	print("Braklo: "..b.."") os.pullEvent()
+    local isReadyToCraft = false
-  end
+
     while not isReadyToCraft do
-function craftujemy()
+        local countList, _ = countItems(recipe)
-odczyt = io.open ("receptury","r")
+        isReadyToCraft, missingItem = checkAvailability(countList)
-while true do -- odczyt recek
+
-tekst=odczyt:read()
+        if not isReadyToCraft then
-if tekst == nil then break end
+            print("Missing " .. missingItem)
-item1, x[1], x[2], x[3], x[4], x[5], x[6], x[7], x[8], x[9] = string.match(tekst, "([%w%:]+)=([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+);([%w%:]+)")
+            missingItem = tostring(missingItem)
-tCraft[item1]={}
+            -- Assuming 'crafting' is a function that handles missing items
-for i=1,9 do
+            crafting()
-if(x[i] == "0") then
+        else
-tCraft[item1][i]={nil}
+            craft(recipe)
-elseif(string.find(x[i],":")) then
+        end
-id,meta = string.match(x[i],"(%d+):(%d+)")
+    end
-tCraft[item1][i]={tonumber(id),tonumber(meta)}
+
-else
+
-tCraft[item1][i]={tonumber(x[i])}
+-- Function to handle crafting based on user input
 local function crafting()
     if tCraft[b] then
         manageCrafting(tCraft[b])
-odczyt:close()
+    else
-print("Co mam craftowac? Podaj ID lub ID:META")
+        print("Missing: " .. b)
-b = read()
+        os.pullEvent() -- Wait for an event, possibly user input
-b1 = b
+    end
-print("ile? ")
+
-c = read()
+
-for zz=1,c do
+-- Function to start the crafting process
-crafting()
+local function startCrafting()
-b = b1
+    local file = io.open("receptury", "r") -- Open the recipe file
     while true do
         local line = file:read()
-function menu()
+        if line == nil then break end
-term.clear()
+
-opcja = 2
+        -- Parse the recipe line
-term.setCursorPos(1,1)
+        local item, recipeParts = string.match(line, "([%w%:]+)=(.+)")
-term.write("Ultimate Crafting Program")
+
-term.setCursorPos(1,2)
+        -- Store the parsed recipe
-term.write("[ ] Craftuj")
+        tCraft[item] = {}
-term.setCursorPos(1,3)
+        for i = 1, 9 do
-term.write("[ ] Dodaj recepture przez skanowanie")
+            local part = select(i, string.match(recipeParts, "([^;]+)"))
-term.setCursorPos(1,4)
+            if part == "0" then
-term.write("[ ] Dodaj recepture przez wpisanie")
+                tCraft[item][i] = {nil}
             elseif string.find(part, ":") then
-function odswiez()
+                local id, meta = string.match(part, "(%d+):(%d+)")
-for i=2,10 do
+                tCraft[item][i] = {tonumber(id), tonumber(meta)}
-term.setCursorPos(2,i)
+            else
-term.write(" ")
+                tCraft[item][i] = {tonumber(part)}
             end
-term.setCursorPos(2,opcja)
+        end
-term.write("X")
+    end
     file:close()
-function zapisz()
+
-print("Uloz recepture w inventory turtla")
+    -- Ask user for the item to craft and the quantity
-os.pullEvent()
+    print("What to craft? Enter ID or ID:META")
-x={}
+    b = read()
-for i=1,9 do
+    local originalItem = b
-turtle.select(Z[i]) -- wybierz slot
+    print("How many?")
-x[i] = {} -- stworz tablice
+    local quantity = tonumber(read())
-id=analyzer.getBlockId() -- pobierz id
+
-if(id == false) then -- jesli nie ma nic
+    -- Craft the specified quantity of the item
-x[i].ID = nil -- przypisz nil
+    for zz = 1, quantity do
-else
+        crafting()
-x[i].ID = id -- przypisz id
+        b = originalItem
-x[i].META = analyzer.getBlockMetadata() -- przypisz meta
+    end
 end
 
-z={}
+-- Function to display the main menu
-for i=1,9 do
+local function displayMenu()
-if x[i].ID == nil then -- jezli id = nil
+    term.clear() -- Clear the terminal screen
-z[i] = 0; -- przypisz 0
+    local option = 2 -- Initialize the default selected option
-elseif x[i].META == nil then -- jezeli meta = nil
+
-z[i] = x[i].ID -- przypisz samo id
+    -- Set the cursor position and write menu options
-else -- w przeciwnym wypadku
+    term.setCursorPos(1, 1)
-z[i] = ""..x[i].ID..":"..x[i].META.."" -- wpisz ID:META
+    term.write("Ultimate Crafting Program")
     term.setCursorPos(1, 2)
     term.write("[ ] Start Crafting") -- "Craftuj" translates to "Start Crafting"
-turtle.craft()
+    term.setCursorPos(1, 3)
-turtle.select(11)
+    term.write("[ ] Add Recipe by Scanning") -- "Dodaj recepture przez skanowanie"
-item = analyzer.getBlockId()..":"..analyzer.getBlockMetadata()
+    term.setCursorPos(1, 4)
-zapis = io.open ("receptury","a") -- otworz plik
+    term.write("[ ] Add Recipe Manually") -- "Dodaj recepture przez wpisanie"
-zapis:write(string.format("%s=%s;%s;%s;%s;%s;%s;%s;%s;%s\n",item,z[1],z[2],z[3],z[4],z[5],z[6],z[7],z[8],z[9]))
+
-zapis:close()
+
 -- Function to refresh the menu display
-function podaj()
+local function refreshMenu()
-term.clear()
+    -- Assume 'option' is a global or externally managed variable
-print("podaj recepture wedlug skladni: ")
+    for i = 2, 10 do
-print("ID:META=ID:META;ID:META; ... ;ID:META")
+        term.setCursorPos(2, i)
-print("mozna podawac rowniez ID bez podania Metadanych")
+        term.write(" ")
-nowa=read()
+    end
-zapis = io.open ("receptury","a") -- otworz plik
+    term.setCursorPos(2, option) -- Update the display to show the selected option
-zapis:write(nowa.."\n")
+    term.write("X")
-zapis:close()
+
 
-menu()
+-- Function to scan and save a new crafting recipe
-odswiez()
+local function saveScannedRecipe()
     print("Arrange the recipe in the turtle's inventory")
-przycisk,kod = os.pullEvent()
+    os.pullEvent() -- Wait for an event, likely user arrangement of items
-if przycisk == "key" and kod == 208 and opcja < 4 then
+    local recipe = {}
-opcja=opcja+1
+
     for i = 1, 9 do
-if przycisk == "key" and kod == 200 and opcja > 2 then
+        turtle.select(craftingSlots[i]) -- Select slot
-opcja = opcja - 1
+        local id = analyzer.getBlockId() -- Get block id
         if id then
-if przycisk == "key" and kod == 28 then
+            recipe[i] = {ID = id, META = analyzer.getBlockMetadata()} -- Assign id and meta
-	term.clear()
+        else
-	term.setCursorPos(1,1)
+            recipe[i] = {ID = nil} -- Assign nil if empty
-	if opcja == 2 then
+        end
-	craftujemy()
+    end
-	elseif opcja == 3 then
+
-	zapisz()
+    -- Convert the recipe to a string format
-	elseif opcja == 4 then
+    local recipeString = {}
-	podaj()
+    for i = 1, 9 do
-	end
+        if recipe[i].ID == nil then
-	menu()
+            recipeString[i] = "0"
-	end
+        elseif recipe[i].META == nil then
-odswiez()
+            recipeString[i] = tostring(recipe[i].ID)
-end
+        else
             recipeString[i] = recipe[i].ID .. ":" .. recipe[i].META
         end
     end
 
     turtle.craft()
     turtle.select(11)
     local craftedItem = analyzer.getBlockId() .. ":" .. analyzer.getBlockMetadata()
     local file = io.open("receptury", "a") -- Open file for appending
     file:write(string.format("%s=%s;%s;%s;%s;%s;%s;%s;%s;%s\n", craftedItem, unpack(recipeString)))
     file:close()
 end
 
 -- Function to manually input and save a new recipe
 local function inputAndSaveRecipe()
     term.clear()
     print("Enter the recipe in the format: ")
     print("ID:META=ID:META;ID:META; ... ;ID:META")
     print("You can also input IDs without metadata")
     local newRecipe = read()
 
     local file = io.open("receptury", "a") -- Open file for appending
     file:write(newRecipe .. "\n")
     file:close()
 end
 
 -- Main loop for menu navigation and action selection
 displayMenu()
 refreshMenu()
 
 while true do
     local event, keyCode = os.pullEvent("key")
 
     -- Navigate through the menu
     if keyCode == 208 and option < 4 then -- Arrow Down
         option = option + 1
     elseif keyCode == 200 and option > 2 then -- Arrow Up
         option = option - 1
     end
 
     -- Select a menu option
     if keyCode == 28 then -- Enter key
         term.clear()
         term.setCursorPos(1, 1)
         if option == 2 then
             startCrafting()
         elseif option == 3 then
             saveScannedRecipe()
         elseif option == 4 then
             inputAndSaveRecipe()
         end
         displayMenu()
         refreshMenu()
     end
 end