Dungeon mob spawner farm sorter

version = 20201218.1211
-- place turtle at bottom of mob spawner farm drop
-- for skeletons put chests on 3 sides and below
-- for zombies put chests on left and right sides
-- turtle collects drops from above, in front and stores in chests
local function initialise()
    -- rotate until not facing chest, then turnRight to face first one on player's left
    local success = true
    while success do
        success, blockType = turtle.inspect() --returns false if no block in front
        turtle.turnRight()
    end
    -- now facing first chest(s) on player's left
end


local function anyDrops(spawnerType)
    local isItems = false
    for i = 1, 16 do
        if turtle.getItemCount(i) > 0 then
            isItems = true
            if spawnerType == "" then -- only runs until spawner identified
                local data = turtle.getItemDetail(i)
                if data.name:find("arrow") ~= nil or data.name:find("bone") ~= nil then
                    spawnerType = "skeleton"
                elseif data.name:find("flesh") ~= nil then
                    spawnerType = "zombie"
                end
            end
        end
    end
    return isItems, spawnerType
end

local function craftBows()
    -- starts with empty inventory
    local success = false
    turtle.select(1)
    if turtle.suckDown() then --first bow picked
        if turtle.suckDown() then -- second bow picked
            if turtle.craft() then -- first repair
                if turtle.suckDown() then -- third bow picked
                    if turtle.craft() then -- second repair
                        if turtle.suckDown() then -- third bow picked
                            if turtle.craft() then -- third repair
                                turtle.drop() -- put into chest
                                success = true
                            end
                        end
                    end
                end
            end
        end
    end
    turtle.dropDown() -- if only one bow return to storage
    return success -- one bow dropped into rear chest
end

local function storeCraftable()
    for i = 1, 16 do
        if turtle.getItemCount(i) > 0 then
            turtle.select(i)
            data = turtle.getItemDetail()
            if data.name:find("bow") ~= nil then
                print("emptying: bow from slot "..i)
                turtle.dropDown()
            end
        end
    end
end

local function emptyValuables()
    data = {}
    for i = 1, 16 do
        if turtle.getItemCount(i) > 0 then
            turtle.select(i)
            data = turtle.getItemDetail()
            if data.name:find("bone") ~= nil then
                print("emptying: ".. data.name.. "from slot "..i)
                turtle.drop()
            end
        end
    end
end

local function emptyNonCraftable()
    --skeleton spawner arrows, zombie rotten flesh
    --armour
    data = {}
    for i = 1, 16 do
        if turtle.getItemCount(i) > 0 then
            turtle.select(i)
            data = turtle.getItemDetail()
            if data.name:find("arrow") ~= nil or data.name:find("flesh") ~= nil then
                print("emptying: "..data.name.." from slot "..i)
                turtle.drop()
            end
        end
    end
end

local function emptyMisc()
    data = {}
    for i = 1, 16 do
        if turtle.getItemCount(i) > 0 then
            turtle.select(i)
            data = turtle.getItemDetail()
            print("emptying: ".. data.name.. "from slot "..i)
            turtle.drop()
        end
    end
end

local function main()
    -- clear screen
    term.clear()
    term.setCursorPos(1,1)
    initialise()
    local spawnerType = ""
    local drops = false
    while true do
        term.clear()
        term.setCursorPos(1,1)
        print("Collecting drops from above..")
        while turtle.suckUp() do end
        drops, spawnerType = anyDrops(spawnerType)
        if drops then
            -- drop arrows or rotten flesh
            emptyNonCraftable() -- into chest on left of player
            turtle.turnRight() -- facing rear chest(s)
            storeCraftable() --drop bows into chest below
            turtle.turnRight() -- facing chest on players right
            emptyValuables()
            emptyMisc()
            if spawnerType == "skeleton" then
                turtle.turnLeft() -- back to rear chest
                print("Repairing bows..")
                while craftBows() do end
                print("Repairing bows completed")
                turtle.turnRight()
            end
            turtle.turnRight()
            print("Collecting drops from the floor..")
            while turtle.suck() do end -- get dropped items from front
            turtle.turnRight()
        else
            print("Waiting 30 secs for further drops")
            sleep(30)
        end
    end
end

main()