【进阶实战】等级封顶经验存储：满级经验的折算封装

local LEVEL_CAP = 100
local function addExp(actor, gain)
    actor = getplayerbyname(actor)
    local lv = tonumber(getplayvar(actor, "HUMAN", "Level")) or 1
    if lv >= LEVEL_CAP then
        local pool = tonumber(getplayvar(actor, "HUMAN", "ExpPool")) or 0
        pool = pool + math.floor(gain * 0.5)
        setplayvar(actor, "HUMAN", "ExpPool", pool, 1)
        return
    end
    addLevelExp(actor, gain)
end
local function exchangePool(actor)
    actor = getplayerbyname(actor)
    local pool = tonumber(getplayvar(actor, "HUMAN", "ExpPool")) or 0
    local items = math.floor(pool / 100000)
    if items < 1 then
        sendmsg(actor, 1, "封顶经验不足 10 万，无法兑换。")
        return
    end
    setplayvar(actor, "HUMAN", "ExpPool", pool - items * 100000, 1)
    giveitem(actor, "经验丹", items, 1, "封顶经验兑换")
end

local function showPool(actor)
    actor = getplayerbyname(actor)
    sendmsg(actor, 1, "封顶经验池：" ..
        (tonumber(getplayvar(actor, "HUMAN", "ExpPool")) or 0))
end