2013-02-11 22:07:40 -05:00
|
|
|
-- More trees! 2013-02-11
|
2013-01-09 21:35:50 -05:00
|
|
|
--
|
|
|
|
-- This mod adds more types of trees to the game
|
|
|
|
--
|
2013-01-19 18:36:13 -05:00
|
|
|
-- Some of the node definitions and textures came from cisoun's conifers mod
|
|
|
|
-- and bas080's jungle trees mod.
|
2013-01-09 21:35:50 -05:00
|
|
|
--
|
|
|
|
-- Brought together into one mod and made L-systems compatible by Vanessa
|
2013-01-20 01:39:00 -05:00
|
|
|
-- Ezekowitz.
|
2013-01-09 21:35:50 -05:00
|
|
|
--
|
2013-02-11 22:07:40 -05:00
|
|
|
-- Firs and Jungle tree axioms/rules by Vanessa Ezekowitz, with the
|
|
|
|
-- latter having been tweaked by RealBadAngel, most other axioms/rules written
|
|
|
|
-- by RealBadAngel.
|
2013-01-13 20:37:05 -05:00
|
|
|
--
|
2013-02-11 22:07:40 -05:00
|
|
|
-- License: WTFPL for all parts (code and textures, including those copied
|
|
|
|
-- from the jungletree and conifers mods) except the default jungle tree trunk
|
|
|
|
-- texture, which is CC-By-SA.
|
2013-02-11 12:09:17 -05:00
|
|
|
|
2013-01-18 21:35:39 -05:00
|
|
|
moretrees = {}
|
2013-01-09 21:35:50 -05:00
|
|
|
|
2013-02-11 22:07:40 -05:00
|
|
|
-- These first two dofile() calls must precede any others, and must remain in
|
|
|
|
-- this order, otherwise variables and node names will get skipped.
|
2013-02-11 12:09:17 -05:00
|
|
|
|
2013-02-11 22:07:40 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/settings.lua")
|
2013-01-19 18:36:13 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/node_defs.lua")
|
2013-02-11 22:07:40 -05:00
|
|
|
|
2013-01-19 18:36:13 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/tree_models.lua")
|
|
|
|
dofile(minetest.get_modpath("moretrees").."/biome_defs.lua")
|
2013-01-21 20:31:28 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/crafts.lua")
|
2013-02-11 12:23:05 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/leafdecay.lua")
|
2013-02-11 22:07:40 -05:00
|
|
|
dofile(minetest.get_modpath("moretrees").."/saplings.lua")
|
2013-01-09 21:35:50 -05:00
|
|
|
|
2013-01-20 13:38:23 -05:00
|
|
|
-- tree spawning setup
|
|
|
|
|
2013-01-20 00:01:15 -05:00
|
|
|
plantslib:register_generate_plant(moretrees.apple_tree_biome, moretrees.apple_tree_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.oak_biome, moretrees.oak_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.sequoia_biome, moretrees.sequoia_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.palm_biome, moretrees.palm_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.pine_biome, moretrees.pine_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.rubber_tree_biome, moretrees.rubber_tree_model)
|
|
|
|
plantslib:register_generate_plant(moretrees.willow_biome, moretrees.willow_model)
|
|
|
|
|
|
|
|
plantslib:register_generate_plant(moretrees.birch_biome, "moretrees:grow_birch")
|
|
|
|
plantslib:register_generate_plant(moretrees.spruce_biome, "moretrees:grow_spruce")
|
2013-01-19 18:36:13 -05:00
|
|
|
plantslib:register_generate_plant(moretrees.jungletree_biome, "moretrees:grow_jungletree")
|
2013-01-21 20:52:04 -05:00
|
|
|
plantslib:register_generate_plant(moretrees.fir_biome, "moretrees:grow_fir")
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-01-20 00:01:15 -05:00
|
|
|
-- Code to spawn a birch tree
|
|
|
|
|
|
|
|
function moretrees:grow_birch(pos)
|
2013-01-20 14:04:10 -05:00
|
|
|
minetest.env:remove_node(pos)
|
2013-01-20 00:01:15 -05:00
|
|
|
if math.random(1,2) == 1 then
|
|
|
|
minetest.env:spawn_tree(pos, moretrees.birch_model1)
|
|
|
|
else
|
|
|
|
minetest.env:spawn_tree(pos, moretrees.birch_model2)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
-- Code to spawn a spruce tree
|
|
|
|
|
|
|
|
function moretrees:grow_spruce(pos)
|
2013-01-20 14:04:10 -05:00
|
|
|
minetest.env:remove_node(pos)
|
2013-01-20 00:01:15 -05:00
|
|
|
if math.random(1,2) == 1 then
|
|
|
|
minetest.env:spawn_tree(pos, moretrees.spruce_model1)
|
|
|
|
else
|
|
|
|
minetest.env:spawn_tree(pos, moretrees.spruce_model2)
|
|
|
|
end
|
|
|
|
end
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-02-11 22:07:40 -05:00
|
|
|
-- Code to spawn jungle trees
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jt_axiom1 = "FFFA"
|
|
|
|
moretrees.jt_rules_a1 = "FFF[&&-FBf[&&&Ff]^^^Ff][&&+FBFf[&&&FFf]^^^Ff][&&---FBFf[&&&Ff]^^^Ff][&&+++FBFf[&&&Ff]^^^Ff]F/A"
|
|
|
|
moretrees.jt_rules_b1 = "[-Ff&f][+Ff&f]B"
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jt_axiom2 = "FFFFFA"
|
|
|
|
moretrees.jt_rules_a2 = "FFFFF[&&-FFFBF[&&&FFff]^^^FFf][&&+FFFBFF[&&&FFff]^^^FFf][&&---FFFBFF[&&&FFff]^^^FFf][&&+++FFFBFF[&&&FFff]^^^FFf]FF/A"
|
|
|
|
moretrees.jt_rules_b2 = "[-FFf&ff][+FFf&ff]B"
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.ct_rules_a1 = "FF[FF][&&-FBF][&&+FBF][&&---FBF][&&+++FBF]F/A"
|
|
|
|
moretrees.ct_rules_b1 = "[-FBf][+FBf]"
|
2013-01-11 10:29:38 -05:00
|
|
|
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.ct_rules_a2 = "FF[FF][&&-FBF][&&+FBF][&&---FBF][&&+++FBF]F/A"
|
|
|
|
moretrees.ct_rules_b2 = "[-fB][+fB]"
|
2013-01-09 21:35:50 -05:00
|
|
|
|
2013-01-19 00:45:03 -05:00
|
|
|
function moretrees:grow_jungletree(pos)
|
2013-01-11 10:29:38 -05:00
|
|
|
local r1 = math.random(2)
|
|
|
|
local r2 = math.random(3)
|
|
|
|
if r1 == 1 then
|
2013-01-21 20:50:41 -05:00
|
|
|
moretrees.jungletree_model.leaves2 = "moretrees:jungletree_leaves_red"
|
2013-01-11 10:29:38 -05:00
|
|
|
else
|
2013-01-21 20:50:41 -05:00
|
|
|
moretrees.jungletree_model.leaves2 = "moretrees:jungletree_leaves_yellow"
|
2013-01-11 10:29:38 -05:00
|
|
|
end
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jungletree_model.leaves2_chance = math.random(25, 75)
|
2013-01-11 10:29:38 -05:00
|
|
|
|
|
|
|
if r2 == 1 then
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jungletree_model.trunk_type = "single"
|
|
|
|
moretrees.jungletree_model.iterations = 2
|
|
|
|
moretrees.jungletree_model.axiom = moretrees.jt_axiom1
|
|
|
|
moretrees.jungletree_model.rules_a = moretrees.jt_rules_a1
|
|
|
|
moretrees.jungletree_model.rules_b = moretrees.jt_rules_b1
|
2013-01-11 10:29:38 -05:00
|
|
|
elseif r2 == 2 then
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jungletree_model.trunk_type = "double"
|
|
|
|
moretrees.jungletree_model.iterations = 4
|
|
|
|
moretrees.jungletree_model.axiom = moretrees.jt_axiom2
|
|
|
|
moretrees.jungletree_model.rules_a = moretrees.jt_rules_a2
|
|
|
|
moretrees.jungletree_model.rules_b = moretrees.jt_rules_b2
|
2013-01-11 10:29:38 -05:00
|
|
|
elseif r2 == 3 then
|
2013-01-19 18:36:13 -05:00
|
|
|
moretrees.jungletree_model.trunk_type = "crossed"
|
|
|
|
moretrees.jungletree_model.iterations = 4
|
|
|
|
moretrees.jungletree_model.axiom = moretrees.jt_axiom2
|
|
|
|
moretrees.jungletree_model.rules_a = moretrees.jt_rules_a2
|
|
|
|
moretrees.jungletree_model.rules_b = moretrees.jt_rules_b2
|
2013-01-11 10:29:38 -05:00
|
|
|
end
|
|
|
|
|
2013-01-09 21:35:50 -05:00
|
|
|
minetest.env:remove_node(pos)
|
2013-01-11 10:29:38 -05:00
|
|
|
local leaves = minetest.env:find_nodes_in_area({x = pos.x-1, y = pos.y, z = pos.z-1}, {x = pos.x+1, y = pos.y+10, z = pos.z+1}, "default:leaves")
|
|
|
|
for leaf in ipairs(leaves) do
|
|
|
|
minetest.env:remove_node(leaves[leaf])
|
2013-01-09 21:35:50 -05:00
|
|
|
end
|
2013-01-19 18:36:13 -05:00
|
|
|
minetest.env:spawn_tree(pos, moretrees.jungletree_model)
|
2013-01-09 21:35:50 -05:00
|
|
|
end
|
|
|
|
|
2013-02-11 22:07:40 -05:00
|
|
|
-- code to spawn fir trees (formerly "conifers")
|
|
|
|
|
2013-01-21 20:50:41 -05:00
|
|
|
function moretrees:grow_fir(pos)
|
2013-01-11 10:29:38 -05:00
|
|
|
if math.random(2) == 1 then
|
2013-01-21 20:52:04 -05:00
|
|
|
moretrees.fir_model.leaves="moretrees:fir_leaves"
|
2013-01-11 10:29:38 -05:00
|
|
|
else
|
2013-01-22 11:29:20 -05:00
|
|
|
moretrees.fir_model.leaves="moretrees:fir_leaves_bright"
|
2013-01-11 10:29:38 -05:00
|
|
|
end
|
|
|
|
if math.random(2) == 1 then
|
2013-01-21 20:52:04 -05:00
|
|
|
moretrees.fir_model.rules_a = moretrees.ct_rules_a1
|
|
|
|
moretrees.fir_model.rules_b = moretrees.ct_rules_b1
|
2013-01-09 21:35:50 -05:00
|
|
|
else
|
2013-01-21 20:52:04 -05:00
|
|
|
moretrees.fir_model.rules_a = moretrees.ct_rules_a2
|
|
|
|
moretrees.fir_model.rules_b = moretrees.ct_rules_b2
|
2013-01-11 10:29:38 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
minetest.env:remove_node(pos)
|
|
|
|
local leaves = minetest.env:find_nodes_in_area({x = pos.x, y = pos.y, z = pos.z}, {x = pos.x, y = pos.y+5, z = pos.z}, "default:leaves")
|
|
|
|
for leaf in ipairs(leaves) do
|
|
|
|
minetest.env:remove_node(leaves[leaf])
|
2013-01-09 21:35:50 -05:00
|
|
|
end
|
2013-01-21 20:52:04 -05:00
|
|
|
minetest.env:spawn_tree(pos,moretrees.fir_model)
|
2013-01-09 21:35:50 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
-- Should we remove all the trees above the conifers altitude?
|
2013-01-19 18:36:13 -05:00
|
|
|
|
2013-02-11 12:09:17 -05:00
|
|
|
if moretrees.firs_remove_default_trees == true then
|
2013-01-09 21:35:50 -05:00
|
|
|
minetest.register_abm({
|
|
|
|
nodenames = {
|
|
|
|
"default:tree",
|
|
|
|
"default:leaves"
|
|
|
|
},
|
2013-02-11 12:09:17 -05:00
|
|
|
interval = moretrees.firs_remove_interval,
|
|
|
|
chance = moretrees.firs_remove_chance,
|
2013-01-09 21:35:50 -05:00
|
|
|
|
|
|
|
action = function(pos, node, _, _)
|
|
|
|
if minetest.env:get_node({x = pos.x, y = pos.y + 1, z = pos.z}).name == "air"
|
|
|
|
and pos.y >= CONIFERS_ALTITUDE
|
|
|
|
then
|
|
|
|
minetest.env:add_node(pos , {name = "air"})
|
|
|
|
end
|
|
|
|
end
|
|
|
|
})
|
|
|
|
end
|
|
|
|
|
2013-02-11 22:07:40 -05:00
|
|
|
-- snow biomes mod uses this code to make biomes:
|
|
|
|
--
|
|
|
|
-- local perlin1 = env:get_perlin(112,3, 0.5, 150)
|
|
|
|
-- local test = perlin1:get2d({x=pos.x, y=pos.z})
|
|
|
|
-- if smooth and (test > 0.73 or (test > 0.43 and math.random(0,29) > (0.73 - test) * 100 )) then
|
|
|
|
-- in_biome = true
|
|
|
|
-- elseif not smooth and test > 0.53 then
|
|
|
|
-- in_biome = true
|
|
|
|
-- end
|
|
|
|
--
|
|
|
|
-- We'll just save this for possible later use ;-)
|
|
|
|
--
|
|
|
|
|
|
|
|
print("[Moretrees] Loaded (2013-02-11)")
|