OC_Scripts/scripts/TreeFarm.lua

129 lines
3.3 KiB
Lua

--Robotic Tree Farmer
-- Copyright 2018 Andrew Lalis. All rights reserved.
local robot = require("robot")
local component = require("component")
local tractor_beam = component.tractor_beam
local ic = component.inventory_controller
--Runtime Constants defined for this robot.
local SAPLING_NAME = "minecraft:sapling"
local SAPLING_DATA = 0
local BONEMEAL_NAME = "minecraft:dye"
local BONEMEAL_DATA = 15
--Global configuration variables.
--Flag for if program should run until out of resources.
local continuous = false
--Exit the program.
local function quit()
print("#--------------------------------#")
print("# Tree Chopping Program exited. #")
os.exit()
end
--Select a slot containing the specified item.
local function selectItemByName(item_name, item_data)
for i=1,16 do
local stack = ic.getStackInInternalSlot(i)
if (stack ~= nil and stack.name == item_name and stack.damage == item_data) then
robot.select(i)
return true
end
end
return false
end
--Select a slot with an item, and if it can't be found, ask the user to add it.
local function selectSafely(item_name, item_data)
local success = selectItemByName(item_name, item_data)
if continuous and not success then
print("Out of "..item_name..", exiting.")
quit()
end
while not success do
print("Cannot find "..item_name.." in inventory. Please add some, and press enter.")
io.read()
success = selectItemByName(item_name, item_data)
end
end
--Plants a sapling.
local function plantSapling()
selectSafely(SAPLING_NAME, SAPLING_DATA)
local success = robot.place()
while not success do
print("Unable to place the sapling. Please remove any blocks in front of the robot, and press enter.")
io.read()
success = robot.place()
end
end
--Repeatedly applies bonemeal until a tree has grown.
local function applyBonemeal()
local success, block_type = robot.detect()
while block_type ~= "solid" do
selectSafely(BONEMEAL_NAME, BONEMEAL_DATA)
robot.place()
success, block_type = robot.detect()
end
end
--Chops a tree, first checking the status of the tool.
local function chopTree()
local durability = robot.durability()
if continuous and (durability == nil or durability < 0.1) then
print("Inadequate tool to chop trees, exiting.")
quit()
end
while (durability == nil) or (durability < 0.1) do
print("Please ensure that a lumber axe with at least 10% durability is equipped in the tool slot, and press enter.")
io.read()
durability = robot.durability()
end
robot.swing()
end
--Uses the tractor_beam component to pick up nearby items.
local function pickupItems()
local success = tractor_beam.suck()
while success do
success = tractor_beam.suck()
end
end
local function growTree()
plantSapling()
applyBonemeal()
end
local function farmTree()
growTree()
chopTree()
os.sleep(2)
pickupItems()
end
local function main()
print("# Andrew's Tree Chopping Program #")
print("# Copyright 2018 Andrew Lalis #")
print("#--------------------------------#")
print("Please enter the number of trees to chop, or -1 to chop until out of resources.")
local choice = tonumber(io.read())
if (choice == nil or choice == -1) then
continuous = true
print(" Chopping trees until out of resources.")
while continuous do
farmTree()
end
else
print(" Chopping "..choice.." trees.")
for i=1,choice do
farmTree()
end
end
quit()
end
main()