【性能调优】宠物聚合：多宠属性的一次性结算

-- 宠物聚合：四线一次结算
local player = class(actor)
local function recalcAllPetBonus(player)
    local lines = {"fight", "assist", "dex", "inherit"}
    local total = 0
    for _, line in ipairs(lines) do
        local v = tonumber(getplayvar(player, "HUMAN", "PetAtk_" .. line) or 0)
        total = total + v
    end
    setplayvar(player, "HUMAN", "PetBonusTotal", total, true)
    sendmsg(player, 1, 0, "宠物总加成已刷新：攻击 +" .. total .. "。")
    return total
end

-- 变更合并：窗口去重
local player = class(actor)
local pending = false
local function requestPetRecalc(player)
    if pending then return end
    pending = true
    setontimer(player, 9931, 1, 1000, 0)
end
function onRecalcTick(actor)
    local player = class(actor)
    pending = false
    recalcAllPetBonus(player)
end