Pasted

local storage=game:GetService("ServerStorage")
local sharedstorage=game:GetService("ReplicatedStorage")
local chatevent=sharedstorage:WaitForChild("ChatEvent")
 
 
local systemfontcolor=Color3.new(.83,.83,.83)
 
 
function sendchat(chattype,name,chat,namecolor,textcolor)
    if chattype=="system" or chattype=="outmatch" then
        for _,plr in pairs(game.Players:GetPlayers()) do
            if true then    --some kind of exclusive chat
                chatevent:FireClient(plr,name,chat,namecolor,textcolor)
            end
        end
    elseif chattype=="inmatch" then
        chatevent:FireAllClients(name,chat,namecolor,textcolor)
    else
        chatevent:FireAllClients(name,chat,namecolor,textcolor)
    end
end
 
function newplayer(plr)
    print("Player added yes",plr)
    sendchat("system",nil,""..plr.Name.."  joined",systemfontcolor,systemfontcolor)
    local lastchattime=tick()
    local lastmsg=""
    plr.Chatted:connect(function(msg)
        local currenttime=tick()
        if plr and msg and msg~="" and string.sub(msg,1,2)~="/w" and string.sub(msg,1,2)~="/e" and(msg~=lastmsg or (currenttime-lastchattime)>3) and (currenttime-lastchattime)>.5 then
            lastchattime=currenttime
            local lastmsg=msg
            if hascharactertag and hascharactertag.Value and plr.Character then
                sendchat("outmatch",plr.Name..":",msg)
            else
                sendchat("inmatch",plr.Character.Name..":",msg,Color3.new(.509,.796,1))
            end
        end
    end)
end
 
game.Players.PlayerAdded:connect(newplayer)A
for _,plr in pairs(game.Players:GetPlayers()) do
    newplayer(plr)
end
 
game.Players.PlayerRemoving:connect(function(plr)
    if plr then
        sendchat("system",nil,""..plr.Name.."  left",systemfontcolor,systemfontcolor)
    end
end)