Add list rings to formspecs

[xdecor.git] / mailbox.lua

diff --git a/mailbox.lua b/mailbox.lua
index 3dc83a570b430345480ff2482a4e682be7c635da..94658cae0f40eb4cbacb56620c6c3d1993be7c8c 100644 (file)
--- a/mailbox.lua
+++ b/mailbox.lua
@@ -18,7 +18,7 @@ xdecor.register("mailbox", {
                meta:set_string("infotext", player_name.."'s Mailbox")
 
                local inv = meta:get_inventory()
-               inv:set_size("mailbox", 8*4)
+               inv:set_size("mailbox", 6*4)
                inv:set_size("drop", 1)
        end,
        on_rightclick = function(pos, _, clicker, _)
@@ -27,9 +27,9 @@ xdecor.register("mailbox", {
                local owner = meta:get_string("owner")
 
                if player == owner then
-                       minetest.show_formspec(player, "", mailbox.get_formspec(pos, owner, 1))
+                       minetest.show_formspec(player, "", mailbox.formspec(pos, owner, 1))
                else
-                       minetest.show_formspec(player, "", mailbox.get_formspec(pos, owner, 0))
+                       minetest.show_formspec(player, "", mailbox.formspec(pos, owner, 0))
                end
        end,
        can_dig = function(pos, player)
@@ -40,11 +40,22 @@ xdecor.register("mailbox", {
 
                return inv:is_empty("mailbox") and player and player_name == owner
        end,
-       on_metadata_inventory_put = function(pos, listname, _, stack, _)
+       on_metadata_inventory_put = function(pos, listname, _, stack, player)
                local inv = minetest.get_meta(pos):get_inventory()
+               local player_name = player:get_player_name()
+               local meta = minetest.get_meta(pos)
+               local stack_name = stack:get_name().." "..stack:get_count()
+
                if listname == "drop" and inv:room_for_item("mailbox", stack) then
                        inv:remove_item("drop", stack)
                        inv:add_item("mailbox", stack)
+
+                       for i = 7, 2, -1 do
+                               meta:set_string("giver"..i, meta:get_string("giver"..(i-1)))
+                               meta:set_string("stack"..i, meta:get_string("stack"..(i-1)))
+                       end
+                       meta:set_string("giver1", player_name)
+                       meta:set_string("stack1", stack_name)
                end
        end,
        allow_metadata_inventory_put = function(pos, listname, _, stack, _)
@@ -57,16 +68,65 @@ xdecor.register("mailbox", {
        end
 })
 
-function mailbox.get_formspec(pos, owner, fs_type)
+local function img_col(stack)
+       if not stack then return "" end
+       if stack.type == "node" then
+               if stack.inventory_image ~= "" then
+                       return string.match(stack.inventory_image, "([%w_]+)")..".png"
+               else
+                       return string.match(stack.tiles[1], "([%w_]+)")..".png"
+               end
+       elseif stack.type == "tool" or stack.type == "craft" then
+               return string.match(stack.inventory_image, "([%w_]+)")..".png"
+       else return "" end
+end
+
+function mailbox.formspec(pos, owner, num)
        local xbg = default.gui_bg..default.gui_bg_img..default.gui_slots
        local spos = pos.x..","..pos.y..","..pos.z
+       local meta = minetest.get_meta(pos)
+       local giver = ""
+       local def_stack1 = minetest.registered_items[meta:get_string("stack1"):match("([%w_]+:[%w_]+)")]
+       local def_stack2 = minetest.registered_items[meta:get_string("stack2"):match("([%w_]+:[%w_]+)")]
+       local def_stack3 = minetest.registered_items[meta:get_string("stack3"):match("([%w_]+:[%w_]+)")]
+       local def_stack4 = minetest.registered_items[meta:get_string("stack4"):match("([%w_]+:[%w_]+)")]
+       local def_stack5 = minetest.registered_items[meta:get_string("stack5"):match("([%w_]+:[%w_]+)")]
+       local def_stack6 = minetest.registered_items[meta:get_string("stack6"):match("([%w_]+:[%w_]+)")]
+       local def_stack7 = minetest.registered_items[meta:get_string("stack7"):match("([%w_]+:[%w_]+)")]
+
+       if num == 1 then
+               for i = 1, 7 do
+                       if meta:get_string("giver"..i) ~= "" then
+                               giver = giver.."#FFFF00,"..meta:get_string("giver"..i):sub(1, 12)..
+                                       ","..i..",#FFFFFF,x "..meta:get_string("stack"..i):sub(-3):match("%d+")..","
+                       end
+               end
 
-       if fs_type == 1 then
-               return "size[8,9]"..xbg..default.get_hotbar_bg(0,5.25)..
-                       "label[0,0;You received...]list[nodemeta:"..spos..";mailbox;0,0.75;8,4;]list[current_player;main;0,5.25;8,4;]"
+               return "size[9.5,9]"..xbg..
+                       default.get_hotbar_bg(0.75,5.25)..
+                       "label[0,0;Mailbox :]"..
+                       "label[6,0;Last donators :]"..
+                       "box[6,0.72;3.3,3.5;#555555]"..
+                       "tablecolumns[color;text;image,"..
+                               "1="..img_col(def_stack1)..","..
+                               "2="..img_col(def_stack2)..","..
+                               "3="..img_col(def_stack3)..","..
+                               "4="..img_col(def_stack4)..","..
+                               "5="..img_col(def_stack5)..","..
+                               "6="..img_col(def_stack6)..","..
+                               "7="..img_col(def_stack7)..";color;text]"..
+                       "tableoptions[background=#00000000;highlight=#00000000;border=false]"..
+                       "table[6,0.75;3.3,4;givers;"..giver.."]"..
+                       "list[nodemeta:"..spos..";mailbox;0,0.75;6,4;]"..
+                       "list[current_player;main;0.75,5.25;8,4;]"..
+                       "listring[nodemeta:"..spos..";mailbox]"..
+                       "listring[current_player;main]"
        else
-               return "size[8,5]"..xbg..default.get_hotbar_bg(0,1.25)..
-                       "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;]"
+               return "size[8,5]"..xbg..
+                       default.get_hotbar_bg(0,1.25)..
+                       "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;]"
        end
 end