111 lines
3.3 KiB
Lua
111 lines
3.3 KiB
Lua
local modpath = minetest.get_modpath(minetest.get_current_modname())
|
|
local S = minetest.get_translator(minetest.get_current_modname())
|
|
local modmeta = minetest.get_mod_storage()
|
|
|
|
collectible_lore = {}
|
|
collectible_lore.lorebooks = {}
|
|
|
|
local ids = {}
|
|
|
|
local on_collected_callbacks = {}
|
|
|
|
collectible_lore.register_on_collected = function(callback)
|
|
table.insert(on_collected_callbacks, callback)
|
|
end
|
|
|
|
collectible_lore.get_player_collected = function(player_name)
|
|
local collected_string = modmeta:get("player_" .. player_name)
|
|
if collected_string == nil then
|
|
return {}
|
|
else
|
|
return minetest.deserialize(collected_string)
|
|
end
|
|
end
|
|
|
|
collectible_lore.get_player_uncollected_list = function(player_name)
|
|
local collected = collectible_lore.get_player_collected(player_name)
|
|
--minetest.debug(dump(collected))
|
|
local uncollected = {}
|
|
for index, def in pairs(collectible_lore.lorebooks) do
|
|
if not collected[def.id] then
|
|
table.insert(uncollected, index)
|
|
end
|
|
end
|
|
return uncollected
|
|
end
|
|
|
|
local set_collected = function(player_name, id, state)
|
|
if not ids[id] then
|
|
minetest.log("error", "[collectible_lore] Setting state for unknown collectible id " .. id .. " for player " .. player_name)
|
|
state = nil
|
|
end
|
|
local collected = collectible_lore.get_player_collected(player_name)
|
|
if collected[id] ~= state then
|
|
collected[id] = state
|
|
modmeta:set_string("player_" .. player_name, minetest.serialize(collected))
|
|
for _, callback in ipairs(on_collected_callbacks) do
|
|
callback(player_name, id, state, collected)
|
|
end
|
|
end
|
|
end
|
|
|
|
collectible_lore.collect = function(player_name, id)
|
|
set_collected(player_name, id, true)
|
|
end
|
|
|
|
collectible_lore.uncollect = function(player_name, id)
|
|
set_collected(player_name, id, nil)
|
|
end
|
|
|
|
local collectible_lore_sort = function(first, second)
|
|
if (first.sort or 0) < (second.sort or 0) then
|
|
return true
|
|
end
|
|
if first.sort == second.sort then
|
|
return first.id < second.id
|
|
end
|
|
return false
|
|
end
|
|
|
|
collectible_lore.register_lorebook = function(def)
|
|
if def.id == nil then
|
|
minetest.log("error", "[collectible_lore] nil id for def " .. dump(def))
|
|
return false
|
|
end
|
|
if ids[def.id] then
|
|
minetest.log("error", "[collectible_lore] Duplicate unique lore id for defs " .. dump(def) .. " and " .. dump(ids[def.id]))
|
|
return false
|
|
end
|
|
ids[def.id] = def
|
|
table.insert(collectible_lore.lorebooks, def)
|
|
table.sort(collectible_lore.lorebooks, collectible_lore_sort)
|
|
end
|
|
|
|
minetest.register_chatcommand("collectible", {
|
|
params = "[collect|uncollect|clear|show] <player_name> <id>", -- Short parameter description
|
|
description = S("Administrative control of collectibles"),
|
|
privs = {server=true},
|
|
func = function(name, param)
|
|
local first, second, third = param:match("^([^%s]+)%s+(%S+)%s*(.*)")
|
|
if third == "" then third = nil end
|
|
if first == "uncollect" and second and third then
|
|
collectible_lore.uncollect(second, third)
|
|
return
|
|
elseif first == "collect" and second and third then
|
|
collectible_lore.collect(second, third)
|
|
return
|
|
elseif first == "clear" and second then
|
|
modmeta:set_string("player_" .. second, minetest.serialize({}))
|
|
return
|
|
elseif first == "show" and second then
|
|
minetest.chat_send_player(name, dump(collectible_lore.get_player_collected(second)))
|
|
return
|
|
end
|
|
|
|
minetest.chat_send_player(name, S("error parsing command"))
|
|
end,
|
|
})
|
|
|
|
|
|
dofile(modpath.."/items.lua")
|