Update battery_box_mv.lua

RealBadAngel

2012-11-06 4c2d734798e4a031dbc3b6c3d2fa8c196ca69fd2

 gold_chest.lua

@@ -1,5 +1,4 @@
local chest_mark_colors = {
    '', -- regular chest, without color bar
    '_black',
    '_blue', 
    '_brown',
@@ -52,15 +51,76 @@
   stack_max = 99,
})

minetest.register_node("technic:gold_chest", {
   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.png"},
   paramtype2 = "facedir",
   groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,tubedevice=1,tubedevice_receiver=1},
   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,
})

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},
   groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1,tubedevice=1,tubedevice_receiver=1},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   drop = "technic:gold_chest",
   on_construct = function(pos)
      local meta = minetest.env:get_meta(pos)
      meta:set_string("formspec",
@@ -122,13 +182,112 @@
   return true
end

minetest.register_node("technic:gold_locked_chest", {
   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.png"},
   paramtype2 = "facedir",
   drop = "technic:gold_locked_chest",
   groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,tubedevice=1,tubedevice_receiver=1},
   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,
})

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},
   drop = "technic:gold_locked_chest",
   groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1,tubedevice=1,tubedevice_receiver=1},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   after_place_node = function(pos, placer)