Merge pull request 'mapgen mod compatibility' (#409) from FaceDeer/MineClone5:mapgen_mod_compatibility into master

Reviewed-on: MineClone5/MineClone5#409

mods/CORE/mcl_mapgen/init.lua

@@ -394,7 +394,17 @@ minetest.register_on_generated(function(minp, maxp, chunkseed)
 	end
 end)
 
-minetest.register_on_generated = mcl_mapgen.register_chunk_generator
+local register_on_generated_old = minetest.register_on_generated
+minetest.register_on_generated = function(...)
+	minetest.log("warning", "minetest.register_on_generated() is being called by the mod '"
+		.. minetest.get_current_modname() .. "'. MineClone5's map generation system avoids using "
+		.. "this callback to work around engine map generation issues. If possible please read "
+		.. "mods/CORE/mcl_mapgen/API.md and update " .. minetest.get_current_modname()
+		.. " to use the method described from there. MineClone5 makes no promises that "
+		.. "mapgen mods will be fully compatible with it, please test your server and use at "
+		.. "your own risk.")
+	return register_on_generated_old(...)
+end
 
 function mcl_mapgen.get_far_node(p)
 	local p = p
@@ -440,6 +450,21 @@ function mcl_mapgen.get_chunk_number(pos) -- unsigned int
 		 c.x + k_positive
 end
 
+-- Components of this game should register functions here to update their internal
+-- state when external mods modify mapgen settings that they care about.
+local settings_changed_callbacks = {}
+function mcl_mapgen.register_on_settings_changed(callback)
+	table.insert(settings_changed_callbacks, callback)
+end
+
+-- this is to be called by external mods after modifying these settings
+-- to notify Mineclone that it needs to update local copies and whatever's based on them. 
+function mcl_mapgen.on_settings_changed()
+	for _, callback in pairs(settings_changed_callbacks) do
+		callback()
+	end
+end
+
 mcl_mapgen.minecraft_height_limit = 256
 
 mcl_mapgen.bedrock_is_rough = normal

mods/CORE/mcl_worlds/init.lua

@@ -2,11 +2,18 @@ mcl_worlds = {}
 
 local get_connected_players = minetest.get_connected_players
 
+local min1, min2, min3
+local max1, max2, max3
+local get_local_settings = function()
+	min1, min2, min3 = mcl_mapgen.overworld.min, mcl_mapgen.end_.min, mcl_mapgen.nether.min
+	max1, max2, max3 = mcl_mapgen.overworld.max, mcl_mapgen.end_.max, mcl_mapgen.nether.max+128
+end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
+
 -- For a given position, returns a 2-tuple:
 -- 1st return value: true if pos is in void
 -- 2nd return value: true if it is in the deadly part of the void
-local min1, min2, min3 = mcl_mapgen.overworld.min, mcl_mapgen.end_.min, mcl_mapgen.nether.min
-local max1, max2, max3 = mcl_mapgen.overworld.max, mcl_mapgen.end_.max, mcl_mapgen.nether.max+128
 function mcl_worlds.is_in_void(pos)
 	local y = pos.y
 	local void = not ((y < max1 and y > min1) or (y < max2 and y > min2) or (y < max3 and y > min3))

mods/ENTITIES/mcl_mobs/api/api.lua

@@ -417,7 +417,7 @@ function mobs:register_mob(name, def)
 
 		--on_breed = def.on_breed,
 
-		--on_grown = def.on_grown,
+		on_grown = def.on_grown,
 
 		--on_detach_child = mob_detach_child,
 

mods/ENTITIES/mcl_mobs/api/mob_functions/breeding.lua

@@ -146,11 +146,12 @@ end
 
 --make the baby grow up
 mobs.baby_grow_up = function(self)
-    self.baby = nil
-    self.visual_size  = self.backup_visual_size
-    self.collisionbox = self.backup_collisionbox
-    self.selectionbox = self.backup_selectionbox
-    self.object:set_properties(self)
+	self.baby = nil
+	self.visual_size  = self.backup_visual_size
+	self.collisionbox = self.backup_collisionbox
+	self.selectionbox = self.backup_selectionbox
+	self.object:set_properties(self)
+	if self.on_grown then self.on_grown(self) end
 end
 
 --makes the baby grow up faster with diminishing returns

mods/ENTITIES/mcl_mobs/api/mob_functions/head_logic.lua

@@ -1,5 +1,6 @@
 local math = math
 local vector = vector
+local debug_head =  minetest.settings:get_bool("mcl_debug_head_code", false) 
 
 --converts yaw to degrees
 local degrees = function(yaw)
@@ -7,7 +8,7 @@ local degrees = function(yaw)
 end
 
 mobs.do_head_logic = function(self, dtime, player)
-
+	if not self.has_head == true then return end
 	local player = player or minetest.get_player_by_name("singleplayer")
 
 	local look_at = player:get_pos()
@@ -25,15 +26,16 @@ mobs.do_head_logic = function(self, dtime, player)
 
 	pos = vector.add(pos, head_offset)
 
-	minetest.add_particle({
-		pos = pos,
-		velocity = {x=0, y=0, z=0},
-		acceleration = {x=0, y=0, z=0},
-		expirationtime = 0.2,
-		size = 1,
-		texture = "default_dirt.png",
-	})
-
+	if debug_head then
+		minetest.add_particle({
+			pos = pos,
+			velocity = {x=0, y=0, z=0},
+			acceleration = {x=0, y=0, z=0},
+			expirationtime = 0.2,
+			size = 1,
+			texture = "default_dirt.png",
+		})
+	end
 	local bone_pos = vector.new(0,0,0)
 
 	--(horizontal)
@@ -106,4 +108,4 @@ mobs.do_head_logic = function(self, dtime, player)
 		end
 	end
 	--set_bone_position([bone, position, rotation])
-end
+end

mods/ENTITIES/mobs_mc/sheep.lua

@@ -82,16 +82,16 @@ mobs:register_mob("mobs_mc:sheep", {
 
 	--head code
 	has_head = true,
-	head_bone = {"hea1", "hea2",},
+	head_bone = "head",
 
 	swap_y_with_x = false,
 	reverse_head_yaw = false,
 
-	head_bone_pos_y = 3.6,
-	head_bone_pos_z = -0.6,
+	head_bone_pos_y = 0,
+	head_bone_pos_z = 0,
 
-	head_height_offset = 1.0525,
-	head_direction_offset = 0.5,
+	head_height_offset = 1.2,
+	head_direction_offset = 0,
 	head_pitch_modifier = 0,
 	--end head code
 
@@ -117,7 +117,7 @@ mobs:register_mob("mobs_mc:sheep", {
 	},
 	animation = {
 		speed_normal = 25,	run_speed = 65,
-		stand_start = 40,	stand_end = 80,
+		stand_start = 0,	stand_end = 0,
 		walk_start = 0,		walk_end = 40,
 		run_start = 0,		run_end = 40,
 	},
@@ -330,6 +330,24 @@ mobs:register_mob("mobs_mc:sheep", {
 			return false
 		end
 	end,
+	on_spawn = function(self)
+		if self.baby then
+			self.animation = table.copy(self.animation)
+			self.animation.stand_start = 81
+			self.animation.stand_end = 81
+			self.animation.walk_start = 81
+			self.animation.walk_end = 121
+			self.animation.run_start = 81
+			self.animation.run_end = 121
+		end
+		return true
+	end,
+	on_grown = function(self)
+		self.animation = nil
+		local anim = self.current_animation
+		self.current_animation = nil -- Mobs Redo does nothing otherwise
+		mobs.set_mob_animation(self, anim)
+	end
 })
 mobs:spawn_specific(
 "mobs_mc:sheep",

mods/ENTITIES/mobs_mc_gameconfig/init.lua

@@ -229,19 +229,23 @@ mobs_mc.override.spawn = {
 }
 
 -- This table contains important spawn height references for the mob spawn height.
-mobs_mc.override.spawn_height = {
-	water = tonumber(minetest.settings:get("water_level")) or 0, -- Water level in the Overworld
-
-	-- Overworld boundaries (inclusive)
-	overworld_min = mcl_mapgen.overworld.min,
-	overworld_max = mcl_mapgen.overworld.max,
-
-	-- Nether boundaries (inclusive)
-	nether_min = mcl_mapgen.nether.min,
-	nether_max = mcl_mapgen.nether.max,
-
-	-- End boundaries (inclusive)
-	end_min = mcl_mapgen.end_.min,
-	end_max = mcl_mapgen.end_.max,
-}
+local get_local_settings = function()
+	mobs_mc.override.spawn_height = {
+		water = tonumber(minetest.settings:get("water_level")) or 0, -- Water level in the Overworld
+	
+		-- Overworld boundaries (inclusive)
+		overworld_min = mcl_mapgen.overworld.min,
+		overworld_max = mcl_mapgen.overworld.max,
+	
+		-- Nether boundaries (inclusive)
+		nether_min = mcl_mapgen.nether.min,
+		nether_max = mcl_mapgen.nether.max,
+	
+		-- End boundaries (inclusive)
+		end_min = mcl_mapgen.end_.min,
+		end_max = mcl_mapgen.end_.max,
+	}
+end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 

mods/HUD/mcl_achievements/init.lua

@@ -234,6 +234,20 @@ awards.register_achievement("mcl:fishyBusiness", {
 	icon = "mcl_fishing_fishing_rod.png",
 })
 
+--Triggered in mcl_beacons
+awards.register_achievement("mcl:beacon", {
+	title = S("Bring Home the Beacon"),
+	description = S("Use a beacon."),
+	icon = "beacon_achievement_icon.png",
+})
+
+awards.register_achievement("mcl:maxed_beacon", {
+	title = S("Beaconator"),
+	description = S("Use a fully powered beacon."),
+	icon = "beacon_achievement_icon.png",
+})
+
+
 -- Armor Advancements
 --[[awards.register_achievement("mcl:suitUp", {
 	title = S("Suit Up"),

mods/HUD/mcl_achievements/locale/mcl_achievements.de.tr

@@ -47,3 +47,7 @@ Use a crafting table to craft a wooden hoe from wooden planks and sticks.=Benutz
 Use a crafting table to craft a wooden pickaxe from wooden planks and sticks.=Benutzen Sie eine Werkbank, um eine Holzspitzhacke aus Holzplanken und Stöcken zu fertigen.
 Use obsidian and a fire starter to construct a Nether portal.=Benutzen Sie Obsidian und ein Feuerzeug, um ein Netherportal zu errichten.
 Use wheat to craft a bread.=Benutzen Sie Weizen, um ein Brot zu machen.
+Bring Home the Beacon=Den Nachbarn heimleuchten
+Use a beacon.=Benutzen Sie ein Leuchtfeuer.
+Beaconator=Leuchtturmwärter
+Use a fully powered beacon.=Benutzen Sie ein vollständiges Leuchtfeuer.

mods/HUD/mcl_achievements/locale/template.txt

@@ -75,3 +75,7 @@ What A Deal!=
 Successfully trade with a Villager.=
 Tactical Fishing=
 Catch a fish... without a fishing rod=
+Bring Home the Beacon=
+Use a beacon.=
+Beaconator=
+Use a fully powered beacon.=

mods/HUD/mcl_info/init.lua

@@ -12,9 +12,17 @@ local floor                 = math.floor
 local minetest_get_gametime = minetest.get_gametime
 local get_voxel_manip       = minetest.get_voxel_manip
 
-local min1, min2, min3 = mcl_mapgen.overworld.min, mcl_mapgen.end_.min, mcl_mapgen.nether.min
-local max1, max2, max3 = mcl_mapgen.overworld.max, mcl_mapgen.end_.max, mcl_mapgen.nether.max + 128
-local CS = mcl_mapgen.CS_NODES
+local min1, min2, min3
+local max1, max2, max3
+local CS
+
+local get_local_settings = function()
+	min1, min2, min3 = mcl_mapgen.overworld.min, mcl_mapgen.end_.min, mcl_mapgen.nether.min
+	max1, max2, max3 = mcl_mapgen.overworld.max, mcl_mapgen.end_.max, mcl_mapgen.nether.max+128
+	CS = mcl_mapgen.CS_NODES
+end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 
 local modname = minetest.get_current_modname()
 local modpath = minetest.get_modpath(modname)

mods/HUD/mcl_inventory/creative.lua

@@ -34,7 +34,7 @@ minetest.register_on_mods_loaded(function()
 	for name,def in pairs(minetest.registered_items) do
 		if (not def.groups.not_in_creative_inventory or def.groups.not_in_creative_inventory == 0) and def.description and def.description ~= "" then
 			local function is_redstone(def)
-				return def.mesecons or def.groups.mesecon or def.groups.mesecon_conductor_craftable or def.groups.mesecon_effecor_off
+				return def.mesecons or def.groups.mesecon or def.groups.mesecon_conductor_craftable or def.groups.mesecon_effector_off
 			end
 			local function is_tool(def)
 				return def.groups.tool or (def.tool_capabilities and def.tool_capabilities.damage_groups == nil)

mods/ITEMS/mcl_beacons/init.lua

@@ -0,0 +1,402 @@
+local S = minetest.get_translator(minetest.get_current_modname())
+--[[
+there are strings in meta, which are being used to see which effect will be given to the player(s)
+Valid strings:
+	swiftness
+	leaping
+	strenght
+	regeneration
+]]--
+
+mcl_beacons = {
+	blocks ={"mcl_core:diamondblock","mcl_core:ironblock","mcl_core:goldblock","mcl_core:emeraldblock","mcl_nether:netheriteblock"},
+	fuel = {"mcl_core:diamond","mcl_core:emerald","mcl_core:iron_ingot","mcl_core:gold_ingot","mcl_nether:netherite_ingot"}
+}
+local beacon_blocklist = mcl_beacons.blocks
+local beacon_fuellist = mcl_beacons.fuel
+
+local pallete_order = {
+	glass_cyan		 		= 1,
+	pane_cyan_flat			= 1,
+	pane_cyan				= 1,
+
+	glass_white		 		= 2,
+	pane_white_flat			= 2,
+	pane_white				= 2,
+
+	glass_brown				= 3,
+	pane_brown_flat			= 3,
+	pane_brown				= 3,
+
+	glass_blue				= 4,
+	pane_blue_flat			= 4,
+	pane_blue				= 4,
+
+	glass_light_blue		= 5,
+	pane_light_blue_flat	= 5,
+	pane_light_blue			= 5,
+
+	glass_pink				= 6,
+	pane_pink_flat			= 6,
+	pane_pink				= 6,
+
+	glass_purple			= 7,
+	pane_purple_flat		= 7,
+	pane_purple		 		= 7,
+
+	glass_red				= 8,
+	pane_red_flat			= 8,
+	pane_red				= 8,
+
+	glass_silver			= 9,
+	pane_silver_flat		= 9,
+	pane_silver				= 9,
+
+	glass_gray		 		= 10,
+	pane_gray_flat	 		= 10,
+	pane_gray		   		= 10,
+
+	glass_lime		  		= 11,
+	pane_lime_flat	  		= 11,
+	pane_lime		   		= 11,
+
+	glass_green		 		= 12,
+	pane_green_flat	 		= 12,
+	pane_green		  		= 12,
+
+	glass_orange			= 13,
+	pane_orange_flat		= 13,
+	pane_orange		 		= 13,
+
+	glass_yellow			= 14,
+	pane_yellow_flat		= 14,
+	pane_yellow		 		= 14,
+
+	glass_black		 		= 15,
+	pane_black_flat	 		= 15,
+	pane_black		  		= 15,
+
+	glass_magenta	   		= 16,
+	pane_magenta_flat   	= 16,
+	pane_magenta			= 16
+}
+
+local function get_beacon_beam(glass_nodename)
+	if glass_nodename == "air" then return 0 end
+	local glass_string = glass_nodename:split(':')[2]
+	if not pallete_order[glass_string] then return 0 end
+	return pallete_order[glass_string]
+end
+
+minetest.register_node("mcl_beacons:beacon_beam", {
+	tiles = {"^[colorize:#b8bab9"},
+	drawtype = "nodebox",
+	node_box = {
+		type = "fixed",
+		fixed = {
+			{-0.1250, -0.5000, -0.1250, 0.1250, 0.5000, 0.1250}
+		}
+	},
+	pointable= false,
+	light_source = 14,
+	walkable = false,
+	groups = {not_in_creative_inventory=1},
+	_mcl_blast_resistance = 1200,
+	paramtype2 = "color",
+	palette = "beacon_beam_palette.png",
+	palette_index = 0,
+	buildable_to = true,
+})
+
+mesecon.register_mvps_stopper("mcl_beacons:beacon_beam")
+
+local formspec_string=
+	"size[11,14]"..
+
+	"label[4.5,0.5;"..minetest.formspec_escape(S("Beacon:")).."]"..
+	"label[0.5,1;"..minetest.formspec_escape(S("Primary Power:")).."]"..
+	"label[0.5,8.25;"..minetest.formspec_escape( S("Inventory:")).."]"..
+
+	"image[1,1.5;1,1;custom_beacom_symbol_4.png]"..
+	"image[1,3;1,1;custom_beacom_symbol_3.png]"..
+	"image[1,4.5;1,1;custom_beacom_symbol_2.png]"..
+	"image[1,6;1,1;custom_beacom_symbol_1.png]"..
+
+	"image_button[5.2,1.5;1,1;mcl_potions_effect_swift.png;swiftness;]"..
+	"image_button[5.2,3;1,1;mcl_potions_effect_leaping.png;leaping;]"..
+	"image_button[5.2,4.5;1,1;mcl_potions_effect_strong.png;strenght;]"..
+	"image_button[5.2,6;1,1;mcl_potions_effect_regenerating.png;regeneration;]"..
+
+	"item_image[1,7;1,1;mcl_core:diamond]"..
+	"item_image[2.2,7;1,1;mcl_core:emerald]"..
+	"item_image[3.4,7;1,1;mcl_core:iron_ingot]"..
+	"item_image[4.6,7;1,1;mcl_core:gold_ingot]"..
+	"item_image[5.8,7;1,1;mcl_nether:netherite_ingot]"..
+
+	mcl_formspec.get_itemslot_bg(7.2,7,1,1)..
+	"list[context;input;7.2,7;1,1;]"..
+	mcl_formspec.get_itemslot_bg(1,9,9,3)..
+	"list[current_player;main;1,9;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(1,12.5,9,1)..
+	"list[current_player;main;1,12.5;9,1;]"
+
+local function remove_beacon_beam(pos)
+	for y=pos.y, pos.y+301 do
+		local node = minetest.get_node({x=pos.x,y=y,z=pos.z})
+		if node.name ~= "air" and node.name ~= "mcl_core:bedrock" and node.name ~= "mcl_core:void" then
+			if node.name == "ignore" then
+				minetest.get_voxel_manip():read_from_map({x=pos.x,y=y,z=pos.z}, {x=pos.x,y=y,z=pos.z})
+				node = minetest.get_node({x=pos.x,y=y,z=pos.z})
+			end
+			
+			if node.name == "mcl_beacons:beacon_beam" then
+				minetest.remove_node({x=pos.x,y=y,z=pos.z})
+			end
+		end
+	end
+end
+
+local function beacon_blockcheck(pos)
+	for y_offset = 1,4 do
+		local block_y = pos.y - y_offset
+		for block_x = (pos.x-y_offset),(pos.x+y_offset) do
+			for block_z = (pos.z-y_offset),(pos.z+y_offset) do
+				local valid_block = false --boolean which stores if block is valid or not
+				for _, beacon_block in pairs(beacon_blocklist) do
+					if beacon_block == minetest.get_node({x=block_x,y=block_y,z=block_z}).name and not valid_block then --is the block in the pyramid a valid beacon block
+						valid_block =true
+					end
+				end
+				if not valid_block then
+					return y_offset -1 --the last layer is complete, this one is missing or incomplete
+				end
+			end
+		end
+		if y_offset == 4 then --all checks are done, beacon is maxed
+			return y_offset
+		end
+	end
+end
+
+local function effect_player(effect,pos,power_level, effect_level,player)
+	local distance =  vector.distance(player:get_pos(), pos)
+	if distance > (power_level+1)*10 then return end
+	if effect == "swiftness" then
+		mcl_potions.swiftness_func(player,effect_level,16)
+	elseif effect == "leaping" then
+		mcl_potions.leaping_func(player, effect_level, 16)
+	elseif effect == "strenght" then
+		mcl_potions.strength_func(player, effect_level, 16)
+	elseif effect == "regeneration" then
+		mcl_potions.regeneration_func(player, effect_level, 16)
+	end
+end
+
+local function globalstep_function(pos,player)
+	local meta = minetest.get_meta(pos) 
+	local power_level = beacon_blockcheck(pos)
+	local effect_string =  meta:get_string("effect") 
+	if meta:get_int("effect_level") == 2 and power_level < 4 then
+		return
+	else
+		local obstructed = false
+		for y=pos.y+1, pos.y+100 do
+
+			local nodename = minetest.get_node({x=pos.x,y=y, z = pos.z}).name
+			if nodename ~= "mcl_core:bedrock" and nodename ~= "air" and nodename ~= "mcl_core:void" and nodename ~= "ignore" then --ignore means not loaded, let's just assume that's air
+				if nodename ~="mcl_beacons:beacon_beam" then
+					if minetest.get_item_group(nodename,"glass") == 0 and minetest.get_item_group(nodename,"material_glass") == 0  then
+						obstructed = true
+						remove_beacon_beam(pos)
+						return
+					end
+				end
+			end
+		end
+		if obstructed then
+			return
+		end
+		effect_player(effect_string,pos,power_level,meta:get_int("effect_level"),player)
+	end
+end
+
+minetest.register_node("mcl_beacons:beacon", {
+	description = S"Beacon",
+	drawtype = "mesh",
+	collisionbox = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5},
+	mesh = "mcl_beacon.b3d",
+	tiles = {"beacon_UV.png"},
+	use_texture_alpha = "clip",
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		local inv = meta:get_inventory()
+		inv:set_size("input", 1)
+		local form = formspec_string
+		meta:set_string("formspec", form)
+	end,
+	on_destruct = function(pos)
+		local meta = minetest.get_meta(pos)
+		local input = meta:get_inventory():get_stack("input",1)
+		if not input:is_empty() then
+			local p = {x=pos.x+math.random(0, 10)/10-0.5, y=pos.y, z=pos.z+math.random(0, 10)/10-0.5} --from mcl_anvils
+			minetest.add_item(p, input)
+		end
+		remove_beacon_beam(pos)
+	end,
+	on_receive_fields = function(pos, formname, fields, sender)
+		if fields.swiftness or fields.regeneration or fields.leaping or fields.strenght then
+			local sender_name = sender:get_player_name()
+			local power_level = beacon_blockcheck(pos)
+			if minetest.is_protected(pos, sender_name) then
+				minetest.record_protection_violation(pos, sender_name)
+				return
+			elseif power_level == 0 then
+				return
+			end
+
+			local meta = minetest.get_meta(pos)
+			local inv = meta:get_inventory()
+			local input = inv:get_stack("input",1)
+		
+			if input:is_empty() then
+				return
+			end
+
+			local valid_item = false
+
+			for _, item in ipairs(beacon_fuellist) do
+				if input:get_name() == item then
+					valid_item = true
+				end
+			end
+
+			if not valid_item then
+				return
+			end
+
+			local successful = false
+			if fields.swiftness then
+				if power_level == 4 then
+					minetest.get_meta(pos):set_int("effect_level",2)
+				else
+					minetest.get_meta(pos):set_int("effect_level",1)
+				end
+				minetest.get_meta(pos):set_string("effect","swiftness")
+				successful = true
+			elseif fields.leaping and power_level >= 2 then
+				if power_level == 4 then
+					minetest.get_meta(pos):set_int("effect_level",2)
+				else
+					minetest.get_meta(pos):set_int("effect_level",1)
+				end
+				minetest.get_meta(pos):set_string("effect","leaping")
+				successful = true
+			elseif fields.strenght and power_level >= 3 then
+				if power_level == 4 then
+					minetest.get_meta(pos):set_int("effect_level",2)
+				else
+					minetest.get_meta(pos):set_int("effect_level",1)
+				end
+				minetest.get_meta(pos):set_string("effect","strenght")
+				successful = true
+			elseif fields.regeneration and power_level == 4 then
+				minetest.get_meta(pos):set_int("effect_level",2)
+				minetest.get_meta(pos):set_string("effect","regeneration")
+				successful = true
+			end
+			if successful then
+				if power_level == 4 then
+					awards.unlock(sender:get_player_name(),"mcl:maxed_beacon")
+				end
+				awards.unlock(sender:get_player_name(),"mcl:beacon")
+				input:take_item()
+				inv:set_stack("input",1,input)
+				
+				local beam_palette_index = 0
+				remove_beacon_beam(pos)
+				for y = pos.y +1, pos.y + 201 do
+					local node = minetest.get_node({x=pos.x,y=y,z=pos.z})
+					if node.name == ignore then
+						minetest.get_voxel_manip():read_from_map({x=pos.x,y=y,z=pos.z}, {x=pos.x,y=y,z=pos.z})
+						node = minetest.get_node({x=pos.x,y=y,z=pos.z})
+					end
+					
+
+					if  minetest.get_item_group(node.name, "glass") ~= 0 or minetest.get_item_group(node.name,"material_glass") ~= 0 then
+						beam_palette_index = get_beacon_beam(node.name)
+					end
+
+					if node.name == "air" then
+						minetest.set_node({x=pos.x,y=y,z=pos.z},{name="mcl_beacons:beacon_beam",param2=beam_palette_index})
+					end
+				end
+				globalstep_function(pos,sender)--call it once outside the globalstep so the player gets the effect right after selecting it
+			end
+		end
+	end,
+	light_source = 14,
+	groups = {handy=1},
+	drop = "mcl_beacons:beacon",
+	sounds = mcl_sounds.node_sound_glass_defaults(),
+	_mcl_hardness = 3,
+})
+
+mesecon.register_mvps_stopper("mcl_beacons:beacon")
+mcl_wip.register_wip_item("mcl_beacons:beacon")
+
+function register_beaconblock (itemstring)--API function for other mods
+	table.insert(beacon_blocklist, itemstring)
+end
+
+function register_beaconfuel(itemstring)
+	table.insert(beacon_fuellist, itemstring)
+end
+
+local timer = 0
+
+minetest.register_globalstep(function(dtime)
+	timer = timer + dtime
+	if timer >= 3  then
+		for _, player in ipairs(minetest.get_connected_players()) do
+			local player_pos = player:get_pos()
+			local pos_list = minetest.find_nodes_in_area({x=player_pos.x-50, y=player_pos.y-50, z=player_pos.z-50}, {x=player_pos.x+50, y=player_pos.y+50, z=player_pos.z+50},"mcl_beacons:beacon")
+			for _, pos in ipairs(pos_list) do
+				globalstep_function(pos,player)
+			end
+		end
+		timer = 0
+	end
+end)
+
+
+minetest.register_abm{
+	label="update beacon beam",
+	nodenames = {"mcl_beacons:beacon_beam"},
+	interval = 1,
+	chance = 1,
+	action = function(pos)
+		local node_below = minetest.get_node({x=pos.x,y=pos.y-1,z=pos.z})
+		local node_above = minetest.get_node({x=pos.x,y=pos.y+1,z=pos.z})
+		local node_current = minetest.get_node(pos)
+
+		if node_below.name == "air" then
+			if minetest.get_node({x=pos.x,y=pos.y-2,z=pos.z}).name == "mcl_beacons:beacon" then
+				minetest.set_node({x=pos.x,y=pos.y-1,z=pos.z},{name="mcl_beacons:beacon_beam",param2=0})
+			end
+			remove_beacon_beam(pos)
+		elseif node_above.name == "air" or (node_above.name == "mcl_beacons:beacon_beam" and node_above.param2 ~= node_current.param2) then
+			minetest.set_node({x=pos.x,y=pos.y+1,z=pos.z},{name="mcl_beacons:beacon_beam",param2=node_current.param2})
+		elseif minetest.get_item_group(node_above.name, "glass") ~= 0 or minetest.get_item_group(node_above.name,"material_glass") ~= 0 then
+			minetest.set_node({x=pos.x,y=pos.y+2,z=pos.z},{name="mcl_beacons:beacon_beam",param2=get_beacon_beam(node_above.name)})
+		end
+	end,
+}
+
+minetest.register_craft({
+	output = "mcl_beacons:beacon",
+	recipe = { 
+		{"mcl_core:glass", "mcl_core:glass", "mcl_core:glass"},
+		{"mcl_core:glass", "mcl_mobitems:nether_star", "mcl_core:glass"},
+		{"mcl_core:obsidian", "mcl_core:obsidian", "mcl_core:obsidian"}
+	}
+})

mods/ITEMS/mcl_beacons/locale/mcl_beacons.de.tr

@@ -0,0 +1,5 @@
+# textdomain: mcl_beacons
+Beacon=Leuchtfeuer
+Beacon:=Leuchtfeuer:
+Primary Power:=Primäre Kraft:
+Inventory:=Inventar:

mods/ITEMS/mcl_beacons/locale/template.txt

@@ -0,0 +1,5 @@
+# textdomain: mcl_beacons
+Beacon=
+Beacon:=
+Primary Power:=
+Inventory:=

mods/ITEMS/mcl_beacons/mod.conf

@@ -0,0 +1,2 @@
+author=chmodsayshello
+depends=mcl_formspec, mcl_init, mcl_wip, mesecons_mvps, mcl_core, mcl_sounds, awards, mcl_achievements, mcl_mobitems, mcl_nether

mods/ITEMS/mcl_blackstone/init.lua

@@ -251,7 +251,7 @@ mcl_stairs.register_stair_and_slab_simple("blackstone", "mcl_blackstone:blacksto
 mcl_stairs.register_stair_and_slab_simple("blackstone_polished", "mcl_blackstone:blackstone_polished", S("Polished Blackstone Stair"), S("Polished Blackstone Slab"), S("Polished Double Blackstone Slab"))
 
 
-mcl_stairs.register_stair_and_slab_simple("blackstone_chiseled_polished", "mcl_blackstone:blackstone_chiseled_polished", S("Polished Chiseled Blackstone Stair"), S("Chiseled Polished Blackstone Slab"), S("Double Polished Chiseled Blackstone Slab"))
+mcl_stairs.register_stair_and_slab_simple("blackstone_chiseled_polished", "mcl_blackstone:blackstone_chiseled_polished", S("Chiseled Polished Blackstone Stair"), S("Chiseled Polished Blackstone Slab"), S("Double Polished Chiseled Blackstone Slab"))
 
 
 mcl_stairs.register_stair_and_slab_simple("blackstone_brick_polished", "mcl_blackstone:blackstone_brick_polished", S("Polished Blackstone Brick Stair"), S("Polished Blackstone Brick Slab"), S("Double Polished Blackstone Brick Slab"))

mods/ITEMS/mcl_blast_furnace/init.lua

@@ -510,8 +510,8 @@ minetest.register_craft({
 	}
 })
 
-minetest.register_alias("mcl_blast_furnace:blast_furnace", "mcl_furnaces:blast_furnace")
-minetest.register_alias("mcl_blast_furnace:blast_furnace_active", "mcl_furnaces:blast_furnace_active")
+minetest.register_alias("mcl_furnaces:blast_furnace", "mcl_blast_furnace:blast_furnace")
+minetest.register_alias("mcl_furnaces:blast_furnace_active", "mcl_blast_furnace:blast_furnace_active")
 
 -- Add entry alias for the Help
 if minetest.get_modpath("doc") then

mods/ITEMS/mcl_farming/potatoes.lua

@@ -91,7 +91,7 @@ minetest.register_craftitem("mcl_farming:potato_item", {
 	_doc_items_longdesc = S("Potatoes are food items which can be eaten, cooked in the furnace and planted. Pigs like potatoes."),
 	_doc_items_usagehelp = S("Hold it in your hand and rightclick to eat it. Place it on top of farmland to plant it. It grows in sunlight and grows faster on hydrated farmland. Rightclick an animal to feed it."),
 	inventory_image = "farming_potato.png",
-	groups = { food = 2, eatable = 1, compostability=65 },
+	groups = { food = 2, eatable = 1, compostability=65, smoker_cookable=1 },
 	_mcl_saturation = 0.6,
 	stack_max = 64,
 	on_secondary_use = minetest.item_eat(1),

mods/ITEMS/mcl_portals/portal_nether.lua

@@ -27,8 +27,34 @@ local DELAY				= 3 -- seconds before teleporting in Nether portal in Survival mo
 local DISTANCE_MAX			= 128
 local PORTAL				= "mcl_portals:portal"
 local OBSIDIAN				= "mcl_core:obsidian"
-local O_Y_MIN, O_Y_MAX			= max(mcl_mapgen.overworld.min, -31), min(mcl_mapgen.overworld.max, 2048)
-local N_Y_MIN, N_Y_MAX			= mcl_mapgen.nether.bedrock_bottom_min, mcl_mapgen.nether.bedrock_top_min - H_MIN
+local O_Y_MIN, O_Y_MAX
+local N_Y_MIN, N_Y_MAX
+
+local overworld_lava_max
+local nether_lava_max
+local overworld_min
+local limits
+
+local get_local_settings = function()
+	O_Y_MIN, O_Y_MAX			= max(mcl_mapgen.overworld.min, -31), min(mcl_mapgen.overworld.max, 2048)
+	N_Y_MIN, N_Y_MAX			= mcl_mapgen.nether.bedrock_bottom_min, mcl_mapgen.nether.bedrock_top_min - H_MIN
+	overworld_min				= mcl_mapgen.overworld.min
+	overworld_lava_max			= mcl_mapgen.overworld.lava_max
+	nether_lava_max				= mcl_mapgen.nether.lava_max
+	
+	limits = {
+		nether = {
+			pmin = {x=LIM_MIN, y = N_Y_MIN, z = LIM_MIN},
+			pmax = {x=LIM_MAX, y = N_Y_MAX, z = LIM_MAX},
+		},
+		overworld = {
+			pmin = {x=LIM_MIN, y = O_Y_MIN, z = LIM_MIN},
+			pmax = {x=LIM_MAX, y = O_Y_MAX, z = LIM_MAX},
+		},
+	}
+end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 
 -- Alpha and particles
 local node_particles_allowed = minetest.settings:get("mcl_node_particles") or "none"
@@ -79,17 +105,6 @@ local get_us_time = minetest.get_us_time
 
 local dimension_to_teleport = { nether = "overworld", overworld = "nether" }
 
-local limits = {
-	nether = {
-		pmin = {x=LIM_MIN, y = N_Y_MIN, z = LIM_MIN},
-		pmax = {x=LIM_MAX, y = N_Y_MAX, z = LIM_MAX},
-	},
-	overworld = {
-		pmin = {x=LIM_MIN, y = O_Y_MIN, z = LIM_MIN},
-		pmax = {x=LIM_MAX, y = O_Y_MAX, z = LIM_MAX},
-	},
-}
-
 -- This function registers exits from Nether portals.
 -- Incoming verification performed: two nodes must be portal nodes, and an obsidian below them.
 -- If the verification passes - position adds to the table and saves to mod storage on exit.
@@ -164,7 +179,7 @@ local function find_exit(p, dx, dy, dz)
 	end
 end
 
--- This functon searches Nether portal nodes whitin distance specified and checks the node
+-- This function searches Nether portal nodes within distance specified and checks the node
 local function find_exit_with_check(p, dx, dy, dz)
 	while true do
 		local pos = find_exit(p, dx, dy, dz)
@@ -181,7 +196,7 @@ local function find_exit_with_check(p, dx, dy, dz)
 	end
 end
 
--- Ping-Pong the coordinate for Fast Travelling, https://git.minetest.land/Wuzzy/MineClone2/issues/795#issuecomment-11058
+-- Ping-Pong the coordinate for Fast Traveling, https://git.minetest.land/Wuzzy/MineClone2/issues/795#issuecomment-11058
 local function ping_pong(x, m, l1, l2)
 	if x < 0 then
 		return	 l1 + abs(((x*m+l1) % (l1*4)) - (l1*2)), 	floor(x*m/l1/2)  + ((ceil(x*m/l1)+1)%2) * ((x*m)%l1)/l1
@@ -421,9 +436,9 @@ end
 
 local function get_lava_level(pos, pos1, pos2)
 	if pos.y > -1000 then
-		return max(min(mcl_mapgen.overworld.lava_max, pos2.y-1), pos1.y+1)
+		return max(min(overworld_lava_max, pos2.y-1), pos1.y+1)
 	end
-	return max(min(mcl_mapgen.nether.lava_max, pos2.y-1), pos1.y+1)
+	return max(min(nether_lava_max, pos2.y-1), pos1.y+1)
 end
 
 local function ecb_scan_area_2(blockpos, action, calls_remaining, param)
@@ -746,7 +761,7 @@ minetest.register_abm({
 			return
 		end
 
-		if lower_node_name == OBSIDIAN and pos.y >= mcl_mapgen.overworld.min and random(1, 750) == 19 then
+		if lower_node_name == OBSIDIAN and pos.y >= overworld_min and random(1, 750) == 19 then
 			local pigman_obj = minetest.add_entity(pos, "mobs_mc:pigman")
 			if pigman_obj then
 				teleport_cooloff(pigman_obj)

mods/ITEMS/mcl_smoker/init.lua

@@ -509,8 +509,8 @@ minetest.register_craft({
 	}
 })
 
-minetest.register_alias("mcl_smoker:smoker", "mcl_furnaces:smoker")
-minetest.register_alias("mcl_smoker:smoker_active", "mcl_furnaces:smoker_active")
+minetest.register_alias("mcl_furnaces:smoker", "mcl_smoker:smoker")
+minetest.register_alias("mcl_furnaces:smoker_active", "mcl_smoker:smoker_active")
 
 -- Add entry alias for the Help
 if minetest.get_modpath("doc") then

mods/MAPGEN/mcl_dungeons/init.lua

@@ -32,9 +32,16 @@ local math_ceil        = math.ceil
 --custom mcl_vars
 local get_node = mcl_mapgen.get_far_node
 
+local min_y
+local max_y
+
+local get_local_settings = function()
+	min_y = math_max(mcl_mapgen.overworld.min, mcl_mapgen.overworld.bedrock_max) + 1
+	max_y = mcl_mapgen.overworld.max - 1
+end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 
-local min_y = math_max(mcl_mapgen.overworld.min, mcl_mapgen.overworld.bedrock_max) + 1
-local max_y = mcl_mapgen.overworld.max - 1
 -- Calculate the number of dungeon spawn attempts
 -- In Minecraft, there 8 dungeon spawn attempts Minecraft chunk (16*256*16 = 65536 blocks).
 -- Minetest chunks don't have this size, so scale the number accordingly.

mods/MAPGEN/mcl_mapgen_core/init.lua

@@ -1214,25 +1214,34 @@ if flat then
 	air_layers[#air_layers + 1] = {mcl_mapgen.nether.flat_floor, mcl_mapgen.nether.flat_ceiling} -- Flat Nether
 end
 
--- Realm barrier between the Overworld void and the End
-local barrier_min = mcl_mapgen.realm_barrier_overworld_end_min
-local barrier_max = mcl_mapgen.realm_barrier_overworld_end_max
+local barrier_min
+local barrier_max
+local void_layers
+local bedrock_layers
 
-local void_layers = {
-	{mcl_mapgen.EDGE_MIN        , mcl_mapgen.nether.min - 1   }, -- below Nether
-	{mcl_mapgen.nether.max + 129, mcl_mapgen.end_.min - 1     }, -- below End (above Nether)
-	{mcl_mapgen.end_.max + 1    , barrier_min - 1             }, -- below Realm Barrier, above End
-	{barrier_max + 1            , mcl_mapgen.overworld.min - 1}, -- below Overworld, above Realm Barrier
-}
+local get_local_settings = function()
+	-- Realm barrier between the Overworld void and the End
+	barrier_min = mcl_mapgen.realm_barrier_overworld_end_min
+	barrier_max = mcl_mapgen.realm_barrier_overworld_end_max
 
-local bedrock_layers = {}
-if not singlenode then
-	bedrock_layers = {
-		{mcl_mapgen.overworld.bedrock_min    , mcl_mapgen.overworld.bedrock_max    },
-		{mcl_mapgen.nether.bedrock_bottom_min, mcl_mapgen.nether.bedrock_bottom_max},
-		{mcl_mapgen.nether.bedrock_top_min   , mcl_mapgen.nether.bedrock_top_max   },
+	void_layers = {
+		{mcl_mapgen.EDGE_MIN        , mcl_mapgen.nether.min - 1   }, -- below Nether
+		{mcl_mapgen.nether.max + 129, mcl_mapgen.end_.min - 1     }, -- below End (above Nether)
+		{mcl_mapgen.end_.max + 1    , barrier_min - 1             }, -- below Realm Barrier, above End
+		{barrier_max + 1            , mcl_mapgen.overworld.min - 1}, -- below Overworld, above Realm Barrier
 	}
+
+	bedrock_layers = {}
+	if not singlenode then
+		bedrock_layers = {
+			{mcl_mapgen.overworld.bedrock_min    , mcl_mapgen.overworld.bedrock_max    },
+			{mcl_mapgen.nether.bedrock_bottom_min, mcl_mapgen.nether.bedrock_bottom_max},
+			{mcl_mapgen.nether.bedrock_top_min   , mcl_mapgen.nether.bedrock_top_max   },
+		}
+	end
 end
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 
 mcl_mapgen.register_mapgen_block_lvm(function(vm_context)
 	local vm, data, area, minp, maxp, chunkseed, blockseed = vm_context.vm, vm_context.data, vm_context.area, vm_context.minp, vm_context.maxp, vm_context.chunkseed, vm_context.blockseed

mods/MAPGEN/tsm_railcorridors/init.lua

@@ -94,13 +94,21 @@ if setting then
 end
 
 -- Max. and min. heights between rail corridors are generated
-local height_min
-if mcl_mapgen.lava then
-	height_min = mcl_mapgen.overworld.lava_max + 2
-else
-	height_min = mcl_mapgen.overworld.bedrock_max + 2
+local height_min, height_max
+local get_local_settings = function()
+	if mcl_mapgen.lava then
+		height_min = mcl_mapgen.overworld.lava_max + 2
+	else
+		height_min = mcl_mapgen.overworld.bedrock_max + 2
+	end
+	height_max = mcl_worlds.layer_to_y(60)
+
+	-- Allow mods to separately override this
+	height_min = mcl_mapgen.overworld.railcorridors_height_min or height_min
+	height_max = mcl_mapgen.overworld.railcorridors_height_max or height_max
 end
-local height_max = mcl_worlds.layer_to_y(60)
+get_local_settings()
+mcl_mapgen.register_on_settings_changed(get_local_settings)
 
 -- Chaos Mode: If enabled, rail corridors don't stop generating when hitting obstacles
 local chaos_mode = minetest.settings:get_bool("tsm_railcorridors_chaos") or false

settingtypes.txt

@@ -185,3 +185,4 @@ revoke_shout_for_spammers (Revoke shout priv for spammers) bool true
 mcl_item_id_debug (Item ID Debug) bool false
 mcl_debug_struct_noise (Show Structures Perlin Noise) bool false
 mcl_debug_chunk_borders (Show Chunk Borders) bool false
+mcl_debug_head_code (Spawn dirt particles at mob head position) bool false