【进阶实战】免打扰时段：私聊屏蔽的时间窗封装

local function setQuiet(actor, startH, endH)
    setplayvar(actor, 1, "QuietStart", startH, 1)
    setplayvar(actor, 1, "QuietEnd", endH, 1)
    sendmsg(actor, 1, "免打扰 " .. startH .. " 点至 " .. endH .. " 点生效。")
end
local function isQuietNow(actor)
    local s = tonumber(getplayvar(actor, 1, "QuietStart")) or -1
    local e = tonumber(getplayvar(actor, 1, "QuietEnd")) or -1
    if s < 0 then
        return false
    end
    local h = tonumber(os.date("%H")) or 12
    if s <= e then
        return h >= s and h < e
    end
    return h >= s or h < e
end

local function onWhisper(fromActor, toActor, text)
    if isQuietNow(toActor) then
        local box = tostring(getplayvar(toActor, 1, "QuietBox") or "")
        if #box < 1200 then
            setplayvar(toActor, 1, "QuietBox",
                box .. tostring(getplayvar(fromActor, 0, "ShowName") or "匿名")
                    .. ":" .. text .. ";", 1)
        end
        return
    end
    sendmsg(toActor, 1, "[私聊] " .. text)
end