【入门夯实】成就积分的兑换入门：点数换道具的基础写法

local function exchange(actor, itemId, cost)
    giveitem(actor, itemId, 1, 0, "成就兑换")
end

local function exchange(actor, itemId, cost, weeklyLimit)
    actor = getplayerbyname(actor)
    local pts = tonumber(getplayvar(actor, "HUMAN", "AchievePt")) or 0
    if pts < cost then
        sendmsg(actor, 1, "成就点不足。")
        return false
    end
    local week = os.date("%Y%W") .. itemId
    local bought = tonumber(getplayvar(actor, "HUMAN", "Ex_" .. week)) or 0
    if bought >= weeklyLimit then
        sendmsg(actor, 1, "本周限购已满。")
        return false
    end
    setplayvar(actor, "HUMAN", "AchievePt", pts - cost, 1)
    setplayvar(actor, "HUMAN", "Ex_" .. week, bought + 1, 1)
    giveitem(actor, itemId, 1, 0, "成就兑换")
    sendmsg(actor, 1, "兑换成功。")
    return true
end

exchange(actor, "龙纹剑", 3000, 1)

local key = "Ex_" .. week .. "_" .. itemId