Initial upload (mod is WIP)

6 files changed, 426 insertions, 0 deletions

diff --git a/depends.txt b/depends.txt
new file mode 100644
index 0000000..9ae6a48
--- /dev/null
+++ b/depends.txt
@@ -0,0 +1,3 @@
+default
+ethereal?
+moretrees?
diff --git a/init.lua b/init.lua
new file mode 100644
index 0000000..78f8ce0
--- /dev/null
+++ b/init.lua
@@ -0,0 +1,342 @@
+

+bonemeal = {}

+

+-- bone item

+minetest.register_craftitem("bonemeal:bone", {

+	description = "Bone",

+	inventory_image = "bonemeal_bone.png",

+})

+

+-- bonemeal recipes

+minetest.register_craft({

+	type = "shapeless",

+	output = "bonemeal:bonemeal 2",

+	recipe = {"bonemeal:bone"},

+})

+

+minetest.register_craft({

+	type = "shapeless",

+	output = "bonemeal:bonemeal 4",

+	recipe = {"bones:bones"},

+})

+

+-- have animalmaterials found, craft bone into bonemeal

+if minetest.get_modpath("animalmaterials") then

+

+	minetest.register_craft({

+		type = "shapeless",

+		output = "bonemeal:bonemeal 2",

+		recipe = {"animalmaterials:bone"},

+	})

+end

+

+-- add bones to dirt

+minetest.override_item("default:dirt", {

+	drop = {

+		max_items = 1,

+		items = {

+			{

+				items = {"bonemeal:bone", "default:dirt"},

+				rarity = 30,

+			},

+			{

+				items = {"default:dirt"},

+			}

+		}

+	},

+})

+

+

+-- particles

+local function particle_effect(pos)

+

+	minetest.add_particlespawner({

+		amount = 4,

+		time = 0.15,

+		minpos = pos,

+		maxpos = pos,

+		minvel = {x = -1, y = 2, z = -1},

+		maxvel = {x = 1, y = 4, z = 1},

+		minacc = {x = -1, y = -1, z = -1},

+		maxacc = {x = 1, y = 1, z = 1},

+		minexptime = 1,

+		maxexptime = 1,

+		minsize = 1,

+		maxsize = 3,

+		texture = "bonemeal_particle.png",

+	})

+end

+

+

+-- default crops

+local crops = {

+	{"farming:cotton_", 8, "farming:seed_cotton"},

+	{"farming:wheat_", 8, "farming:seed_wheat"},

+}

+

+-- add to crop list to force grow

+-- {crop name start_, growth steps, seed node (if required)}

+-- e.g. {"farming:wheat_", 8, "farming:seed_wheat"}

+

+function bonemeal:add_crop(list)

+

+	for n = 1, #list do

+		table.insert(crops, list[n])

+	end

+end

+

+

+-- default plants

+local plants = {

+	"air",

+	"flowers:dandelion_white",

+	"flowers:dandelion_yellow",

+	"flowers:geranium",

+	"flowers:rose",

+	"flowers:tulip",

+	"flowers:viola",

+}

+

+-- add to plant list to grow among grass

+-- "plant node name"

+-- e.g. "flowers:rose"

+

+function bonemeal:add_plant(list)

+

+	for n = 1, #list do

+		table.insert(plants, list[n])

+	end

+end

+

+

+-- special pine check for snow

+local function pine_grow(pos)

+

+	if minetest.find_node_near(pos, 1,

+		{"default:snow", "default:snowblock", "default:dirt_with_snow"}) then

+

+		default.grow_new_snowy_pine_tree(pos)

+	else

+		default.grow_new_pine_tree(pos)

+	end

+end

+

+-- default saplings

+local saplings = {

+	{"default:sapling", default.grow_new_apple_tree, "soil"},

+	{"default:junglesapling", default.grow_new_jungle_tree, "soil"},

+	{"default:acacia_sapling", default.grow_new_acacia_tree, "soil"},

+	{"default:aspen_sapling", default.grow_new_aspen_tree, "soil"},

+	{"default:pine_sapling", pine_grow, "soil"},

+}

+

+-- add to sapling list

+-- {sapling node, schematic or function name, "soil"|"sand"|specific_node}

+--e.g. {"default:sapling", default.grow_new_apple_tree, "soil"}

+

+function bonemeal:add_sapling(list)

+

+	for n = 1, #list do

+		table.insert(saplings, list[n])

+	end

+end

+

+

+-- moretrees specific function

+local function more_tree(pos, object)

+

+	if type(object) == "table" and object.axiom then

+		-- grow L-system tree

+		minetest.remove_node(pos)

+		minetest.spawn_tree(pos, object)

+

+	elseif type(object) == "string" and minetest.registered_nodes[object] then

+		-- place node

+		minetest.set_node(pos, {name = object})

+

+	elseif type(object) == "function" then

+		-- function

+		object(pos)

+

+	end

+end

+

+

+-- sapling check

+local function check_sapling(pos, nodename)

+

+	-- 1 in 2 chance of spawning sapling

+	if math.random(1, 2) == 1 then

+		return

+	end

+

+	-- what is sapling placed on?

+	local under =  minetest.get_node({

+		x = pos.x,

+		y = pos.y - 1,

+		z = pos.z

+	})

+

+	local can_grow, grow_on

+

+	-- check list for sapling and function

+	for n = 1, #saplings do

+

+		if saplings[n][1] == nodename then

+

+			grow_on = saplings[n][3]

+

+			-- sapling grows on top of specific node

+			if grow_on

+			and grow_on ~= "soil"

+			and grow_on ~= "sand"

+			and grow_on == under.name then

+				can_grow = true

+			end

+

+			-- sapling grows on top of soil (default)

+			if can_grow == nil

+			and (grow_on == nil or grow_on == "soil")

+			and minetest.get_item_group(under.name, "soil") > 0 then

+				can_grow = true

+			end

+

+			-- sapling grows on top of sand

+			if can_grow == nil

+			and grow_on == "sand"

+			and minetest.get_item_group(under.name, "sand") > 0 then

+				can_grow = true

+			end

+

+			-- check if we can grow sapling

+			if can_grow then

+				particle_effect(pos)

+				more_tree(pos, saplings[n][2])

+				return

+			end

+		end

+	end

+end

+

+

+-- crops check

+local function check_crops(pos, nodename)

+

+	local stage = ""

+

+	-- grow registered crops

+	for n = 1, #crops do

+

+		if string.find(nodename, crops[n][1])

+		or nodename == crops[n][3] then

+

+			-- get stage number or set to 0 for seed

+			stage = tonumber( nodename:split("_")[2] ) or 0

+			stage = math.min(stage + math.random(1, 4), crops[n][2])

+

+			minetest.set_node(pos, {name = crops[n][1] .. stage})

+

+			particle_effect(pos)

+

+			return

+

+		end

+

+	end

+

+end

+

+

+-- soil check

+local function check_soil(pos, nodename)

+

+	local dirt = minetest.find_nodes_in_area_under_air(

+		{x = pos.x - 2, y = pos.y - 1, z = pos.z - 2},

+		{x = pos.x + 2, y = pos.y + 1, z = pos.z + 2},

+		{"group:soil"})

+

+	for _,n in pairs(dirt) do

+

+		local pos2 = n

+

+		pos2.y = pos2.y + 1

+

+		if math.random(0, 5) > 3 then

+

+			minetest.swap_node(pos2,

+				{name = plants[math.random(1, #plants)]})

+		else

+

+			if nodename == "default:dirt_with_dry_grass" then

+				minetest.swap_node(pos2,

+					{name = "default:dry_grass_" .. math.random(1, 5)})

+			else

+				minetest.swap_node(pos2,

+					{name = "default:grass_" .. math.random(1, 5)})

+			end

+		end

+

+		particle_effect(pos2)

+	end

+end

+

+

+-- growing routine

+local function growth(pointed_thing)

+

+	local pos = pointed_thing.under

+	local node = minetest.get_node(pos)

+

+	-- return if nothing there

+	if node.name == "ignore" then

+		return

+	end

+

+	-- check for tree growth if pointing at sapling

+	if minetest.get_item_group(node.name, "sapling") > 0 then

+

+		check_sapling(pos, node.name)

+

+		return

+	end

+

+	-- check for crop growth

+	check_crops(pos, node.name)

+

+	-- grow grass and flowers

+	if minetest.get_item_group(node.name, "soil") > 0 then

+		check_soil(pos, node.name)

+	end

+end

+

+

+-- bonemeal item

+minetest.register_craftitem("bonemeal:bonemeal", {

+	description = "Bone Meal",

+	inventory_image = "bonemeal_item.png",

+

+	on_use = function(itemstack, user, pointed_thing)

+

+		if pointed_thing.type == "node" then

+

+			-- Check if node protected

+			if minetest.is_protected(pointed_thing.under, user:get_player_name()) then

+				return

+			end

+

+			if not minetest.setting_getbool("creative_mode") then

+				itemstack:take_item()

+			end

+

+			growth(pointed_thing)

+

+			return itemstack

+		end

+	end,

+})

+

+

+-- add support for other mods

+dofile(minetest.get_modpath("bonemeal") .. "/mods.lua")

+

+print ("[MOD] Bonemeal loaded")

diff --git a/mods.lua b/mods.lua
new file mode 100644
index 0000000..14dac4c
--- /dev/null
+++ b/mods.lua
@@ -0,0 +1,81 @@
+
+if farming and farming.mod and farming.mod == "redo" then
+
+	bonemeal:add_crop({
+		{"farming:tomato_", 8},
+		{"farming:corn_", 8},
+		{"farming:melon_", 8},
+		{"farming:pumpkin_", 8},
+		{"farming:beanpole_", 5},
+		{"farming:blueberry_", 4},
+		{"farming:raspberry_", 4},
+		{"farming:carrot_", 8},
+		{"farming:cocoa_", 3},
+		{"farming:coffee_", 5},
+		{"farming:cucumber_", 4},
+		{"farming:potato_", 4},
+		{"farming:grapes_", 8},
+		{"farming:rhubarb_", 3},
+		{"farming:barley_", 7},
+	})
+end
+
+
+if minetest.get_modpath("ethereal") then
+
+	bonemeal:add_crop({
+		{"ethereal:strawberry_", 8},
+		{"ethereal:onion_", 5},
+	})
+
+	bonemeal:add_sapling({
+		{"ethereal:palm_sapling", ethereal.grow_palm_tree, "soil"},
+		{"ethereal:palm_sapling", ethereal.grow_palm_tree, "sand"},
+		{"ethereal:yellow_tree_sapling", ethereal.grow_yellow_tree, "soil"},
+		{"ethereal:big_tree_sapling", ethereal.grow_big_tree, "soil"},
+		{"ethereal:banana_tree_sapling", ethereal.grow_banana_tree, "soil"},
+		{"ethereal:frost_tree_sapling", ethereal.grow_frost_tree, "soil"},
+		{"ethereal:mushroom_sapling", ethereal.grow_mushroom_tree, "soil"},
+		{"ethereal:willow_sapling", ethereal.grow_willow_tree, "soil"},
+		{"ethereal:redwood_sapling", ethereal.grow_redwood_tree, "soil"},
+		{"ethereal:orange_tree_sapling", ethereal.grow_orange_tree, "soil"},
+		{"ethereal:bamboo_sprout", ethereal.grow_bamboo_tree, "soil"},
+		{"ethereal:birch_sapling", ethereal.grow_birch_tree, "soil"},
+	})
+end
+
+
+if minetest.get_modpath("moretrees") then
+
+	-- special fir check for snow
+	local function fir_grow(pos)
+
+		if minetest.find_node_near(pos, 1,
+			{"default:snow", "default:snowblock", "default:dirt_with_snow"}) then
+
+			moretrees.grow_fir_snow(pos)
+		else
+			moretrees.grow_fir(pos)
+		end
+	end
+
+	bonemeal:add_sapling({
+		{"moretrees:beech_sapling", moretrees.spawn_beech_object, "soil"},
+		{"moretrees:apple_tree_sapling", moretrees.spawn_apple_tree_object, "soil"},
+		{"moretrees:oak_sapling", moretrees.spawn_oak_object, "soil"},
+		{"moretrees:sequoia_sapling", moretrees.spawn_sequoia_object, "soil"},
+		--{"moretrees:birch_sapling", moretrees.spawn_birch_object, "soil"},
+		{"moretrees:birch_sapling", moretrees.grow_birch, "soil"},
+		{"moretrees:palm_sapling", moretrees.spawn_palm_object, "soil"},
+		{"moretrees:palm_sapling", moretrees.spawn_palm_object, "sand"},
+		{"moretrees:date_palm_sapling", moretrees.spawn_date_palm_object, "soil"},
+		{"moretrees:date_palm_sapling", moretrees.spawn_date_palm_object, "sand"},
+		--{"moretrees:spruce_sapling", moretrees.spawn_spruce_object, "soil"},
+		{"moretrees:spruce_sapling", moretrees.grow_spruce, "soil"},
+		{"moretrees:cedar_sapling", moretrees.spawn_cedar_object, "soil"},
+		{"moretrees:poplar_sapling", moretrees.spawn_poplar_object, "soil"},
+		{"moretrees:willow_sapling", moretrees.spawn_willow_object, "soil"},
+		{"moretrees:rubber_tree_sapling", moretrees.spawn_rubber_tree_object, "soil"},
+		{"moretrees:fir_sapling", fir_grow, "soil"},
+	})
+end
diff --git a/textures/bonemeal_bone.png b/textures/bonemeal_bone.png
new file mode 100644
index 0000000..d86e7be
--- /dev/null
+++ b/textures/bonemeal_bone.png
diff --git a/textures/bonemeal_item.png b/textures/bonemeal_item.png
new file mode 100644
index 0000000..f141263
--- /dev/null
+++ b/textures/bonemeal_item.png
diff --git a/textures/bonemeal_particle.png b/textures/bonemeal_particle.png
new file mode 100644
index 0000000..71ef90f
--- /dev/null
+++ b/textures/bonemeal_particle.png