【案例复盘】重复充值：支付回调重复的资损复盘

local function processPayment(orderId, amount)
    local key = "PAY_" .. orderId
    local processed = getsysvar(key) or ""
    if processed ~= "" then
        sendcentermsg("订单 " .. orderId .. " 已处理过，跳过重复通知")
        return
    end
    setsysvarex(key, os.time(), 1)
    giveitem(actor, "元宝", amount)
end

local function reclaimDuplicate(actor, dupAmount)
    local p = class(actor)
    local held = tonumber(getplayvar(actor, "HUMAN", "INGOT") or "0")
    local actual = math.min(dupAmount, held)
    if actual > 0 then
        setplayvar(actor, "HUMAN", "INGOT", held - actual, 1)
    end
    sendmail("#" .. p:GetName(), 954, "重复充值处理通知",
        "多发放的 " .. actual .. " 元宝已回收", "")
end