-- ****************************************************************************
-- **                                FARM                                    **
-- ****************************************************************************

local n = 0
local refilled = false

-- Fill the specified slot from any later slot that contains the same item, i.e. shuffle everything up to the topmost slots
local function fillSlot(slot)

   local n = 0

   if turtle.getItemSpace(slot) > 0 and turtle.getItemCount(slot) > 0 then
      for n=slot+1,16 do
         turtle.select(n)
         if turtle.compareTo(slot) then
            turtle.transferTo(slot, turtle.getItemSpace(slot))
         end
      end
   end
end

local function shuffleLoot()

   local n=0

   for n=1,15 do
      fillSlot(n)
   end
end

shuffleLoot()

-- Keep farming while there is still more than 1 fertilizer and free inventory space for at least 1 wheat
while turtle.getItemCount(2) > 1 and turtle.getItemSpace(15) > 0 and turtle.getItemSpace(16) > 0 do

   while turtle.getItemCount(2) > 1 and turtle.getItemSpace(15) > 0 and turtle.getItemSpace(16) > 0 do
      -- Use all but one of the seeds and bonemeal (or sulfur goo)
      while turtle.getItemCount(1) > 1 and turtle.getItemCount(2) > 1  do
         turtle.select(1)
         turtle.placeDown()
         sleep(.1)
         turtle.select(2)
         turtle.placeDown()
         sleep(.1)
         turtle.digDown()
         turtle.suckDown()
--         sleep(.1)
--         turtle.suckDown()
      end
      -- Shuffle everything up to the top
      shuffleLoot()
      if turtle.getItemSpace(2) > 0 then
         -- Get more bonemeal or sulfur goo from the chest
         refilled = false
         n=4
         repeat
            n=n+1
         until n > 16 or turtle.getItemCount(n) == 0
         if n <= 16 then
            turtle.Select(n)
            turtle.suck()
            -- don't want a full stack, so put some back
            if turtle.getItemSpace(n) == 0 then
               turtle.drop(turtle.getItemCount(2))
            end
            turtle.transferTo(2, turtle.getItemSpace(2))
         end
      end
   end
   -- Unload into chest above, first all but one wheat in Slot 3
   turtle.select(3)
   turtle.dropUp(turtle.getItemCount(3)-1)
   -- ...then everything else that doesn't match Slot 2 (bonemeal or sulfur goo)
   for n=4,15 do
      turtle.select(n)
      if not turtle.compareTo(2) then
         turtle.dropUp()
      end
   end
end

turtle.select(1)