Computercraft Tree Mine

local function chopSlice()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    turtle.forward()
    turtle.turnLeft()
end

local function elevate()
    turtle.digUp()
    turtle.up()
end

local function main()
    local i = 1
    turtle.dig()
    turtle.forward()
    while turtle.compare() do
        chopSlice()
        elevate()
        i = i + 1
    end
    for _ = i, 1, -1 do
        turtle.down()
    end
end

main()