--Made By Rkq5
local ScreenGui = Instance.new("ScreenGui")
local MainFrame = Instance.new("Frame")
local Title = Instance.new("TextLabel")
local Line = Instance.new("Frame")
local C1 = Instance.new("TextLabel")
local C2 = Instance.new("TextLabel")
local C3 = Instance.new("TextLabel")
local C4 = Instance.new("TextLabel")
local C5 = Instance.new("TextLabel")
local C6 = Instance.new("TextLabel")
local C7 = Instance.new("TextLabel")
local C8 = Instance.new("TextLabel")
local C9 = Instance.new("TextLabel")
local Close = Instance.new("TextButton")

ScreenGui.Parent = game.CoreGui

MainFrame.Name = "MainFrame"
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
MainFrame.BackgroundTransparency = 0.400
MainFrame.BorderColor3 = Color3.fromRGB(71, 71, 71)
MainFrame.Position = UDim2.new(0, 0, 0.15, 0)
MainFrame.Size = UDim2.new(0, 253, 0, 129)
MainFrame.BorderSizePixel = 0

Title.Name = "Title"
Title.Parent = MainFrame
Title.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Title.BackgroundTransparency = 1.000
Title.Size = UDim2.new(0, 253, 0, 11)
Title.Font = Enum.Font.Code
Title.Text = "Chat"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.TextSize = 12.000

Line.Name = "Line"
Line.Parent = MainFrame
Line.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
Line.BorderSizePixel = 0
Line.Position = UDim2.new(0, 0, 0.0852713212, 0)
Line.Size = UDim2.new(0, 253, 0, 1)

C1.Name = "C1"
C1.Parent = MainFrame
C1.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C1.BackgroundTransparency = 1.000
C1.Position = UDim2.new(0, 0, 0.0930232555, 0)
C1.Size = UDim2.new(0, 253, 0, 12)
C1.Font = Enum.Font.SourceSans
C1.Text = ""
C1.TextColor3 = Color3.fromRGB(255, 255, 255)
C1.TextSize = 14.000
--C1.TextScaled = true
C1.TextWrapped = true

C2.Name = "C2"
C2.Parent = MainFrame
C2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C2.BackgroundTransparency = 1.000
C2.Position = UDim2.new(0, 0, 0.186046511, 0)
C2.Size = UDim2.new(0, 253, 0, 12)
C2.Font = Enum.Font.SourceSans
C2.Text = ""
C2.TextColor3 = Color3.fromRGB(255, 255, 255)
C2.TextSize = 14.000
--C2.TextScaled = true
C2.TextWrapped = true

C3.Name = "C3"
C3.Parent = MainFrame
C3.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C3.BackgroundTransparency = 1.000
C3.Position = UDim2.new(0, 0, 0.279069781, 0)
C3.Size = UDim2.new(0, 253, 0, 12)
C3.Font = Enum.Font.SourceSans
C3.Text = ""
C3.TextColor3 = Color3.fromRGB(255, 255, 255)
C3.TextSize = 14.000
--C3.TextScaled = true
C3.TextWrapped = true

C4.Name = "C4"
C4.Parent = MainFrame
C4.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C4.BackgroundTransparency = 1.000
C4.Position = UDim2.new(0, 0, 0.372093022, 0)
C4.Size = UDim2.new(0, 253, 0, 12)
C4.Font = Enum.Font.SourceSans
C4.Text = ""
C4.TextColor3 = Color3.fromRGB(255, 255, 255)
C4.TextSize = 14.000
--C4.TextScaled = true
C4.TextWrapped = true

C5.Name = "C5"
C5.Parent = MainFrame
C5.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C5.BackgroundTransparency = 1.000
C5.Position = UDim2.new(0, 0, 0.465116262, 0)
C5.Size = UDim2.new(0, 253, 0, 12)
C5.Font = Enum.Font.SourceSans
C5.Text = ""
C5.TextColor3 = Color3.fromRGB(255, 255, 255)
C5.TextSize = 14.000
--C5.TextScaled = true
C5.TextWrapped = true

C6.Name = "C6"
C6.Parent = MainFrame
C6.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C6.BackgroundTransparency = 1.000
C6.Position = UDim2.new(0, 0, 0.558139503, 0)
C6.Size = UDim2.new(0, 253, 0, 12)
C6.Font = Enum.Font.SourceSans
C6.Text = ""
C6.TextColor3 = Color3.fromRGB(255, 255, 255)
C6.TextSize = 14.000
--C6.TextScaled = true
C6.TextWrapped = true

C7.Name = "C7"
C7.Parent = MainFrame
C7.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C7.BackgroundTransparency = 1.000
C7.Position = UDim2.new(0, 0, 0.651162744, 0)
C7.Size = UDim2.new(0, 253, 0, 12)
C7.Font = Enum.Font.SourceSans
C7.Text = ""
C7.TextColor3 = Color3.fromRGB(255, 255, 255)
C7.TextSize = 14.000
--C7.TextScaled = true
C7.TextWrapped = true

C8.Name = "C8"
C8.Parent = MainFrame
C8.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C8.BackgroundTransparency = 1.000
C8.Position = UDim2.new(0, 0, 0.744185984, 0)
C8.Size = UDim2.new(0, 253, 0, 12)
C8.Font = Enum.Font.SourceSans
C8.Text = ""
C8.TextColor3 = Color3.fromRGB(255, 255, 255)
C8.TextSize = 14.000
--C8.TextScaled = true
C8.TextWrapped = true

C9.Name = "C9"
C9.Parent = MainFrame
C9.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
C9.BackgroundTransparency = 1.000
C9.Position = UDim2.new(0, 0, 0.837209225, 0)
C9.Size = UDim2.new(0, 253, 0, 12)
C9.Font = Enum.Font.SourceSans
C9.Text = ""
C9.TextColor3 = Color3.fromRGB(255, 255, 255)
C9.TextSize = 14.000
--C9.TextScaled = true
C9.TextWrapped = true

Close.Name = "Close"
Close.Parent = MainFrame
Close.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
Close.BackgroundTransparency = 0.500
Close.BorderSizePixel = 0
Close.Position = UDim2.new(1, 0, 0.449612409, 0)
Close.Size = UDim2.new(0, 12, 0, 13)
Close.Font = Enum.Font.SourceSans
Close.Text = "<"
Close.TextColor3 = Color3.fromRGB(255, 255, 255)
Close.TextSize = 14.000


local function RGB_Title()
	local script = Instance.new('LocalScript', Line)

	function zigzag(X) return math.acos(math.cos(X*math.pi))/math.pi end
	local counter1 = 1
	while wait(0.1) do
	script.Parent.BackgroundColor3 = Color3.fromHSV(zigzag(counter1),1,1) 
	counter1 = counter1 + 0.009
	end
end
coroutine.wrap(RGB_Title)()

local ChatFull = false
local CurrentChat = C1
local Players = {}

game.Players.PlayerAdded:Connect(function(Player)
table.insert(Players,Player)
end)
for i,v in pairs(game.Players:GetPlayers()) do
	table.insert(Players,v)
end

local Closed = true
Close.MouseButton1Click:connect(function()
if Closed == true then
	Closed = false
	MainFrame:TweenSize(UDim2.new(0, 0,0, 129), "Out", "Quad", 0.2, false)
	Line:TweenSize(UDim2.new(0, 0,0, 1), "Out", "Quad", 0.2, false)	
	Close.Text = '>'
	for _,z in pairs(MainFrame:GetChildren()) do
	if z:IsA("TextLabel") then			
		z.Visible = false
		end		
	end	
else
	if Closed == false then
    Closed = true
	MainFrame:TweenSize(UDim2.new(0, 253, 0, 129), "Out", "Quad", 0.3, false)
	Line:TweenSize(UDim2.new(0, 253,0, 1), "Out", "Quad", 0.3, false)
	wait(.2)		
	for _,z in pairs(MainFrame:GetChildren()) do
	if z:IsA("TextLabel") then			
		z.Visible = true
		end		
	end		
    Close.Text = '<'
	end
end	
end)

function Chat_Spy()
for _,v in pairs(Players) do
	v.Chatted:Connect(function(msg)
	if C1.Text == "" then			
	C1.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C1
	elseif C2.Text == "" then	
	C2.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C2
	elseif C3.Text == "" then		
	C3.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C3
	elseif C4.Text == "" then
	C4.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C4
	elseif C5.Text == "" then	
	C5.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C5
	elseif C6.Text == "" then
	C6.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C6
	elseif C7.Text == "" then	
	C7.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C7
	elseif C8.Text == "" then			
	C8.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C8
	elseif C9.Text == "" then
	C9.Text = "["..v.Name.."] "..msg..""
	CurrentChat = C9
	ChatFull = true
	end
if ChatFull == true then
for _,z in pairs(MainFrame:GetChildren()) do
	if z:IsA("TextLabel") then
	if z.Name == "Title" then
	--Do nothing
	else					
	z.Text = ""
	end						
	end
end

wait(0.05)
ChatFull = false
elseif ChatFull == false then
return nil
end		
	end)
	end
end

Chat_Spy()