View difference between Paste ID: HuuCNQ7B and FAsxpDXB

 -- goto.lua
 
 --(( Variables ))--
 
 x,y,z = 0,0,0
 dir = 0
 local init = false
 
 --(( Methods ))--
 
 function up()
   while not turtle.up() do
     if not turtle.attackUp() then
       print("ERROR: Failed to move up!")
       return false
     end
     sleep(1)
   end
   y = y + 1
   return true
 end
 
 function down()
   while not turlte.down() do
     if not turtle.attackDown() then
       print("ERROR: Failed to move down!")
       return false
     end
     sleep(1)
   end
   y = y - 1
   return true
 end
 
 function forward()
   while not turtle.forward() do
     if not turtle.attack() then
       print("ERROR: Failed to go forwards!")
       return false
     end
     sleep(1)
   end
   if dir == 0 then z = z + 1
   elseif dir == 1 then x = x - 1
   elseif dir == 2 then z = z - 1
   elseif dir == 3 then x = x + 1 end
   return true
 end
 
 function right()
   turtle.turnRight()
   dir = dir + 1
   if dir == 4 then dir = 0 end
 end
 
 function left()
   turtle.turnLeft()
   dir = dir - 1
   if dir == -1 then dir = 3 end
 end
 
 local function deltaDir(a,b)
   local delta = b - a
   if delta == 3 then return -1 end
   if delta == -3 then return 1 end
   return delta
 end
 
 function turn(towards)
   local delta = deltaDir(dir,towards)
   for x = 1,delta,1 do right() end
   for x = -1,delta,-1 do left() end
 end
 
 local function whereAmI()
   rednet.open("right")
   -- find start pos
   local nx,_,nz = gps.locate(.5)
   if not nx then error("ERROR: Failed to get my location!",0) end
 
   for count = 1,4 do
     if forward() then break
     else right() end
     if count == 4 then error("ERROR: Failed to get my direction!",0) end
   end
 
   x,y,z = gps.locate(.5)
   if not x then error("ERROR: Failed to get my location!",0) end
 
   if nx < x then dir = 3
   elseif nx > x then dir = 1
   elseif nz < z then dir = 0
   elseif nz > z then dir = 2
   else
     error("ERROR: Invalid direction!",0)
   end
 
   rednet.close("right")
   init = true
 end
 
 function goto(nx,ny,nz)
   if not init then whereAmI() end
 
   while x~=nx or y~=ny or z~=nz do
     print("Heading to x"..nx.." y"..ny.." z"..nz.."!")
 
     -- X axis
     if nx > x then turn(3) end
     if nx < x then turn(1) end
     repeat until nx == x or not forward()
 
     -- Z axis
     if nz > z then turn(0) end
     if nz < z then turn(2) end
     repeat until nz == z or not forward()
 
     -- Up
     while ny > y do up() end
 
     -- Down
     while ny < y do down() end
   end
 end
 
 -- EOF