digger

function Forward()
  while not turtle.forward() do
  turtle.dig()
  end
end
--Program

local Djup=""

print("Placera kol i ruta 1 och trappor i 2")
term.write("Hur djupt?")
Djup=read()
turtle.select(1)
turtle.refuel()

for i = 1, Djup do
  turtle.digDown()
  turtle.down()
  turtle.turnLeft()
  turtle.dig()
  Forward()
  turtle.turnRight()
  turtle.dig()
  Forward()
  turtle.digUp()
  turtle.turnRight()
  turtle.dig()
  Forward()
  turtle.digUp()
  turtle.turnLeft()
end

turtle.turnRight()
turtle.turnRight()
turtle.select(2)

for i = 1, Djup do
  Forward()
  turtle.dig()
  turtle.place()
  turtle.turnRight()
  Forward()
  turtle.turnLeft()
  turtle.dig()
  turtle.place()
  turtle.up()
  Forward()
  turtle.dig()
  turtle.place()
  turtle.turnLeft()
  Forward()
  turtle.turnRight()
  turtle.up()

end