dig.lua for a ComputerCraft Turtle

gistfile1.lua

local t = turtle
local d = 32

function line(size)
  local i = 0
  while i < size do
    if t.forward() then
      i = i + 1
    end
    while (size > i) and (t.detect()) do
      t.dig()
    end
  end
  t.turnRight()
end

function plane(size)
  line(size)
  for i = 0, size - 1 do
    line(size - i)
    line(size - i)
  end
end

function rplane(size)
  for i = 1, size do
    line(i)
    line(i)
  end
  line(size)
end

plane(d)
t.digDown()
t.down()
rplane(d)