【玩法策划】行会勋章墙：功勋成员的展示与荣誉体系

-- 勋章墙：功勋累计与授勋
local player = class(actor)
local HONOR_TIERS = {{20, "铜", 1}, {50, "银", 2}, {100, "金", 3}}
local function addHonor(player, pts, source)
    local honor = tonumber(getplayvar(player, "HUMAN", "Honor_" .. source) or 0) + pts
    setplayvar(player, "HUMAN", "Honor_" .. source, honor, true)
    local curTier = tonumber(getplayvar(player, "HUMAN", "Tier_" .. source) or 0)
    for _, tier in ipairs(HONOR_TIERS) do
        if honor >= tier[1] and curTier < tier[3] then
            setplayvar(player, "HUMAN", "Tier_" .. source, tier[3], true)
            sendcentermsg(player, 255, 0, getbaseinfo(player, 3) ..
                " 荣获" .. source .. tier[2] .. "勋章，已镌刻于行会勋章墙！", 0, 8)
        end
    end
end

-- 勋章墙：墙面陈列
local player = class(actor)
local function renderWall(player, wallList)
    local lines = {}
    for i, m in ipairs(wallList) do
        lines[i] = m.tier .. "勋章·" .. m.name .. "（" .. m.source .. "）"
    end
    for i = 1, math.min(10, #lines) do
        sendmsg(player, 1, 0, "第 " .. i .. " 位：" .. lines[i])
    end
    if #wallList == 0 then
        sendmsg(player, 1, 0, "勋章墙虚位以待，攻城、捐献、带新皆可镌名。")
    end
end