chat

local cg = Instance.new('ScreenGui', game.CoreGui)
cg.Name = 'CHATGUI'
game.Players.LocalPlayer.Name = 'Guest'
game.Players.LocalPlayer.userId = 261
game.Players.LocalPlayer:SetSuperSafeChat(false)
local cb = Instance.new('TextBox', cg)
cb.Size=UDim2.new(1, 0, 0, 20)
cb.TextXAlignment = 'Left'
cb.BackgroundColor3 = Color3.new(25/255, 25/255, 25/255)
cb.TextColor3 = Color3.new(255, 255, 255)
cb.Font = 'SourceSansLight'
cb.FontSize = 'Size14'
cb.BorderColor3 = Color3.new(255/255, 255/255, 255/255)
cb.Position=UDim2.new(0,0,1,-20)
cb.Text='Click here to chat.'
cb.FocusLost:connect(function(e)
    if e then
        game.Players:Chat(cb.Text)
        cb.Text='Click here or press "R" to chat.'
    end
end)
game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(k)
    if k == 'r' then
        cb:CaptureFocus()
    end
end)
local gui = Instance.new("ScreenGui",game.CoreGui)
gui.Name = "OutputGui"
local Outputs = Instance.new("ScrollingFrame",gui)
Outputs.Visible=false
Outputs.BackgroundColor3=Color3.new(0,0,0)
Outputs.BorderColor3=Color3.new(0,0,0)
Outputs.BorderSizePixel=0
Outputs.Position = UDim2.new(.675,0,.725,0)
Outputs.Size=UDim2.new(.3,0,.2,0)
Outputs.CanvasSize=UDim2.new(1.2,0,2,0)
Outputs.ScrollBarThickness=6
Outputs.ScrollingEnabled=true
Outputs.CanvasPosition = Vector2.new(0, 10000)
local Output = function(text)
local color = Color3.new(1,1,1)
local outputList = Outputs:GetChildren()
for i,v in next,Outputs:GetChildren() do
if v:IsA("StringValue") then
table.remove(outputList, i)
else
v.Position = v.Position - UDim2.new(0,0,v.Size.Y.Scale/10,0)
end
end
local NewOutputLine = Instance.new("TextLabel",Outputs)
NewOutputLine.Text = text
NewOutputLine.Size = UDim2.new(1,0,.15,0)
NewOutputLine.Position = UDim2.new(0,0,.985,0)
NewOutputLine.Font = "SourceSansBold"
NewOutputLine.TextColor3 = color
NewOutputLine.TextStrokeTransparency = 0
NewOutputLine.BackgroundTransparency = 1
NewOutputLine.BorderSizePixel = 0
NewOutputLine.FontSize = "Size14"
NewOutputLine.TextXAlignment = "Left"
NewOutputLine.TextYAlignment = "Top"
NewOutputLine.ClipsDescendants = true
NewOutputLine.Name = "OutputLine"
end
local Visible = false
local Open_Close = Instance.new("TextButton",gui)
Open_Close.BackgroundColor3=Color3.new(0,0,0)
Open_Close.BackgroundTransparency=0.5
Open_Close.BorderColor3=Color3.new(0,0,0)
Open_Close.BorderSizePixel=0
Open_Close.Position=UDim2.new(.675,0,.9,0)
Open_Close.Size=UDim2.new(.3,0,.025,0)
Open_Close.Font=Enum.Font.SourceSansBold
Open_Close.FontSize=Enum.FontSize.Size12
Open_Close.Text="Chat Gui - Open"
Open_Close.TextColor3=Color3.new(255,255,255)
Open_Close.TextStrokeColor3=Color3.new(255,255,255)
Open_Close.TextStrokeTransparency=1
Open_Close.MouseButton1Click:connect(function()
if Visible == false then
Outputs.Visible = true
Open_Close.Position = UDim2.new(.675, 0, .7, 0)
Open_Close.Text = "Chat Gui - Close"
Visible = true
else
Outputs.Visible = false
Open_Close.Position = UDim2.new(.675, 0, .9, 0)
Open_Close.Text = "Chat Gui - Open"
Visible = false
end
end)
for _,plr in next,game.Players:GetChildren() do
    if not plr:IsA("Player") then return end
    plr.Chatted:connect(function(msg)
        Output(plr.Name .. ": " .. msg)
    end)
end
game.Players.PlayerAdded:connect(function(plr)
    plr.Chatted:connect(function(msg)
        Output(plr.Name .. ": " .. msg)
    end)
end)