Automatic Vertical Digger

local rf = 5000000
local rfItem, digitem = "blockCapBank", "blockMiner"

function getInvoItem(str)
  for i = 1, 16 do
    turtle.select(i)
    local d = turtle.getItemDetail()
    if d and string.find(d.name, str) then
      return true
    end
  end
  return false
end

local distance = 0

while rf >= 1500 do
  for i = 1, 5 do
    turtle.forward()
    distance = distance + 1
  end
  getInvoItem(digItem)
  turtle.place()
  turtle.up()
  getInvoItem(rfItem)
  turtle.place()
  turtle.down()
  local c = 100
  while c > 0 do
    if turtle.suck(1) then
      c = 100
      rf = rf - 1500
    else
      c = c - 1
    end
    sleep(.5)
  end
  turtle.dig()
  turtle.up()
  turtle.dig()
  turtle.down()
end

turtle.turnLeft()
turtle.turnLeft()
while distance > 0 do
  turtle.forward()
  distance = distance - 1
end