From b82912f30dfdfab85e48be2935b78b024d82fd7f Mon Sep 17 00:00:00 2001
From: cora <coradelamouche@gmx.ch>
Date: Sat, 5 Nov 2022 12:26:46 +0100
Subject: [PATCH] Add zombie sieges

---
 mods/ENVIRONMENT/mcl_zombie_sieges/init.lua | 75 +++++++++++++++++++++
 mods/ENVIRONMENT/mcl_zombie_sieges/mod.conf |  3 +
 2 files changed, 78 insertions(+)
 create mode 100644 mods/ENVIRONMENT/mcl_zombie_sieges/init.lua
 create mode 100644 mods/ENVIRONMENT/mcl_zombie_sieges/mod.conf

diff --git a/mods/ENVIRONMENT/mcl_zombie_sieges/init.lua b/mods/ENVIRONMENT/mcl_zombie_sieges/init.lua
new file mode 100644
index 000000000..18561f3ad
--- /dev/null
+++ b/mods/ENVIRONMENT/mcl_zombie_sieges/init.lua
@@ -0,0 +1,75 @@
+
+local function check_spawn_pos(pos)
+	return minetest.get_natural_light(pos) < 7
+end
+
+local function spawn_zombies(self)
+	local nn = minetest.find_nodes_in_area_under_air(vector.offset(self.pos,-32,-32,-32),vector.offset(self.pos,32,32,32),{"group:solid"})
+	table.shuffle(nn)
+	for i=1,20 do
+		local p = vector.offset(nn[i%#nn],0,1,0)
+		if check_spawn_pos(p) then
+			local m = mcl_mobs.spawn(p,"mobs_mc:zombie")
+			local l = m:get_luaentity()
+			mcl_mobs:gopath(m:get_luaentity(),self.pos)
+			table.insert(self.mobs,m)
+			self.health_max = self.health_max + l.health
+		end
+	end
+end
+
+mcl_events.register_event("zombie_siege",{
+	readable_name = "Zombie Siege",
+	max_stage = 1,
+	health = 1,
+	health_max = 1,
+	exclusive_to_area = 128,
+	enable_bossbar = false,
+	cond_start  = function(self)
+		local t = minetest.get_timeofday()
+		local r = {}
+		for _,p in pairs(minetest.get_connected_players()) do
+			local village = mcl_raids.find_village(p:get_pos())
+			if t < 0.1 and village then
+				table.insert(r,{ player = p:get_player_name(), pos = village})
+			end
+		end
+		if #r > 0 then return r end
+	end,
+	on_start = function(self)
+		self.mobs = {}
+		self.health_max = 1
+		self.health = 0
+	end,
+	cond_progress = function(self)
+		local m = {}
+		local h = 0
+		for k,o in pairs(self.mobs) do
+			if o and o:get_pos() then
+				local l = o:get_luaentity()
+				h = h + l.health
+				table.insert(m,o)
+			end
+		end
+		self.mobs = m
+		self.health = h
+		self.percent = math.max(0,(self.health / self.health_max ) * 100)
+		if #m < 1 then
+			return true end
+	end,
+	on_stage_begin = spawn_zombies,
+	cond_complete = function(self)
+		local m = {}
+		for k,o in pairs(self.mobs) do
+			if o and o:get_pos() then
+				local l = o:get_luaentity()
+				table.insert(m,o)
+			end
+		end
+		return self.stage >= self.max_stage and #m < 1
+	end,
+	on_complete = function(self)
+		--minetest.log("SIEGE complete")
+		--awards.unlock(self.player,"mcl:hero_of_the_village")
+	end,
+})
diff --git a/mods/ENVIRONMENT/mcl_zombie_sieges/mod.conf b/mods/ENVIRONMENT/mcl_zombie_sieges/mod.conf
new file mode 100644
index 000000000..0263d367a
--- /dev/null
+++ b/mods/ENVIRONMENT/mcl_zombie_sieges/mod.conf
@@ -0,0 +1,3 @@
+name = mcl_zombie_sieges
+author = cora
+depends = mcl_events, mcl_raids