Pasted

--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!")