View difference between Paste ID: wei73hxp and LHmkgw25

 local tArgs = {...}
 local p = peripheral.wrap("bottom")
 local c = peripheral.wrap("top")
-local product = p.getStackInSlot(1)
+
-local recipe = {product = product.display_name, schematic = {}, ingredient = {}}
+local function loadRecipes() -- return contents of recipes as table
-for i=2, 82 do
+	local data = nil
-  local slot = p.getStackInSlot(i)
+	if fs.exists("recipes") then
-  local name = slot.display_name
+		file = fs.open("recipes", "r")
-  if slot then
+		data = textutils.unserialize(file.readAll())
-    recipe.schematic[i] = name
+		file.close()
-    if recipe.ingredient[name] then
+	end
-      recipe.ingredient[name] = recipe.ingredient[name] + slot.qty
+	return data
-    else
+
-      recipe.ingredient[name] = slot.qty
+
-    end
+local function learnRecipe() --returns disp_name (string), recipeLearned (bool), recipeExists (bool)
-  end
+ 	local product = p.getStackInSlot(1)
 	local recipeExists, recipeLearned = false
 	if product then
 		local recipe = {product = product.display_name, schematic = {}, ingredient = {}}
-local chestSize = c.getInventorySize()
+		for i=2, 82 do
-local chest = {quantity={}}
+			local slot = p.getStackInSlot(i)
-for i=1, chestSize do
+			if slot then
-  local slot = c.getStackInSlot(i)
+				local name = slot.display_name
-  if slot then
+				recipe.schematic[i] = name
-    local name = slot.display_name
+				if recipe.ingredient[name] then
-    chest[i] = name
+					recipe.ingredient[name] = recipe.ingredient[name] + slot.qty
-    if chest.quantity[name] then
+				else
-      chest.quantity[name] = chest.quantity[name] + slot.qty
+				  recipe.ingredient[name] = slot.qty
-    else
+				end
-      chest.quantity[name] = slot.qty
+			end
-    end
+		end --ends for schematic record loop
-  end
+		local savedRecipes = {}
 		local writeRecipe = false
 		if fs.exists("recipes") then
-for k,v in pairs(recipe.ingredient) do
+			savedRecipes = loadRecipes()
-  local name = k
+			if savedRecipes[recipe.product] then
-  local required = v
+				--print("Recipe for "..recipe.product.. " already exists.")
-  local available = chest.quantity[k]
+				recipeExists = true
-  if available >= required then
+			else writeRecipe = true
-    term.setTextColor(colors.green)
+			end
-    print(k.." | "..available.."/"..v)
+		else writeRecipe = true
-  else
+		end
-    term.setTextColor(colors.red)
+		if writeRecipe then
-    print(k.." : "..available.."/"..v)
+			savedRecipes[product.display_name] = recipe
-  end
+			local file = fs.open("recipes", "w")
 			file.write(textutils.serialize(savedRecipes))
 			file.close()
 			recipeLearned = true
 		end
 	end
 	return product.displayname, recipeLearned, recipeExists
 end
 
 local function chestQuery() -- returns table | table.slotNum == display_name, table.qty.display_name == total qty
 	local chestSize = c.getInventorySize()
 	local chest = {slotNum = {}, qty = {}}
 	for i=1, chestSize do
 	  local slot = c.getStackInSlot(i)
 	  if slot then
 		local name = slot.display_name
 		chest.slotNum[i] = name
 		if chest.qty[name] then
 		  chest.qty[name] = chest.qty[name] + slot.qty
 		else
 		  chest.qty[name] = slot.qty
 		end
 	  end
 	end
 	return(chest)
 end
 
 local function checkStock(item) -- returns boolean 'craftable', table missingIngredients
 	local recipes = loadRecipes()
 	local stock = chestQuery()
 	local craftable = false
 
 	for k,v in pairs(recipes) do
 		if k == item then
 			craftable = true
 		end
 	end
 
 	local missingIngredients = recipes[item].ingredient
 	local missingSum = 0
 	if craftable then
 		for k,v in pairs(stock.qty) do
 			missingIngredients[k] = missingIngredients[k] - v
 			missingSum = missingSum + missingIngredients[k]
 		end
 	end
 
 	if missingSum <= 0 then
 		craftable = true
 	else
 		craftable = false
 	end
 
 	return craftable, missingIngredients
 end
 
 local function craft(item)
 	if checkStock(item) then
 		local recipes = loadRecipes()
 		local schematic = recipes[item].schematic
 		local chest = chestQuery()
 
 		for k,v in pairs(schematic) do
 			for k1,v1 in pairs(chest.slotNum) do
 				if k==k1 then
 					c.pushItem("down",1,1)
 					p.pullItemIntoSlot("up", k)
 				end
 			end
 		end
 	end
 end
 
 if tArgs[1] == "learn" then
 	local x,y,z = learnRecipe()
 	if y then
 		print("Sucessfully learnt.")
 	elseif z then
 		print("Recipe already known.")
 	else
 		print("Recipe cannot be learnt. (Invalid product?)")
 	end
 elseif tArgs[1] == "recipes" then
 	if fs.exists("recipes") then
 		local file = fs.open("recipes","r")
 		local recipes = textutils.unserialize(file.readAll())
 		file.close()
 		for k,v in pairs(recipes) do
 			print(k)
 		end
 	else
 		print("No recipes exist.")
 	end
 elseif tArgs[1] == "craft" then
 	if #tArgs >= 2 then
 		local itemName = tArgs[2]
 		if #tArgs >= 3 then
 			for i=3,#tArgs do
 				itemName = itemName.. " ".. tArgs[i]
 			end
 		end
 		craft(itemName)
 	end
 elseif tArgs[1] == "chestQuery" then
 	print(textutils.serialize(chestQuery()))
 elseif tArgs[1] == "checkStock" then
 	if #tArgs >= 2 then
 	local itemName = tArgs[2]
 	if #tArgs >= 3 then
 		for i=3,#tArgs do
 			itemName = itemName.. " ".. tArgs[i]
 		end
 	end
 	local x, y = checkStock(itemName)
 	print(x)
 	print(textutils.serialize(y))
 	end
 end