【数据存储】存档键名压缩：变量袋的字典化瘦身方案

local DICT = {
    ARENA_PT = "A1", DAILY_SIGN = "A2", GUILD_PT = "A3",
    PKVAL = "B1", MOUNT_GROW = "B2", TITLE_CNT = "B3",
}
local RDict = {}
for k, v in pairs(DICT) do RDict[v] = k end
local function writeKey(actor, longKey, val)
    local player = class(actor)
    local short = DICT[longKey]
    if short == nil then
        setplayvar(actor, "HUMAN", longKey, val, 1)
        return
    end
    setplayvar(actor, "HUMAN", short, val, 1)
end
local function readKey(actor, longKey)
    local player = class(actor)
    local short = DICT[longKey]
    if short ~= nil then
        local v = getplayvar(actor, 2, short)
        if v ~= nil and v ~= "" then return v end
    end
    return getplayvar(actor, 2, longKey)
end

local function auditSize(actor)
    local player = class(actor)
    local before = tonumber(getplayvar(actor, 2, "SAVE_SIZE_OLD") or "0")
    local sample = readKey(actor, "ARENA_PT")
    setsysvar("COMPRESS_SAMPLE", tostring(sample) ~= "" and "ok" or "empty")
    return before
end