【Lua实战】坐骑资质洗炼与锁定：资质洗炼的Lua实现

local QUALITIES = { "速度", "负重", "体力", "爆发", "耐力" }
local MAX_VAL = 100
local function reroll(actor, locks)
    local player = class(actor)
    local vals = {}
    for i, q in ipairs(QUALITIES) do
        if locks[i] then
            vals[i] = tonumber(getplayvar(actor, 2, "MOUNT_Q" .. i) or "0")
        else
            vals[i] = math.random(10, MAX_VAL)
        end
    end
    for i, v in ipairs(vals) do
        setplayvar(actor, "HUMAN", "MOUNT_Q" .. i, v, 1)
    end
end

local function lockSlot(actor, slot)
    local player = class(actor)
    local locked = 0
    for i = 1, 5 do
        if getplayvar(actor, 2, "MOUNT_LOCK" .. i) == 1 then
            locked = locked + 1
        end
    end
    local cost = math.floor(50 * math.pow(2, locked))
    if player:checkitemw("洗炼石", cost) == false then
        sendmsg(actor, 0, "锁定需" .. cost .. "颗洗炼石")
        return
    end
    player:takeitem("洗炼石", cost)
    setplayvar(actor, "HUMAN", "MOUNT_LOCK" .. slot, 1, 1)
    sendmsg(actor, 0, "资质条目已锁定")
end