Added New Mods and Profiles Folders

This is a complete rebuild of the modpack, with all new mods and updates for 1.5.3 of Anomaly.

mods/Night Mutants/gamedata/configs/misc/squad_descr/squad_descr_night_mutants.ltx

@@ -0,0 +1,119 @@
+;//////////////////////////////////////////////////////////////////////////////////////////////////
+;
+; Night Mutants
+;------------------------------------------------
+; name your squads however you want
+; must have lines:
+; "night_mutant 		= true"
+; "faction 		= monster"
+
+;------------------------------------------------
+;----< Zombies / Fracture >-----|
+[night_zombie]:online_offline_group
+faction         = monster
+npc_random      = zombie_normal, zombie_strong
+npc_in_squad    = 5, 7
+common			= true
+night_mutant 	= true
+
+[night_fracture]:online_offline_group
+faction         = monster
+npc_random      = fracture_normal, fracture_strong, fracture_2, fracture_3
+npc_in_squad    = 2, 3
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Dogs / Psy-dog >-----|
+[night_dog]:online_offline_group
+faction         = monster
+npc_random      = pseudodog_grey_strong, pseudodog_strong, pseudodog_normal
+npc_in_squad    = 2, 3
+common			= true
+night_mutant 	= true
+
+[night_psy_dog]:online_offline_group
+faction         = monster
+npc_random      = psy_dog_normal
+npc_in_squad    = 1, 2
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Cat >-----|
+[night_cat]:online_offline_group
+faction         = monster
+npc_random      = cat_normal_a, cat_normal_b, cat_normal_c, cat_normal_d, cat_normal_e, cat_strong_a, cat_strong_b, cat_strong_c, cat_strong_d, cat_strong_e
+npc_in_squad    = 2, 5
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Snork >-----|
+[night_snork]:online_offline_group
+faction         = monster
+npc_random      = snork_normal, snork_normal2, snork_normal3, snork_normal4, snork_strong, snork_strong2, snork_strong3, snork_strong4
+npc_in_squad    = 3, 5
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Lurker >-----|
+[night_lurker]:online_offline_group
+faction         = monster
+npc_random      = lurker_1_normal, lurker_1_strong, lurker_2_normal, lurker_2_strong, lurker_3_normal, lurker_3_strong
+npc_in_squad    = 2, 4
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Bloodsucker / Psy-sucker >-----|
+[night_bloodsucker]:online_offline_group
+faction         = monster
+npc_random      = bloodsucker_red_normal, bloodsucker_green_normal, bloodsucker_black_normal, bloodsucker_red_strong, bloodsucker_green_strong, bloodsucker_black_strong
+npc_in_squad    = 1, 3
+common			= true
+night_mutant 	= true
+
+[night_psysucker]:online_offline_group
+faction         = monster
+npc_random      = psysucker_2_normal, psysucker_2_strong, psysucker_3_normal, psysucker_3_strong
+npc_in_squad    = 1, 2
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Karlik >-----|
+[night_karlik]:online_offline_group
+faction         = monster
+npc_random      = m_karlik_e
+npc_in_squad    = 1, 2
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Burer >-----|
+[night_burer]:online_offline_group
+faction         = monster
+npc_random      = burer_normal, burer_normal2
+npc_in_squad    = 1, 3
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Controller >-----|
+[night_controller]:online_offline_group
+faction         = monster
+npc_random      = m_controller_normal, m_controller_normal2, m_controller_normal1111, m_controller_normal777, m_controller_normal888, m_controller_psy
+npc_in_squad    = 1, 2
+common			= true
+night_mutant 	= true
+
+;------------------------------------------------
+;----< Chimera >-----|
+[night_chimera]:online_offline_group
+faction         = monster
+npc_random      = chimera_normal, chimera_normal2, chimera_normal3, chimera_strong2, chimera_strong3, chimera_strong4
+npc_in_squad    = 1, 2
+common			= true
+night_mutant 	= true

mods/Night Mutants/gamedata/scripts/night_mutants.script

@@ -0,0 +1,228 @@
+--	picks a random squad from "squad_descr_night_mutants.ltx" every "spawn_time_interval" game minutes
+--	spawns on smart terrains available for mutants and if current population of smart is 0 or if no default night mutants are on this smart online
+
+local spawn_time_interval = 30	-- game minutes
+local safe_radius = 75					-- no spawn in this player's radius
+
+local night_start = 20					-- time at which mutants start to spawn
+local night_end = 5						-- deletes all mutants at this time
+
+local squads_to_spawn = {}
+local spawned_mutants = {}
+local available_smart_terrains = {}
+local ctime_to_t = utils_data.CTime_to_table
+local t_to_ctime = utils_data.CTime_from_table
+local xspawn_time
+local debugx = false
+
+---------------------------------------------------------------------------------------------------
+local tmr
+function try_to_spawn()
+	local tg = time_global()
+	if (tmr and tg < tmr) then return end
+	tmr = tg + 30000
+
+	if not is_night() then
+		if is_not_empty(spawned_mutants) then
+			delete_mutants()
+			empty_table(spawned_mutants)
+			xspawn_time = nil
+		end
+		return
+	end
+
+	local cur_time = game.get_game_time()
+	if not xspawn_time then
+		xspawn_time = ctime_to_t(cur_time)
+	end
+
+	if cur_time:diffSec(t_to_ctime(xspawn_time)) > (spawn_time_interval * 60) then
+		xspawn_time = ctime_to_t(cur_time)
+		spawn_mutants()
+	end
+
+end
+
+function spawn_mutants()
+	for level_name, t in pairs(available_smart_terrains) do
+		local random_smart_id = t[math.random(1, #t)]
+		spawned_mutants[level_name] = spawned_mutants[level_name] or {}
+
+		local simboard_t = SIMBOARD.smarts[random_smart_id]
+		local smart = simboard_t and simboard_t.smrt
+
+		if smart then
+			local smart_squads = simboard_t.squads
+			local smart_cur_pop = simboard_t.population
+			local smart_max_pop = smart.max_population
+
+		-- smart is empty
+			local allow_pop_spawn = smart_cur_pop < smart_max_pop
+
+			pr("----------------------------------------------------")
+			local smart_name = smart:name() or smart:section_name() or "<empty>"
+			pr("1test smart_id: %s || smart_name: %s || max pop: %s || current pop: %s", random_smart_id, smart_name, smart_max_pop, smart_cur_pop)
+
+		-- if at least one night squad is already on this smart
+			local night_squad_on_smart = false
+			for squad_id, _ in pairs(smart_squads) do
+				local sq = alife_object(squad_id)
+				if sq and (sq.player_id == "monster_predatory_night" or sq.player_id == "monster_zombied_night") then
+					pr("squad_id is NIGHT squad: %s", squad_id)
+					night_squad_on_smart = true
+					break
+				end
+			end
+
+			-- spawn squad
+			if allow_pop_spawn and (not night_squad_on_smart) and se_obj_outside_spawn_radius(smart) then
+				local squad_sec = is_not_empty(squads_to_spawn) and squads_to_spawn[math.random(1, #squads_to_spawn)]
+				local squad = squad_sec and SIMBOARD:create_squad(smart, squad_sec)
+				-- save squad id
+				if squad then
+					table.insert(spawned_mutants[level_name], squad.id)
+					-- test
+					pr("- spawned level: %s || smart: %s || squad_id: %s || sec: %s", level_name, smart_name, squad.id, squad_sec)
+					pr("2test smart_id: %s || current pop: %s", random_smart_id, SIMBOARD.smarts[random_smart_id] and SIMBOARD.smarts[random_smart_id].population)
+					--------------
+				end
+			end
+
+		end
+
+	end
+
+end
+
+function delete_mutants()
+	for level_name, t in pairs(spawned_mutants) do
+		for idx = #t, 1, -1 do
+			if t[idx] then
+				local squad = alife_object(t[idx])
+				if squad then
+					if squad.get_script_target then
+						printf("delete_mutants (xcvb mutants): squad id: %s deleted || sec: %s", t[idx], squad:section_name())
+						alife_release(squad)
+						if t[idx] then	-- in case it wasnt removed by callbacks
+							table.remove(spawned_mutants[level_name], idx)
+						end
+					else
+						printf("! not squad, remove from table (xcvb mutants): obj id: %s || sec: %s", t[idx], squad:section_name())
+						table.remove(spawned_mutants[level_name], idx)
+					end
+				end
+			end
+		end
+	end
+
+end
+
+function server_entity_on_unregister(obj)
+	for level_name, t in pairs(spawned_mutants) do
+		for idx = #t, 1, -1 do
+			if t[idx] and obj.id == t[idx] then
+				local mutant_squad = alife_object(t[idx])
+				printf("server_entity_on_unregister (xcvb mutants): squad_id: %s || sec: %s", t[idx], mutant_squad and mutant_squad:section_name() or "")
+				table.remove(spawned_mutants[level_name], idx)
+			end
+		end
+	end
+
+end
+
+function squad_on_npc_death(squad, se_obj, killer)
+	for level_name, t in pairs(spawned_mutants) do
+		for idx = #t, 1, -1 do
+			if t[idx] then
+				local mutant_squad = alife_object(t[idx])
+				if mutant_squad and mutant_squad.id == squad.id and squad:npc_count() <= 1 then
+					printf("squad_on_npc_death (xcvb mutants): squad_id: %s || sec: %s", t[idx], mutant_squad and mutant_squad:section_name() or "")
+					table.remove(spawned_mutants[level_name], idx)
+				end
+			end
+		end
+	end
+
+end
+
+---------------------------------------------------------------------------------------------------
+function save_mutant_smarts()
+	-- save smarts that has props of  "sim_avail" = true and "monster" > 0
+	for i = 1, 65534 do
+		local smart = alife_object(i)
+		if smart and (smart:clsid() == clsid.smart_terrain) and (simulation_objects.available_by_id[smart.id] and simulation_objects.available_by_id[smart.id] == true) and (smart.props["monster"] and smart.props["monster"] > 0) then
+			local smart_level_name = get_se_obj_level_name(smart)
+			available_smart_terrains[smart_level_name] = available_smart_terrains[smart_level_name] or {}
+			table.insert(available_smart_terrains[smart_level_name], smart.id)
+		end
+	end
+
+	-- collect and add section names
+	ini_sys:section_for_each(function(sec)
+		local night_mutant = ini_sys:r_bool_ex(sec, "night_mutant")
+		if night_mutant then
+			table.insert(squads_to_spawn, sec)
+		end
+	end)
+
+	-- test
+	for i = 1, #squads_to_spawn do
+		pr("[%s] = %s", i, squads_to_spawn[i])
+	end
+
+end
+
+function se_obj_outside_spawn_radius(se_obj)
+	if not se_obj then
+		return false
+	end
+
+	local on_same_level = simulation_objects.is_on_the_same_level(alife():actor(), se_obj)
+	if not on_same_level then
+		return true
+	end
+
+	local ac_pos = db.actor:position()
+	local se_obj_pos = se_obj.position
+	local outside_radius = ac_pos:distance_to_xz(se_obj_pos) > safe_radius
+
+	return outside_radius
+end
+
+function is_night()
+	local cur_hour = level.get_time_hours() + level.get_time_minutes() / 60
+
+	return (cur_hour > night_start) or (cur_hour < night_end)
+end
+
+function get_se_obj_level_name(se_obj)
+	local target_level_id = game_graph():vertex(se_obj.m_game_vertex_id):level_id()
+	local target_level_name = alife():level_name(target_level_id)
+
+	return target_level_name
+end
+
+function pr(...)
+	if not debugx then return end
+	printf(...)
+end
+
+function save_state(m_data)
+    m_data.spawned_mutants = spawned_mutants
+	m_data.xspawn_time = xspawn_time
+end
+
+function load_state(m_data)
+	xspawn_time = xspawn_time or nil
+    spawned_mutants = m_data.spawned_mutants or {}
+end
+
+---------------------------------------------------------------------------------------------------
+function on_game_start()
+	RegisterScriptCallback("actor_on_update", try_to_spawn)
+	RegisterScriptCallback("server_entity_on_unregister", server_entity_on_unregister)
+	RegisterScriptCallback("squad_on_npc_death", squad_on_npc_death)
+	RegisterScriptCallback("actor_on_first_update", save_mutant_smarts)
+	RegisterScriptCallback("save_state", save_state)
+	RegisterScriptCallback("load_state", load_state)
+end

mods/Night Mutants/meta.ini

@@ -0,0 +1,28 @@
+[General]
+gameName=stalkeranomaly
+modid=0
+version=d2024.12.3.0
+newestVersion=
+category="-1,"
+nexusFileStatus=1
+installationFile=Night_mutants_0.2.zip
+repository=Nexus
+ignoredVersion=
+comments=
+notes=
+nexusDescription=
+url=
+hasCustomURL=false
+lastNexusQuery=
+lastNexusUpdate=
+nexusLastModified=2024-12-03T23:31:51Z
+nexusCategory=0
+converted=false
+validated=false
+color=@Variant(\0\0\0\x43\0\xff\xff\0\0\0\0\0\0\0\0)
+tracked=0
+
+[installedFiles]
+1\modid=0
+1\fileid=0
+size=1