Team chests, balance spawning

mods/ctf_team_chest/depends.txt

@@ -0,0 +1,3 @@
+ctf
+ctf_flag
+ctf_match

mods/ctf_team_chest/init.lua

@@ -0,0 +1,78 @@
+local chest_formspec =
+	"size[8,9]" ..
+	default.gui_bg ..
+	default.gui_bg_img ..
+	default.gui_slots ..
+	"list[current_name;main;0,0.3;8,4;]" ..
+	"list[current_player;main;0,4.85;8,1;]" ..
+	"list[current_player;main;0,6.08;8,3;8]" ..
+	"listring[current_name;main]" ..
+	"listring[current_player;main]" ..
+	default.get_hotbar_bg(0,4.85)
+
+minetest.register_node("ctf_team_chest:chest", {
+	description = "Chest",
+	tiles = {"default_chest_top.png", "default_chest_top.png", "default_chest_side.png",
+		"default_chest_side.png", "default_chest_side.png", "default_chest_front.png"},
+	paramtype2 = "facedir",
+	groups = {choppy = 2, oddly_breakable_by_hand = 2},
+	legacy_facedir_simple = true,
+	is_ground_content = false,
+	sounds = default.node_sound_wood_defaults(),
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", chest_formspec)
+		meta:set_string("infotext", "Chest")
+		local inv = meta:get_inventory()
+		inv:set_size("main", 8*4)
+	end,
+	can_dig = function(pos,player)
+		return false
+	end,
+	on_metadata_inventory_move = function(pos, from_list, from_index,
+			to_list, to_index, count, player)
+		minetest.log("action", player:get_player_name() ..
+			" moves stuff in chest at " .. minetest.pos_to_string(pos))
+	end,
+    on_metadata_inventory_put = function(pos, listname, index, stack, player)
+		minetest.log("action", player:get_player_name() ..
+			" moves stuff to chest at " .. minetest.pos_to_string(pos))
+	end,
+    on_metadata_inventory_take = function(pos, listname, index, stack, player)
+		minetest.log("action", player:get_player_name() ..
+			" takes stuff from chest at " .. minetest.pos_to_string(pos))
+	end
+})
+
+
+minetest.register_on_generated(function(minp, maxp, seed)
+	for tname, team in pairs(ctf.teams) do
+		for _, flag in pairs(team.flags) do
+			if minp.x <= flag.x and maxp.x >= flag.x and
+					minp.y <= flag.y and maxp.y >= flag.y and
+					minp.z <= flag.z and maxp.z >= flag.z then
+
+				local chest = {name = "ctf_team_chest:chest"}
+				local dz = 2
+				if flag.z < 0 then
+					dz = -2
+					chest.param2 = minetest.dir_to_facedir({x=0,y=0,z=-1})
+				end
+				local pos = {
+					x = flag.x,
+					y = flag.y,
+					z = flag.z + dz
+				}
+
+				minetest.set_node(pos, chest)
+				print("Flag " .. dump(flag))
+
+				local inv = minetest.get_inventory({type = "node", pos=pos})
+				inv:add_item("main", ItemStack("default:stone 99"))
+				inv:add_item("main", ItemStack("default:stone 99"))
+				inv:add_item("main", ItemStack("default:glass 10"))
+				inv:add_item("main", ItemStack("default:torch 10"))
+			end
+		end
+	end
+end)