unified_inventory/bags.lua

281 lines
8.3 KiB
Lua
Raw Normal View History

2020-03-25 18:46:35 +01:00
--[[
Bags for Minetest
2012-12-02 10:08:32 +01:00
Copyright (c) 2012 cornernote, Brett O'Donnell <cornernote@gmail.com>
License: GPLv3
--]]
2012-12-02 10:08:32 +01:00
2019-09-19 14:00:26 +02:00
local S = minetest.get_translator("unified_inventory")
2018-04-02 13:33:36 +02:00
local F = minetest.formspec_escape
local ui = unified_inventory
local bags_inv_bg_prefix = "image[0.3,1.5;"..(ui.imgscale*8)..","
ui.register_page("bags", {
2013-10-03 05:25:07 +02:00
get_formspec = function(player)
2013-09-29 00:15:37 +02:00
local player_name = player:get_player_name()
return { formspec = table.concat({
ui.style_full.standard_inv_bg,
bags_inv_bg_prefix..ui.imgscale..";ui_bags_header.png]",
"label["..ui.style_full.form_header_x..","..ui.style_full.form_header_y..";" .. F(S("Bags")) .. "]",
"button[0.6125,2.75;1.875,0.75;bag1;" .. F(S("Bag @1", 1)) .. "]",
"button[3.1125,2.75;1.875,0.75;bag2;" .. F(S("Bag @1", 2)) .. "]",
"button[5.6125,2.75;1.875,0.75;bag3;" .. F(S("Bag @1", 3)) .. "]",
"button[8.1125,2.75;1.875,0.75;bag4;" .. F(S("Bag @1", 4)) .. "]",
"listcolors[#00000000;#00000000]",
"list[detached:" .. F(player_name) .. "_bags;bag1;1.075,1.65;1,1;]",
"list[detached:" .. F(player_name) .. "_bags;bag2;3.575,1.65;1,1;]",
"list[detached:" .. F(player_name) .. "_bags;bag3;6.075,1.65;1,1;]",
"list[detached:" .. F(player_name) .. "_bags;bag4;8.575,1.65;1,1;]"
}) }
2013-09-29 00:15:37 +02:00
end,
})
ui.register_button("bags", {
2013-09-29 00:15:37 +02:00
type = "image",
image = "ui_bags_icon.png",
tooltip = S("Bags"),
hide_lite=true
2013-09-29 00:15:37 +02:00
})
local function get_player_bag_stack(player, i)
return minetest.get_inventory({
type = "detached",
name = player:get_player_name() .. "_bags"
}):get_stack("bag" .. i, 1)
end
for bag_i = 1, 4 do
ui.register_page("bag" .. bag_i, {
2015-10-10 03:55:46 +02:00
get_formspec = function(player)
local stack = get_player_bag_stack(player, bag_i)
2013-09-29 00:15:37 +02:00
local image = stack:get_definition().inventory_image
local fs = {
ui.style_full.standard_inv_bg,
"image[9.2,0.4;1,1;" .. image .. "]",
"label[0.3,0.65;" .. F(S("Bag @1", bag_i)) .. "]",
"listcolors[#00000000;#00000000]",
"listring[current_player;main]",
}
2013-09-29 00:15:37 +02:00
local slots = stack:get_definition().groups.bagslots
if slots == 8 then
fs[#fs + 1] = bags_inv_bg_prefix..ui.imgscale..";ui_bags_inv_small.png]"
2013-09-29 00:15:37 +02:00
elseif slots == 16 then
fs[#fs + 1] = bags_inv_bg_prefix..(ui.imgscale*2)..";ui_bags_inv_medium.png]"
2013-09-29 00:15:37 +02:00
elseif slots == 24 then
fs[#fs + 1] = bags_inv_bg_prefix..(ui.imgscale*3)..";ui_bags_inv_large.png]"
2013-09-29 00:15:37 +02:00
end
fs[#fs + 1] = "list[current_player;bag" .. bag_i .. "contents;0.45,1.65;8,3;]"
fs[#fs + 1] = "listring[current_name;bag" .. bag_i .. "contents]"
local player_name = player:get_player_name() -- For if statement.
if ui.trash_enabled
or ui.is_creative(player_name)
or minetest.get_player_privs(player_name).give then
fs[#fs + 1] = "image[7.8,0.25;"..ui.imgscale..","..ui.imgscale..";ui_trash_slot.png]"
.. "list[detached:trash;main;7.95,0.25;1,1;]"
end
local inv = player:get_inventory()
for i = 1, 4 do
local def = get_player_bag_stack(player, i):get_definition()
if def.groups.bagslots then
local list_name = "bag" .. i .. "contents"
local size = inv:get_size(list_name)
local used = 0
for si = 1, size do
local stk = inv:get_stack(list_name, si)
if not stk:is_empty() then
used = used + 1
end
end
local img = def.inventory_image
local label = F(S("Bag @1", i)) .. "\n" .. used .. "/" .. size
fs[#fs + 1] = string.format("image_button[%f,0.4;1,1;%s;bag%i;%s]",
(i + 1.35)*1.25, img, i, label)
end
end
return { formspec = table.concat(fs) }
2013-09-29 00:15:37 +02:00
end,
})
end
2013-09-29 00:15:37 +02:00
minetest.register_on_player_receive_fields(function(player, formname, fields)
2013-12-04 16:43:49 +01:00
if formname ~= "" then
return
end
2013-09-29 00:15:37 +02:00
for i = 1, 4 do
if fields["bag" .. i] then
local stack = get_player_bag_stack(player, i)
2013-09-29 00:15:37 +02:00
if not stack:get_definition().groups.bagslots then
return
end
ui.set_inventory_formspec(player, "bag" .. i)
2013-09-29 00:15:37 +02:00
return
end
end
end)
local function save_bags_metadata(player, bags_inv)
local is_empty = true
local bags = {}
for i = 1, 4 do
local bag = "bag" .. i
if not bags_inv:is_empty(bag) then
-- Stack limit is 1, otherwise use stack:to_string()
bags[i] = bags_inv:get_stack(bag, 1):get_name()
is_empty = false
end
end
local meta = player:get_meta()
if is_empty then
meta:set_string("unified_inventory:bags", nil)
else
meta:set_string("unified_inventory:bags",
minetest.serialize(bags))
end
end
local function load_bags_metadata(player, bags_inv)
local player_inv = player:get_inventory()
local meta = player:get_meta()
local bags_meta = meta:get_string("unified_inventory:bags")
local bags = bags_meta and minetest.deserialize(bags_meta) or {}
local dirty_meta = false
if not bags_meta then
-- Backwards compatiblity
for i = 1, 4 do
local bag = "bag" .. i
if not player_inv:is_empty(bag) then
-- Stack limit is 1, otherwise use stack:to_string()
bags[i] = player_inv:get_stack(bag, 1):get_name()
dirty_meta = true
end
end
end
-- Fill detached slots
for i = 1, 4 do
local bag = "bag" .. i
bags_inv:set_size(bag, 1)
bags_inv:set_stack(bag, 1, bags[i] or "")
end
if dirty_meta then
-- Requires detached inventory to be set up
save_bags_metadata(player, bags_inv)
end
-- Clean up deprecated garbage after saving
for i = 1, 4 do
local bag = "bag" .. i
player_inv:set_size(bag, 0)
end
end
2012-12-02 10:08:32 +01:00
minetest.register_on_joinplayer(function(player)
local player_name = player:get_player_name()
local bags_inv = minetest.create_detached_inventory(player_name .. "_bags",{
2012-12-02 10:08:32 +01:00
on_put = function(inv, listname, index, stack, player)
player:get_inventory():set_size(listname .. "contents",
2013-09-21 21:40:20 +02:00
stack:get_definition().groups.bagslots)
save_bags_metadata(player, inv)
2012-12-02 10:08:32 +01:00
end,
allow_put = function(inv, listname, index, stack, player)
local new_slots = stack:get_definition().groups.bagslots
if not new_slots then
return 0
end
local player_inv = player:get_inventory()
local old_slots = player_inv:get_size(listname .. "contents")
if new_slots >= old_slots then
return 1
end
-- using a smaller bag, make sure it fits
local old_list = player_inv:get_list(listname .. "contents")
local new_list = {}
local slots_used = 0
local use_new_list = false
for i, v in ipairs(old_list) do
if v and not v:is_empty() then
slots_used = slots_used + 1
use_new_list = i > new_slots
new_list[slots_used] = v
end
2012-12-02 10:08:32 +01:00
end
if new_slots >= slots_used then
if use_new_list then
player_inv:set_list(listname .. "contents", new_list)
end
return 1
end
2018-08-10 16:11:35 +02:00
-- New bag is smaller: Disallow inserting
return 0
2012-12-02 10:08:32 +01:00
end,
allow_take = function(inv, listname, index, stack, player)
if player:get_inventory():is_empty(listname .. "contents") then
2012-12-02 10:08:32 +01:00
return stack:get_count()
end
return 0
2012-12-02 10:08:32 +01:00
end,
on_take = function(inv, listname, index, stack, player)
player:get_inventory():set_size(listname .. "contents", 0)
save_bags_metadata(player, inv)
end,
allow_move = function()
2012-12-02 10:08:32 +01:00
return 0
end,
}, player_name)
load_bags_metadata(player, bags_inv)
2012-12-02 10:08:32 +01:00
end)
-- register bag tools
minetest.register_tool("unified_inventory:bag_small", {
description = S("Small Bag"),
2012-12-02 10:08:32 +01:00
inventory_image = "bags_small.png",
groups = {bagslots=8},
})
2013-09-21 21:40:20 +02:00
2012-12-02 10:08:32 +01:00
minetest.register_tool("unified_inventory:bag_medium", {
description = S("Medium Bag"),
2012-12-02 10:08:32 +01:00
inventory_image = "bags_medium.png",
groups = {bagslots=16},
})
2013-09-21 21:40:20 +02:00
2012-12-02 10:08:32 +01:00
minetest.register_tool("unified_inventory:bag_large", {
description = S("Large Bag"),
2012-12-02 10:08:32 +01:00
inventory_image = "bags_large.png",
groups = {bagslots=24},
})
-- register bag crafts
if minetest.get_modpath("farming") ~= nil then
minetest.register_craft({
output = "unified_inventory:bag_small",
recipe = {
2020-03-21 18:57:53 +01:00
{"", "farming:string", ""},
{"group:wool", "group:wool", "group:wool"},
{"group:wool", "group:wool", "group:wool"},
},
})
2013-09-21 21:40:20 +02:00
minetest.register_craft({
output = "unified_inventory:bag_medium",
recipe = {
{"", "", ""},
2020-03-21 18:57:53 +01:00
{"farming:string", "unified_inventory:bag_small", "farming:string"},
{"farming:string", "unified_inventory:bag_small", "farming:string"},
},
})
2013-09-21 21:40:20 +02:00
minetest.register_craft({
output = "unified_inventory:bag_large",
recipe = {
{"", "", ""},
2020-03-21 18:57:53 +01:00
{"farming:string", "unified_inventory:bag_medium", "farming:string"},
{"farming:string", "unified_inventory:bag_medium", "farming:string"},
},
})
end