dfcaverns/trees/nether_cap.lua

-- internationalization boilerplate
local MP = minetest.get_modpath(minetest.get_current_modname())
local S, NS = dofile(MP.."/intllib.lua")

--stem
minetest.register_node("dfcaverns:nether_cap_stem", {
	description = S("Nether Cap Stem"),
	tiles = {"dfcaverns_nether_cap_stem.png"},
	is_ground_content = true,
	groups = {tree = 1, choppy = 2, oddly_breakable_by_hand = 1, puts_out_fire = 1, cools_lava = 1},
	sounds = default.node_sound_wood_defaults(),
})

--cap
minetest.register_node("dfcaverns:nether_cap", {
	description = S("Nether Cap"),
	tiles = {"dfcaverns_nether_cap.png"},
	is_ground_content = true,
	groups = {tree = 1, choppy = 2, oddly_breakable_by_hand = 1, puts_out_fire = 1, cools_lava = 1 },
	sounds = default.node_sound_wood_defaults(),
})

--gills
minetest.register_node("dfcaverns:nether_cap_gills", {
	description = S("Nether Cap Gills"),
	tiles = {"dfcaverns_nether_cap_gills.png"},
	is_ground_content = true,
	groups = {snappy = 3, leafdecay = 3, leaves = 1, puts_out_fire = 1, cools_lava = 1},
	sounds = default.node_sound_leaves_defaults(),
	drawtype = "plantlike",
	paramtype = "light",
	drop = {
		max_items = 1,
		items = {
			{
				items = {'dfcaverns:nether_cap_sapling'},
				rarity = 10,
			},
			{
				items = {'dfcaverns:nether_cap_gills'},
			}
		}
	},
})

-- sapling
minetest.register_node("dfcaverns:nether_cap_sapling", {
	description = S("Nether Cap Spawn"),
	drawtype = "plantlike",
	visual_scale = 1.0,
	tiles = {"dfcaverns_nether_cap_sapling.png"},
	inventory_image = "dfcaverns_nether_cap_sapling.png",
	wield_image = "dfcaverns_nether_cap_sapling.png",
	paramtype = "light",
	sunlight_propagates = true,
	walkable = false,
	selection_box = {
		type = "fixed",
		fixed = {-4 / 16, -0.5, -4 / 16, 4 / 16, 7 / 16, 4 / 16}
	},
	groups = {snappy = 2, dig_immediate = 3, 
		attached_node = 1, sapling = 1, light_sensitive_fungus = 11},
	sounds = default.node_sound_leaves_defaults(),

	on_construct = function(pos)
		minetest.get_node_timer(pos):start(math.random(
			dfcaverns.config.nether_cap_delay_multiplier*dfcaverns.config.tree_min_growth_delay,
			dfcaverns.config.nether_cap_delay_multiplier*dfcaverns.config.tree_max_growth_delay))
	end,
	
	on_timer = function(pos)
		minetest.set_node(pos, {name="air"})
		dfcaverns.spawn_nether_cap(pos)
	end,
})

local c_stem = minetest.get_content_id("dfcaverns:nether_cap_stem")
local c_cap  = minetest.get_content_id("dfcaverns:nether_cap")
local c_gills  = minetest.get_content_id("dfcaverns:nether_cap_gills")

dfcaverns.spawn_nether_cap = function(pos)
	local x, y, z = pos.x, pos.y, pos.z
	local stem_height = math.random(1,3)
	local cap_radius = math.random(2,3)
	local maxy = y + stem_height + 3
	
	local vm = minetest.get_voxel_manip()
	local minp, maxp = vm:read_from_map(
		{x = x - cap_radius, y = y, z = z - cap_radius},
		{x = x + cap_radius, y = maxy + 3, z = z + cap_radius}
	)
	local area = VoxelArea:new({MinEdge = minp, MaxEdge = maxp})
	local data = vm:get_data()

	subterrane:giant_shroom(area:indexp(pos), area, data, c_stem, c_cap, c_gills, stem_height, cap_radius)
	
	vm:set_data(data)
	vm:write_to_map()
	vm:update_map()
end

dfcaverns.spawn_nether_cap_vm = function(vi, area, data)
	local stem_height = math.random(1,3)
	local cap_radius = math.random(2,3)
	subterrane:giant_shroom(vi, area, data, c_stem, c_cap, c_gills, stem_height, cap_radius)
end

minetest.register_abm{
	label = "nether cap water freezing",
	nodenames = {"default:water_source", "default:river_water_source",},
	neighbors = {"dfcaverns:nether_cap_stem", "dfcaverns:nether_cap", "dfcaverns:nether_cap_gills"},
	interval = 1,
	chance = 5,
	catch_up = true,
	action = function(pos)
		minetest.swap_node(pos, {name="default:ice"})
	end,
}

minetest.register_abm{
	label = "nether cap flowing water freezing",
	nodenames = {"default:water_flowing",  "default:river_water_flowing"},
	neighbors = {"dfcaverns:nether_cap_stem", "dfcaverns:nether_cap", "dfcaverns:nether_cap_gills"},
	interval = 1,
	chance = 1,
	catch_up = true,
	action = function(pos)
		minetest.swap_node(pos, {name="default:snow"})
	end,
}