Stripmining

function clear()
 term.clear()
 term.setCursorPos(1,1)
end

function checkfuel()
 if turtle.getFuelLevel()<5 then
  return true
 else
  return false
 end
end

function refuel(quantity)
 for i1=1,16 do
  turtle.select(i1)
  if turtle.refuel(quantity) then
   break
  else
   if i1==16 then
    return true
   end
  end
 end
 turtle.select(1)
end

function stripmine()
--Vorwärts
 for i=1,3 do
  if checkfuel() then
   refuel(1)
  end
  turtle.dig()
  turtle.forward()
 end

--Rechts
 turtle.turnRight()
 for i=1,20 do
  if checkfuel() then
   refuel(1)
  end
  turtle.dig()
  turtle.forward()
 end

--Direkt die linke Seite mitnehmen
 turtle.turnRight()
 turtle.turnRight()
 for i=1,40 do
  if checkfuel() then
   refuel(1)
  end
  turtle.dig()
  turtle.forward()
 end

--Zurück in die Mitte
 turtle.turnRight()
 turtle.turnRight()
 for i=1,20 do
  if checkfuel() then
   refuel(1)
  end
  turtle.dig()
  turtle.forward()
 end
 turtle.turnLeft()
end

function roger()
 x,y=term.getSize()
 for i=1,x do
  write("-")
 end
 print("Str1pM1ne v0.2.7b by m3Zz")
 print("")
 print("Ok, grabe "..(length*2).." Seitengänge!")
 for i=1,x do
  write("-")
 end
 sleep(0.7)
end

function length()
 x,y=term.getSize()
 for i=1,x do
  write("-")
 end
 print("Str1pM1ne v0.2.7b by m3Zz")
 print("")
 print("Wie weit soll ich graben?")
 length=read()
 roger()
end

function output()
 x,y=term.getSize()
 for i=1,x do
  write("-")
 end
 print("Str1pM1ne v0.2.7b by m3Zz")
 print("")
 print("Stripmining...")
 for i=1,x do
  write("-")
 end
end

function setup()
 clear()
 length()
end

function main()
 clear()
 output()
 for tmp=1,length do
  stripmine()
 end
 task()
end

function task()
 setup()
 main()
end

task()