tunneller2.lua

-----------------------------------------------------------------------------------------------
-- TUNNELER2
-----------------------------------------------------------------------------------------------
-- Rachel
-- Create a 3x3 tunnel for n blocks
-----------------------------------------------------------------------------------------------

-- Program Initialisation

-- Check running in turtle
if not turtle then
  printError("Requires a Turtle")
  return
end

-- Check input
local tArgs = { ... }
if #tArgs ~= 1 then
   print("Usage: tunneller2 <distance>")
   return
end

local tLength = tonumber(tArgs[1])
if tLength < 1 then
  printError("Tunnel length must be positive")
  return
end

-- Check fuel
if turtle.getFuelLevel() < 100 then
   print("Refuel turtle!")
   return
end

-- Initialise Variables
pos = 0

-- Torch placing
-- Assume torches in slot 16
ts = 5   -- space between torches
tc = 0   -- counter

-- March Onwards
function goForwards()
  if turtle.detect() then turtle.dig() end
  turtle.attack()
  turtle.forward()
end

-- try Torch Place
function torchPlace()
  -- assume torches in slot 16
  turtle.select(16)
  if turtle.getItemCount() > 0 then
    if not(turtle.detectDown()) then
      turtle.placeDown()
    end
  end
end

-- Dig out section
function digSection()
  goForwards()
  turtle.digUp()
  turtle.digDown()
  turtle.turnLeft()
  goForwards()
  turtle.digUp()
  turtle.digDown()
  turtle.back()
  turtle.turnRight()
  turtle.turnRight()
  goForwards()
  turtle.digUp()
  turtle.digDown()
  turtle.back()
  turtle.turnLeft()
end

-- Main function
print("+-------------------------------+")
print("+-----    Tunneler 2  ---------+")
print("+-------------------------------+")

tc = ts

turtle.up()
for pos = 1,tLength,1 do
  digSection()
  if math.fmod(pos,7) == 0 then
    torchPlace()
  end
end
turtle.down()