--[[Edited by lilh3/Frenchy]]--

wait(0.016666666666666666)
p = game.Players.LocalPlayer
char = p.Character
torso = char.Torso
neck = char.Torso.Neck
hum = char.Humanoid
hum.MaxHealth = 75000
wait()
hum.Health =hum.MaxHealth
char.Head.face.Texture = "rbxassetid://724826635"

--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("...")
			deb = true

			--[[local s = Instance.new("Sound",game:GetService("Workspace"))
			s.SoundId = "rbxassetid://849861238"
			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 = 29
				plr.Character.Humanoid.JumpPower = 120
				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 = 29
				plr.Character.Humanoid.JumpPower = 120
			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://0" -- 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))

char["Body Colors"].HeadColor = BrickColor.new("Really black")
char["Body Colors"].TorsoColor = BrickColor.new("Really black")
char["Body Colors"].LeftArmColor = BrickColor.new("Really black")
char["Body Colors"].RightArmColor = BrickColor.new("Really black")
char["Body Colors"].LeftLegColor = BrickColor.new("Really black")
char["Body Colors"].RightLegColor = BrickColor.new("Really black")

shirt = Instance.new("Shirt", char)
shirt.Name = "Shirt"
pants = Instance.new("Pants", char)
pants.Name = "Pants"
char.Shirt.ShirtTemplate = "rbxassetid://605158257"
char.Pants.PantsTemplate = "rbxassetid://24673998"

local sw1 = Instance.new("Part",hed)
sw1.CanCollide = false
sw1.BrickColor = BrickColor.new("Wheat")

local m1 = Instance.new("SpecialMesh",sw1)
m1.MeshId = "rbxassetid://430440803"
m1.Scale = Vector3.new(0.006,0.006,0.006)
local w1 = Instance.new("Weld")

local Target = game.Players.LocalPlayer.Name

local Character = game.Workspace[Target]

local hat = Instance.new('Hat', Character)
hat.AttachmentPos = Vector3.new(0, 1, 0)

local handle = Instance.new('Part', hat)
handle.Name = 'Handle'

local mesh = Instance.new('SpecialMesh')
mesh.Parent = handle
mesh.MeshId = 'rbxassetid://0'
mesh.TextureId = 'rbxassetid://0'
mesh.Scale = Vector3.new(1, 1, 1)
--

local Character = game.Workspace[Target]

local hat = Instance.new('Hat', Character)
hat.AttachmentPos = Vector3.new(0, -0.2, 0.3)

local handle = Instance.new('Part', hat)
handle.Name = 'Handle'

local mesh = Instance.new('SpecialMesh')
mesh.Parent = handle
mesh.MeshId = 'rbxassetid://0'
mesh.TextureId = 'rbxassetid://0'
mesh.Scale = Vector3.new(2, 2, 2)

w1.Part1 = sw1
w1.Part0 = hed
w1.Parent = char
w1.C0 = CFrame.new(0,-0.9,0)*CFrame.Angles(math.rad(0),math.pi/2,0)

plr = game.Players.LocalPlayer
mse = plr:GetMouse()
sound = Instance.new("Sound", game.Workspace)
sound.SoundId = "https://www.roblox.com/asset/?id=576124533"
sound.Volume = 10
canworld = true
mse.KeyDown:connect(function(key)
	key = key:lower()
	if key == "g" then
		if canworld == false then return end
		if canworld then
		canworld = false
		sound:Play()
		local function spawnpart()
		sphere = Instance.new("Part")
		--game.Debris:AddItem(sphere,3)
		local sm = Instance.new("SpecialMesh", sphere)
		sm.MeshType = "Sphere"
		sphere.Transparency = 1212
		sphere.Anchored = true
		sphere.CanCollide = false
		sphere.Material = "SmoothPlastic"
		sphere.BrickColor = BrickColor.new("Lime green")
		end

		local function weld(lol)
			local weld = Instance.new("Weld", plr.Character.Torso)
			weld.Part0 = plr.Character.Torso
			weld.Part1 = lol
			weld.C0 = plr.Character.Torso.CFrame:inverse()
			weld.C1 = lol.CFrame:inverse()
		end
		wait(0.1)
		spawnpart()
			for i, v in pairs(game.Players:GetChildren()) do
			t = v.Character:FindFirstChild("Torso")
			if t then
				t.Anchored = true
				plr.Character:FindFirstChild("Torso").Anchored = false
			end
			RA = v.Character:FindFirstChild("Right Arm")
			if RA then
				RA.Anchored = true
				plr.Character:FindFirstChild("Right Arm").Anchored = false
			end
			LA = v.Character:FindFirstChild("Left Arm")
			if LA then
				LA.Anchored = true
				plr.Character:FindFirstChild("Left Arm").Anchored = false
			end
			RL = v.Character:FindFirstChild("Right Leg")
			if RL then
				RL.Anchored = true
				plr.Character:FindFirstChild("Right Leg").Anchored = false
			end
			LL = v.Character:FindFirstChild("Left Leg")
			if LL then
				LL.Anchored = true
				plr.Character:FindFirstChild("Left Leg").Anchored = false
			end
		end
		weld(sphere)
		cce = Instance.new("ColorCorrectionEffect", game.Lighting)
		cce.Saturation = -2
		--game.Debris:AddItem(cce, 5)
		sphere.Parent = game.Workspace
		for i = 1,10 do
			sphere.Size = sphere.Size + Vector3.new(50,50,50)
			wait()
			end
		--wait(5)

		end
	end
end
)

mse.KeyDown:connect(function(key)
	key = key:lower()
	if key == "h" then
canworld = true
		for i, v in pairs(game.Players:GetChildren()) do
		t = v.Character:FindFirstChild("Torso")
			if t then
				t.Anchored = false
			end
			RA = v.Character:FindFirstChild("Right Arm")
			if RA then
				RA.Anchored = false
			end
			LA = v.Character:FindFirstChild("Left Arm")
			if LA then
				LA.Anchored = false
			end
			RL = v.Character:FindFirstChild("Right Leg")
			if RL then
				RL.Anchored = false
			end
			LL = v.Character:FindFirstChild("Left Leg")
			if LL then
				LL.Anchored = false
			end
		end
		cce.Saturation = 0
sphere:Destroy()
end
end)

  Effects = {}
  local Player = game.Players.localPlayer
  local Character = Player.Character
  Character.Archivable = true
  AdvancingFortress = Character:Clone()
  AdvancingFortress.Parent = Character
  torso = AdvancingFortress.Torso
  hum = AdvancingFortress.Humanoid
  AdvancingFortress.Name = "Advancing Fortress"
  pl = AdvancingFortress
  for i, v in pairs(AdvancingFortress:GetChildren()) do
    if v:IsA("BasePart") then
      v.Transparency = 1
    end
  end