【进阶实战】全服红包：手气拆分与过期退回封装

local redPacket = { total = 0, shares = 0, deadline = 0, taken = {} }
local function openPacket()
    redPacket.total = 1000
    redPacket.shares = 200
    redPacket.deadline = os.time() + 300
    redPacket.taken = {}
    sendmsg(nil, 1, "庆典红包开启：1000 根金条拆 200 份，5 分钟内手快有手气更好！")
end
local function grabPacket(actor)
    actor = getplayerbyname(actor)
    if redPacket.shares <= 0 or os.time() > redPacket.deadline then
        sendmsg(actor, 1, "红包已抢完或已过期。")
        return
    end
    if redPacket.taken[tostring(actor)] then
        sendmsg(actor, 1, "一人限领一份。")
        return
    end
    local maxShare = math.max(1, math.floor(2 * redPacket.total / redPacket.shares) - 1)
    local amount = math.random(1, maxShare)
    redPacket.total = redPacket.total - amount
    redPacket.shares = redPacket.shares - 1
    redPacket.taken[tostring(actor)] = amount
    giveitem(actor, "金条", amount)
    sendmsg(actor, 1, "手气揭晓：" .. amount .. " 根金条！")
end

local function refundPacket()
    if redPacket.shares > 0 and os.time() > redPacket.deadline then
        local pool = tonumber(getsysvar("PacketPool")) or 0
        setsysvarex("PacketPool", pool + redPacket.total, 1)
        sendmsg(nil, 1, "红包过期，" .. redPacket.total .. " 根金条滚入下次奖池。")
        redPacket.shares = 0
        redPacket.total = 0
    end
end