autofarm computercraft

-- Author: Flyboxx               --
-- Date: Dec/5/2014              --
-- Version: TEKKIT               --
-- Updated Jan/31/2017 to TEKKIT --

clearscr = function()
  term.clear()
  term.setCursorPos(1,1)
end

clearscr()

print("====== Farmer ======")
print("Ver TEKKIT")
print("By Flyboxx")

sleep(1)
clearscr()

-- Variables --

local args = {...}
farming = true
ystep = 1
xpos = 1
ypos = 0

-- Init --

-- Functions --

setPos = function(x, y)
  xpos = x
  ypos = y
end

returnHome = function()
  turtle.turnLeft()
  for i = 1, 8, 1 do
    turtle.forward()
  end
  turtle.turnLeft()
  for i = 1, 9, 1 do
    turtle.forward()
  end
  turtle.turnLeft()
  turtle.turnLeft()
end

clearInv = function()
  for i = 1,14,1 do
    turtle.select(i)
    if turtle.getItemCount(i) ~= 0 then
      if turtle.compareTo(15) then
        turtle.dropDown()
      elseif turtle.compareTo(16) then
        turtle.turnLeft()
        turtle.drop()
        turtle.turnRight()
      else
        turtle.dropUp()
      end
    end
  end
end

getFuel = function(arg1)
  if arg1 == "first" then
    print("Refueling...")
    turtle.turnRight()
    turtle.select(1)
    turtle.suck()
  end

  turtle.refuel(1)

  if turtle.getFuelLevel() < 99 then
    getFuel("notfirst")
  else
    turtle.drop()
    turtle.turnLeft()
  end
end

initFarm = function()
  clearInv()

  if turtle.getFuelLevel() < 99 then
    getFuel("first")
  end

  turtle.forward()
  setPos(1,1)
end

initPlant = function()
  clearInv()

  if turtle.getFuelLevel() < 99 then
    getFuel("first")
  end

  turtle.select(1)
  turtle.suckDown(64)
  turtle.select(2)
  turtle.suckDown(16)
  turtle.select(1)

  turtle.forward()
  setPos(1,1)
end

initFert = function()
  clearInv()

  if turtle.getFuelLevel() < 2 then
    getFuel("first")
  end

  turtle.select(1)
  turtle.suckUp(2)

  checkFertInv(1)

  turtle.forward()
  setPos(1,1)
  turtle.select(1)
end

checkFertInv = function(slot)
  for i = 1, 4 , 1 do
    if turtle.getItemCount(i) ~= 64 then
      print("Slot " .. i .. " needs to have 64 items!");
      while(turtle.getItemCount(i) ~= 64) do
        sleep(2)
        turtle.select(i)
        turtle.suckUp()
      end
    end
  end
  turtle.select(1)
end

fert = function()
  for i = 1, 5, 1 do
    turtle.placeDown()
    if turtle.getItemCount() == 0 then
      turtle.select(turtle.getSelectedSlot() + 1)
    end
  end
end

-- ==========*Till Program*========== --
till = function()
  initFarm()
  clearscr()
  print("Tilling...")

  while(farming) do

    turtle.digDown()

    if xpos == 9 and ypos == 9 then
      returnHome()
      clearInv()
      break
    end

    if ypos == 9 then
      turtle.turnRight()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnRight()
      turtle.digDown()
      ystep = -1
    end

    if ypos == 1 and xpos ~= 1 then
      turtle.turnLeft()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnLeft()
      turtle.digDown()
      ystep = 1
    end

    turtle.forward()
    ypos = ypos + ystep

  end
end

-- ==========*Plant Program*========== --
plant = function()
  initPlant()
  clearscr()
  print("Planting...")

  while(farming) do

    turtle.placeDown()

    if turtle.getItemCount() == 0 then
      turtle.select(turtle.getSelectedSlot() + 1)
    end

    if xpos == 9 and ypos == 9 then
      returnHome()
      turtle.select(1)
      break
    end

    if ypos == 9 then
      turtle.turnRight()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnRight()
      turtle.placeDown()
      ystep = -1
    end

    if ypos == 1 and xpos ~= 1 then
      turtle.turnLeft()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnLeft()
      turtle.placeDown()
      ystep = 1
    end

    turtle.forward()
    ypos = ypos + ystep

  end
end

-- ==========*Harvest Program*========== --
harvest = function()
  initFarm()
  clearscr()
  print("Harvesting...")

  while(farming) do

    turtle.digDown()

    if xpos == 9 and ypos == 9 then
      returnHome()
      clearInv()
      turtle.select(1)
      break
    end

    if ypos == 9 then
      turtle.turnRight()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnRight()
      turtle.digDown()
      ystep = -1
    end

    if ypos == 1 and xpos ~= 1 then
      turtle.turnLeft()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnLeft()
      turtle.digDown()
      ystep = 1
    end

    turtle.forward()
    ypos = ypos + ystep

  end
end

-- ==========*Fertilize Program*========== --
fertilize = function()
  initFert()
  clearscr()
  print("Fertilizing...")

  while(farming) do

    pos = {xpos, ypos}

    fert()

    if xpos == 9 and ypos == 9 then
      returnHome()
      clearInv()
      turtle.select(1)
      break
    end

    if ypos == 9 then
      turtle.turnRight()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnRight()
      fert()
      ystep = -1
    end

    if ypos == 1 and xpos ~= 1 then
      turtle.turnLeft()
      turtle.forward()
      xpos = xpos + 1
      turtle.turnLeft()
      fert()
      ystep = 1
    end

    turtle.forward()
    ypos = ypos + ystep

  end
end

-- ==========*Main Program*========== --
till()
while(farming) do
  plant()
  fertilize()
  harvest()
end