pillager outpost

mods/MAPGEN/mcl_structures/pillager_outpost.lua

@@ -0,0 +1,176 @@
+local modname = minetest.get_current_modname()
+local modpath = minetest.get_modpath(modname)
+local S = minetest.get_translator(modname)
+
+local chance_per_chunk = 11
+local noise_multiplier = 1
+local random_offset    = 999
+local scanning_ratio   = 0.00003
+local struct_threshold = chance_per_chunk
+
+local mcl_structures_get_perlin_noise_level = mcl_structures.get_perlin_noise_level
+
+local schematic_file = modpath .. "/schematics/mcl_structures_pillager_outpost.mts"
+
+local outpost_schematic_lua = minetest.serialize_schematic(schematic_file, "lua", {lua_use_comments = false, lua_num_indent_spaces = 0}) .. " return schematic"
+local outpost_schematic = loadstring(outpost_schematic_lua)()
+
+local function on_placed(p1, rotation, pr, size)
+	local p2 = {x = p1.x + size.x, y = p1.y + size.y, z = p1.z + size.z}
+	-- Find chests.
+	local chests = minetest.find_nodes_in_area(p1, p2, "mcl_chests:chest_small")
+
+	-- Add desert temple loot into chests
+	for c=1, #chests do
+		local lootitems = mcl_loot.get_multi_loot({
+		
+		{
+			stack_min = 2,
+			stack_max = 3,
+			items = {
+				{ itemstring = "mcl_farming:wheat_item", weight = 7, amount_min = 3, amount_max=5 },
+				{ itemstring = "mcl_farming:carrot_item", weight = 5, amount_min = 3, amount_max=5 },
+				{ itemstring = "mcl_farming:potato_item", weight = 5, amount_min = 2, amount_max=5 },
+			}
+		},
+		{
+			stack_min = 1,
+			stack_max = 2,
+			items = {
+				{ itemstring = "mcl_experience:bottle", weight = 6, amount_min = 0, amount_max=1 },
+				{ itemstring = "mcl_bows:arrow", weight = 4, amount_min = 2, amount_max=7 },
+				{ itemstring = "mcl_mobitems:string", weight = 4, amount_min = 1, amount_max=6 },
+				{ itemstring = "mcl_core:iron_ingot", weight = 3, amount_min = 1, amount_max = 3 },
+				{ itemstring = "mcl_books:book", weight = 1, func = function(stack, pr)
+					mcl_enchanting.enchant_uniform_randomly(stack, {"soul_speed"}, pr)
+				end },
+			}
+		},
+		
+		{
+			stack_min = 1,
+			stack_max = 3,
+			items = {
+				{ itemstring = "mcl_core:darktree", amount_min = 2, amount_max=3 },
+			}
+		},
+		
+		{
+			stack_min = 1,
+			stack_max = 1,
+			items = {
+				{ itemstring = "mcl_bows:crossbow" },
+			}
+		}
+	}, pr)
+		mcl_structures.init_node_construct(chests[c])
+		local meta = minetest.get_meta(chests[c])
+		local inv = meta:get_inventory()
+		mcl_loot.fill_inventory(inv, "main", lootitems, pr)
+	end
+end
+
+local function place(pos, rotation, pr)
+	local pos_below  = {x = pos.x, y = pos.y -  1, z = pos.z}
+	local pos_outpost = {x = pos.x, y = pos.y, z = pos.z}
+	local node_below = minetest.get_node(pos_below)
+	local nn = node_below.name,
+mcl_structures.place_schematic({pos = pos_outpost, schematic = outpost_schematic, pr = pr, on_placed = on_placed})
+end
+
+local function get_place_rank(pos)
+	local x, y, z = pos.x, pos.y - 1, pos.z
+	local p1 = {x = x - 8, y = y, z = z - 8}
+	local p2 = {x = x + 8, y = y, z = z + 8}
+	local best_pos_list_surface = minetest.find_nodes_in_area(p1, p2, node_list, false)
+	local other_pos_list_surface = minetest.find_nodes_in_area(p1, p2, "group:opaque", false)
+	p1 = {x = x - 4, y = y -  7, z = z - 4}
+	p2 = {x = x + 4, y = y +  7, z = z + 4}
+	local best_pos_list_underground = minetest.find_nodes_in_area(p1, p2, node_list, false)
+	local other_pos_list_underground = minetest.find_nodes_in_area(p1, p2, "group:opaque", false)
+	return 10 * (#best_pos_list_surface) + 2 * (#other_pos_list_surface) + 5 * (#best_pos_list_underground) + #other_pos_list_underground
+end
+
+local function spawn_pillager(pos)
+	minetest.add_entity({x = pos.x, y = pos.y + 1, z = pos.z}, "mobs_mc:vindicator")
+end
+minetest.register_node("mcl_structures:birchwood", {
+	description = S("Pillager Birch Wood"),
+	_doc_items_longdesc = doc.sub.items.temp.build,
+	tiles = {"mcl_core_planks_birch.png"},
+	stack_max = 64,
+	drop = "mcl_core:birchwood",
+	groups = {handy=1,axey=1, flammable=3,wood=1,building_block=1, material_wood=1, fire_encouragement=5, fire_flammability=20},
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+	is_ground_content = false,
+	_mcl_blast_resistance = 3,
+	_mcl_hardness = 2,
+	on_construct = spawn_pillager,
+})
+
+minetest.register_abm({
+	label = "Spawn pillagers",
+	nodenames = {"mcl_structures:birchwood"},
+	interval = 30,
+	chance = 3,
+	action = function(pos, node)
+		-- check the space above
+		local minetest_get_node = minetest.get_node
+		local x, y, z = pos.x, pos.y - 1, pos.z
+		local p = {x=x+6, y=y+15, z=z+6}
+		p.y = p.y + 1
+		if minetest_get_node(p).name ~= "air" then return end
+		p.y = p.y + 1
+		if minetest_get_node(p).name ~= "air" then return end
+		p.y = p.y - 1
+		local pillagers_counter = 0
+		for _, obj in pairs(minetest.get_objects_inside_radius(p, 30)) do
+			local lua_entity = obj:get_luaentity()
+			if luaentity and luaentity.name == "mobs_mc:vindicator" then
+				pillagers_counter = pillagers_counter + 1
+				if pillagers_counter > 8 then return end
+			end
+		end
+		spawn_pillager(pos)
+	end
+})
+
+mcl_structures.register_structure({
+	name = "pillager_outpost",
+	decoration = {
+		deco_type = "simple",
+		place_on = node_list,
+		flags = "all_floors",
+		fill_ratio = scanning_ratio,
+		y_min = 3,
+		y_max = mcl_mapgen.overworld.max,
+		height = 1,
+		biomes = not mcl_mapgen.v6 and {
+			"Desert",
+			"Plains",
+			"Savanna",
+			"Desert_ocean",
+			"Taiga",
+		},
+	},
+	on_finished_chunk = function(minp, maxp, seed, vm_context, pos_list)
+		local pr = PseudoRandom(seed + random_offset)
+		local random_number = pr:next(1, chance_per_chunk)
+		local noise = mcl_structures_get_perlin_noise_level(minp) * noise_multiplier
+		if (random_number + noise) < struct_threshold then return end
+		local pos = pos_list[1]
+		if #pos_list > 1 then
+			local count = get_place_rank(pos)
+			for i = 2, #pos_list do
+				local pos_i = pos_list[i]
+				local count_i = get_place_rank(pos_i)
+				if count_i > count then
+					count = count_i
+					pos = pos_i
+				end
+			end
+		end
+		place(pos, nil, pr)
+	end,
+	place_function = place
+})

mods/MAPGEN/mcl_structures/structures.lua

@@ -15,4 +15,5 @@ if not mcl_mapgen.singlenode then
 	dofile(modpath .. "/ruined_portal.lua")
 	dofile(modpath .. "/stronghold.lua")
 	dofile(modpath .. "/witch_hut.lua")
+	dofile(modpath .. "/pillager_outpost.lua")
 end