【进阶实战】交易公证：大额交易的三方担保封装

local function escrowBuy(buyer, sellerName, price)
    local balance = tonumber(getplayvar(buyer, 1, "Gold")) or 0
    if balance < price then
        sendmsg(buyer, 1, "余额不足。")
        return
    end
    setplayvar(buyer, 1, "Gold", balance - price, 1)
    setsysvarex("Escrow_" .. sellerName, price, 1)
    setsysvarex("EscrowTime_" .. sellerName, os.time(), 1)
    sendmsg(buyer, 1, "款项已托管，等待对方发货。")
end

local function confirmDeal(buyer, sellerName)
    local price = tonumber(getsysvar("Escrow_" .. sellerName)) or 0
    if price == 0 then
        return
    end
    setsysvarex("Escrow_" .. sellerName, 0, 1)
    local seller = getplayerbyname(sellerName)
    if seller then
        local gold = tonumber(getplayvar(seller, 1, "Gold")) or 0
        setplayvar(seller, 1, "Gold", gold + price, 1)
    else
        setsysvarex("PendingGold_" .. sellerName, price, 1)
    end
    sendmsg(buyer, 1, "交易确认，款项已放给卖家。")
end