breeder

while true do

    os.pullEvent("redstone")

    if rs.getInput("back") then -- Is the princess not there?

        done = false
        turtle.turnRight()

        repeat
        until not turtle.suck()

        turtle.turnLeft()

        for i=1,16 do
            turtle.select(i)
            repeat
            until not turtle.drop()
        end
        turtle.select(1)

        sleep(4)

        turtle.up()
        turtle.up()
        turtle.forward()
        turtle.forward()

        if turtle.suckDown() then
            done = true
        end

        turtle.forward()

        if turtle.suckDown() and not done then
            done = true
        end

        turtle.forward()

        if not done then
            turtle.suckDown()
        end

        turtle.back()
        turtle.back()
        turtle.back()
        turtle.back()
        turtle.down()
        turtle.down()

        turtle.turnRight()
        turtle.drop()
        turtle.turnLeft()

    end

end