【进阶实战】洗牌不发同色：连续随机的不重复约束

local pool = { "头奖", "二等奖", "三等奖", "谢谢参与", "谢谢参与" }
local history = {}
local function drawConstrained(maxRepeat)
    for attempt = 1, 3 do
        local pick = pool[math.random(#pool)]
        local recent = 0
        for _, h in ipairs(history) do
            if h == pick then
                recent = recent + 1
            end
        end
        if recent < maxRepeat then
            history[#history + 1] = pick
            if #history > 2 then
                table.remove(history, 1)
            end
            return pick
        end
    end
    local fallback = pool[math.random(#pool)]
    history[#history + 1] = fallback
    return fallback
end

local lastMsg = ""
local function shout(text)
    if text == lastMsg then
        return false
    end
    lastMsg = text
    sendmsg(nil, 1, text)
    return true
end