--Program that harvests Redwood trees with a specific chest setup.

local tArgs = { ... }
if # tArgs ~= 1 then
	print("Usage: autoHarvest <iterations>")
	return
end
local count = tonumber(tArgs[1])

local function harvest()
	turtle.select(3)
	turtle.dig()
	turtle.forward()
	while turtle.detectUp() do
		turtle.dig()
		turtle.digUp()
		turtle.up()
	end
	turtle.dig()
	turtle.turnRight()
	turtle.dig()
	turtle.forward()
	turtle.turnLeft()
	while turtle.detectDown() do
		turtle.dig()
		turtle.digDown()
		turtle.down()
	end
	turtle.up()
	turtle.select(16)
	turtle.placeDown()
end

local function invDump()
	for i = 1,13 do
		turtle.select(i+2)
		turtle.drop()
	end
end

local function restock()
	if turtle.getItemCount(1) < 4 then --Saplings in slot 1
		turtle.select(1)
		turtle.dropUp()
		turtle.suckUp()
	end
	if turtle.getItemCount(2) < 10 then --Bone meal in slot 2
		turtle.select(2)
		turtle.dropDown()
		turtle.suckDown()
	end
	turtle.turnRight()
	if turtle.getFuelLevel() < 500 then
		turtle.select(15)
		turtle.suck()
		turtle.refuel()
	end
	turtle.turnRight()
end

local function forward(dist)
	for i = 1,dist do
		turtle.forward()
	end
end

local function replant()
	turtle.select(1)
	turtle.placeDown()
	forward(1)
	turtle.placeDown()
	turtle.turnRight()
	forward(1)
	turtle.placeDown()
	turtle.turnRight()
	forward(1)
	turtle.placeDown()
	forward(1)
	turtle.turnRight()
	forward(1)
	turtle.down()
	turtle.turnRight()
	turtle.select(2)
	while turtle.place() do
		sleep(0.5)
	end
end

--Main Loop

while true do
	print("Make sure to keep at least 2 dirt in slot 16. Press E to continue.")
	local event, param1 = os.pullEvent("char")
	if param1 == "e" then
		term.clear()
		print("Harvesting " .. count .. "trees.")
		break
	else
		sleep(0.5)
	end
end
for i = 1,count do
	restock()
	forward(5)
	replant()
	harvest()
	turtle.turnLeft()
	forward(1)
	turtle.turnLeft()
	turtle.up()
	forward(5)
	invDump()
	sleep(300)
end
print("Finished harvesting " .. count .. " trees!")