upload

1 files changed, 452 insertions, 0 deletions

diff --git a/gold_chest.lua b/gold_chest.lua
new file mode 100644
index 0000000..44fb313
--- /dev/null
+++ b/gold_chest.lua
@@ -0,0 +1,452 @@
+local chest_mark_colors = {
+    '', -- regular chest, without color bar
+    '_black',
+    '_blue', 
+    '_brown',
+    '_cyan',
+    '_dark_green',
+    '_dark_grey',
+    '_green',
+    '_grey',
+    '_magenta',
+    '_orange',
+    '_pink',
+    '_red',
+    '_violet',
+    '_white',
+    '_yellow',
+}
+
+minetest.register_craft({
+	output = 'technic:gold_chest 1',
+	recipe = {
+		{'moreores:gold_ingot','moreores:gold_ingot','moreores:gold_ingot'},
+		{'moreores:gold_ingot','technic:silver_chest','moreores:gold_ingot'},
+		{'moreores:gold_ingot','moreores:gold_ingot','moreores:gold_ingot'},
+	}
+})
+
+minetest.register_craft({
+	output = 'technic:gold_locked_chest 1',
+	recipe = {
+		{'moreores:gold_ingot','moreores:gold_ingot','moreores:gold_ingot'},
+		{'moreores:gold_ingot','technic:silver_locked_chest','moreores:gold_ingot'},
+		{'moreores:gold_ingot','moreores:gold_ingot','moreores:gold_ingot'},
+	}
+})
+
+minetest.register_craft({
+	output = 'technic:gold_locked_chest 1',
+	recipe = {
+		{'default:steel_ingot'},
+		{'technic:gold_chest'},
+	}
+})
+
+minetest.register_craftitem("technic:gold_chest", {
+	description = "Gold Chest",
+	stack_max = 99,
+})
+minetest.register_craftitem("technic:gold_locked_chest", {
+	description = "Gold Locked Chest",
+	stack_max = 99,
+})
+
+for i, state in ipairs(chest_mark_colors) do
+minetest.register_node("technic:gold_chest".. state, {
+	description = "Gold Chest",
+	tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
+		"technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_front"..state..".png"},
+	paramtype2 = "facedir",
+	groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+	legacy_facedir_simple = true,
+	sounds = default.node_sound_wood_defaults(),
+	on_construct = function(pos)
+		local meta = minetest.env:get_meta(pos)
+		meta:set_string("formspec",
+				"invsize[12,9;]"..
+				"list[current_name;main;0,0;12,4;]"..
+				"list[current_player;main;0,5;8,4;]")
+		meta:set_string("infotext", "Gold Chest")
+		local inv = meta:get_inventory()
+		inv:set_size("main", 12*4)
+	end,
+	
+	can_dig = function(pos,player)
+		local meta = minetest.env:get_meta(pos);
+		local inv = meta:get_inventory()
+		return inv:is_empty("main")
+	end,
+	
+	on_punch = function (pos, node, puncher)
+	chest_punched (pos,node,puncher);
+	end,
+	
+	on_receive_fields = function(pos, formname, fields, sender)
+        local meta = minetest.env:get_meta(pos);
+      		fields.text = fields.text or ""
+		meta:set_string("text", fields.text)
+		meta:set_string("infotext", '"'..fields.text..'"')
+
+		meta:set_string("formspec",
+				"invsize[12,9;]"..
+				"list[current_name;main;0,0;12,4;]"..
+				"list[current_player;main;0,5;8,4;]")
+	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))
+		return minetest.node_metadata_inventory_move_allow_all(
+				pos, from_list, from_index, to_list, to_index, count, player)
+	end,
+    on_metadata_inventory_offer = function(pos, listname, index, stack, player)
+		minetest.log("action", player:get_player_name()..
+				" moves stuff to chest at "..minetest.pos_to_string(pos))
+		return minetest.node_metadata_inventory_offer_allow_all(
+				pos, listname, index, stack, player)
+	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,
+})
+end
+
+
+local function has_locked_chest_privilege(meta, player)
+	if player:get_player_name() ~= meta:get_string("owner") then
+		return false
+	end
+	return true
+end
+
+for i, state in ipairs(chest_mark_colors) do
+minetest.register_node("technic:gold_locked_chest".. state, {
+	description = "Gold Locked Chest",
+	tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
+		"technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_locked"..state..".png"},
+	paramtype2 = "facedir",
+	groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+	legacy_facedir_simple = true,
+	sounds = default.node_sound_wood_defaults(),
+	after_place_node = function(pos, placer)
+		local meta = minetest.env:get_meta(pos)
+		meta:set_string("owner", placer:get_player_name() or "")
+		meta:set_string("infotext", "Gold Locked Chest (owned by "..
+				meta:get_string("owner")..")")
+	end,
+	on_construct = function(pos)
+		local meta = minetest.env:get_meta(pos)
+		meta:set_string("formspec",
+				"invsize[12,9;]"..
+				"list[current_name;main;0,0;12,4;]"..
+				"list[current_player;main;0,5;8,4;]")
+		meta:set_string("infotext", "Gold Locked Chest")
+		meta:set_string("owner", "")
+		local inv = meta:get_inventory()
+		inv:set_size("main", 12*4)
+	end,
+	can_dig = function(pos,player)
+		local meta = minetest.env:get_meta(pos);
+		local inv = meta:get_inventory()
+		return inv:is_empty("main")
+	end,
+
+	on_punch = function (pos, node, puncher)
+	        local meta = minetest.env:get_meta(pos);
+		if (has_locked_chest_privilege(meta, puncher)) then
+		locked_chest_punched (pos,node,puncher);
+		end
+       end,
+	
+	on_receive_fields = function(pos, formname, fields, sender)
+        local meta = minetest.env:get_meta(pos);
+      		fields.text = fields.text or ""
+		meta:set_string("text", fields.text)
+		meta:set_string("infotext", '"'..fields.text..'"')
+
+		meta:set_string("formspec",
+				"invsize[12,9;]"..
+				"list[current_name;main;0,0;12,4;]"..
+				"list[current_player;main;0,5;8,4;]")
+	end,
+
+	allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+		local meta = minetest.env:get_meta(pos)
+		if not has_locked_chest_privilege(meta, player) then
+			minetest.log("action", player:get_player_name()..
+					" tried to access a locked chest belonging to "..
+					meta:get_string("owner").." at "..
+					minetest.pos_to_string(pos))
+			return 0
+		end
+		return count
+	end,
+    allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+		local meta = minetest.env:get_meta(pos)
+		if not has_locked_chest_privilege(meta, player) then
+			minetest.log("action", player:get_player_name()..
+					" tried to access a locked chest belonging to "..
+					meta:get_string("owner").." at "..
+					minetest.pos_to_string(pos))
+			return 0
+		end
+		return stack:get_count()
+	end,
+    allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+		local meta = minetest.env:get_meta(pos)
+		if not has_locked_chest_privilege(meta, player) then
+			minetest.log("action", player:get_player_name()..
+					" tried to access a locked chest belonging to "..
+					meta:get_string("owner").." at "..
+					minetest.pos_to_string(pos))
+			return 0
+		end
+		return stack:get_count()
+	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 locked 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 locked 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 locked chest at "..minetest.pos_to_string(pos))
+	end,
+})
+end
+
+function chest_punched (pos,node,puncher)
+	
+	local player_tool = puncher:get_wielded_item();
+	local item=player_tool:get_name();
+	if item == "dye:black" then
+		if (hacky_swap_node(pos,"technic:gold_chest_black")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:blue" then
+		if (hacky_swap_node(pos,"technic:gold_chest_blue")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:brown" then
+		if (hacky_swap_node(pos,"technic:gold_chest_brown")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:cyan" then
+		if (hacky_swap_node(pos,"technic:gold_chest_cyan")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:dark_green" then
+		if (hacky_swap_node(pos,"technic:gold_chest_dark_green")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:dark_grey" then
+		if (hacky_swap_node(pos,"technic:gold_chest_dark_grey")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:green" then
+		if (hacky_swap_node(pos,"technic:gold_chest_green")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:grey" then
+		if (hacky_swap_node(pos,"technic:gold_chest_grey")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:magenta" then
+		if (hacky_swap_node(pos,"technic:gold_chest_magenta")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:orange" then
+		if (hacky_swap_node(pos,"technic:gold_chest_orange")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:pink" then
+		if (hacky_swap_node(pos,"technic:gold_chest_pink")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:red" then
+		if (hacky_swap_node(pos,"technic:gold_chest_red")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:violet" then
+		if (hacky_swap_node(pos,"technic:gold_chest_violet")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:white" then
+		if (hacky_swap_node(pos,"technic:gold_chest_white")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:yellow" then
+		if (hacky_swap_node(pos,"technic:gold_chest_yellow")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+
+		local meta = minetest.env:get_meta(pos);
+                meta:set_string("formspec", "hack:sign_text_input")
+	end
+
+
+function locked_chest_punched (pos,node,puncher)
+	
+	local player_tool = puncher:get_wielded_item();
+	local item=player_tool:get_name();
+	if item == "dye:black" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_black")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:blue" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_blue")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:brown" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_brown")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:cyan" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_cyan")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:dark_green" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_dark_green")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:dark_grey" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_dark_grey")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:green" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_green")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:grey" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_grey")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:magenta" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_magenta")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:orange" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_orange")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:pink" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_pink")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:red" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_red")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:violet" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_violet")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:white" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_white")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+	if item == "dye:yellow" then
+		if (hacky_swap_node(pos,"technic:gold_locked_chest_yellow")) then
+			player_tool:take_item(1);
+			puncher:set_wielded_item(player_tool);
+			return
+		   end
+		end
+
+		local meta = minetest.env:get_meta(pos);
+                meta:set_string("formspec", "hack:sign_text_input")
+	end
+	
\ No newline at end of file