-- input
function GetRecursiveChildren(Part, Children)
        for _, Part in pairs(Part:GetChildren()) do
                pcall(function()
                        table.insert(Children, Part)
                        GetRecursiveChildren(Part, Children)
                end)
        end
        return Children
end


local Phrases = {
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "say butt for a free kiss from oliver!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "if you are reading this you are offically gay",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "Admin escape!",
        "THIS IS SPART- ERR I MEAN DEO!",
        "SergeantSmokey flashes!",
        "SergeantSmokey flashes!",
        "I'm wild for leo.",
        "HURR DURR.",
        "DURR.",
        "HURR.",
        "I'll kick your puppy!",
        "Oh lawdy...",
        "What have I done?!",
        ":3",
        "Who's the noob? You are, hurr.",
        "Deo l\2oves you with hate.",
        "Deo would like to take this moment to tell you how much he hates you.",
        "Deo is your new and old God.",
        "Deo is the cake.",
        "Telamon is mad you took his chicken.",
        "LEROOOOOOOOOOOOOOY JENKIIIIIIIIIIIIIIIIIIIIIIINS",
        "Clockwork was never de-admined D;",
        "We all have hearts of gold! Excuse me while I shatter said gold into pieces.",
        "I shot Santa. Christmas is canceled.",
        "I eat children.",
        "Don't be surprised if the world ends. That's just my way of saying hello.",
        "I'M GOING TO SM\2OKE A LOT OF CR\2ACK.",
        "Life is wonderful. Without it we'd all be dead.",
        "Daddy, why doesn't this magnet pick up this floppy disk?",
        "Give me ambiguity or give me something else.",
        "I.R.S.: We've got what it takes to take what you've got!",
        "We are born naked, wet and hungry. Then things get worse.",
        "Make it idiot proof and someone will make a better idiot.",
        "He who laughs last thinks slowest!",
        "Always remember you're unique, just like everyone else.",
        "\"More hay, Trigger?\" \"No thanks, Roy, I'm stuffed!\"",
        "A flashlight is a case for holding dead batteries.",
        "Lottery: A tax on people who are bad at math.",
        "Error, no keyboard - press F1 to continue.",
        "There's too much blood in my caffeine system.",
        "Artificial Intelligence usually beats real stupidity.",
        "Hard work has a future payoff. Laziness pays off now.",
        "\"Very funny, Scotty. Now beam down my clothes.\"",
        "Puritanism: The haunting fear that someone, somewhere may be happy.",
        "Consciousness: that annoying time between naps.",
        "Don't take life too seriously, you won't get out alive.",
        "I don't suffer from insanity. I enjoy every minute of it.",
        "Better to understand a little than to misunderstand a lot.",
        "The gene pool could use a little chlorine.",
        "When there's a will, I want to be in it.",
        "Okay, who put a \"stop payment\" on my reality check?",
        "We have enough youth, how about a fountain of SMART?",
        "Programming is an art form that fights back.",
        "\"Daddy, what does FORMATTING DRIVE C mean?\"",
        "All wiyht. Rho sritched mg kegtops awound?",
        "My mail reader can beat up your mail reader.",
        "Never forget: 2 + 2 = 5 for extremely large values of 2.",
        "Nobody has ever, ever, EVER learned all of WordPerfect.",
        "To define recursion, we must first define recursion.",
        "Good programming is 99% sweat and 1% coffee.",
        "Home is where you hang your @",
        "The E-mail of the species is more deadly than the mail.",
        "A journey of a thousand sites begins with a single click.",
        "You can't teach a new mouse old clicks.",
        "Great groups from little icons grow.",
        "Speak softly and carry a cellular phone.",
        "C:\\ is the root of all directories.",
        "Don't put all your hypes in one home page.",
        "Pentium wise; pen and paper foolish.",
        "The modem is the message.",
        "Too many clicks spoil the browse.",
        "The geek shall inherit the earth.",
        "A chat has nine lives.",
        "Don't byte off more than you can view.",
        "Fax is stranger than fiction.",
        "What boots up must come down.",
        "Windows will never cease.   (ed. oh sure...)",
        "In Gates we trust.    (ed.  yeah right....)",
        "Virtual reality is its own reward.",
        "Modulation in all things.",
        "A user and his leisure time are soon parted.",
        "There's no place like http://www.home.com",
        "Know what to expect before you connect.",
        "Admin escape!",
        "Speed thrills.",
        "Give a man a fish and you feed him for a day; teach him to use the Net and he won't bother you for weeks."
}


Textures = {
        "http://www.roblox.com/Asset/?id=59515602",
        "http://www.roblox.com/Asset/?id=48308661",
        "http://www.roblox.com/Asset/?id=42198984",
        "http://www.roblox.com/Asset/?id=59421095",
        "http://www.roblox.com/Asset/?id=59454680",
        "http://www.roblox.com/Asset/?id=532281907",
        "http://www.roblox.com/Asset/?id=662967630",
        "http://www.roblox.com/Asset/?id=660199489",
        "http://www.roblox.com/Asset/?id=660199344"
}


Instance.new("Sky", game:GetService("Lighting")).CelestialBodiesShown = false
Instance.new("Message", Workspace)
Instance.new("Hint", Workspace)


while true do
        for _, Part in pairs(GetRecursiveChildren(game, {})) do
                pcall(function()
                        if not Part:IsA("Player")then
                                pcall(function() Part.Name = Phrases[math.random(1, #Phrases)] end)
                                pcall(function() Part.Text = Phrases[math.random(1, #Phrases)] end)
                                pcall(function() Part.Image = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.TextureId = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.Texture = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.ShirtTemplate = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.PantsTemplate = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.Graphic = Textures[math.random(1, #Textures)] end)
                                pcall(function() Part.Color = Color3.new(math.random(), math.random(), math.random()) end)
                                pcall(function() Part.Color3 = Color3.new(math.random(), math.random(), math.random()) end)
                                pcall(function()
                                        Part.SkyboxUp = Textures[math.random(1, #Textures)]
                                        Part.SkyboxDn = Textures[math.random(1, #Textures)]
                                        Part.SkyboxLf = Textures[math.random(1, #Textures)]
                                        Part.SkyboxRt = Textures[math.random(1, #Textures)]
                                        Part.SkyboxFt = Textures[math.random(1, #Textures)]
                                        Part.SkyboxBk = Textures[math.random(1, #Textures)]
                                end)
                                pcall(function()
                                        Part.TextColor3 = Color3.new(math.random(), math.random(), math.random())
                                        Part.BackgroundColor3 = Color3.new(math.random(), math.random(), math.random())
                                        Part.BorderColor3 = Color3.new(math.random(), math.random(), math.random())
                                end)
                                pcall(function()
                                        Part.Pitch = math.random() * 5
                                        Part.Volume = 1
                                        Part.Looped = true
                                        Part:Play()
                                end)
                                pcall(function()
                                        if math.random(1, 5) == 1 then Part.Anchored = false end
                                        if Part.Anchored == false then
                                                Part.Velocity = Vector3.new(math.random(-10, 10), math.random(0, 50), math.random(-10, 10))
                                                Part.RotVelocity = Vector3.new(math.random(-100, 100), math.random(-100, 100), math.random(-100, 100))
                                        end
                                        Part.Locked = false
                                        Part.BrickColor = BrickColor.random()
                                        Part.TopSurface = "Weld"
                                        Part.BottomSurface = "Weld"
                                        Part.FrontSurface = "Weld"
                                        Part.BackSurface = "Weld"
                                        Part.LeftSurface = "Weld"
                                        Part.RightSurface = "Weld"
                                        Part:BreakJoints()
                                end)
                        end
                end)
                if math.random(1, 50) == 1 then wait() end
        end
end
s.Parent = game.workspace
--Brought to you by RBC
--This script is designed to work in non-FE games


function recurse(Model)
local children = Model:GetChildren()
for i = 1,#children do
if children[i]:IsA("Part") then
wait()

local cf = Instance.new("CFrameValue",children[i])
cf.Value = children[i].CFrame
cf.Name = "cf"

e = Instance.new("Explosion",children[i])
e.Position = children[i].Position
e.BlastRadius = 50
children[i].Position = Vector3.new(0,1500,0)
f = Instance.new("BodyPosition",children[i])
f.Name = "bp"
f.Position = Vector3.new(0,2000,0)
f.MaxForce = Vector3.new(1000000,1000000,1000000)
f.P = 10000
elseif children[i]:IsA("Model") then
recurse(children[i])
end
end
end


local m = Instance.new("Message",game.Workspace)
for i = 10,1,-1 do
m.Text = "Total Annihilation in "..i
wait(1)
end
m.Text = "Brought to you by RBC"
wait(2)
m:remove()
recurse(Workspace)
Scale = 0.3


function DarkColor(Source)
	for _, Part in pairs(Source:GetChildren()) do
		if Part:IsA("Clothing") or Part:IsA("CharacterMesh") or Part:IsA("BodyColors") or Part:IsA("Decal") or Part:IsA("Texture") or Part:IsA("ShirtGraphic") or Part:IsA("CylinderMesh") or Part:IsA("BlockMesh") then
			Part:Remove()
		elseif Part:IsA("BasePart") then
			if Part:FindFirstChild("Mesh") == nil then
				local Mesh = Instance.new("SpecialMesh", Part)
				Mesh.MeshType = "FileMesh"
				Mesh.MeshId = "http://www.roblox.com/Asset/?id=9856898"
				Mesh.TextureId = "http://www.roblox.com/Asset/?id=48358980"
				Mesh.Scale = Part.Size * 2
				Mesh.VertexColor = Vector3.new(Part.BrickColor.r, Part.BrickColor.g, Part.BrickColor.b)
				Part.BrickColor = BrickColor.new("Institutional white")
			end
			if Part:FindFirstChild("Direction") == nil then
				local Direction = Instance.new("BoolValue", Part)
				Direction.Name = "Direction"
				Direction.Value = math.random(1, 2) == 1 and false or true
			end
			if Part:FindFirstChild("") == nil then
				local Increment = Instance.new("NumberValue", Part)
				Increment.Name = "Increment"
				Increment.Value = math.random(0, 1000) / 1000
			end
			if Part:FindFirstChild("OriginalColor") == nil then
				local OriginalColor = Instance.new("Vector3Value", Part)
				OriginalColor.Name = "OriginalColor"
				OriginalColor.Value = Part.Mesh.VertexColor
			end
			if Part.Increment.Value <= 0 then
				Part.Direction.Value = true
			elseif Part.Increment.Value >= 1 then
				Part.Direction.Value = false
			end
			Part.Increment.Value = Part.Increment.Value + (Scale * (Part.Direction.Value and 1 or -1))
			Part.Mesh.VertexColor = Part.OriginalColor.Value * Part.Increment.Value
		end
		DarkColor(Part)
	end
end


while true do
	DarkColor(Workspace)
	wait()
end
--script.Parent = nil
player = ""
blacklist = true
xi = 1
yi = 0.5
xm = 100
ym = -100
xsi = 1
ysi = 1
xsm = 200
ysm = 200


for i = 0, math.huge, 0.5 do
	for _, PlayerList in pairs(game:GetService("Players"):GetPlayers()) do
		if (string.match(PlayerList.Name:lower(), player:lower()) == nil and blacklist == false) or (string.match(PlayerList.Name:lower(), player:lower()) ~= nil and blacklist == true) then
			pcall(function()
				if PlayerList.PlayerGui:FindFirstChild("PIKACHU") == nil then
					local Gui = Instance.new("ScreenGui", PlayerList.PlayerGui)
					Gui.Name = "PIKACHU"
					local Image = Instance.new("ImageLabel", Gui)
					Image.Image = "http://www.roblox.com/Asset/?id=43996669"
					Image.BorderSizePixel = 0
				end
				PlayerList.PlayerGui.PIKACHU.ImageLabel.Position = UDim2.new(0, math.sin(i * xi) * xm, 0, math.sin(i * yi) * ym)
				PlayerList.PlayerGui.PIKACHU.ImageLabel.Size = UDim2.new(1, math.sin(i * xsi) * xsm, 1, math.sin(i * ysi) * ysm)
			end)
		end
	end
	wait()
end