【数据存储】临时背包：活动道具的独立背包实现

-- 临时背包：识别与入包
local player = class(actor)
local TEMP_CAP = 40
local function addItemTemp(player, itemName, count, isTemp)
    if not isTemp then
        giveitem(player, itemName, count)
        return
    end
    local used = tonumber(getplayvar(player, "HUMAN", "TempBagUsed") or 0)
    if used >= TEMP_CAP then
        sendmail("#" .. (getbaseinfo(player, 3) or ""), 8011, "活动道具转邮件",
            "临时背包已满，道具转邮件发放。", itemName .. "#" .. count .. "#0")
        return
    end
    setplayvar(player, "HUMAN", "TempItem_" .. itemName,
        tonumber(getplayvar(player, "HUMAN", "TempItem_" .. itemName) or 0) + count, true)
    setplayvar(player, "HUMAN", "TempBagUsed", used + 1, true)
end

-- 临时背包：活动结束清空
local player = class(actor)
local function expireTempBag(player, actId)
    if getplayvar(player, "HUMAN", "TempBagAct") ~= actId then return end
    local refund = 0
    for k in pairs(getplayvar(player, "HUMAN") or {}) do
        if string.find(k, "TempItem_", 1, true) then
            refund = refund + 100
            setplayvar(player, "HUMAN", k, "", true)
        end
    end
    setplayvar(player, "HUMAN", "TempBagUsed", 0, true)
    giveitem(player, "金币袋", math.max(1, math.floor(refund / 1000)))
    sendmsg(player, 1, 0, "活动结束，临时背包已结算，回收奖励 " ..
        math.max(1, math.floor(refund / 1000)) .. " 个金币袋。")
end