--[[

FarmerBot v1.0.0

Guide
-----------------
Crops: Wheat
-----------------

Goals:
Farm down a line of crops and constantly check the crops.

2.0 Goals:
- Allow multiple bots at the same time (designating their name in logs)
- Attempt to till the ground below it (excluding water)
- Add more crops
]]--

-- Globals --
local crops = {
	{ id = 1, mature = 7, name = "minecraft:carrots", seed = "minecraft:carrot", label = "Carrots" },
	{ id = 2, mature = 7, name = "minecraft:wheat", seed = "minecraft:wheat_seeds", label = "Wheat" },
	{ id = 3, mature = 7, name = "minecraft:potatoes", seed = "minecraft:potato", label = "Potatoes" },
	{ id = 4, mature = 7, name = "magicalcrops:MinicioCrop", seed = "magicalcrops:MinicioSeeds", label = "Minicio" },
	{ id = 5, mature = 7, name = "magicalcrops:FireCrop", seed = "magicalcrops:FireSeeds", label = "Fire" },
	{ id = 6, mature = 7, name = "magicalcrops:SheepCrop", seed = "magicalcrops:SheepSeeds", label = "Sheep" },
	{ id = 7, mature = 7, name = "magicalcrops:NatureCrop", seed = "magicalcrops:NatureSeeds", label = "Nature" },
	{ id = 8, mature = 7, name = "magicalcrops:FluixCrop", seed = "magicalcrops:FluixSeeds", label = "Fluix" },
	{ id = 9, mature = 7, name = "magicalcrops:QuartzCrop", seed = "magicalcrops:QuartzSeeds", label = "Quartz" },
	{ id = 10, mature = 7, name = "magicalcrops:WaterCrop", seed = "magicalcrops:WaterSeeds", label = "Water" },
	{ id = 11, mature = 7, name = "magicalcrops:NetherCrop", seed = "magicalcrops:NetherSeeds", label = "Nether" },
	{ id = 12, mature = 7, name = "magicalcrops:EarthCrop", seed = "magicalcrops:EarthSeeds", label = "Earth" },
	{ id = 13, mature = 7, name = "magicalcrops:DiamondCrop", seed = "magicalcrops:DiamondSeeds", label = "Diamond" }
}

-- [[ START PLAYER INPUT ]]--
local input = { rows = 0, length = 0, crop = 0 }

term.write("Enter number of rows (left): ")
input.rows = tonumber(read())
term.clear()
term.write("Enter in length of row (forward): ")
input.length = tonumber(read())
term.clear()
for k,v in pairs (crops) do
	print("#" .. v.id .. " - " .. label)
end
term.write("Enter crop ID for seeding: ")
input.crop = tonumber(read())
term.clear()

-- [[ END PLAYER INPUT ]]--
rednet.send(12, "----- Bot #" .. os.getComputerID() .. " Task -----", "bttp")
rednet.send(12, "Size: " .. input.rows .. "x" .. input.length, "bttp")

-- Helper Function: Determine if the crop is fully developed. If not, alert the user.
function isGrown(row, length, current, expected)
	if current == expected then
		return true
	end
	return false
end

-- Helper Function: Determines if the crop ID has any seeds for said crop. Selects seed if true.
function hasSeeds(id)
	for k,v in pairs(crops) do
		if v.id == id then
			for i = 1, 16 do
				local data = turtle.getItemDetail(i)
				if data ~= nil then
					if data.name == v.seed then
						turtle.select(i)
						return true
					end
				end
			end
		end
	end
	return false
end

--refueling
function refuel(level)
  for i = 1, 16 do
    if turtle.getFuelLevel() > level then
      break
    end
    turtle.select(i)
    if refuel(0) then
      turtle.refuel(turtle.getItemCount())
    end
  end
end

function dropItems()
	for i = 16,1,-1 do
		turtle.select(i)
		turtle.dropDown()
	end
end

-- Network Handling (modem on right)
if rednet.isOpen("right") then
	rednet.send(12, "[Bot #" .. os.getComputerID() .. "] Connected to modem!", "bttp")
else
	rednet.open("right")
	rednet.send(12, "[Bot #" .. os.getComputerID() .. "] Turning on modem...", "bttp")
	rednet.send(12, "[Bot #" .. os.getComputerID() .. "] Connected successfully!", "bttp")
end

-- 2.0 Function: Attempt to fix an un-tilled grass block
function fixBlock()
	turtle.digDown()
	if hasSeeds(input.crop) then
		turtle.placeDown()
	end
end

-- Preface: Determine if the bot was placed on the ground. If so, go up one block.
if turtle.detectDown() then
	turtle.up()
	turtle.forward()
end

--[[ START FARMING TASK ]]--
while true do
	-- Start farming the area.
	for i = 1, input.rows do

		for j = 1, input.length do
			-- Check status of current crop.
			if turtle.detectDown() then
				--There is something below. Determine if it is something we can handle.
				local success, data = turtle.inspectDown()
				if success then
					for k,v in pairs(crops) do
						if data.name == v.name then
							if isGrown(i,j,data.metadata,v.mature) then
								--Break the block... Then replace...
								turtle.digDown()
								turtle.suckDown() -- Pick up the local crop.
								local curpos = turtle.getSelectedSlot();
								if hasSeeds(v.id) then
									turtle.placeDown()
								else
									rednet.send(12, "[Bot #" .. os.getComputerID() .. "] No seeds for " .. v.label .. " @ (" .. i .. "," .. j .. ")", "bttp")
								end
								turtle.select(curpos)
							end
						end
					end
				else
					rednet.send(12, "[Bot #" .. os.getComputerID() .. "] ERROR: No Block @ (" .. i .. "," .. j .. ")", "bttp")
				end
			else
				fixBlock()
			end

			-- Go forward one to continue.
			if j < input.length then
				turtle.forward()
			end
		end
		os.sleep(3)
		-- Done reviewing the row. Now move to new row.
		local isEven = i % 2 == 0
		if isEven == false then
			turtle.turnLeft()
			turtle.forward()
			turtle.turnLeft()
		else
			turtle.turnRight()
			turtle.forward()
			turtle.turnRight()
		end
	end
	os.sleep(5)

	-- Go back to start where chest is.
	if input.rows % 2 == 1 then
		for k = 1, input.length do
			turtle.forward()
		end
	 else
		turtle.turnLeft()
		turtle.turnLeft()
		turtle.forward()
	 end
	turtle.turnLeft()
	for l = 1, input.rows do
		turtle.forward()
	end
	turtle.turnLeft()

	-- Drop items in hopper below.
	turtle.down()

	os.sleep(2)
	local needs = input.rows * input.length + input.rows + input.length + 2
	refuel(needs)
	dropItems()
	os.sleep(300)

	turtle.up()

	turtle.forward()
end