Chat 1

local newmsg = 1
local previousmsg = 0
script.Parent.OnServerEvent:connect(function(player)
    game.ServerStorage.Value.Value = game.ServerStorage.Value.Value + 1
    for i,v in ipairs(game.Players:GetChildren()) do
            if script.Parent.Parent.player.Value == "DevScapter" then
            local text = Instance.new("TextLabel", v.PlayerGui.ScreenGui.Frame)
            text.Size = UDim2.new(1,0,0,20)
            text.Position = UDim2.new(0,0,0.99,0)
            text.Text = "[Owner] "..script.Parent.Parent.player.Value..": " ..script.Parent.Parent.msg.Value
            text.FontSize = "Size18"
            text.Name = game.ServerStorage.Value.Value
            text.TextYAlignment = "Center"
            text.TextScaled = true
            text.TextXAlignment = "Left"
            text.Font = "SourceSansBold"
            local number = Instance.new("IntValue", text)
            number.Value = newmsg
            text.BackgroundTransparency = 1
            text.TextColor3 = Color3.new(0,255,0)
            previousmsg = newmsg
            newmsg = newmsg + 1
            for i,c in pairs(v.PlayerGui.ScreenGui.Frame:GetChildren()) do
                    c.Position = c.Position-UDim2.new(0,0,0.01,0)
            end
            else
                if script.Parent.Parent.player.Value == "PixelatedCandy" or script.Parent.Parent.player.Value == "iiSpeeder" or script.Parent.Parent.player.Value == "HeadlessHorror" then
            local text = Instance.new("TextLabel", v.PlayerGui.ScreenGui.Frame)
            text.Size = UDim2.new(1,0,0,20)
            text.Position = UDim2.new(0,0,0.99,0)
            text.Text = "[Whore] "..script.Parent.Parent.player.Value..": " ..script.Parent.Parent.msg.Value
            text.FontSize = "Size18"
            text.BackgroundTransparency = 1
            text.TextColor3 = Color3.new(255,0,255)
            text.Name = game.ServerStorage.Value.Value
            text.TextYAlignment = "Center"
            text.TextScaled = true
            text.TextXAlignment = "Left"
            text.Font = "SourceSansBold"
            local number = Instance.new("IntValue", text)
            number.Value = newmsg
            previousmsg = newmsg
            newmsg = newmsg + 1
            for i,c in pairs(v.PlayerGui.ScreenGui.Frame:GetChildren()) do
                    c.Position = c.Position-UDim2.new(0,0,0.01,0)
            end
                else
                    if script.Parent.Parent.player.Value == "swetbuizell" or script.Parent.Parent.player.Value == "NaturalEvolution" then
            local text = Instance.new("TextLabel", v.PlayerGui.ScreenGui.Frame)
            text.Size = UDim2.new(1,0,0,20)
            text.Position = UDim2.new(0,0,0.99,0)
            text.Text = "[Buttmunch] "..script.Parent.Parent.player.Value..": " ..script.Parent.Parent.msg.Value
            text.FontSize = "Size18"
            text.Name = game.ServerStorage.Value.Value
            text.TextYAlignment = "Center"
            text.TextScaled = true
            text.TextXAlignment = "Left"
            text.Font = "SourceSansBold"
            local number = Instance.new("IntValue", text)
            number.Value = newmsg
            text.BackgroundTransparency = 1
            text.TextColor3 = Color3.new(255, 170, 0)
            previousmsg = newmsg
            newmsg = newmsg + 1
            for i,c in pairs(v.PlayerGui.ScreenGui.Frame:GetChildren()) do
                    c.Position = c.Position-UDim2.new(0,0,0.01,0)
            end
            else
            local text = Instance.new("TextLabel", v.PlayerGui.ScreenGui.Frame)
            text.Size = UDim2.new(1,0,0,20)
            text.Position = UDim2.new(0,0,0.99,0)
            text.Text = script.Parent.Parent.player.Value..": " ..script.Parent.Parent.msg.Value
            text.FontSize = "Size18"
            text.TextScaled = true
            text.Name = game.ServerStorage.Value.Value
            text.TextYAlignment = "Center"
            text.TextXAlignment = "Left"
            text.Font = "SourceSansBold"
            local number = Instance.new("IntValue", text)
            number.Value = newmsg
            text.BackgroundTransparency = 1
            text.TextColor3 = Color3.new(255,255,255)
            previousmsg = newmsg
            newmsg = newmsg + 1
            for i,c in pairs(v.PlayerGui.ScreenGui.Frame:GetChildren()) do
                    c.Position = c.Position-UDim2.new(0,0,0.01,0)
                    end
            end
                end
                end
        end
end)