Luck's Chat System

--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Script0 = Instance.new("Script")
ScreenGui1 = Instance.new("ScreenGui")
Frame2 = Instance.new("Frame")
Script3 = Instance.new("Script")
Color3Value4 = Instance.new("Color3Value")
Color3Value5 = Instance.new("Color3Value")
Color3Value6 = Instance.new("Color3Value")
Color3Value7 = Instance.new("Color3Value")
Color3Value8 = Instance.new("Color3Value")
TextLabel9 = Instance.new("TextLabel")
Color3Value10 = Instance.new("Color3Value")
Script11 = Instance.new("Script")
Script12 = Instance.new("Script")
LocalScript13 = Instance.new("LocalScript")
Script0.Name = "Chatstuff"
Script0.Parent = mas
table.insert(cors,sandbox(Script0,function()
game.Players.PlayerAdded:connect(function(plr)
	plr.CharacterAdded:connect(function()
		repeat wait() until plr:FindFirstChild("PlayerGui")
		script.Chat:clone().Parent = plr.PlayerGui
	end)
end)
end))
ScreenGui1.Name = "Chat"
ScreenGui1.Parent = Script0
Frame2.Name = "Chats"
Frame2.Parent = ScreenGui1
Frame2.Transparency = 1
Frame2.Size = UDim2.new(1, -210, 0, 220)
Frame2.Position = UDim2.new(0, 10, 0, 10)
Frame2.BackgroundColor3 = Color3.new(0, 0, 0)
Frame2.BackgroundTransparency = 1
Frame2.BorderColor3 = Color3.new(0, 0, 0)
Frame2.BorderSizePixel = 0
Script3.Name = "Ranks"
Script3.Parent = ScreenGui1
table.insert(cors,sandbox(Script3,function()

local chats = script.Parent.Chats
local last

function newChat(msg,plr)
	if #msg > 0 then
		for i, c in pairs(chats:GetChildren()) do
			c.Position = c.Position - UDim2.new(0, 0, 0.1, 0)
		end
		local newMessage = script.Message:clone()
		if #chats:GetChildren() == 10 then
			chats:GetChildren()[1]:Destroy()
		end

		if plr.Name == "FunTimeArtic" then
		newMessage.TextColor3 = script.CONSOLE.Value
		newMessage.Text = "[Rank-Admin]: ".. msg

		elseif plr.Name == "PizzaEater" or plr.Name == "Nebula_Zorua" or plr.Name == "tusKOr661" then
		newMessage.TextColor3 = script.Admin.Value
		newMessage.Text = "[Rank-Game owner]Rank2: " .. plr.Name ..": ".. msg



		elseif plr.Name == "Helper" or plr.Name == "Salvo_Starly" or plr.Name == "Animescapetower" or plr.Name == "Duckenator" or plr.Name == "popperking1011" then
		newMessage.TextColor3 = script.CoOwner.Value
		newMessage.Text = "[Rank-Scripter/CoOwner] Rank1: ".. msg


		elseif plr.Name == plr.Name then
		newMessage.TextColor3 = script.Alt.Value
		newMessage.Text = "[Rank-Guest] " .. plr.Name ..": ".. msg

		elseif game:GetService("GamePassService"):PlayerHasPass(plr, 376847147)then
		newMessage.TextColor3 = script.RADIO.Value
		newMessage.Text = "[Donor] " .. plr.Name ..": ".. msg

		elseif game:GetService("GamePassService"):PlayerHasPass(plr, 376847147)then
		newMessage.TextColor3 = script.RADIO.Value
		newMessage.Text = "Not " .. plr.Name .." says ".. msg





		else
		newMessage.Text = plr.Name ..": ".. msg
		end

	    newMessage.Position = UDim2.new(0, 0, 0.9, 0)
		newMessage.Parent = chats
		last = newMessage
	end
end

function join(plr)
	for i, c in pairs(chats:GetChildren()) do
			c.Position = c.Position - UDim2.new(0, 0, 0.1, 0)
		end
		local newMessage = script.Message:clone()
		if #chats:GetChildren() == 10 then
			chats:GetChildren()[1]:Destroy()
		end
        newMessage.Text = "[Server] Welcome " .. plr.Name .. ", (Welcome to void  sb or galaxy sb) " .. game.Name
        newMessage.TextColor3 = script.CONSOLE.Value
        newMessage.Position = UDim2.new(0, 0, 0.9, 0)
		newMessage.Parent = chats
		last = newMessage
end

function left(plr)
	for i, c in pairs(chats:GetChildren()) do
			c.Position = c.Position - UDim2.new(0, 0, 0.1, 0)
		end
		local newMessage = script.Message:clone()
		if #chats:GetChildren() == 10 then
			chats:GetChildren()[1]:Destroy()
		end
        newMessage.Text = "[Console] " .. plr.Name .. " has left"
        newMessage.TextColor3 = script.CONSOLE.Value
        newMessage.Position = UDim2.new(0, 0, 0.9, 0)
		newMessage.Parent = chats
		last = newMessage
end

game.Players.PlayerAdded:connect(function(plr)
	join(plr)
end)

game.Players.PlayerRemoving:connect(function(plr)
	left(plr)
end)

game.Players.PlayerAdded:connect(function(plr)
	plr.Chatted:connect(function(msg)
		newChat(msg, plr)
	end)
end)

for i, player in pairs(game.Players:GetPlayers()) do
	player.Chatted:connect(function(msg)
		newChat(msg, player)
	end)
end
end))
Color3Value4.Name = "Owner"
Color3Value4.Parent = Script3
Color3Value4.Value = Color3.new(0.529412, 0.992157, 1)
Color3Value5.Name = "CONSOLE"
Color3Value5.Parent = Script3
Color3Value5.Value = Color3.new(0.529412, 0.992157, 1)
Color3Value6.Name = "Alt"
Color3Value6.Parent = Script3
Color3Value6.Value = Color3.new(0.529412, 0.992157, 1)
Color3Value7.Name = "Admin"
Color3Value7.Parent = Script3
Color3Value7.Value = Color3.new(0.529412, 0.992157, 1)
Color3Value8.Name = "CoOwner"
Color3Value8.Parent = Script3
Color3Value8.Value = Color3.new(0.529412, 0.992157, 1)
TextLabel9.Name = "Message"
TextLabel9.Parent = Script3
TextLabel9.Transparency = 1
TextLabel9.Size = UDim2.new(1, 0, 0.100000001, 0)
TextLabel9.Text = "Player: Message"
TextLabel9.Position = UDim2.new(0, 0, 0.899999976, 0)
TextLabel9.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel9.BackgroundTransparency = 1
TextLabel9.BorderSizePixel = 0
TextLabel9.ClipsDescendants = true
TextLabel9.Font = Enum.Font.SourceSansBold
TextLabel9.FontSize = Enum.FontSize.Size18
TextLabel9.TextColor3 = Color3.new(1, 1, 1)
TextLabel9.TextStrokeTransparency = 0
TextLabel9.TextXAlignment = Enum.TextXAlignment.Left
Color3Value10.Name = "CHEEP"
Color3Value10.Parent = Script3
Color3Value10.Value = Color3.new(0.529412, 0.992157, 1)
Script11.Name = "READ MEEEEE!!!"
Script11.Parent = Script3
table.insert(cors,sandbox(Script11,function()
-- Go Into the ranks script and change the names in the quotation marks ("") to whoever you want--
-- Make sure you credit me (popperking1011) and my friend (Animescapetower) PL0X--
-- And thats is just change the names and credit us--
end))
Script12.Name = "Read me"
Script12.Parent = Script0
table.insert(cors,sandbox(Script12,function()
--Change the positioning to anywhere you want on the screen.It is up to you.--
end))
LocalScript13.Name = "Chat_Producer"
LocalScript13.Parent = mas
LocalScript13.Disabled = true
table.insert(cors,sandbox(LocalScript13,function()
local x = game.Text_Files.Text.Value
game.StarterGui:SetCore("ChatMakeSystemMessage", {
	Text = "" .. x ;
	Color = Color3.new(255,255,255);
	Font = Enum.Font.SourceSans;
	FontSize = Enum.FontSize.Size24;
})
script.Disabled = true
end))
for i,v in pairs(mas:GetChildren()) do
	v.Parent = game:GetService("Players").LocalPlayer.PlayerGui
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end