Add Wither Spawning

mods/ENTITIES/mcl_wither_spawning/init.lua

@@ -0,0 +1,50 @@
+local dim = {"x", "z"}
+
+local modpath = minetest.get_modpath(minetest.get_current_modname())
+
+local function load_schem(filename)
+	local file = io.open(modpath .. "/schems/" .. filename, "r")
+	local data = minetest.deserialize(file:read())
+	file:close()
+	return data
+end
+
+local wither_spawn_schems = {}
+
+for _, d in pairs(dim) do
+	wither_spawn_schems[d] = load_schem("wither_spawn_" .. d .. ".we")
+end
+
+local function check_schem(pos, schem)
+	for _, n in pairs(schem) do
+		if minetest.get_node(vector.add(pos, n)).name ~= n.name then
+			return false
+		end
+	end
+	return true
+end
+
+local function remove_schem(pos, schem)
+	for _, n in pairs(schem) do
+		minetest.remove_node(vector.add(pos, n))
+	end
+end
+
+local function wither_spawn(pos)
+	for _, d in pairs(dim) do
+		for i = 0, 2 do
+			local p = vector.add(pos, {x = 0, y = -2, z = 0, [d] = -i})
+			local schem = wither_spawn_schems[d]
+			if check_schem(p, schem) then
+				remove_schem(p, schem)
+				minetest.add_entity(vector.add(p, {x = 0, y = 1, z = 0, [d] = 1}), "mobs_mc:wither")
+			end
+		end
+	end
+end
+
+local old_onplace=minetest.registered_nodes[mobs_mc.items.head_wither_skeleton].on_place
+minetest.registered_nodes[mobs_mc.items.head_wither_skeleton].on_place=function(itemstack,placer,pointed)
+	minetest.after(0, wither_spawn, pointed.above)
+	old_onplace(itemstack,placer,pointed)
+end

mods/ENTITIES/mcl_wither_spawning/mod.conf

@@ -0,0 +1,4 @@
+name = mcl_wither_spawning
+description = Wither Spawning for MineClone2
+author = Fleckenstein
+depends = mobs_mc, mcl_heads