View difference between Paste ID: a3GBewNp and Rj9UiYUJ

-local tArgs = {...}
+function gotoapi(gx, gy, gz, enddirlet)
-local face = 0
+    --local tArgs = {...}
-local r = 1
+    face = 0
-local tturned = 0
+    local r = 1
-rednet.open("left")
+    tru = 1
-local cx,cy,cz = gps.locate(2,false)
+    local tturned = 0
-if #tArgs ~= 3 and #tArgs ~= 4 then
+    rednet.open("left")
-  print("Incorrect usage of Function.")
+    local cx,cy,cz = gps.locate(2,false)
-  --print("goto <x> <y> <z> (<Heading>)")
+    if (gx and gy and gz) == nil then
-else
+      print("Incorrect usage of Function.")
-local gx = tonumber(tArgs[1])
+      --print("goto <x> <y> <z> (<Heading>)")
-local gy = tonumber(tArgs[2])
+    else
-local gz = tonumber(tArgs[3])
+    --local gx = tonumber(tArgs[1])
-local enddirlet = tArgs[4]
+    --local gy = tonumber(tArgs[2])
-local x
+    --local gz = tonumber(tArgs[3])
-local y
+    --local enddirlet = tArgs[4]
-local z
+    local x
     local y
-if enddirlet == "n" or enddirlet == "north" then
+    local z
-    enddir = 4
+    if enddirlet ~= nil then
         if enddirlet == "n" or enddirlet == "north" then
-if enddirlet == "s" or enddirlet == "south" then
+            enddir = 4
-    enddir = 2
+        end
         if enddirlet == "s" or enddirlet == "south" then
-if enddirlet == "e" or enddirlet == "east" then
+            enddir = 2
-    enddir = 1
+        end
         if enddirlet == "e" or enddirlet == "east" then
-if enddirlet == "w" or enddirlet == "west" then
+            enddir = 1
-    enddir = 3
+        end
         if enddirlet == "w" or enddirlet == "west" then
             enddir = 3
-function tturnup()
+        end
-tturned = tturned + 1
+
-if tturned > 10 then
+    function tturnup()
-os.reboot()
+        tturned = tturned + 1
         if tturned > 25 then
             os.reboot()
         end
-function PL()
+
-  --print("Going to:")
+
-  --write(gx) write(" ") write(gy) write(" ") print(gz)
+    function c_face()
         while face >= 5 do
-function c_face()
+            face = face - 4
-if face >= 5 then
+        end
-  face = 1
+        while face <= 0 do
-elseif face <= 0 then
+            face = face + 4
-  face = 4
+        end
     end
 
-function get_Face()
+
-while turtle.forward() == false do
+
 
 function gps_face_math(cur_x,cur_z)
   mnx,mny,mnz = gps.locate(3,false)
   if mnx > cur_x then
     face = 1
-nx,ny,nz = gps.locate(3,false)
+
-if nx > cx then
+  if mnx < cur_x then
-  face = 1
+    face = 3
   end
-if nx < cx then
+  if mnz > cur_z then
-  face = 3
+    face = 2
   end
-if nz > cz then
+  if mnz < cur_z then
-  face = 2
+    face = 4
   end
-if nz < cz then
+
-  face = 4
+function forward_get_face()
   tturned = 0
   cux,cuy,cuz = gps.locate(3,false)
-function calc()
+  while turtle.forward() == false do
-x = nx - gx
+
-y = ny - gy
+
-z = nz - gz
+
    end
-function setDir(dir)
+
-while dir ~= face do
+  gps_face_math(cux,cuz)
-  c_face()
+  return true
-    if face >= dir then
+
-        turtle.turnLeft()
+
-        face = face - 1
+
-        tturnup()
+
     function get_Face()
-    if face < dir then
+    while turtle.forward() == false do
-        turtle.turnRight()
+        tturned = 0
-        face = face + 1
+       if turtle.up() == false then
-        tturnup()
+            --turtle.digUp()
        end
-  c_face()
+      end
     nx,ny,nz = gps.locate(3,false)
     gps_face_math(cx,cz)
-function f()
+
-while not turtle.forward() do
+    function calc()
     x = nx - gx
-   if not turtle.up()  then
+    y = ny - gy
     z = nz - gz
     end
-   y = y + 1
+    function setDir(dir)
         noredoturndir = 0
       c_face()
-function go()
+      if dir == 4 then
         if face == 1 then
-if x < 0 then
+            gototurnleft = 1
-  setDir(1)
+            --print("E-to-N")
-  while x ~= 0 do
+            noredoturndir = 1
-   f()
+        end
-   x = x + 1
+      end
       if dir == 1 then
         if face == 4 then
-if x > 0 then
+            gototurnleft = 0
-  setDir(3)
+            --print("N-to-E")
-  while x ~= 0 do
+            noredoturndir = 1
-   f()
+        end
-   x = x - 1
+      end
 
       if noredoturndir == 0 then
-if z < 0 then
+         if face >= dir then
-  setDir(2)
+            gototurnleft = 1
-  while z ~= 0 do
+         end
-   f()
+         if face < dir then
-   z = z + 1
+            gototurnleft = 0
         end
       end
-if z > 0 then
+
-  setDir(4)
+      if dir == 4 then
-  while z ~= 0 do
+        if face == 1 then
-   f()
+            gototurnleft = 1
-   z = z - 1
+            --print("E-to-N")
             noredoturndir = 1
         end
-while y < 0 do
+      end
       if dir == 1 then
-  if turtle.up() ~= true then
+        if face == 4 then
-   --turtle.digUp()
+            gototurnleft = 0
             --print("N-to-E")
-  y = y + 1
+            noredoturndir = 1
         end
-while y > 0 do
+      end
       while dir ~= face do
-  if turtle.down() ~= true then
+        c_face()
-   --turtle.digDown()
+        if gototurnleft == 1 then
             turtle.turnLeft()
-  y = y - 1
+            face = face - 1
             tturnup()
         end
         if gototurnleft == 0 then
             turtle.turnRight()
             face = face + 1
-tonumber(gx)
+            tturnup()
-tonumber(gy)
+        end
-tonumber(gz)
+      c_face()
-PL()
+      end
-get_Face()
+      noredoturndir = 0
-calc()
+
-go()
+    function f()
-if #tArgs == 4 then
+        while not forward_get_face() do
-    setDir(enddir)
+        tturned = 0
         if not turtle.up()  then
             --turtle.digUp()
-
+        end
         y = y + 1
         end
     end
     function go()
         tturned = 0
     if x < 0 then
       setDir(1)
       while x ~= 0 do
        f()
        x = x + 1
       end
     end
     if x > 0 then
       setDir(3)
       while x ~= 0 do
        f()
        x = x - 1
       end
     end
     if z < 0 then
       setDir(2)
       while z ~= 0 do
        f()
        z = z + 1
       end
     end
     if z > 0 then
       setDir(4)
       while z ~= 0 do
        f()
        z = z - 1
       end
     end
     while y < 0 do
         tturned = 0
       if turtle.up() ~= true then
        --turtle.digUp()
       end
       y = y + 1
     end
     while y > 0 do
         tturned = 0
       if turtle.down() ~= true then
        --turtle.digDown()
       end
       y = y - 1
     end
     end
 
 
 
     tonumber(gx)
     tonumber(gy)
     tonumber(gz)
     get_Face()
     calc()
     go()
     if enddir ~= nil then
         setDir(enddir)
     end
 
     end
     end
 
 
 
     function goto(Workinggototable)
       gtloop = 0
       gtloopsleep = 0.01
       gtloopsleep2 = gtloopsleep ^ 2
       gototable = {}
       goit = 1
       while true do
         while goit < 5 do
           if Workinggototable[goit] ~= nil then
               table.insert(gototable, Workinggototable[goit])
           elseif Workinggototable[goit] == nil then
               table.insert(gototable, Workinggototable[goit])
               break
           end
           goit = goit + 1
         end
         gotoapi(gototable[1], gototable[2], gototable[3], gototable[4])
         local ecx,ecy,ecz = gps.locate(5,false)
         if ecx == tonumber(gototable[1]) then
           if ecy == tonumber(gototable[2]) then
             if ecz == tonumber(gototable[3]) then
                 if enddir ~= nil then
                     if face == enddir then
                         break
                     end
                 else
                     break
                 end
             end
           end
         end
         if gtloop < 100 then
           gtloop = gtloop + 1
         end
         if gtloop > 5 then
           if gtloopsleep > 2.5 then
             gtloopsleep = 2.5
           end
           if gtloopsleep2 > 2.5 then
             gtloopsleep2 = 2.5
           end
           sleep(gtloopsleep2)
           gtloopsleep = gtloopsleep * 1.1
           gtloopsleep2 = gtloopsleep ^ 2
         end
       end
     end