mailbox.lua

   1 local mailbox = {}
   2 screwdriver = screwdriver or {}
   3 local xbg = default.gui_bg..default.gui_bg_img..default.gui_slots
   4
   5 xdecor.register("mailbox", {
   6         description = "Mailbox",
   7         tiles = {
   8                 "xdecor_mailbox_top.png", "xdecor_mailbox_bottom.png",
   9                 "xdecor_mailbox_side.png", "xdecor_mailbox_side.png",
  10                 "xdecor_mailbox.png", "xdecor_mailbox.png",
  11         },
  12         groups = {cracky=3, oddly_breakable_by_hand=1},
  13         on_rotate = screwdriver.rotate_simple,
  14         after_place_node = function(pos, placer, _)
  15                 local meta = minetest.get_meta(pos)
  16                 local owner = placer:get_player_name()
  17
  18                 meta:set_string("owner", owner)
  19                 meta:set_string("infotext", owner.."'s Mailbox")
  20
  21                 local inv = meta:get_inventory()
  22                 inv:set_size("main", 8*4)
  23                 inv:set_size("drop", 1)
  24         end,
  25         on_rightclick = function(pos, _, clicker, _)
  26                 local meta = minetest.get_meta(pos)
  27                 local player = clicker:get_player_name()
  28                 local owner = meta:get_string("owner")
  29
  30                 if owner == player then
  31                         minetest.show_formspec(player, "", mailbox.get_formspec(pos))
  32                 else minetest.show_formspec(player, "",
  33                                 mailbox.get_insert_formspec(pos, owner))
  34                 end
  35         end,
  36         can_dig = function(pos, player)
  37                 local meta = minetest.get_meta(pos)
  38                 local owner = meta:get_string("owner")
  39                 local inv = meta:get_inventory()
  40
  41                 if not inv:is_empty("main") or not player or
  42                         player:get_player_name() ~= owner then return false end
  43                 return true
  44         end,
  45         on_metadata_inventory_put = function(pos, listname, _, stack, _)
  46                 local inv = minetest.get_meta(pos):get_inventory()
  47                 if listname == "drop" and inv:room_for_item("main", stack) then
  48                         inv:remove_item("drop", stack)
  49                         inv:add_item("main", stack)
  50                 end
  51         end,
  52         allow_metadata_inventory_put = function(pos, listname, _, stack, _)
  53                 if listname == "main" then return 0 end
  54                 if listname == "drop" then
  55                         local meta = minetest.get_meta(pos)
  56                         local inv = meta:get_inventory()
  57                         if inv:room_for_item("main", stack) then return -1
  58                         else return 0 end
  59                 end
  60         end
  61 })
  62
  63 function mailbox.get_formspec(pos)
  64         local spos = pos.x..","..pos.y..","..pos.z
  65         local formspec = "size[8,9]"..xbg..
  66                 "label[0,0;You received...]list[nodemeta:"..spos..";main;0,0.75;8,4;]list[current_player;main;0,5.25;8,4;]"
  67         return formspec
  68 end
  69
  70 function mailbox.get_insert_formspec(pos, owner)
  71         local spos = pos.x..","..pos.y..","..pos.z
  72         local formspec = "size[8,5]"..xbg..
  73                 "label[0.5,0;Send your goods\nto "..owner.." :]list[nodemeta:"..spos..";drop;3.5,0;1,1;]list[current_player;main;0,1.25;8,4;]"
  74         return formspec
  75 end