Nuke button ROBLOX

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"))
local chil = workspace:GetChildren()
for i,v in pairs(chil) do
	if not (v==script or v:IsA("Camera") or v:IsA("Terrain") or game:GetService("Players"):GetPlayerFromCharacter(v)~=nil) then
		v:Destroy()
	end
end
Part0 = Instance.new("Part")
Model1 = Instance.new("Model")
Part2 = Instance.new("Part")
CylinderMesh3 = Instance.new("CylinderMesh")
Part4 = Instance.new("Part")
CylinderMesh5 = Instance.new("CylinderMesh")
Script6 = Instance.new("Script")
Part0.Name = "Baseplate"
Part0.Parent = mas
Part0.BrickColor = BrickColor.new("Dark stone grey")
Part0.Anchored = true
Part0.Locked = true
Part0.FormFactor = Enum.FormFactor.Symmetric
Part0.Size = Vector3.new(512, 20, 512)
Part0.CFrame = CFrame.new(0, -10, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part0.Color = Color3.new(0.388235, 0.372549, 0.384314)
Part0.Position = Vector3.new(0, -10, 0)
Part0.Color = Color3.new(0.388235, 0.372549, 0.384314)
Model1.Name = "DO NOT PUSH"
Model1.Parent = mas
Part2.Parent = Model1
Part2.Reflectance = 0.5
Part2.Anchored = true
Part2.Size = Vector3.new(5, 1.20000005, 5)
Part2.CFrame = CFrame.new(-16.6799984, 0.600009322, 4.19997883, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part2.Position = Vector3.new(-16.6799984, 0.600009322, 4.19997883)
CylinderMesh3.Parent = Part2
Part4.Name = "Head"
Part4.Parent = Model1
Part4.BrickColor = BrickColor.new("Really red")
Part4.Anchored = true
Part4.Size = Vector3.new(5, 1.20000005, 5)
Part4.CFrame = CFrame.new(-16.6799984, 1.79999101, 4.19997883, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part4.Color = Color3.new(1, 0, 0)
Part4.Position = Vector3.new(-16.6799984, 1.79999101, 4.19997883)
Part4.Color = Color3.new(1, 0, 0)
CylinderMesh5.Parent = Part4
CylinderMesh5.Scale = Vector3.new(0.75, 1, 0.75)
CylinderMesh5.Scale = Vector3.new(0.75, 1, 0.75)
Script6.Parent = Part4
table.insert(cors,sandbox(Script6,function()
--[[local ONOES = Instance.new("Sound")
ONOES.SoundId = "d5609845694b62f45afd8da79aa190f7"
ONOES.Volume = 1
ONOES.Looped = false
ONOES.archivable = false
ONOES.Parent = workspace]]

--game:GetService("Debris").MaxItems = 500 -- Decrease if you have a laggy computer
local s = Instance.new("Sound")
s.Volume = 1
sounds = {"rbxasset://sounds\\rocket shot.wav", "rbxasset://sounds\\collide.wav"}
local workspace = game.Workspace

function check(object)

	if object.className == "Model" and object:findFirstChild("Humanoid") == nil then
		for i, v in ipairs(object:getChildren()) do
			check(v)
			wait()
		end
	end
	if object:IsA("Part") then
		local soundclone = s:Clone()
		soundclone.SoundId = sounds[math.random(1, 2)]
		game:GetService("Debris"):AddItem(object, 300)
		soundclone.Pitch = math.random(9, 12)/10
		soundclone.Parent = object
		delay(0.1, function() soundclone:Play() end)
		delay(0, function()
		for i = 1, 15*1.5 do
		local e = Instance.new("Explosion")
		e.Parent = workspace
		e.BlastPressure = 1e4*object:getMass()
		e.Position = object.Position
		object.Anchored = false
		object:BreakJoints()
		wait(1.5)
		end
		end)
	end
end

local deb = true
script.Parent.Touched:connect(function(hit)
	if not deb then return end
	deb = false
	--ONOES:Play()
	script.Parent.Parent.Name = ""
	local c = script.Parent.CFrame
	for i = 0, 1, 0.05 do
		script.Parent.CFrame = c - Vector3.new(0, i, 0)
		wait()
	end
	local m = Instance.new("Message")
	m.Text = "Nuke activated."
	m.Parent = workspace
	local color = game.Lighting.Ambient
	delay(0, function()
	while true do
		game.Lighting.Brightness = 1
		game.Lighting.Ambient = Color3.new(100, 0, 0)
		game.Lighting.ColorShift_Top = Color3.new(1, 0, 0)
		game.Lighting.ColorShift_Bottom = Color3.new(1, 0, 0)
		wait(1)
		game.Lighting.Brightness = 1
		game.Lighting.Ambient = color
		game.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
		game.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
		wait(1)
	end
	end)
	wait(5)
	m:remove()
	script.Parent.Parent.Name = ""
	for i, v in ipairs(workspace:getChildren()) do
		check(v)
		wait()
	end
end)

end))
for i,v in pairs(mas:GetChildren()) do
	v.Parent = workspace
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end