View difference between Paste ID: 2b6JAePX and XHk0u2DG

 --
 --GPS Deploy by neonerZ v1.0
 --http://youtube.com/neonerz
 --
 --This script is originally from BigSHinyToys from ComputerCraft.info
 --Original link can be found here:
 --http://www.computercraft.info/forums2/index.php?/topic/3088-how-to-guide-gps-global-position-system/page__p__28333#entry28333
 --Edited by neonerZ
 --
 -- In order to use this script you need to setup
 -- either a mining turtle, or a standard turtle
 -- Mining Turtle: Slot 1 - Fuel
 --				  Slot 2 - At least 4 computers
 --				  Slot 3 - At least 4 modems
 --				  Slot 4 - At lease 1 disk drive
 --				  Slot 5 - 1 Disk
 -- Standard Turtle: Slot 1 - Fuel
 --				  	Slot 2 - At least 4 computers
 --				  	Slot 3 - At least 4 modems
 --				  	Slot 4 - At lease 4 disk drives
 --				 	Slot 5 - 1 Disk
 --
 -- (mining turtles will be able to reuse the same
 --	disk drive, where-as a standard turtle will leave
 --  them and deploy a separate disk drive for each
 --	GPS host)
 --
 -- Default Usage: Place the turtle where you want it
 --		deployed facing the SOUTH or 0 direction.
 --		Fill the turtle with the required materials
 --		above. Then use the command
 --
 --		gps-deploy x y z
 --
 --		Where x, y, z is the *absolute* positions of the deploment
 --		turtle. By default the turtle will deploy the
 --		the GPS array at around y = 254. Add a fourth
 --		value to specify the height offset.
 --		IMPORTANT: It's crucial you use your absolute coordinates,
 --		 (the ones inside the parentheses next to your realitive coordinates)
 --		 For Example: If F3 shows X = -6.43534 (-7) or Z = -15.542 (-16)
 --		 you'd use -7 and -16 respectively. If you use -6 and -15 all coordinates
 --		 that go past 0 in the opposite direction will be off by 1.)
 --
 --		Example: gps-deploy 1 1 1 20
 --
 --		Would assume the turtle's start position is
 --		x=1, y=1, z=1 and will deploy the satelite
 --		array at y= 21
 --
 --neonerZ added features
 --	Smart Refilling: Fuel should go in slot 1.
 --		If not enough fuel is available script
 --		will prompt user for more fuel and wait 30.
 --		Script will estimate how much fuel is needed
 --		and try to take only that much (in coal)
 --	Item Detection: Script will check slots 2-5
 --		for the correct quantity of items. It does
 --		*not* check if items are valid
 --	GPS Host Coordinates: The script now requires
 --		you to enter in the coordinates of the
 --		turtle before launching. This will set
 --		the GPS host computers to the correct
 --		coordinates.
 --	Satelite Array Location: The script allows
 --		the user to set an offset for the placement
 --		of the four satelites
 
 -- How heigh up should the satellite be deployed?
 -- This is the default value if you don't pass a
 -- value to the script. There is a check down below
 -- to make sure the user entered values isn't > 254
 height = 254
 
 -- need to enable rednet first incase using locate
 rednet.open( "right" )
 
 local function printUsage()
 	print("")
 	print( "Usages:" )
 	print( "gps-deploy <x> <y> <z> [height]" )
 	print( "Example: gps-deploy 1 1 1 20")
 	print( "would deploy the satelite to y=21")
 	print( "gps-deploy locate [height]")
 	print( "if you have working GPS use this")
 	print( "to find out the coords over GPS")
 end
 
 -- confirm default height isn't set above 254
 -- Check to see if a minimum of 3 values were
 -- passed to the script
 local tArgs = { ... }
 
 if tArgs[1] == "locate" then
 	print ("")
 	print ("Locating GPS signal...")
 	xcord, ycord, zcord = gps.locate(5, false)
 	if xcord==nil then
 		print("")
 		print ("No GPS signal detected, please rerun manually")
 		return
 	end
 	if tArgs[2] == nil then
 		height = tonumber(height)
 	else
 		height = tonumber(tArgs[2])
 	end
 	print ("gps-deploy ",xcord," ",ycord," ",zcord," height: ",height)
 	xcord = tonumber(xcord)
 	ycord = tonumber(ycord)
 	zcord = tonumber(zcord)
 else
 	if #tArgs <= 2 then
 		printUsage()
 		return
 	else
 		xcord = tonumber(tArgs[1])
 		ycord = tonumber(tArgs[2])
 		zcord = tonumber(tArgs[3])
 		if tArgs[4] == nil then
 			height = tonumber(height)
 		else
 			if tonumber(tArgs[4]) > 254 then
 				height = tonumber(height)
 			else
 				height = tonumber(tArgs[4])
 			end
 		end
 	end
 
 end
 
 if height > ycord and height < 255 then
 	height = height-ycord
 end
 
 if height > 254 then
 	height = 254
 end
 
 -- check if the script is running on a turtle
 -- (original code)
 if not turtle then
 	print("")
 	print("Error: not a turtle")
 	return
 end
 
 -- move functions
 -- (original code)
 local mov = {}
 
 mov.forward = function ()
 	while not turtle.forward() do
 		sleep(1)
 	end
 	return true
 end
 mov.back = function ()
 	while not turtle.back() do
 		sleep(1)
 	end
 	return true
 end
 mov.up = function ()
 	while not turtle.up() do
 		sleep(1)
 	end
 	return true
 end
 mov.down = function ()
 	while not turtle.down() do
 		sleep(1)
 	end
 	return true
 end
 mov.place = function ()
 	while not turtle.place() do
 		sleep(1)
 	end
 end
 
 local base = nil
 
 -- Check if we have enough fuel
 -- we estimate the fuel usage ((height*2)+70) needed to
 -- complete the deoployment and then see if we have enough
 -- fuel loaded. If we don't, it checks the first slot for
 -- available fuel and tries to fill up on it. If it doesn't
 -- have enough fuel in there, it prompts the user for more
 -- fuel. It allows 30 seconds for the user to add  fuel
 -- (trying to refuel and verify fuel level every second)
 -- and if it doesn't get it's fill within 30 seconds
 -- it exits with a message to the user
 -- neonerZ
 if type(turtle.getFuelLevel()) == "string" then
 	print("No-fuel mode")
 else
 	if turtle.getFuelLevel() < (tonumber(height)*2)+70 then
 		while turtle.getFuelLevel() < (tonumber(height)*2)+70 do
 			turtle.select(1)
 			realcoal=(((tonumber(height)*2)+70)-turtle.getFuelLevel())/80
 			if realcoal>=64 then
 				coal=64
 			else
 				coal=math.ceil(realcoal)
 			end
 			if turtle.refuel(tonumber(coal)) == false then
 				fuel=((tonumber(height)*2)+70)-turtle.getFuelLevel()
 				print("")
 				print("You ran out of fuel in slot 1")
 				print("Please insert "..fuel.." fuel or "..realcoal.." coal to continue")
 				print("Waiting 30 seconds for fuel or exiting")
 				i=0
 				while i<=30 do
 					sleep(1)
 					realcoal=(((tonumber(height)*2)+70)-turtle.getFuelLevel())/80
 					if realcoal>=64 then
 						coal=64
 					else
 						coal=math.ceil(realcoal)
 					end
 					turtle.refuel(tonumber(coal))
 					if turtle.getFuelLevel() >= (tonumber(height)*2)+70 then
 						print("")
 						print("Turtle Fueled")
 						i=31
 					end
 					if i==30 then
 						fuel=((tonumber(height)*2)+70)-turtle.getFuelLevel()
 						print("")
 						print("Not enough fuel provided")
 						print("Please provide "..fuel.." fuel or "..realcoal.." coal and try again")
 						return
 					end
 					i=i+1
 				end
 			end
 		end
 	end
 end
 --	if fs.exists("custom") then
 --		print("custom program detected")
 --		print("please Enter base Station number")
 --		local failFlag = false
 --		repeat
 --			if failFlag then
 --				print("Error Not number")
 --				print("try again")
 --			end
 --			write(" > ")
 --			base = tonumber(read())
 --			failFlag = true
 --		until type(base) == "number"
 --	end
 --	print("Please Place 4 computers in slot two")
 --	print("4 modems in slot three")
 --	print("if mineing turtle then")
 --	print("1 disk drive in slot four")
 --	print("if not mineing then")
 --	print("4 disk drive in slot four")
 --	print("blank floopy disk in slot five")
 --	print("press Enter key to continue")
 --	while true do
 --		local event , key = os.pullEvent("key")
 --		if key == 28 then break end
 --	end
 --	print("Launching")
 --end
 
 -- check if the required quantity of items
 -- are in the appropriate spots. I'm sure
 -- there's a more elegant way of doing this.
 -- I don't believe there's a way to check if
 -- the items are correct without using compare
 monitor=0
 modem=0
 diskdrive=0
 disk=0
 print("")
 turtle.select(2)
 if turtle.getItemCount(2) < 4 then
 	print("Please place at least 4 monitors into slot two")
 	monitor=1
 end
 turtle.select(3)
 if turtle.getItemCount(2) < 4 then
 	print("Please place at least 4 modems into slot three")
 	modem=1
 end
 turtle.select(4)
 if turtle.getItemCount(2) < 1 then
 	print("Please place 1 disk drive into slot four if a -mining turtle-")
 	print("Please place 4 disk drives into slot four if a -standard turtle-")
 	diskdrive=1
 end
 turtle.select(5)
 if turtle.getItemCount(2) < 1 then
 	print("Please place 1 disk into slot five")
 	disk=1
 end
 
 if monitor == 1 or modem == 1 or diskdrive == 1 or disk == 1 then
 	print("Please fix above issues to continue")
 	return
 end
 
 -- calculate the coordinates of the 4 satelite arrays
 
 newycord=tonumber(ycord)+tonumber(height)
 
 if newycord > 254 then newycord = 254 end
 
 toycordns=newycord
 toycordwe=newycord-3
 
 if toycordns >= 255 or toycordwe >= 255 then
 	toycordns=254
 	toycordwe=251
 end
 
 local set = {}
 set[1] = {x = tonumber(xcord),z = tonumber(zcord)+9,y = tonumber(toycordns)}
 set[2] = {x = tonumber(xcord)-9,z = tonumber(zcord),y = tonumber(toycordwe)}
 set[3] = {x = tonumber(xcord),z = tonumber(zcord)-9,y = tonumber(toycordns)}
 set[4] = {x = tonumber(xcord)+9,z = tonumber(zcord),y = tonumber(toycordwe)}
 
 -- start the climb up to the correct ycord
 if ycord+tonumber(height) >= 254 then
 	while turtle.up() do -- sends it up till it hits max hight
 	end
 else
 	for i = 1,tonumber(height) do
 	turtle.up()
 	end
 end
 
 -- once at the correct height, deploy GPS array
 -- this is a mixture of my own code and the
 -- original code
 for a = 1,4 do
 	--forward two
 	for i = 1,8 do
 		mov.forward()
 	end
 	turtle.select(2)
 	mov.place()
 	mov.back()
 	turtle.select(3)
 	mov.place()
 	mov.down()
 	mov.forward()
 	turtle.select(4)
 	mov.place()
 	turtle.select(5)
 	turtle.drop()
 	-- make a custom disk that starts up the gps host application
 	-- with the correct coordinates and copy it over. also makes
 	-- makes it a startup script so the computers will
 	-- start back up properly after chunk unloading
 	fs.delete("disk/startup")
 	file = fs.open("disk/startup","w")
 	file.write([[
 fs.copy("disk/install","startup")
 fs.delete("disk/startup")
 if fs.exists("disk/custom") then
 	fs.copy("disk/custom","custom")
 	fs.delete("disk/custom")
 end
 print("sleep in 10")
 sleep(10)
 os.reboot()
 ]])
 	file.close()
 	if fs.exists("custom") then
 		fs.copy("custom","disk/custom")
 	end
 		file = fs.open("disk/install","w")
 		file.write([[
 if fs.exists("custom") then
 	shell.run("custom","host",]]..set[a]["x"]..","..set[a]["y"]..","..set[a]["z"]..","..(base or "nil")..[[)
 else
 	shell.run("gps","host",]]..set[a]["x"]..","..set[a]["y"]..","..set[a]["z"]..[[)
 end
 ]])
 		file.close()
 	turtle.turnLeft()
 	mov.forward()
 	mov.up()
 	turtle.turnRight()
 	mov.forward()
 	turtle.turnRight()
 	peripheral.call("front","turnOn")
 	mov.down()
 	turtle.suck()
 	turtle.select(3)
 	turtle.dig()
 	mov.up()
 	-- reboot would be here
 	turtle.turnRight()
 	--back 3
 	for i = 1,9 do
 		mov.forward()
 	end
 	turtle.turnLeft()
 	mov.forward()
 	if a == 1 or a == 3 then
 		for i = 1,3 do
 		mov.down()
 		end
 	elseif a == 2 or a == 4 then
 		for i = 1,3 do
 		mov.up()
 		end
 	end
 end
 
 -- goes back down. this is the original code
 -- might be worth editing to come down the same
 -- amount of spaces it went up, but this should
 -- do the job
 while turtle.down() do
 end
 turtle = tMove
 print("")
 print("Finished")