StripMineFix

-- 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
 while Cx ~= Dz or Cz ~= Dz do
  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
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