【Lua实战】宝石合成：三合一递减产出与碎屑保底的实现

local RATE = { [1] = 100, [2] = 100, [3] = 100, [4] = 80, [5] = 80, [6] = 80, [7] = 60 }
function composeGem(actor, lv)
    local player = class(actor)
    local mat = "宝石" .. lv .. "级"
    if player:checkitemw(mat, 3) == false then
        sendmsg(actor, 0, "需要3颗" .. mat)
        return
    end
    player:takeitem(mat, 3)
    if math.random(1, 100) <= RATE[lv] then
        giveitem(actor, "宝石" .. (lv + 1) .. "级", 1)
        sendmsg(actor, 0, "合成成功！获得" .. "宝石" .. (lv + 1) .. "级")
    else
        giveitem(actor, "宝石碎屑", 2)
        sendmsg(actor, 0, "合成失败，返还宝石碎屑2颗")
    end
end

function exchangeChip(actor)
    local player = class(actor)
    local chips = tonumber(getplayvar(actor, 2, "GEM_CHIP") or "0")
    if chips < 10 then
        sendmsg(actor, 0, "碎屑不足10颗，当前" .. chips)
        return
    end
    setplayvar(actor, "HUMAN", "GEM_CHIP", chips - 10, 1)
    giveitem(actor, "宝石1级", 1)
end