Turti

local px = 0; local py = 0; local pz = 0
local facing = 0

function digForward()
    while turtle.detect() do
        turtle.dig()
    end
end

function digUp()
    while turtle.detectUp() do
        turtle.digUp()
    end
end

function digDown()
    while turtle.detectDown() do
        turtle.digDown()
    end
end

function back(count)
    for i = 1, count do
        if not turtle.back() then
            turnLeft(2)
            forward(1)
            turnLeft(2)
        else
            if facing == 0 then px = px - 1
            elseif facing == 1 then py = py - 1
            elseif facing == 2 then px = px + 1
            elseif facing == 3 then py = py + 1
            end
        end
    end
end

function forward(count)
    for i = 1, count do
        digForward(1)
        while not turtle.forward() do
            if not digForward(1) then
                turtle.attack()
            end
        end
    end
    if facing == 0 then px = px + count
    elseif facing == 1 then py = py + count
    elseif facing == 2 then px = px - count
    elseif facing == 3 then py = py - count
    end
end

function up(count)
    for i = 1, count do
        digUp(1)
        while not turtle.up() do
            if not digUp(1) then
                turtle.attackUp()
            end
        end
    end
    pz = pz + count
end

function down(count)
    for i = 1, count do
        digDown(1)
        while not turtle.down() do
            if not digDown(1) then
                turtle.attackDown()
            end
        end
    end
    pz = pz - count
end

function turnLeft(count)
    for i = 1, count do
        turtle.turnLeft()
    end
    facing = facing - count
    while facing < 0 do facing = facing + 4 end
end

function turnRight(count)
    for i = 1, count do
        turtle.turnRight()
    end
    facing = facing + count
    while facing > 3 do facing = facing - 4 end
end

function getPos()
    return { px, py, pz, facing }
end

function moveToPos(pos)
    local lpx = pos[1]
    local lpy = pos[2]
    local lpz = pos[3]
    local lfacing = pos[4]
    if lpx ~= px then
        if lpx > px then
            setFacing(0)
            forward(lpx - px)
        else
            setFacing(2)
            forward(px - lpx)
        end
    end
    if lpy ~= py then
        if lpy > py then
            setFacing(1)
            forward(lpy - py)
        else
            setFacing(3)
            forward(py - lpy)
        end
    end
    if lpz ~= pz then
        if lpz > pz then
            up(lpz - pz)
        else
            down(pz - lpz)
        end
    end
    setFacing(lfacing)
end

function setFacing(lfacing)
    while lfacing ~= facing do
        turnLeft(1)
    end
end

function dropAll()
    for i = 1, 16 do
        turtle.select(i)
        turtle.drop()
    end
    turtle.select(1)
end

function refuelAll()
    for i = 1, 16 do
        turtle.select(i);
        turtle.refuel()
    end
end