87 lines
2.6 KiB
Lua
87 lines
2.6 KiB
Lua
function ebiometrees.grow_closure(nextstage)
|
|
local function growtree(pos)
|
|
minetest.set_node(pos, {name=nextstage})
|
|
end
|
|
return growtree
|
|
end
|
|
|
|
|
|
function ebiometrees.where_to_grow_trunk_closure(grow_preferences, leaves_name)
|
|
local function where_to_grow_trunk(pos)
|
|
for _, directions in ipairs(grow_preferences)
|
|
do
|
|
table.shuffle(directions)
|
|
local candidate_dir = directions[1]
|
|
local candidate = vector.copy(pos):add(candidate_dir)
|
|
local node = minetest.get_node_or_nil(candidate)
|
|
corner1 = pos:add({x=-1, y=-1, z=-1}):add(candidate_dir:multiply(2))
|
|
corner2 = pos:add({x= 1, y= 1, z= 1}):add(candidate_dir:multiply(2))
|
|
local spacious, _ = minetest.find_nodes_in_area(
|
|
corner1, corner2, "group:treetrunk"
|
|
)
|
|
minetest.chat_send_all(dump2(spacious))
|
|
minetest.chat_send_all(#spacious)
|
|
if node and node.name == leaves_name and #spacious == 0
|
|
then
|
|
return candidate
|
|
end
|
|
end
|
|
end
|
|
return where_to_grow_trunk
|
|
end
|
|
|
|
|
|
function ebiometrees.grow_trunk_closure(trunk_terminal_name, grow_preferences, leaves_name, grow_limit)
|
|
local function grow_trunk(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
if meta:get_int("ebiometrees:distance") > grow_limit
|
|
then
|
|
return
|
|
end
|
|
local where = ebiometrees.where_to_grow_trunk_closure(grow_preferences, leaves_name)
|
|
local there = where(pos)
|
|
if there
|
|
then
|
|
minetest.set_node(there, {name=trunk_terminal_name})
|
|
local newmeta = minetest.get_meta(there)
|
|
newmeta:set_int("ebiometrees:distance", meta:get_int("ebiometrees:distance")+1)
|
|
end
|
|
end
|
|
return grow_trunk
|
|
end
|
|
|
|
|
|
function ebiometrees.grow_leaves_closure(leaves_name)
|
|
local function grow_leaves(pos)
|
|
local free_node = minetest.find_node_near(pos, 1, "air")
|
|
if free_node
|
|
then
|
|
minetest.set_node(free_node, {name=leaves_name})
|
|
end
|
|
return true
|
|
end
|
|
return grow_leaves
|
|
end
|
|
|
|
|
|
function ebiometrees.tree_grower(leaves_name, grow_preferences, terminal_name, nextstage, age_max, grow_limit)
|
|
local grow_trunk = ebiometrees.grow_trunk_closure(terminal_name, grow_preferences, leaves_name, grow_limit)
|
|
local grow_leaves = ebiometrees.grow_leaves_closure(leaves_name)
|
|
local function grow_tree(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_int("ebiometrees:age", meta:get_int("ebiometrees:age")+1)
|
|
grow_trunk(pos)
|
|
grow_leaves(pos)
|
|
if nextstage
|
|
then
|
|
if meta:get_int("ebiometrees:age") > age_max
|
|
then
|
|
minetest.set_node(pos, {name=nextstage})
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
return grow_tree
|
|
end
|
|
|