ComputerCraft Tutorial: cultivate0_4

-- ########################
-- cultivate <n>
-- version 0.4
-- http://hevohevo.hatenablog.com/
-- ########################

-- #############
-- config
ARGS = {...}
MAX = ARGS[1]
SEED_SLOT = 1
MEAL_SLOT = 2

-- ##################
-- define functions
function plantSeed()
  turtle.select(SEED_SLOT)
  if turtle.place() then
    return true
  else
    print('failed: plantSeed')
    return false
  end
end

function dropItems(begin_slot, end_slot)
  print('drop items: slots ',begin_slot,'-',end_slot)
  for i=begin_slot, end_slot do
    turtle.select(i)
    turtle.dropDown()
  end
  turtle.select(1)
end

function useOneMeal()
  if (turtle.getItemCount(MEAL_SLOT) ==0) and (turtle.suckUp()==false) then
    print('failed: suckUp, and meal = 0')
    return false
  else
    turtle.select(MEAL_SLOT)
    turtle.place()
    return true
  end
end

function useMeals()
  local flag = true
  for i=1,3 do
    if useOneMeal() == false then
      flag = false
      break
    end
  end
  return flag
end

function harvest()
  turtle.select(SEED_SLOT)
  turtle.dig()
end

-- ##################
-- Main
turtle.dig()
for i=1,MAX do
  print(i,'/',MAX)

  if plantSeed() == false then break end
  if useMeals() == false then break end

  harvest()

  if i%50==0 then dropItems(3,16) end

end
dropItems(3,16)