if game:GetService("RunService"):IsClient() then error("Please run as a server script. Use h/ instead of hl/.") end
print("FE Compatibility: by WaverlyCole & Mokiros")
InternalData = {}
do
	script.Parent = owner.Character
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInput"
	local function NewFakeEvent()
		local Fake = {fakeEvent=true,Connect=function(self,Func)self.Function=Func end}Fake.connect = Fake.Connect
		return Fake
	end
	local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
	local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
	local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
		self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
	end};ContextActionService.UnBindAction = ContextActionService.BindAction
	local function TriggerEvent(self,Event,...)
		local Trigger = Mouse[Event]
		if Trigger and Trigger.fakeEvent and Trigger.Function then
			Trigger.Function(...)
		end
	end
	Mouse.TrigEvent = TriggerEvent
	UserInputService.TrigEvent = TriggerEvent
	Event.OnServerEvent:Connect(function(FiredBy,Input)
		if FiredBy.Name ~= owner.Name then end
		if Input.MouseEvent then
			Mouse.Target = Input.Target
			Mouse.Hit = Input.Hit
		else
			local Begin = Input.UserInputState == Enum.UserInputState.Begin
			if Input.UserInputType == Enum.UserInputType.MouseButton1 then
				return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up")
			end
			for _,Action in pairs(ContextActionService.Actions) do
				for _,Key in pairs(Action.Keys) do
					if Key==Input.KeyCode then
						Action.Function(Action.Name,Input.UserInputState,Input)
					end
				end
			end
			Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
			UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
		end
	end)
	InternalData["Mouse"] = Mouse
	InternalData["ContextActionService"] = ContextActionService
	InternalData["UserInputService"] = UserInputService
	Event.Parent = NLS([[
		local Player = owner
		local Event = script:WaitForChild("UserInput")
		local UserInputService = game:GetService("UserInputService")
		local Mouse = Player:GetMouse()
		local Input = function(Input,gameProcessedEvent)
			if gameProcessedEvent then return end
			Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
		end
		UserInputService.InputBegan:Connect(Input)
		UserInputService.InputEnded:Connect(Input)
		local Hit,Target
		while wait(1/30) do
			if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
				Hit,Target = Mouse.Hit,Mouse.Target
				Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
			end
		end
	]],owner.Character)
end
RealGame = game;game = setmetatable({},{
	__index = function (self,Index)
		local Sandbox = function (Thing)
			if Thing:IsA("Player") then
				local RealPlayer = Thing
				return setmetatable({},{
					__index = function (self,Index)
						local Type = type(RealPlayer[Index])
						if Type == "function" then
							if Index:lower() == "getmouse" or Index:lower() == "mouse" then
								return function (self)
									return InternalData["Mouse"]
								end
							end
							return function (self,...)
								return RealPlayer[Index](RealPlayer,...)
							end
						else
							if Index == "PlrObj" then
								return RealPlayer
							end
							return RealPlayer[Index]
						end
					end;
					__tostring = function(self)
						return RealPlayer.Name
					end
				})
			end
		end
		if RealGame[Index] then
			local Type = type(RealGame[Index])
			if Type == "function" then
				if Index:lower() == "getservice" or Index:lower() == "service" then
					return function (self,Service)
						if Service:lower() == "players" then
							return setmetatable({},{
								__index = function (self2,Index2)
									local RealService = RealGame:GetService(Service)
									local Type2 = type(Index2)
									if Type2 == "function" then
										return function (self,...)
											return RealService[Index2](RealService,...)
										end
									else
										if Index2:lower() == "localplayer" then
											return Sandbox(owner)
										end
										return RealService[Index2]
									end
								end;
								__tostring = function(self)
									return RealGame:GetService(Service).Name
								end
							})
						elseif Service:lower() == "contextactionservice" then
							return InternalData["ContextActionService"]
						elseif Service:lower() == "contextactionservice" then
							return InternalData["UserInputService"]
						elseif Service:lower() == "runservice" then
							return setmetatable({},{
								__index = function(self2,Index2)
									local RealService = RealGame:GetService(Service)
									local Type2 = type(Index2)
									if Type2 == "function" then
										return function (self,...)
											return RealService[Index2](RealService,...)
										end
									else
										if Index2:lower() == "bindtorenderstep" then
											return function (self,Name,Priority,Function)
												return RealGame:GetService("RunService").Stepped:Connect(Function)
											end
										end
										if Index2:lower() == "renderstepped" then
											return RealService["Stepped"]
										end
										return RealService[Index2]
									end
								end
							})
						else
							return RealGame:GetService(Service)
						end
					end
				end
				return function (self,...)
					return RealGame[Index](RealGame,...)
				end
			else
				if game:GetService(Index) then
					return game:GetService(Index)
				end
				return RealGame[Index]
			end
		else
			return nil
		end
	end
});Game = game;owner = game:GetService("Players").LocalPlayer;script = {}
print("Complete! Running...")
for i, v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
	if v:IsA("BasePart") then
		Instance.new("Fire", v)
		v.BrickColor = BrickColor.new("Really black")
		v.Material = Enum.Material.Granite
	end
end
local Heads = {}
local hells = Instance.new("Sound", workspace)
hells.Looped = true
hells.Volume = 10
local TS = game:GetService("TweenService")
local Mouse = game.Players.LocalPlayer:GetMouse()
local Shoot = Instance.new("Tool", game.Players.LocalPlayer.Backpack)
Shoot.RequiresHandle = false
local FireEnabled = false
hells.SoundId = "rbxassetid://718185960"
hells.TimePosition = 10
hells.Playing = true
Instance.new("ColorCorrectionEffect", game.Lighting).TintColor = Color3.new(1,0,0)
Instance.new("PointLight", game.Players.LocalPlayer.Character.Torso).Brightness = 234234
local x = Instance.new("BloomEffect", game.Lighting)
x.Intensity = 1
x.Threshold = 0.8
x.Size = 56

function CreateRay(Point_A, Point_B)
	local Ray = Ray.new(Point_A, (Point_B - Point_A).Unit * (2 ^ 31 - 1))
	local Part, Pos = workspace:FindPartOnRay(Ray, game.Players.LocalPlayer.Character)
	local Dist = (Point_A - Pos).Magnitude
	local CFrame = CFrame.new(Point_A, Pos) * CFrame.new(0, 0, -Dist / 2)

	return CFrame, Dist, Part
end

game.Lighting.Brightness = 0
game.Lighting.GlobalShadows = false
game.Players.LocalPlayer.Character.Shirt:Remove()
game.Players.LocalPlayer.Character.Pants:Remove()
local player = game:GetService("Players").LocalPlayer
repeat
  wait()
until player.Character
local char = player.Character
local torso = char:WaitForChild("Torso")
local mouse = player:GetMouse()
local color = BrickColor.new("Really black")
local material = "Neon"
local trans = 0.5
local debounce = false
for u,c in pairs(player.Character:GetChildren()) do
  if c.className == "Hat" and c.Name ~= "Hybrid Goggles" then
    c.Handle.BrickColor = BrickColor.new("Really black")
    c.Handle.Mesh.TextureId = "http://www.roblox.com/asset/?id=0"
  end
end
blast = function()

  local b = Instance.new("Part", workspace)
  game.Debris:AddItem(b, 2)
  b.Size = Vector3.new(5, 5, 5)
  b.CFrame = torso.CFrame * CFrame.new(0, 0, -5)
  b.TopSurface = "Smooth"
  b.BottomSurface = "Smooth"
  b.CanCollide = false
  b.BrickColor = color
  b.Transparency = trans
  b.Material = material
  local v = Instance.new("BodyVelocity", b)
  v.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
  v.Velocity = torso.CFrame.lookVector * 50
  r = Instance.new("BodyAngularVelocity", b)
  r.AngularVelocity = Vector3.new(25, 25, 25)
  b.Touched:connect(function(hit)

    p = hit.Parent
    if p and p:FindFirstChild("Humanoid") and p.Name ~= player.Name then
      b:Remove()
      p.Humanoid:TakeDamage(35)
    end
  end)
end

death = function()

  local b = Instance.new("Part", workspace)
  game.Debris:AddItem(b, 2)
  b.Size = Vector3.new(5, 5, 5)
  b.CFrame = torso.CFrame * CFrame.new(0, 0, -5)
  b.TopSurface = "Smooth"
  b.BottomSurface = "Smooth"
  b.CanCollide = false
  b.BrickColor = color
  b.Transparency = trans
  b.Material = material
  local v = Instance.new("BodyVelocity", b)
  v.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
  v.Velocity = torso.CFrame.lookVector * 50
  r = Instance.new("BodyAngularVelocity", b)
  r.AngularVelocity = Vector3.new(25, 25, 25)
  b.Touched:connect(function(hit)

    p = hit
    if p and p.Name ~= "Base" and p.Name ~= player.Name then
      p:Remove()
    end
  end
)
end

wall = function()

  local b = Instance.new("Part", workspace)
  game.Debris:AddItem(b, 5)
  b.Size = Vector3.new(1, 1, 1)
  b.CFrame = torso.CFrame * CFrame.new(0, 0, -5)
  b.TopSurface = "Smooth"
  b.BottomSurface = "Smooth"
  b.CanCollide = false
  b.Anchored = true
  b.BrickColor = color
  b.Transparency = trans
  b.Material = material
  for i = 1, 50 do
    wait()
    b.CFrame = torso.CFrame * CFrame.new(0, 0, -5)
    b.Size = b.Size + Vector3.new(0.5, 0.5, 0)
  end
  b.CanCollide = true
  b.Touched:connect(function(hit)

    p = hit.Parent
    if p and p:FindFirstChild("Humanoid") and p.Name ~= player.Name then
      p.Humanoid:TakeDamage(5)
    end
  end
)
end

fade = function()

  for i,v in pairs(char:GetChildren()) do
    if v.className == "Part" and v.Name ~= "HumanoidRootPart" then
      v.Transparency = 0.5
    end
  end
  for i,v in pairs(char:GetChildren()) do
    if v.className == "Hat" then
      v.Handle.Transparency = 0.5
    end
  end
end

unfade = function()

  for i,v in pairs(char:GetChildren()) do
    if v.className == "Part" and v.Name ~= "HumanoidRootPart" then
      v.Transparency = 0
    end
  end
  for i,v in pairs(char:GetChildren()) do
    if v.className == "Hat" then
      v.Handle.Transparency = 0
    end
  end
end

dash = function(x)

  b = Instance.new("Part", workspace)
  game.Debris:AddItem(b, 0.7)
  b.Size = Vector3.new(3, 3, 3)
  b.BrickColor = color
  b.Material = material
  b.CanCollide = false
  b.CFrame = torso.CFrame * x
  t = Instance.new("BodyVelocity", b)
  r = Instance.new("BodyAngularVelocity", b)
  r.AngularVelocity = Vector3.new(15, 15, 15)
  for i = 1, 5 do
    wait()
    b.Transparency = b.Transparency + 0.1
    torso.CFrame = torso.CFrame * CFrame.new(0, 0, -1)
  end
end

mouse.KeyDown:connect(function(key)

  if key == "v" then
    holding = true
    fade()
    while holding and wait(0.01) do
      dash(CFrame.new(2, 1, 0))
      dash(CFrame.new(-2, -1, 1))
      dash(CFrame.new(0, 1, 3))
    end
  end
end
)
mouse.KeyUp:connect(function(key)

  if key == "v" then
    unfade()
    holding = false
  end
end
)
mouse.KeyDown:connect(function(key)

  if key == "e" and debounce == false then
    debounce = true
    blast()
    wait(0.5)
    debounce = false
  end
end
)
mouse.KeyDown:connect(function(key)

  if key == "q" and debounce == false then
    debounce = true
    wall()
    wait(0.5)
    debounce = false
  end
end
)
mouse.KeyDown:connect(function(key)

  if key == "t" and debounce == false then
    debounce = true
    death()
    wait(0.5)
    debounce = false
  end
end
)

local player = game.Players.LocalPlayer
repeat wait() until player.Character;
local rs = game:GetService("RunService").RenderStepped
local char = player.Character
local HRP = char.HumanoidRootPart
local Head = char.Head
local tents = {}
function getValue(p, x)
        return p[2] + 0.5 * x*(p[3] - p[1] + x*(2.0*p[1] - 5.0*p[2] + 4.0*p[3] - p[4] + x*(3.0*(p[2] - p[3]) + p[4] - p[1])))
end
function getV3Cubic(tabl,perc)
        local x,y,z = {},{},{}
        if perc >= 2 then
                perc = perc %1
                for i = 3, 6 do
                        table.insert(x,tabl[i].x)
                        table.insert(y,tabl[i].y)
                        table.insert(z,tabl[i].z)
                end
        elseif perc >= 1 then
                perc = perc %1
                for i = 2, 5 do
                        table.insert(x,tabl[i].x)
                        table.insert(y,tabl[i].y)
                        table.insert(z,tabl[i].z)
                end
        else
                for i = 1, 4 do
                        table.insert(x,tabl[i].x)
                        table.insert(y,tabl[i].y)
                        table.insert(z,tabl[i].z)
                end
        end
        local X,Y,Z = getValue(x,perc),getValue(y,perc),getValue(z,perc)
        return Vector3.new(X,Y,Z)
end
local rainbow = {"Really red","Really red","Really red","Really red","Really red","Really red","Really red","Really red","Really red"}
local rainbowCount = 1
local isRainbow = true
for i = 0, 8 do
        local m = Instance.new("Model",char)
        m.Name = "Tentac00l"
        local parts = {}
       local lastpart = Head
        local defC0
        rainbowCount = 1
        for j = 0, 8 do
                local sizex = 0.25 - 0.2 * (j/8)
                local sizey = (15/8) - (9/8) * (j/8)
                local p = Instance.new("Part")
                p.Size = Vector3.new(0.2,0.2,0.2)
                p.BrickColor = BrickColor.new("Really black")
                p.TopSurface = 0
p.Locked = true
                p.BottomSurface = 0
                p.CanCollide = false
                p.Material = "SmoothPlastic"
                p.TopSurface = 0
                p.BottomSurface = 0
                local mesh = Instance.new("CylinderMesh",p)
                mesh.Name = "CyMesh"
                mesh.Scale = Vector3.new(sizex,sizey,sizex) *5
                p.Parent = m
                local p2 = p:Clone()
                p2.Parent = m
                p2.CyMesh.Scale = p2.CyMesh.Scale + Vector3.new(0.075,0.001,0.075) * 5
                p2.Material = "Neon"
p2.Locked = true
                if isRainbow then
                        p2.BrickColor = BrickColor.new(tostring(rainbow[rainbowCount]))
                else
                        p2.BrickColor = BrickColor.new(j%2 == 1 and "Toothpaste" or "Electric blue")
                end
                rainbowCount = rainbowCount + 1
                p2.Transparency = 0.35
                local w2 = Instance.new("Weld",p)
                w2.Parent = p2
                w2.Part0 = p
                w2.Part1 = p2
                local w = Instance.new("Weld",p)
                w.Parent = p
                w.Part0 = lastpart
                w.Part1 = p
                if j == 0 then
                        w.C0 = CFrame.Angles(0,math.rad(-10 + 200 * i/4),math.rad(-30 + (i%2==0 and 96 or 70))) * CFrame.new(0,0.6,0)
                        w.C1 = CFrame.new(0,-0.125,0)
                        defC0 = w.C0
                else
                        w.C0 = CFrame.new(0,lastpart.CyMesh.Scale.y/10,0)
                        w.C1 = CFrame.new(0,-sizey/2,0)
if mesh.Scale == Vector3.new(0.25, 3.75, 0.25) then
	mesh:Remove()
	local mesh2 = Instance.new("SpecialMesh",p2)
	mesh2.Scale = Vector3.new(1,1,1)
	mesh2.MeshType = Enum.MeshType.FileMesh
	mesh2.MeshId = "rbxassetid://36869983"
	p2.Name = "Last"
	table.insert(Heads, p2)
end
                end
                table.insert(parts,{p,w,p2})
                lastpart = p
                rs:wait()
        end
        local randoms = {Vector3.new(0,0,0),
                Vector3.new(math.random(-35,35)/100,math.random(-35,35)/100,math.random(-35,35)/100),
                Vector3.new(math.random(-35,35)/100,math.random(-35,35)/100,math.random(-35,35)/100),
                Vector3.new(math.random(-35,35)/100,math.random(-35,35)/100,math.random(-35,35)/100),
                Vector3.new(math.random(-35,35)/100,math.random(-35,35)/100,math.random(-35,35)/100),
                Vector3.new(math.random(-35,35)/100,math.random(-35,35)/100,math.random(-35,35)/100),
        }
        table.insert(tents,{0,randoms,parts,defC0})
end
player.Chatted:connect(function(msg)
        if string.sub(msg:lower(),1,4) == "col/" then
                for i, v in pairs(tents) do
                        for j, o in pairs(v[3]) do
                                o[3].BrickColor = BrickColor.new(string.sub(msg,5))
                        end
                end
        elseif string.sub(msg:lower(),1,7) == "/e col/" then
                for i, v in pairs(tents) do
                        for j, o in pairs(v[3]) do
                                o[3].BrickColor = BrickColor.new(string.sub(msg,8))
                        end
                end
        end
end)
rs:connect(function()
        for i, v in pairs(tents) do
                v[1] = v[1] %200 + 1
                if v[1] == 1 then
                        v[2][1] = v[2][2]
                        v[2][2] = v[2][3]
                        v[2][3] = v[2][4]
                        v[2][4] = v[2][5]
                        v[2][5] = v[2][6]
                        v[2][6] = Vector3.new(math.random(-28,28)/100,math.random(-42,42)/100,math.random(-28,28)/100);
                end
                local p0 = v[2][1]
                local p1 = v[2][2]
                local p2 = v[2][3]
                local p3 = v[2][4]
                local p4 = v[2][5]
                local p5 = v[2][6]
                local arr = {p0,p1,p2,p3,p4,p5}
                local dir = i%2 == 0 and 1 or -1
                for j, V in pairs(v[3]) do
                        local val = math.sin(math.pi/2 * 2 * (((v[1] + (100 * j/#v[3])*dir) % 100)/100))
                        local off = getV3Cubic(arr,(v[1] + 340*(j/#v[3]))/200)
                        V[3].Transparency = 0.12 + val * 0.65
                        if j == 1 then
                                V[2].C0 = v[4] * CFrame.Angles(off.x*2,off.y*2,off.z*2)
                        else
                                V[2].C0 = CFrame.new(0,V[2].C0.y,0) * CFrame.Angles(off.x*2 * (1 + 0.75 * (j/#v[3])),off.y*2 * (1 + 0.75 * (j/#v[3])),off.z*2 * (1 + 0.75 * (j/#v[3])))
                        end
                end
        end
end)

-- params : ...

Model = Instance.new("Model", game.Workspace)
Model.Name = "ShadowFigs"
Model.ChildAdded:connect(function(Child)

  wait(0.2)
  if Child.Name == "ShadowClone" and Child.Name ~= "HoverBlocks" then
    local Light = Instance.new("PointLight", workspace)
    Light.Color = Color3.new(1, 1, 1)
    Light.Range = 10
    Light.Brightness = 2
    Light.Shadows = true
Light:Remove()
    for t = 1, 5 do
      wait(0.1)
      for i = 1, #Child:GetChildren() do
        Child:GetChildren()[i].Transparency = t / 10 + 0.5
      end
    end
    Child:remove()
  end
end
)
Parts = {"Head", "Torso", "Left Arm", "Left Leg", "Right Arm", "Right Leg"}
repeat
  wait()
until game.Players.LocalPlayer
Plr = game.Players.LocalPlayer
PlrChildren = Plr:GetChildren()
Plr.Character.Humanoid.WalkSpeed = 16
for i = 1, #PlrChildren do
  print(PlrChildren[i])
end

Mouse.Button1Down:Connect(function()
	FireEnabled = true
end)

Mouse.Button1Up:Connect(function()
	FireEnabled = false
end)

while wait() do
	if FireEnabled == true then
		for i, v in pairs(Heads) do
			rs:wait()
			coroutine.resume(coroutine.create(function()
				local CF, D, Hit = CreateRay(v.CFrame.p, Mouse.Hit.p)
				if Hit.Parent:FindFirstChildOfClass("Humanoid") ~= nil then
					Hit.Parent:FindFirstChildOfClass("Humanoid"):TakeDamage(5)
				end
				local Fire = Instance.new("Part", workspace)
				local Laser = Instance.new("Part", workspace)
				Laser.Anchored = true
				Laser.CanCollide = false
				Laser.Locked = true
				Instance.new("PointLight", Laser).Brightness = 23423
				Laser.BrickColor = BrickColor.new("Really red")
				Laser.Material = "Neon"
				Laser.Size = Vector3.new(0.2, 0.2, D)
				Laser.CFrame = CF
				wait()
				Laser:Remove()
			end))
			coroutine.resume(coroutine.create(function()
				local Fire = Instance.new("Part", workspace)
				Fire.Size = Vector3.new(0.05, 0.05, 0.05)
				Fire.Transparency = 0
				Fire.Anchored = true
				Fire.CanCollide = false
				Fire.CFrame = Mouse.Hit
				Instance.new("PointLight", Fire)
				Instance.new("Fire", Fire)
				wait(1)
				Fire:Remove()
			end))
		end
	end
end

do
  while 1 do
    Posit = Plr.Character.HumanoidRootPart.Position
    wait(0.1)
    if Plr.Character.HumanoidRootPart.Position == Posit or Plr.Character.Humanoid.WalkSpeed == 32 then
      Set = Instance.new("Model", game.Workspace.ShadowFigs)
      Set.Name = "ShadowClone"
      for i = 1, #Parts do
        PartClone = Plr.Character[Parts[i]]:Clone()
        RotationX = math.rad(Plr.Character[Parts[i]].Rotation.X)
        RotationY = math.rad(Plr.Character[Parts[i]].Rotation.Y)
        RotationZ = math.rad(Plr.Character[Parts[i]].Rotation.Z)
        PartClone.CFrame = CFrame.new(Plr.Character[Parts[i]].Position) * CFrame.Angles(RotationX, RotationY, RotationZ)
        PartClone.Parent = Set
		PartClone.Size = Vector3.new(PartClone.Size.X - 0.2,PartClone.Size.Y - 0.2,PartClone.Size.Z - 0.2)
        PartClone.Anchored = true
        PartClone.CanCollide = false
        PartClone.Transparency = 0.7
        PartClone.Material = "Neon"
        PartClone.BrickColor = BrickColor.new("White")
		Delete = Instance.new("BlockMesh",PartClone)
		Delete.Scale = Vector3.new(0,0,0)
        if PartClone.Name == "Head" or PartClone.Name == "Torso" then
		PartClone:Remove()
          Children = PartClone:GetChildren()
          for i = 1, #Children do
            if Children[i].ClassName ~= "Mesh" and Children[i].ClassName ~= "SpecialMesh" then
              Children[i]:remove()
            end
          end
        end
      end
    end
  end
end