View difference between Paste ID: W6Pnf0J1 and DwSUZgph

 local tArgs = {...}
 
 if #tArgs == 0 then
 	error("please select blueprint file")
 end
 
 if not fs.exists(tArgs[1]) then
 	error(tArgs[1].. " does not exists")
 end
 
 if not fs.exists("turtle") then
 	shell.run("pastebin get 7mnsWVwz turtle")
 end
 
 rs.setOutput("left",false)
 local function find(keyword)
 	for i = 1,16 do
 		local item = turtle.getItemDetail(i)
 		if item and item.name:lower():find(keyword:lower()) then
 			return i
 		end
 	end
 end
 
 function countBlocks(instructions)
 	uniqueblocks={}
     for n = 1,#instructions do
 		local blockID,data = unpack(instructions[n],4,5)
         found = false
         for j,w in ipairs(uniqueblocks) do
 
             if (w.blockID==blockID) and (w.data==data) then
                 found = true
                 w.amount = w.amount + 1
                 break
             end
         end
 
         if found==false then
             uniqueblocks[#uniqueblocks+1] = {}
             uniqueblocks[#uniqueblocks].blockID = blockID
             uniqueblocks[#uniqueblocks].data = data
             uniqueblocks[#uniqueblocks].amount = 1
         end
     end
 	return uniqueblocks
 end
 
 function printMaterials(uniqueblocks,slots)
 	local w,h = term.getSize()
 	local buffer = {}
 
 	buffer[#buffer+1] = "Controls:"
 	buffer[#buffer+1] = ""
 	buffer[#buffer+1] = "use arrowkeys or scrollwheel to scroll"
 	buffer[#buffer+1] = "press x to refuel"
 	buffer[#buffer+1] = "press a when all materials are accounted for"
 	buffer[#buffer+1] = ""
 
 	for i,v in pairs(uniqueblocks) do
 		--print(v.blockID,",",v.data,"=",v.amount)
 		local t = slots[v.blockID][v.data]
 		buffer[#buffer+1] = "- "..tostring(t[1])..","..tostring(t[2])
 		buffer[#buffer+1] = "    "..tostring(v.amount)
 		if v.amount > 64 then
 			buffer[#buffer] = buffer[#buffer] .. " ("..tostring(math.ceil(v.amount/64)).." stacks)"
 		end
 	end
 
 	buffer[#buffer+1] = ""
 	if reference.wrench then
 		buffer[#buffer+1] = "make sure I have a wrench"
 	else
 		buffer[#buffer+1] = "no wrench required"
 	end
 
 	local function display(buffer,n)
 		shell.run("clr")
 		local a = 1
 		for i = n,#buffer do
 			term.setCursorPos(1,a)
 			--term.clearLine()
 			term.write(buffer[i])
 			a = a + 1
 		end
 	end
 
 	local n = 1
 	display(buffer,n)
 	while true do
 		local event = {os.pullEvent()}
 		if event[1] == "mouse_scroll" then
 			if event[2] == 1 and n < #buffer then
 				n = n + 1
 				display(buffer,n)
 			elseif event[2] == -1 and n > 1 then
 				n = n - 1
 				display(buffer,n)
 			end
 		end
 		if event[2] == "x" then
 			shell.run("refuel 64")
 			buffer[#buffer+1] = "fuel: "..tostring(turtle.getFuelLevel())
 			display(buffer,n)
 		end
 		if event[2] == "a" then
 			shell.run("clr")
 			break
 		end
 	end
 end
 
 
 function files2disk()
 	local files = {"refill","setup","textutilsFIX","time","turtle"}
 
 	for _,v in pairs(files) do
 		if fs.exists(v) and fs.exists("disk/"..tostring(v)) == false then
 			shell.run("copy "..tostring(v).." disk")
 		end
 	end
 end
 
 function transferBlueprint(nTurtle)
 
-	--[[local v = startLocations[nTurtle]
+	local v = startLocations[nTurtle]
 	assert(v)
-	local ref = reference
+	local ref = {}
 	for i,v in pairs(reference) do
 		 ref[i] = v
 	end
 	assert(ref)
 	ref.starty = v.starty
 	ref.startz = v.startz
 	ref.finaly = v.finaly
 	ref.finalz = v.finalz
 	assert(ref.startx)
 	assert(v.starty)
 	assert(ref.finalx)
 	assert(v.finaly)
 	local ins = blueprint(ref.startx,v.starty,v.startz,ref.finalx,v.finaly,v.finalz)
 	if tArgs[2] == "tsp" then
-	print(fname," saved")]]
+
 	end
 	local fname = saveBlueprint(ref,slots,ins,uniqueblocks,nTurtle)
 	print(fname," saved")
 
-			shell.run("rm "..tostring(v))
+
 		if v:find("["..tostring(nTurtle).."]") then
 			shell.run("copy "..tostring(v).." disk")
 			if nTurtle ~= 1 then
 				shell.run("rm "..tostring(v))
 			end
 		end
 	end
 end
 
 function setPosition(nTurtle,heightPos,widthPos,lengthPos,face)
 	nTurtle = tostring(nTurtle)
 	local h = fs.open("pos"..nTurtle,"w")
 	h.writeLine("heightPos = "..tostring(heightPos)..";")
 	h.writeLine("widthPos = "..tostring(widthPos)..";")
 	h.writeLine("lengthPos = "..tostring(lengthPos)..";")
 	h.writeLine("face = "..tostring(face)..";")
 	h.close()
 	shell.run("copy pos"..nTurtle.." disk")
 end
 
 function Main()
 	shell.run("turtle reset")
 	if turtle.getFuelLevel() < 200 then
 		error("more fuel required")
 	end
 
 	shell.run(tArgs[1])
 
 	print("Please put ...\n"..tonumber(reference.multiturtle).." turtles(any type),\n1 disk, and \n1 diskDrive in inventory\n")
 	print("press any key to continue")
 	os.pullEvent("char")
 	for i = 2,reference.multiturtle do
 		turtle.select(find("turtle"))
 		local nTurtle = i
 		goto(reference.startx,reference.starty+i-1,reference.startz-1)
 		turn("south")
 		turtle.place()
 		turtle.select(find("peripheral"))
 		goto(reference.startx+1,reference.starty+i-1,reference.startz-1)
 		turn("south")
 		turtle.place()
 		turtle.select(find("computercraft:disk"))
 		turtle.drop()
 		--copyFiles(i)
 		do
 			files2disk()
 			transferBlueprint(nTurtle)
 			--setPosition(nTurtle,heightPos-1,widthPos,lengthPos-1,face)
 			local disk = fs.open("disk/startup","w")
 			disk.write([[
 			local function disk2turtle(nTurtle)
 				local files = {"refill","setup","textutilsFIX","time","turtle"}
 				for i,v in pairs(fs.list("disk")) do
 					if v:find("["..tostring(nTurtle).."]") then
 						shell.run("copy disk/"..tostring(v).." "..tostring(v))
 						shell.run("rm disk/"..tostring(v))
 					end
 				end
 				for i,v in pairs(files) do
 					if fs.exists("disk/"..tostring(v)) then
 						shell.run("copy disk/"..tostring(v).." "..tostring(v))
 					end
 				end
 			end
 
 			local function checkWrench()
 				for i = 1,16 do
 					local item = turtle.getItemDetail(i)
 					if item then
 						local possible = item.name:lower()
 						print(possible)
 						if possible:find("wrench") or possible:find("hammer") then
 							return true
 						end
 					end
 				end
 				return false
 			end
 
 			function countBlocks(instructions)
 				uniqueblocks={}
 				for n = 1,#instructions do
 					local blockID,data = unpack(instructions[n],4,5)
 					found = false
 					for j,w in ipairs(uniqueblocks) do
 
 						if (w.blockID==blockID) and (w.data==data) then
 							found = true
 							w.amount = w.amount + 1
 							break
 						end
 					end
 
 					if found==false then
 						uniqueblocks[#uniqueblocks+1] = {}
 						uniqueblocks[#uniqueblocks].blockID = blockID
 						uniqueblocks[#uniqueblocks].data = data
 						uniqueblocks[#uniqueblocks].amount = 1
 					end
 				end
 				return uniqueblocks
 			end
 
 			function printMaterials(uniqueblocks,slots)
 				local w,h = term.getSize()
 				local buffer = {}
 
 				buffer[#buffer+1] = "Controls:"
 				buffer[#buffer+1] = ""
 				buffer[#buffer+1] = "use arrowkeys or scrollwheel to scroll"
 				buffer[#buffer+1] = "press x to refuel"
 				buffer[#buffer+1] = "press a when all materials are accounted for"
 				buffer[#buffer+1] = ""
 
 				for i,v in pairs(uniqueblocks) do
 					--print(v.blockID,",",v.data,"=",v.amount)
 					local t = slots[v.blockID][v.data]
 					buffer[#buffer+1] = "- "..tostring(t[1])..","..tostring(t[2])
 					buffer[#buffer+1] = "    "..tostring(v.amount)
 					if v.amount > 64 then
 						buffer[#buffer] = buffer[#buffer] .. " ("..tostring(math.ceil(v.amount/64)).." stacks)"
 					end
 				end
 
 				buffer[#buffer+1] = ""
 				if reference.wrench then
 					buffer[#buffer+1] = "make sure I have a wrench"
 				else
 					buffer[#buffer+1] = "no wrench required"
 				end
 
 				local function display(buffer,n)
 					shell.run("clr")
 					local a = 1
 					for i = n,#buffer do
 						term.setCursorPos(1,a)
 						--term.clearLine()
 						term.write(buffer[i])
 						a = a + 1
 					end
 				end
 
 				local n = 1
 				display(buffer,n)
 				while true do
 					local event = {os.pullEvent()}
 					if event[1] == "mouse_scroll" then
 						if event[2] == 1 and n < #buffer then
 							n = n + 1
 							display(buffer,n)
 						elseif event[2] == -1 and n > 1 then
 							n = n - 1
 							display(buffer,n)
 						end
 					end
 					if event[2] == "x" then
 						shell.run("refuel 64")
 						buffer[#buffer+1] = "fuel: "..tostring(turtle.getFuelLevel())
 						display(buffer,n)
 					end
 					if event[2] == "a" then
 						local ready = true
 						if turtle.getFuelLevel() < 200 then
 							buffer[#buffer+1] = "needs more fuel to start"
 							ready = false
 						end
 						if not checkWrench() then
 							buffer[#buffer+1] = "needs a wrench"
 							ready = false
 						end
 						if ready then
 							buffer[#buffer+1] = "ready to go!, waiting on rs signal"
 						end
 						display(buffer,n)
 					end
 					if event[1] == "redstone" then
 						shell.run("clr")
 						break
 					end
 				end
 			end
 			disk2turtle(]]..nTurtle..[[)
 			shell.run("turtle ]]..tostring(heightPos-1).." "..tostring(widthPos).." "..tostring(lengthPos+1).." "..tostring(face)..[[")
 
 
 			rs.setOutput("back",true)
 			sleep(5)
 			rs.setOutput("back",false)
 			local filename
 			for _,v in pairs(fs.list(shell.dir())) do
 				if v:find("blueprint") then
 					filename = v
 					shell.run(v)
 				end
 			end
 			updateVar(filename,"reference.returnx",]]..tostring(heightPos-1)..[[)
 			updateVar(filename,"reference.returny",]]..tostring(widthPos)..[[)
 			updateVar(filename,"reference.returnz",]]..tostring(lengthPos)..[[)
 
 			local ublocks = countBlocks(instructions)
 			printMaterials(ublocks,slots)
 
 			--send pulse through turtles to start
 			--turtles only start if all are ready
 
 			shell.run("setup "..filename)
 			rs.setOutput("left",true)
 			shell.run("startup")
 			]])
 			disk.close()
 		end
 
 		goto(reference.startx,reference.starty+i-1,reference.startz-1)
 		turn("south")
 		peripheral.call("front","turnOn")
 		os.pullEvent("redstone")
 		goto(reference.startx+1,reference.starty+i-1,reference.startz-1)
 		turn("south")
 		turtle.suck()
 		turtle.dig()
 	end
 	goto(reference.startx,reference.starty,reference.startz-1)
 	turn("south")
 	goto(reference.startx,reference.starty,reference.startz)
 end
 
 function start()
 	--shell.run(tArgs[1])
 	--fuelcheck
 	--materialscheck
 	shell.run("setup "..tArgs[1])
 	rs.setOutput("left",false)
 	rs.setOutput("left",true)
 	shell.run("startup")
 end
 
 Main()
 local ublocks = countBlocks(instructions)
 printMaterials(ublocks,slots)
 print("type \"start\" when all turtles are ready")
 local s = read()
 if s == "start" then
 	start()
 end