【进阶实战】延迟邮件：高危奖励的5分钟撤销窗

local pendingMail = {}
local function submitDelayedMail(actor, rewards, memo)
    actor = getplayerbyname(actor)
    local ticket = "M" .. os.time()
    pendingMail[ticket] = { to = tostring(actor), rewards = rewards, memo = memo }
    setontimerex(66, 300)
    setplayvar(actor, "HUMAN", "LastTicket", ticket, 1)
    sendmsg(actor, 1, "奖励进入 300 秒撤销窗，票号[" .. ticket .. "]。")
    return ticket
end
local function cancelMail(ticket)
    if pendingMail[ticket] ~= nil then
        pendingMail[ticket] = nil
        sendmsg(nil, 1, "邮件[" .. ticket .. "]已撤销，未入箱。")
        return true
    end
    return false
end

local function flushMails()
    for ticket, mail in pairs(pendingMail) do
        sendmail("#" .. mail.to, 9010, "奖励发放", mail.memo, mail.rewards)
        pendingMail[ticket] = nil
    end
end
local function ontimerex66()
    flushMails()
end