【框架设计】称号橱窗：历史称号档案的回顾框架

-- 称号橱窗：过期转档
local player = class(actor)
local function archiveExpired(player, titleId)
    local expire = tonumber(getplayvar(player, "HUMAN", "TitleExp_" .. titleId) or 0)
    if expire == 0 or expire > os.time() then return end
    local year = os.date("%Y", expire)
    local archiveKey = "TitleArc_" .. year
    setplayvar(player, "HUMAN", archiveKey,
        (getplayvar(player, "HUMAN", archiveKey) or "") .. titleId .. "@" .. expire .. ";", true)
    setplayvar(player, "HUMAN", "TitleExp_" .. titleId, 0, true)
    sendmsg(player, 1, 0, "称号已转入 " .. year .. " 年荣誉档案。")
end

-- 称号橱窗：展示位管理
local player = class(actor)
local SHOWCASE = 3
local function setShowcase(player, slot, titleId)
    if slot < 1 or slot > SHOWCASE then
        sendmsg(player, 1, 0, "展示位编号 1 到 " .. SHOWCASE .. "。")
        return
    end
    setplayvar(player, "HUMAN", "Showcase_" .. slot, titleId, true)
    sendmsg(player, 1, 0, "展示位 " .. slot .. " 已更新。")
end
local function getShowcase(player)
    local list = {}
    for i = 1, SHOWCASE do
        local tid = getplayvar(player, "HUMAN", "Showcase_" .. i)
        list[#list + 1] = i .. "号位:" .. (tid ~= "0" and tid or "空")
    end
    return table.concat(list, "；")
end