Stripmine2

-- Getting Coords
print("What are my Coords?: ")
io.write("X: ")
CurrentX = tonumber(io.read())
io.write("Z: ")
CurrentZ = tonumber(io.read())
print("What Are my Coords right before the chest?: ")
io.write("X: ")
ChestX = tonumber(io.read())
io.write("Z: ")
ChestZ = tonumber(io.read())
print("Which Direction am i facing?: ")
CurrentDir = tonumber(io.read())

-- getting ready to strip mine
print("How many Tunnels?: ")
Tunnels = tonumber(io.read())
CompletedTunnels = 0
print("How long is each tunnel?: ")
TunnelLength = tonumber(io.read())
print("Next Tunnel Coords: ")
io.write("X: ")
ScrnshotX = tonumber(io.read())
io.write("Z: ")
ScrnshotZ = tonumber(io.read())
print("Next Tunnel Direction?: ")
ScrnShotDir = tonumber(io.read())
Xoffset = ScrnshotX - CurrentX
Zoffset = ScrnshotZ - CurrentZ
if     CurrentDir == 0 then
 DestZ = CurrentZ + TunnelLength
 DestX = CurrentX
elseif CurrentDir == 1 then
 DestX = CurrentX - TunnelLength
 DestZ = CurrentZ
elseif CurrentDir == 2 then
 DestZ = CurrentZ - TunnelLength
 DestX = CurrentX
elseif CurrentDir == 3 then
 DestX = CurrentDir + TunnelLength
 DestZ = CurrentZ
end

function PathFind(Cx,Cz,Dx,Dz)
 --Checking Directions
 if Dx > Cx then
  while CurrentDir ~= 3 do -- POS x
   turtle.turnRight()
   if CurrentDir >= 3 then
    CurrentDir = 0
   else
    CurrentDir = CurrentDir + 1
   end
  end

 elseif Dx < Cz then
  while CurrentDir ~= 1 do -- NEG x
   turtle.turnRight()
   if CurrentDir >= 3 then
    CurrentDir = 0
   else
    CurrentDir = CurrentDir + 1
   end
  end
 end

 if CurrentDir == 1 or CurrentDir == 3 then
  while Cx ~= Dx do
   while turtle.detectUp() do
    turtle.digUp()
   end
   while turtle.detect() do
    turtle.dig()
   end
   if turtle.forward() then
    if     CurrentDir == 1 then
     Cx = Cx - 1
    elseif CurrentDir == 3 then
     Cx = Cx + 1
    end
   end
   print("Current POS: ","X: "..Cx," Z: "..Cz)
  end
 end

 if Dz > Cz then
  while CurrentDir ~= 0 do -- POS z
   turtle.turnRight()
   if CurrentDir >= 3 then
    CurrentDir = 0
   else
    CurrentDir = CurrentDir + 1
   end
  end

 elseif Dz < Cz then
  while CurrentDir ~= 2 do -- NEG z
   turtle.turnRight()
   if CurrentDir >= 3 then
    CurrentDir = 0
   else
    CurrentDir = CurrentDir + 1
   end
  end
 end

 while Cz ~= Dz do
  while turtle.detectUp() do
   turtle.digUp()
  end
  while turtle.detect() do
   turtle.dig()
  end
  if turtle.forward() then
   if     CurrentDir == 0 then
    Cz = Cz + 1
   elseif CurrentDir == 2 then
    Cz = Cz - 1
   end
  end
  print("Current POS: ","X: "..Cx," Z: "..Cz)
 end
 if Cx == Dx and Cz == Dz then
  return Cx,Cz
 end
end

print("Destination POS: ","X: "..DestX,"Z: "..DestZ)
StartPosX,StartPosZ = CurrentX,CurrentZ
-- Strip Mine
while CompletedTunnels < Tunnels do
 CurrentX,CurrentZ = PathFind(CurrentX,CurrentZ,DestX,DestZ) -- Current , Destination ,Tunnel
 -- Back Track from Tunnel
 CurrentX,CurrentZ = PathFind(CurrentX,CurrentZ,StartPosX,StartPosZ)

 CurrentX,CurrentZ = PathFind(CurrentX,CurrentZ,ChestX,ChestZ)
 for CurrentSlot = 1,16 do
  turtle.drop()
 end
  CurrentX,CurrentZ = PathFind(CurrentX,CurrentZ,StartPosX+Xoffset,StartPosZ+Zoffset)
  StartPosX = CurrentX
  StartPosZ = CurrentZ
  CompletedTunnels = CompletedTunnels + 1
    while CurrentDir ~= ScrnShotDir  do
   turtle.turnRight()
   if CurrentDir >= 3 then
    CurrentDir = 0
   else
    CurrentDir = CurrentDir + 1
   end
  end
  if     CurrentDir == 0 then
 DestZ = CurrentZ + TunnelLength
 DestX = CurrentX
elseif CurrentDir == 1 then
 DestX = CurrentX - TunnelLength
 DestZ = CurrentZ
elseif CurrentDir == 2 then
 DestZ = CurrentZ - TunnelLength
 DestX = CurrentX
elseif CurrentDir == 3 then
 DestX = CurrentDir + TunnelLength
 DestZ = CurrentZ
end
end