term.write("how Long should the tunnel be?")
local lol = read()
local torch = 0
while turtle.getFuelLevel() < lol*1 do
 local q = turtle.getFuelLevel()
  if turtle.getFuelLevel() < lol*1 then
   term.write("Fuel Level is at "..q.." But needs to be "..lol*7)
   term.write("Please put Fuel in 1st slot")
   os.sleep(5)
   turtle.refuel()
  end
end
   term.write("Mining a "..lol.." block long tunnel")

   for a = 1,lol do
      turtle.dig()
      turtle.forward()
      turtle.digUp()
      turtle.digDown()
      turtle.turnRight()
      turtle.dig()
      turtle.forward()
      turtle.digUp()
      turtle.digDown()
      turtle.back()
      turtle.turnLeft()
      turtle.turnLeft()
      turtle.dig()
      turtle.forward()
      turtle.digUp()
      turtle.digDown()
      turtle.back()
      turtle.turnRight()
      torch = torch + 1
      if torch == 8 then
        turtle.down()
        turtle.turnRight()
        turtle.turnRight()
        turtle.select(16)
        turtle.place()
        turtle.turnRight()
        turtle.turnRight()
        turtle.up()
        torch = 0
       end
      if turtle.getItemCount(15) >= 1 then
        local length = a
        turtle.turnRight()
        turtle.turnRight()
        for d = 1,length do
          turtle.forward()
        end
        turtle.turnRight()
        turtle.turnRight()
        for e = 1,15 do
          turtle.select(e)
          turtle.dropDown(64)
        end
        for f = 1,length do
          turtle.forward()
        end
        turtle.select(1)
     end
    end
    for b = 1,lol do
     turtle.back()
    end
   for c = 1,16 do
    turtle.select(c)
    turtle.dropDown(64)
   end
 turtle.select(1)