anomic phone functions

local function r(...)
    return game:GetService("ReplicatedStorage"):FindFirstChild("_CS.Events").TravelMessage:InvokeServer(...)
end
local function send(p,msg)
    local R,m = {r("PrivateMessage",p,msg)}
    if not R[1] and m ~= "This player has their phone turned off." then
        repeat
            R,m = r("PrivateMessage",p,msg)
            if m == "This player has their phone turned off." then break end
            wait()
        until R
    end
    return R,m
end
local function advertise(msg)
    return r("Advertisement",msg)
end
local function forceadvertise(msg)
    for i,v in next, game.Players:GetPlayers() do
        spawn(function() send(v,msg) end)
    end
end
return {
    send = send;
    advertise = advertise;
    forceadvertise = forceadvertise;
}