Add @paramat's rainforest mod for jungles

mods/default/init.lua

@@ -7,6 +7,7 @@ WATER_ALPHA = 200
 WATER_VISC = 1
 LAVA_VISC = 7
 LIGHT_MAX = 14
+SNOW_START = 24
 
 -- Definitions made by this mod that other mods can use too
 default = {}
@@ -22,6 +23,7 @@ dofile(minetest.get_modpath("default").."/growing.lua")
 dofile(minetest.get_modpath("default").."/intweak.lua")
 dofile(minetest.get_modpath("default").."/craftitems.lua")
 dofile(minetest.get_modpath("default").."/crafting.lua")
+dofile(minetest.get_modpath("default").."/jungle.lua")
 dofile(minetest.get_modpath("default").."/mapgen.lua")
 dofile(minetest.get_modpath("default").."/player.lua")
 dofile(minetest.get_modpath("default").."/armor.lua")

mods/default/jungle.lua

@@ -0,0 +1,162 @@
+-- rainforest 0.1.2 by paramat
+-- For latest stable Minetest and back to 0.4.8
+-- Depends default
+-- License: code WTFPL
+-- slightly changed for MT+
+
+-- Parameters
+
+local JUTCHA = 16
+local JUGCHA = 2
+
+-- 2D noise for snow biomes
+
+local np_snow = {
+	offset = 0,
+	scale = 1,
+	spread = {x=150, y=150, z=150},
+	seed = 112,
+	octaves = 3,
+	persist = 0.5
+}
+
+-- Stuff
+
+rainforest = {}
+
+-- Nodes
+
+--[[minetest.register_node("rainforest:vine", {
+	description = "RF Jungletree Vine",
+	drawtype = "airlike",
+	paramtype = "light",
+	sunlight_propagates = true,
+	walkable = false,
+	climbable = true,
+	pointable = false,
+	diggable = false,
+	buildable_to = true,
+	is_ground_content = false,
+	groups = {not_in_creative_inventory=1},
+})]]
+
+-- Function
+
+local function watershed_jungletree(x, y, z, area, data)
+	local c_juntree = minetest.get_content_id("default:jungletree")
+	local c_junleaf = minetest.get_content_id("default:jungleleaves")
+	--local c_vine = minetest.get_content_id("rainforest:vine")
+	local top = math.random(17,23)
+	local branch = math.floor(top * 0.6)
+	for j = -5, top do
+		if j == top or j == top - 1 or j == branch + 1 or j == branch + 2 then
+			for i = -2, 2 do -- leaves
+			for k = -2, 2 do
+				local vi = area:index(x + i, y + j, z + k)
+				if math.random(5) ~= 2 then
+					data[vi] = c_junleaf
+				end
+			end
+			end
+		elseif j <= -1 or j == top - 2 or j == branch then -- branches, roots
+			for i = -1, 1 do
+			for k = -1, 1 do
+				if math.abs(i) + math.abs(k) == 2 then
+					local vi = area:index(x + i, y + j, z + k)
+					data[vi] = c_juntree
+				end
+			end
+			end
+		end
+		if j >= 0 and j <= top - 3 then -- climbable nodes
+			for i = -1, 1 do
+			for k = -1, 1 do
+				if math.abs(i) + math.abs(k) == 1 then
+					local vi = area:index(x + i, y + j, z + k)
+					--data[vi] = c_vine
+				end
+			end
+			end
+		end
+		if j >= -1 and j <= top - 3 then -- trunk
+			local vi = area:index(x, y + j, z)
+			data[vi] = c_juntree
+		end
+	end
+end
+
+-- On generated function
+
+minetest.register_on_generated(function(minp, maxp, seed)
+	if minp.y ~= -32 then
+		return
+	end
+
+	if minp.y >= SNOW_START-5 then-- or maxp.y >= SNOW_START then
+		return
+	end
+
+	local t1 = os.clock()
+	local x1 = maxp.x
+	local y1 = maxp.y
+	local z1 = maxp.z
+	local x0 = minp.x
+	local y0 = minp.y
+	local z0 = minp.z
+	
+	print ("[rainforest] chunk minp ("..x0.." "..y0.." "..z0..")")
+	
+	local vm, emin, emax = minetest.get_mapgen_object("voxelmanip")
+	local area = VoxelArea:new{MinEdge=emin, MaxEdge=emax}
+	local data = vm:get_data()
+	
+	local c_grass = minetest.get_content_id("default:dirt_with_grass")
+	local c_jgrass = {}
+	c_jgrass[1] = minetest.get_content_id("default:junglegrass")
+	c_jgrass[2] = minetest.get_content_id("default:junglegrass_small")
+	local c_tree = minetest.get_content_id("default:tree")
+	local c_leaves = minetest.get_content_id("default:leaves")
+	local c_apple = minetest.get_content_id("default:apple")
+	local c_air = minetest.get_content_id("air")
+	
+	local sidelen = x1 - x0 + 1
+	local chulens = {x=sidelen, y=sidelen, z=sidelen}
+	local minposxz = {x=x0, y=z0}
+	
+	local nvals_snow = minetest.get_perlin_map(np_snow, chulens):get2dMap_flat(minposxz)
+	
+	local nixz = 1 -- 2D noise index
+	for z = z0, z1 do
+	for x = x0, x1 do
+		if nvals_snow[nixz] < -0.5 then -- if away from snow biomes
+			local spawny = false
+			for y = y1, 1, -1 do -- find surface and erase appletrees
+				local vi = area:index(x, y, z)
+				local c_node = data[vi]
+				if c_node == c_grass then -- if surface is dirt_with_grass
+					spawny = y + 1
+					break
+				elseif c_node == c_tree -- if appletree
+				or c_node == c_leaves
+				or c_node == c_apple then
+					data[vi] = c_air -- erase
+				end
+			end
+			if spawny and math.random(JUTCHA) == 2 then
+				watershed_jungletree(x, spawny, z, area, data)
+			elseif spawny and math.random(JUGCHA) == 2 then
+				local visp = area:index(x, spawny, z)
+				data[visp] = c_jgrass[math.random(1,2)]
+			end
+		end
+		nixz = nixz + 1 -- increment 2D noise index
+	end
+	end
+	
+	vm:set_data(data)
+	vm:set_lighting({day=0, night=0})
+	vm:calc_lighting()
+	vm:write_to_map(data)
+	local chugent = math.ceil((os.clock() - t1) * 1000)
+	print ("[rainforest] "..chugent.." ms")
+end)

mods/default/mapgen.lua

@@ -350,8 +350,6 @@ local air = minetest.get_content_id("air")
 local j1= minetest.get_content_id("default:jungletree")
 local j2 = minetest.get_content_id("default:jungleleaves")
 
-local SNOW_START = 24
-
 local function make_snow(min,max,data,va,rnd)
 	local cnt = max.x-min.x
 	for yi=0, cnt do

mods/default/plants.lua

@@ -138,6 +138,32 @@ minetest.register_node("default:junglegrass", {
 	},
 })
 
+minetest.register_node("default:junglegrass_small", {
+	description = "Jungle Grass",
+	drawtype = "plantlike",
+	visual_scale = 1,
+	tiles = {"default_junglegrass_small.png"},
+	inventory_image = "default_junglegrass.png",
+	wield_image = "default_junglegrass.png",
+	paramtype = "light",
+	walkable = false,
+	buildable_to = true,
+	waving = 1,
+	is_ground_content = true,
+	drop = {
+		max_items = 1,
+		items = {
+			{items = {'default:seed_cotton'},rarity = 15},
+		}
+	},
+	groups = {snappy=3,flammable=2,flora=1,attached_node=1,dig_immediate=3},
+	sounds = default.node_sound_leaves_defaults(),
+	selection_box = {
+		type = "fixed",
+		fixed = {-0.5, -0.5, -0.5, 0.5, -5/16, 0.5},
+	},
+})
+
 
 minetest.register_node("default:dry_shrub", {
 	description = "Dry Shrub",