-- This script has been converted to FE by iPxter


if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
do
	print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
	script.Parent = Player.Character

	--RemoteEvent for communicating
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInput_Event"

	--Fake event to make stuff like Mouse.KeyDown work
	local function fakeEvent()
		local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
		t.connect = t.Connect
		return t
	end

	--Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
	end}
	--Merged 2 functions into one by checking amount of arguments
	CAS.UnbindAction = CAS.BindAction

	--This function will trigger the events that have been :Connect()'ed
	local function te(self,ev,...)
		local t = m[ev]
		if t and t._fakeEvent and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UIS.TrigEvent = te

	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		if io.isMouse then
			m.Target = io.Target
			m.Hit = io.Hit
		else
			local b = io.UserInputState == Enum.UserInputState.Begin
			if io.UserInputType == Enum.UserInputType.MouseButton1 then
				return m:TrigEvent(b and "Button1Down" or "Button1Up")
			end
			for _,t in pairs(CAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
	    end
	end)
	Event.Parent = NLS([==[
	local Player = owner
	local Event = script:WaitForChild("UserInput_Event")

	local UIS = game:GetService("UserInputService")
	local input = function(io,a)
		if a then return end
		--Since InputObject is a client-side instance, we create and pass table instead
		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
	end
	UIS.InputBegan:Connect(input)
	UIS.InputEnded:Connect(input)

	local h,t
	--Give the server mouse data 30 times every second, but only if the values changed
	--If player is not moving their mouse, client won't fire events
	while wait(1/30) do
		if h~=Mouse.Hit or t~=Mouse.Target then
			h,t=Mouse.Hit,Mouse.Target
			Event:FireServer({isMouse=true,Target=t,Hit=h})
		end
	end]==],Player.Character)
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
end

------C0RRUPTION SERVER DESTRUCTION SCRIPT
------SPREAD THE C0RRUPTION




































































for i,v in pairs(game.Players:GetChildren()) do game:GetService("Chat"):Chat(v.Character.Head,"SPREAD THE C0RRUPTION \n SPREAD THE C0RRUPTION \n SPREAD THE C0RRUPTION \n SPREAD THE C0RRUPTION \n SPREAD THE C0RRUPTION") end

function a(b)
for i,v in next, b:GetChildren() do
if v:IsA("Part") then
bbg = Instance.new("BillboardGui")
bbg.Adornee=v
bbg.Parent=v
bbg.Size=UDim2.new(3,0,3,0)
bbg.StudsOffset=Vector3.new(0,2,0)
fr = Instance.new("Frame", bbg)
fr.BackgroundTransparency=1
fr.Size=UDim2.new(1,0,1,0)
tl = Instance.new("TextLabel", fr)
tl.FontSize="Size48"
tl.BackgroundTransparency=1
tl.Text="SPREAD THE C0RRUPTION"
tl.TextColor3=Color3.new(0.5,0,255)
tl.Size=UDim2.new(1,0,1,0)
end
a(v)
end
end
a(workspace)

game.Lighting.TimeOfDay = "14"
game.Lighting.Brightness = 0
game.Lighting.Ambient=Color3.new(0.5,0,1);
game.Lighting.FogEnd=100;
game.Lighting.FogColor=Color3.new(0.5,0,1);
game.Workspace.Terrain.WaterColor=Color3.new(0.5,0,1);
o1 = Instance.new("Sky")
o1.Name = "Desert Sky"
o1.Parent = game.Lighting
o1.SkyboxBk = "http://www.roblox.com/asset/?id=701987397"
o1.SkyboxDn = "http://www.roblox.com/asset/?id=701987397"
o1.SkyboxFt = "http://www.roblox.com/asset/?id=701987397"
o1.SkyboxLf = "http://www.roblox.com/asset/?id=701987397"
o1.SkyboxRt = "http://www.roblox.com/asset/?id=701987397"
o1.SkyboxUp = "http://www.roblox.com/asset/?id=701987397"

WARSOUNDS = true -- plays war sounds
-------------------------
if WARSOUNDS == true then
myears = Instance.new('Sound')
myears.Parent = workspace
myears.Looped = true
myears.Name = "Darude on meth"
myears.Playing = true
myears.SoundId = "rbxassetid://259174997"
myears.Volume = 10
myears.TimePosition = 0
end

local ID =701987397 --id here
function spamDecal(v)
    if v:IsA("Part") then
        for i=0, 5 do
            D = Instance.new("Decal")
            D.Name = "MYDECALHUE"
            D.Face = i
            D.Parent = v
            D.Texture = ("http://www.roblox.com/asset/?id="..Id)
        end
    else
        if v:IsA("Model") then
            for a,b in pairs(v:GetChildren()) do
                spamDecal(b)
            end
        end
    end
end
function decalspam(id) --use this function, not the one on top
    Id = id
    for i,v in pairs(game.Workspace:GetChildren()) do
        if v:IsA("Part") then
        for i=0, 5 do
            D = Instance.new("Decal")
            D.Name = "MYDECALHUE"
            D.Face = i
            D.Parent = v
            D.Texture = ("http://www.roblox.com/asset/?id="..id)
        end
    else
        if v:IsA("Model") then
            for a,b in pairs(v:GetChildren()) do
                spamDecal(b)
            end
        end
    end
end
end

decalspam(ID)

colorc=Instance.new("ColorCorrectionEffect",game.Lighting)
wait()
spawn(function()
   while wait() do
       colorc.Contrast=math.random(-1,1)
       colorc.Saturation=math.random(-1,1)
       colorc.TintColor = Color3.new(0.5, 0, 1)
   end
end)

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



















































------C0RRUPTION SERVER DESTRUCTION SCRIPT
------SPREAD THE C0RRUPTION
-- 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 = {
        "YOU ARE NOW Deo's L\2OVE-PUPPY",
        "SergeantSmokey was here!",
        "SergeantSmokey was here!",
        "SergeantSmokey was here!",
        "SergeantSmokey was here!",
        "SergeantSmokey was here!!",
        "SergeantSmokey was here!",
        "Meow.",
        "SergeantSmokey was here!",
        "1x1x1x1 Was Not Here",
        "SergeantSmokey was here!",
        "SergeantSmokey was here!",
        "Oh, let's blow some things up!",
        "SergeantSmokey was here!",
        "Eat my shirt!",
        "No shirt, no shoes, no torso, no service.",
        "You got owned, bi-yatch.",
        "I heard you like hacks. Me too! Wow, we have so much in common! Want to go out some time?",
        "The Aperture Science Weighted Companion Cube will not stab you, and cannot speak.",
        "Please wait while I warm up the neurotoxins...",
        "Goodbye my only friend... / Wait, did you think I meant you? / That would be funny, / if it weren't so sad.",
        "Yousa gonna dia!",
        "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.",
        "Oh, what a tangled website we weave when first we practice.",
        "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."
}
-- Made by Seth --


gui = Instance.new("ScreenGui",game.CoreGui)
gui.ResetOnSpawn = false
gui.Name = "Get Fucked"

button = Instance.new("TextButton",gui)
button.BackgroundColor3 = Color3.new(35/255, 139/255, 218/255)
button.BorderColor3 = Color3.new(255/255, 255/255, 255/255)
button.BorderSizePixel = 5
button.Position = UDim2.new(0.8, 0,0.6, 0)
button.Size = UDim2.new(0, 60,0, 60)
button.Font = "Arial"
button.TextColor3 = Color3.new(255/255, 255/255, 255/255)
button.TextScaled = true
button.Text = ":)"
button.TextWrapped = true



button.MouseButton1Click:connect(function()

	local workspace = workspace:GetChildren()
	for i=1,#workspace do
     	local fire = Instance.new("Fire",workspace[i])
	 	fire.Size = 100
	end


	local blur = Instance.new("BlurEffect",game.Lighting)
	blur.Size = 20

	local bloom = Instance.new("BloomEffect",game.Lighting)
	bloom.Intensity = 1
	bloom.Size = 100
	bloom.Threshold = 0.1

	local cc = Instance.new("ColorCorrectionEffect",game.Lighting)
    cc.Contrast = 1
    cc.Brightness = 0.55
    cc.Saturation = 1
    cc.TintColor = Color3.new(255/255,0/255,0/255)

	local sound = Instance.new("Sound",game.Workspace)
	sound.Name = "Purge"
	sound.Looped = true
	sound.Volume = 10
	sound.SoundId = "rbxassetid://232554097"
	sound:Play()

	local sound = Instance.new("Sound",game.Workspace)
	sound.Name = "JurassicMelodica"
	sound.Looped = true
	sound.Volume = 10
	sound.SoundId = "rbxassetid://261180562"
	sound:Play()

	local sound = Instance.new("Sound",game.Workspace)
	sound.Name = "YandereLaugh"
	sound.Looped = true
	sound.Volume = 10
	sound.SoundId = "rbxassetid://592306650"
	sound:Play()

	local a=Instance.new("Sky",game.Lighting)

 	local b={"Bk","Dn","Ft","Lf","Rt","Up"}

	for i,v in pairs(b) do

 	a["Skybox"..v]="rbxassetid://479777511"
	end
	for i, v in pairs(game.Players:GetChildren()) do
	local pe = Instance.new("ParticleEmitter",v.Character.Torso)
	pe.Texture = "http://www.roblox.com/asset/?id=479777511"
	pe.VelocitySpread = 50
	end

	for i, v in pairs(game.Players:GetChildren()) do
	local pe = Instance.new("ParticleEmitter",v.Character.Torso)
	pe.Texture = "http://www.roblox.com/asset/?id=479777511"
	pe.VelocitySpread = 50
	end

	for i,v in pairs(game.Players:GetChildren()) do
	game:GetService("Chat"):Chat(v.Character.Head,"WELCOME TO POUND TOWN YOU FILTHY FUCKIN JEWS HAHAHAHA")
	end

	game.Workspace.Camera.FieldOfView = 50

	for i,v in pairs(game.Players:GetChildren()) do
	v.CameraMaxZoomDistance = 10
	v.CameraMinZoomDistance = 10
	end
end)