【玩法策划】碎片兑换：碎片收集与整装兑换的规则设计

-- 碎片掉落：判定与粉末转化
local player = class(actor)
local PARTS = {"blade", "armor", "helmet", "belt", "boots", "necklace"}
function onEliteKill(actor, monName)
    local player = class(actor)
    local kills = tonumber(getplayvar(player, "HUMAN", "EliteKillsToday") or 0)
    if kills >= 3 then return end
    setplayvar(player, "HUMAN", "EliteKillsToday", kills + 1, true)
    if math.random(1, 100) > 25 then return end
    local part = PARTS[math.random(1, #PARTS)]
    local own = tonumber(getplayvar(player, "HUMAN", "Frag_" .. part) or 0)
    if own >= 10 then
        setplayvar(player, "HUMAN", "FragPowder", tonumber(getplayvar(player, "HUMAN", "FragPowder") or 0) + 5)
        sendmsg(player, 1, 0, "该部位碎片已满，转化为碎片粉末 x5。")
    else
        setplayvar(player, "HUMAN", "Frag_" .. part, own + 1, true)
        sendmsg(player, 1, 0, "获得「" .. part .. "」碎片 " .. own + 1 .. "/10。")
    end
end

-- 碎片兑换：合成确认
local player = class(actor)
local function tryAssemble(player)
    local ready = true
    for _, part in ipairs(PARTS) do
        if tonumber(getplayvar(player, "HUMAN", "Frag_" .. part) or 0) < 10 then
            ready = false
        end
    end
    if not ready then
        sendmsg(player, 1, 0, "六个部位各需 10 块碎片，还差一些。")
        return
    end
    if getplayvar(player, "HUMAN", "AssembleConfirm") ~= 1 then
        setplayvar(player, "HUMAN", "AssembleConfirm", 1, true)
        sendmsg(player, 1, 0, "确认合成屠龙？合成后碎片消耗，请再次点击确认。")
        return
    end
    for _, part in ipairs(PARTS) do
        setplayvar(player, "HUMAN", "Frag_" .. part, 0, true)
    end
    giveitem(player, "屠龙", 1)
    sendcentermsg(player, 255, 0, getbaseinfo(player, 3) .. " 合成了神兵屠龙！", 0, 10)
end