【玩法策划】行会授勋夜：季度授勋的仪式设计

-- 授勋夜：功勋核定与开启
local player = class(actor)
local HONOR_TYPES = {
    {key = "SiegeHonor", name = "攻城先锋", need = 50},
    {key = "AttendHonor", name = "全勤标兵", need = 30},
    {key = "FundHonor", name = "基石功臣", need = 100000},
}
local function startCeremony(player)
    local list = {}
    for i = 1, 100 do
        local name = getplayvar(player, "HUMAN", "Member_" .. i)
        if name and name ~= "" then
            local mate = class(name)
            for _, h in ipairs(HONOR_TYPES) do
                local val = tonumber(getplayvar(mate, "HUMAN", h.key) or 0)
                if val >= h.need then
                    list[#list + 1] = name .. "（" .. h.name .. "）"
                end
            end
        end
    end
    sendcentermsg(player, 255, 0, "行会授勋夜开启！本次共 " .. #list .. " 人获勋。", 0, 10)
end

-- 授勋夜：勋章授予
local player = class(actor)
local MEDAL_TIERS = {{50, "铜勋"}, {200, "银勋"}, {500, "金勋"}}
local function grantMedal(player, mateName, seasonHonor)
    local totalHonor = tonumber(getplayvar(class(mateName), "HUMAN", "SeasonHonor") or 0) + seasonHonor
    setplayvar(class(mateName), "HUMAN", "SeasonHonor", totalHonor, true)
    for i = #MEDAL_TIERS, 1, -1 do
        if totalHonor >= MEDAL_TIERS[i][1] then
            setplayvar(class(mateName), "HUMAN", "MedalTier", i, true)
            giveitem(class(mateName), "行会勋章·" .. MEDAL_TIERS[i][2], 1)
            if i == 3 then
                giveitem(class(mateName), "限定坐骑体验卡", 7)
            end
            break
        end
    end
end