--Menacing SFX and music
local plr = game:GetService("Players").LocalPlayer
local deb = false

while not plr.Character do wait() end
wait(1)

local tstab = {}
local tsstab = {}
local ignlist = {}
local stab = {}

function plrIgnore(char)
	for i,v in pairs(char:GetChildren()) do
		if #v:GetChildren() >= 1 then
			plrIgnore(v)
		end
		table.insert(ignlist,v)
	end
end

function timeStop(target)
	for i,v in pairs(target:GetChildren()) do
		if #v:GetChildren() >= 1 then
			timeStop(v)
		end
		local isinign = false
		for i,b in pairs(ignlist) do
			if b == v then
				isinign = true
			end
		end
		if isinign == false then
			if v:IsA("Part") or v:IsA("WedgePart") or v:IsA("UnionOperation") then
				if v.Anchored == false then
					table.insert(tstab,v)
					v.Anchored = true
				end
			end
			if v:IsA("Sound") then
                                local isintab = false
                                for i,b in pairs(stab) do
                                        if v == b[1] then
                                                isintab = true
                                        end
                                end
                                if isintab == false then
				        table.insert(stab,{v,v.Pitch})
                                end
			end
			--[[if v:IsA("Script") or v:IsA("LocalScript") then
				if v.Disabled == false then
					table.insert(tsstab,v)
					v.Disabled = true
				end
			end]]
		end
	end
	local isinign = false
	for i,b in pairs(ignlist) do
		if b == target then
			isinign = true
		end
	end
	if isinign == false then
		if target:IsA("Part") or target:IsA("WedgePart") or target:IsA("UnionOperation") then
			if target.Anchored == false then
				table.insert(tstab,target)
				target.Anchored = true
			end
		end
		if target:IsA("Sound") then
			table.insert(stab,{target,target.Pitch})
		end
	end
end

plr:GetMouse().KeyDown:connect(function(key)
	if key == "g" then
		if deb == true then
			deb = false
		else
			print("R!")
			deb = true

			--[[local s = Instance.new("Sound",game:GetService("Workspace"))
			s.SoundId = "rbxassetid://576124533"
			s.Volume = 0.5
			s:Play()

			wait(1.5)]]

			print("ZA WARUDO!")
			local cc = Instance.new("ColorCorrectionEffect",game:GetService("Lighting"))
			spawn(function()
				plr.Character.Humanoid.WalkSpeed = 0
				plr.Character.Humanoid.JumpPower = 0
				local p = Instance.new("Part",plr.Character)
				p.Transparency = 0.5
				p.BrickColor = BrickColor.new("Institutional white")
				p.Size = Vector3.new(0.2,0.2,0.2)
				p.Anchored = true
				p.CanCollide = false
				p.CFrame = plr.Character.Torso.CFrame
				local m = Instance.new("SpecialMesh",p)
				m.MeshType = Enum.MeshType.Sphere

				local r = 255
				local g = 255
				local b = 255
				local contrast = 0

				for i=1,50 do
					m.Scale = m.Scale + Vector3.new(50,50,50)
					p.Transparency = p.Transparency + 0.5/50
					r = r - ((255-42)/50)
					g = g - ((255-0)/50)
					b = b - ((255-255)/50)
					contrast = contrast - 2/50
					--cc.TintColor = Color3.fromRGB(r,g,b)
					cc.Contrast = contrast
					for i,v in pairs(stab) do
						v[1].Pitch = v[1].Pitch - (v[2]/50)
					end
					wait()
				end
				p:Destroy()
				plr.Character.Humanoid.WalkSpeed = 16
				plr.Character.Humanoid.JumpPower = 50
			end)
			local sHp = plr.Character.Humanoid.Health
			local hplock = plr.Character.Humanoid.HealthChanged:connect(function()
				plr.Character.Humanoid.Health = sHp
			end)

			local aNew = game:GetService("Workspace").ChildAdded:connect(function(c)
				timeStop(c)
			end)

			for i,v in pairs(ignlist) do
				table.remove(ignlist,1)
			end
			plrIgnore(plr.Character)
			timeStop(game:GetService("Workspace"))
			while deb ~= false do wait() end
			--spawn(function()
				local r = 42
				local g = 0
				local b = 255
				local contrast = -2
				for i=1,50 do
					r = r + ((255-42)/50)
					g = g + ((255-0)/50)
					b = b + ((255-255)/50)
					contrast = contrast + 2/50
					--cc.TintColor = Color3.fromRGB(r,g,b)
					cc.Contrast = contrast
					for i,v in pairs(stab) do
						v[1].Pitch = v[1].Pitch + (v[2]/50)
					end
					wait()
				end
				cc:Destroy()
			--end)
			for i,v in pairs(tstab) do
				v.Anchored = false
			end
			for i,v in pairs(tstab) do
				table.remove(tstab,1)
			end
			--table.foreach(stab,print)
			for i,v in pairs(stab) do
				table.remove(stab,1)
			end
			--print("---------")
			--table.foreach(stab,print)
			--[[for i,v in pairs(tsstab) do
				v.Disabled = false
			end
			for i,v in pairs(tsstab) do
				table.remove(tsstab,1)
			end]]
			hplock:Disconnect()
			aNew:Disconnect()
			deb = false
		end
	end
end)

local asd = game:service'Players'.LocalPlayer
repeat wait() until asd.Character
local asdchar = asd.Character
local Head = asdchar:findFirstChild("Head")
z = Instance.new("Sound", Head)
z.SoundId = "rbxassetid://578106329" -- Put Music ID Here.
z.Looped = true
z.Volume = 4
wait(.1)
z:Play()
local transPoints = {NumberSequenceKeypoint.new(0, 0, 0), NumberSequenceKeypoint.new(0.207, 0.594, 0.0187), NumberSequenceKeypoint.new(0.4, 0.55, 0.031), NumberSequenceKeypoint.new(0.57, 0.619, 0.05), NumberSequenceKeypoint.new(0.76, 0.8, 0.0375), NumberSequenceKeypoint.new(1, 1, 0)}
local sizePoints = {NumberSequenceKeypoint.new(0, 1.9, 0), NumberSequenceKeypoint.new(1, 0, 0)}
local Size = NumberSequence.new(sizePoints)
local Transparency = NumberSequence.new(transPoints)
efxBlock = Instance.new("Part", asdchar)
efxBlock.CanCollide = false
efxBlock.Material = "Neon"
efxBlock.FormFactor = "Custom"
efxBlock.Transparency = 1
efxBlock.Size = Vector3.new(0.25, 0.25, 0.25)
local mesh = Instance.new("SpecialMesh", efxBlock)
mesh.MeshType = Enum.MeshType.Sphere
mesh.Scale = Vector3.new(1, 1, 1)
local particles = Instance.new("ParticleEmitter", efxBlock)
particles.LightEmission = 0
particles.Size = Size
particles.Name = "Fire"
particles.Transparency = Transparency
particles.LockedToPart = false
particles.VelocityInheritance = -0.5
particles.LockedToPart = false
particles.Rate = 2
particles.Texture = "rbxassetid://262850915"
particles.Lifetime = NumberRange.new(3, 3)
particles.Speed = NumberRange.new(3, 3)
particles.VelocitySpread = 25
local offset = Vector3.new(0, 0, 0)
local weld = Instance.new("Weld", asdchar.Torso)
weld.Part0 = asdchar.Torso
weld.Part1 = efxBlock
weld.C0 = CFrame.new(offset) * CFrame.Angles(math.rad(-40), math.rad(40), math.rad(40))