if game:GetService("RunService"):IsClient()then error("Please run as a server script. Use h/ instead of hl/.")end;print("FE Compatibility by WaverlyCole & Fireboltofdeath");print("https://github.com/WaverlyCole/FE-Compatibility-VoidSb-")
local Wrapper = {};Wrapper.Fake = {};Wrapper.Real = {};Wrapper.Data = {};
local sGame = game;local sScript = script;local sOwner = owner;local sInstance = Instance;local sLoadLibrary = LoadLibrary
Wrapper.Event = Instance.new("RemoteEvent");Wrapper.Event.Name = "UserInput";
Wrapper.CreateObject = function(connections, index)
    local proxy = newproxy (true);local meta = getmetatable (proxy);
    local runbind = function (self, i, ...) connections[i]:Fire (...); end;
	while (#connections > 0) do connections[table.remove(connections, 1)] = Instance.new ('BindableEvent');end;
    meta.__index = function (self, i)
        if (i == 'TriggerEvent') then return runbind end;
        return connections[i] and connections[i].Event or index[i];
    end;
    meta.__newindex = index;meta.__metatable = false;return proxy
end;
Wrapper.Mouse = Wrapper.CreateObject({"KeyUp","KeyDown","Button1Down","Button1Up","Move","Button2Down","Button2Up"},{["Target"] = nil;["Hit"] = CFrame.new()})
Wrapper.UserInputService = Wrapper.CreateObject({"InputBegan","InputEnded"},{})
Wrapper.ContextActionService = {Actions={};BindAction = function(self,actionName,Func,touch,...)self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil end;UnBindAction = function(self,actionName,Func,touch,...)self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil end};
Wrapper.Sandbox = function(...)
  local Unwrap = {...};
  for obi = 1,#Unwrap do
    local Object = Unwrap[obi];
    if (Wrapper.Fake[Object] == nil and Wrapper.Real[Object] == nil) then
      local Type = typeof(Object);local Replacement = Object;
      if (Type == "function") then
		Replacement = function(...)
			local IsRoblox = not (pcall(function() string.dump(Object) end))
			if IsRoblox then
				return Object(Wrapper.Unsandbox(...))
			end
			return Object(Wrapper.Sandbox(...))
		end
	  elseif (Type == "table") then
		Replacement = {};
        setmetatable(Replacement, {
        	__index = function(self, i)
            	return Wrapper.Sandbox(Object[Wrapper.Unsandbox(i)])
        	end,
			__newindex = function(self,i,v)
				Object[Wrapper.Unsandbox(i)] = Wrapper.Unsandbox(v)
			end;
       })
      elseif (Type == "Instance") then
        Replacement = newproxy(true);
        local Mt = getmetatable(Replacement);
		Mt.__namecall = function(self, ...)
            local Pack = {...};local Name = Pack[#Pack];table.remove(Pack, #Pack);
            local Rest = nil;pcall(function()Rest = Object[Name];end);
            for g, x in pairs (Wrapper.InstanceMT["GET"]) do
                if (Object:IsA(g) or g == "Global") then
                    for t, v in pairs(x) do
                        for str in string.gmatch(t .. ",", "(%w+),")  do
                            if (Name == str) then
								if typeof(v) == "function" then
									return Wrapper.Sandbox(v(Wrapper.Unsandbox(self), Wrapper.Unsandbox(unpack(Pack))))
                                else
                                    return v;
								end
                            end
                        end
                    end
                end
            end
            if (Rest == nil) then
				if Wrapper.Sandbox(sGame):GetService(unpack(Pack)) then return Wrapper.Sandbox(sGame):GetService(unpack(Pack))end;
                return Wrapper.Sandbox(Object[Name]);
            elseif (typeof(Rest) == "function") then
                return Wrapper.Sandbox(Rest(Wrapper.Unsandbox(self), Wrapper.Unsandbox(unpack(Pack))))
            end
          	return Wrapper.Sandbox(Object[Name]);
        end
        Mt.__index = function(self, i)
			local Rest = nil;pcall(function()Rest = Object[i];end)
            for g, x in pairs (Wrapper.InstanceMT["GET"]) do
                if (Object:IsA(g) or g == "Global") then
                    for t, v in pairs(x) do
                        for str in string.gmatch(t .. ",", "(%w+),")  do
                            if (i == str) then
								if typeof(v) == "function" then
									return function(...)return Wrapper.Sandbox(v(Wrapper.Unsandbox(self), Wrapper.Unsandbox(...)))end;
                                else
                                    return v;
								end
                            end
                        end
                    end
                end
            end
			if (Object:IsA("Sound") and i == "PlaybackLoudness") then return Wrapper.SoundLoudness[Wrapper.Unsandbox(Object)];end;
            if (Rest == nil) then
				if Wrapper.Sandbox(sGame):GetService(i) then return Wrapper.Sandbox(sGame):GetService(i)end;
                return Wrapper.Sandbox(Object[i]);
            elseif (typeof(Rest) == "function") then
				local isService,Service = pcall(function() return sGame:GetService(i) end)
				if isService and Service then return Wrapper.Sandbox(Service) end
                return function(self, ...)
                    return Wrapper.Sandbox(Rest(Wrapper.Unsandbox(self), Wrapper.Unsandbox(...)))
                end
            end
          	return Wrapper.Sandbox(Object[i]);
        end
		Mt.__newindex = function(self, i, v)
			for g,x in pairs (Wrapper.InstanceMT["SET"]) do
				if (Object:IsA(g)) then
					for t, v in pairs(x) do
						for str in string.gmatch( t .. ",", "(%w+),") do
							if v(Wrapper.Unsandbox(self, i, v)) == true then
								Object[Wrapper.Unsandbox(i)] = Wrapper.Unsandbox(v);return
							end
						end
					end
				end
			end
			Object[Wrapper.Unsandbox(i)] = Wrapper.Unsandbox(v);
        end
        Mt.__tostring = function(self) return tostring(Object) end
      --elseif (Type == "") then -- Etc
      end
      Wrapper.Fake[Object] = Replacement;Wrapper.Real[Replacement] = Object;Unwrap[obi] = Replacement;
    else
      return Wrapper.Fake[Object] or Object;
    end
  end
  return unpack(Unwrap);
end
Wrapper.Unsandbox = function(...)
  local Unsandbox = {...};
  for i,v in pairs (Unsandbox) do Unsandbox[i] = Wrapper.Real[v] or Unsandbox[i]end;
  return unpack(Unsandbox)
end
Wrapper.Services = {
	['contextactionservice'] = Wrapper.ContextActionService;
	["userinputservice"]  = Wrapper.UserInputService;
}
Wrapper.InstanceMT = {
    ["GET"] = {
		["Global"] = {
			["IsFake,isFake"] = function(self)return true;end;
		};
        ["Player"] = {
			["mouse,Mouse,getMouse,GetMouse"] = function(self)return Wrapper.Mouse;end;
        };
        ["Players"] = {
            ["localPlayer,LocalPlayer"] = Wrapper.Sandbox(owner)
        };
		["DataModel"] = {
			["getService,GetService"] = function(self,service)
				if Wrapper.Services[service:lower()] then return Wrapper.Sandbox(Wrapper.Services[service:lower()])end;
				return Wrapper.Sandbox(sGame:GetService(service))
			end
		};
		["RunService"] = {
            ["renderstepped,renderStepped,RenderStepped"] =  sGame:GetService("RunService").Stepped;
        }
  };
    ["SET"] = {
  }
}
Wrapper.SoundLoudness = {};
Wrapper.Event.OnServerEvent:Connect(function(FiredBy,Input)
	if FiredBy ~= sOwner then return end
	if Input.MouseEvent then
		Wrapper.Mouse.Target = Input.Target;Wrapper.Mouse.Hit = Input.Hit;Wrapper.Mouse:TriggerEvent("Move")
	elseif Input.Sound then
		if Wrapper.SoundLoudness[Input.Sound] then Wrapper.SoundLoudness[Input.Sound] = Input.Loudness end
	else
		local Begin = Input.UserInputState == Enum.UserInputState.Begin
		if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Wrapper.Mouse:TriggerEvent(Begin and "Button1Down" or "Button1Up") end
		if Input.UserInputType == Enum.UserInputType.MouseButton2 then return Wrapper.Mouse:TriggerEvent(Begin and "Button2Down" or "Button2Up") end
		for _,Action in pairs(Wrapper.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
		Wrapper.Mouse:TriggerEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower());Wrapper.UserInputService:TriggerEvent(Begin and "InputBegan" or "InputEnded",Input,false)
	end
end);
Wrapper.Event.Parent = NLS([[
		local Player = owner;local Sounds = {};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
		Event.OnClientEvent:connect(function(Args)
			if Args[1] == "NewSound" and Args[2]:IsA("Sound") then table.insert(Sounds,Args[2]) end
		end)
		UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
		local Hit,Target;while wait(1/30) do
			for x,Sound in pairs(Sounds) do if Sound.Parent then Event:FireServer({["Sound"]=Sound,["Loudness"]=Sound.PlaybackLoudness}) end; end;
			if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
				Hit = Mouse.Hit;Target = Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
			end
		end]],sOwner.Character)
Instance = {
	["new"] = function(Type,Parent)
		local Real = sInstance.new(Type,Wrapper.Unsandbox(Parent))
		if Type:lower() == "sound" then
			if not Parent then
				Parent = sOwner.Character
			end
			Wrapper.SoundLoudness[Real] = 0;Wrapper.Event:FireClient(sOwner,{"NewSound",Real})
		end
		return Wrapper.Sandbox(Real)
	end
}
LoadLibrary = function(Library)
	if Library == "RbxUtility" then
		return setmetatable({},{
			__tostring = function() return "RbxUtility" end;
			__index = function(self, Index)
				if Index:lower() == "create" then
					return function(Type) return function(Data)
							Data = Data or {};local Inst = Instance.new(Type)
							for x,y in pairs(Data) do Inst[x] = y end
							return Inst
					end;end;
				end
			return sLoadLibrary(Library)[Index]
		end})
	end
	return sLoadLibrary(Library)
end
owner = Wrapper.Sandbox(owner);game = Wrapper.Sandbox(game)workspace = Wrapper.Sandbox(workspace)
Game= game;Workspace = workspace;

--//Paste script below this line.
wait(1)
local p = game:GetService("Players")
pp = p.LocalPlayer--The variable is named after your small 'thing'.
local ChatService = game:GetService("Chat")
local mouse = pp:GetMouse()
local skidspace = game:GetService("Workspace") --This is a script intended for script builder
plr = skidspace[pp.Name] --You have to deal with all this idiots; Just like school.
local hum = plr:FindFirstChildOfClass("Humanoid")
hum.WalkSpeed = 11.5*6
hum.DisplayDistanceType = "None"
function ChatFunction(loc, msg)
	local ChatGuiPart1 = Instance.new("BillboardGui",loc)
	ChatGuiPart1.Name = "ChatGui"
	ChatGuiPart1.AlwaysOnTop = true
	ChatGuiPart1.ExtentsOffset = Vector3.new(0, 5, 0)
	ChatGuiPart1.Size = UDim2.new(0, 200, 0, 50)
	local ChatGuiPart2 = Instance.new("TextLabel")
	ChatGuiPart2.BorderColor3 = Color3.new(1, 0, 0)
	ChatGuiPart2.BorderSizePixel = 3
	ChatGuiPart2.BackgroundColor3 = Color3.new(255, 255, 255)
	ChatGuiPart2.Size = UDim2.new(0, 200, 0, 50)
	ChatGuiPart2.Font = Enum.Font.Arcade
	ChatGuiPart2.FontSize = Enum.FontSize.Size14
	ChatGuiPart2.TextColor3 = Color3.new(1, 0, 0)
	ChatGuiPart2.TextWrapped = true
	ChatGuiPart2.Parent = ChatGuiPart1
	ChatGuiPart2.Text = msg
	wait()
	--ChatGuiPart1:Destroy()
end

--------------------------------------------------
--186942568
local theme = Instance.new("Sound",pp.Character)
theme.Name = "Girei"
theme.SoundId = "rbxassetid://324905722"
theme.Volume = 3
theme.Looped = true
theme:Play()

--------------------------------------------------

for _,v in pairs(plr:GetChildren()) do
	if v:IsA("Accessory") or v:IsA("Hat") or v:IsA("Shirt") or v:IsA("Pants") or v:IsA("CharacterMesh") then
		v:Destroy()
	end
end

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

sbt = Instance.new("SelectionBox",plr.Torso)
sbt.Adornee = sbt.Parent
sbt.LineThickness = 0.01
sbra = Instance.new("SelectionBox",plr["Right Arm"])
sbra.Adornee = sbra.Parent
sbra.LineThickness = 0.01
sbla = Instance.new("SelectionBox",plr["Left Arm"])
sbla.Adornee = sbla.Parent
sbla.LineThickness = 0.01
sbrl = Instance.new("SelectionBox",plr["Right Leg"])
sbrl.Adornee = sbrl.Parent
sbrl.LineThickness = 0.01
sbll = Instance.new("SelectionBox",plr["Left Leg"])
sbll.Adornee = sbll.Parent
sbll.LineThickness = 0.01
--sbh = Instance.new("SelectionBox",plr.Head)
--sbh.Adornee = sbh.Parent


sbt.Color3 = Color3.new(math.random(), math.random(), math.random())
sbra.Color3 = Color3.new(math.random(), math.random(), math.random())
sbla.Color3 = Color3.new(math.random(), math.random(), math.random())
sbrl.Color3 = Color3.new(math.random(), math.random(), math.random())
sbll.Color3 = Color3.new(math.random(), math.random(), math.random())
--sbh.Color3 = Color3.new(math.random(), math.random(), math.random())
	local Title1 = Instance.new("BillboardGui",plr.Head)
	Title1.Adornee = plr.Head
	Title1.AlwaysOnTop = true
	Title1.Size = UDim2.new(0, 200, 0, 50)
	local Title2 = Instance.new("TextLabel")
	Title2.BackgroundTransparency = 1
	Title2.Position = UDim2.new(0, 0, -0.899999976, 0)
	Title2.Size = UDim2.new(0, 200, 0, 50)
	Title2.Font = Enum.Font.Arcade
	Title2.FontSize = Enum.FontSize.Size24
	Title2.Text = "Demon of Insanity"
	Title2.TextColor3 = Color3.new(1, 0, 0)
	Title2.TextScaled = true
	Title2.TextWrapped = true
	Title2.Parent = Title1

--Commented neatness stops here, along with all other forms of organization.

for i = 1,50 do
	wait(0.0005)
	game:GetService("Lighting").Brightness = game:GetService("Lighting").Brightness - 0.2
end
	ChatFunction(pp.Character.Head, "The Demon of Insanity has arrived, this world is now mine.")
	wait(3)
	pp.Character.Head.ChatGui:Destroy()
	--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "My incarnation is complete. The Demon of Insanity is here.","Red")
game:GetService("Lighting").Brightness = 0

function md()
	ChatFunction(pp.Character.Head, "This world shall be rid of all sanity!")
	--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "This world shall be rid of all sanity!","Red")
	game:GetService("Lighting").Ambient = Color3.new(255/255, 0/255, 0,255)
	game:GetService("Lighting").TimeOfDay = 24000004
local destruction = Instance.new("Part")
destruction.Touched:connect(function(hit)
	if hit.Parent:FindFirstChildOfClass("Humanoid") then
		if hit.Parent.Name == pp.Name or hit.Parent.Parent.Name == pp.Name then
		else
		hit.Parent:FindFirstChildOfClass("Humanoid").Health = 0
end
	end
end)
destruction.Parent = plr
destruction.Material = Enum.Material.Ice
destruction.BrickColor = BrickColor.new("Maroon")
destruction.Transparency = 0.25
destruction.CFrame = plr["Right Arm"].CFrame
destruction.Shape = Enum.PartType.Ball
destruction.Size = Vector3.new(4, 4, 4)
destruction.BackSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.RightSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.TopSurface = Enum.SurfaceType.SmoothNoOutlines
destruction.CanCollide = false
destruction.Color = Color3.new(0.458824, 0, 0)
local bp = Instance.new("BodyPosition",destruction)
bp.MaxForce = Vector3.new(10000, 10000, 10000)
position = mouse.Hit
bp.Position = mouse.Hit.p
wait(2.5)
destruction.Anchored = true
local boom = Instance.new("Sound",pp.Character)
boom.SoundId = "rbxassetid://144699494"
boom.Pitch = 0.45
boom:Play()
boom.Volume = 10
for i = 1,75 do
	wait(0.00005)
destruction.CFrame = position
destruction.Size = Vector3.new(4, 4, 4) * i*0.75
destruction.CFrame = position
destruction.Transparency = 0.25 * (i/18)
end
	pp.Character.Head.ChatGui:Destroy()
destruction:Destroy()
end


mouse.KeyDown:connect(function(key)
	if key == "q" then
		md()
	end
end)



local player = game.Players.LocalPlayer
local pchar = player.Character
local mouse = player:GetMouse()
local cam = workspace.CurrentCamera
root = plr.HumanoidRootPart

local rad = math.rad
bodyparts = {}
local keysDown = {}
local flySpeed = 0
local MAX_FLY_SPEED = 150

local canFly = false
local flyToggled = false

local forward, side = 0, 0
local lastForward, lastSide = 0, 0

local floatBP = Instance.new("BodyPosition")
floatBP.maxForce = Vector3.new(0, math.huge, 0)
local flyBV = Instance.new("BodyVelocity")
flyBV.maxForce = Vector3.new(9e9, 9e9, 9e9)
local turnBG = Instance.new("BodyGyro")
turnBG.maxTorque = Vector3.new(math.huge, math.huge, math.huge)

mouse.KeyDown:connect(function(key)
        keysDown[key] = true

        if key == "f" then
                flyToggled = not flyToggled

        if not flyToggled then
                stanceToggle = "Normal"
                floatBP.Parent = nil
                flyBV.Parent = nil
                turnBG.Parent = nil
                root.Velocity = Vector3.new()
                pchar:FindFirstChildOfClass("Humanoid").PlatformStand = false
        end
end

end)
mouse.KeyUp:connect(function(key)
        keysDown[key] = nil
end)

local function updateFly()




        if not flyToggled then return end

        lastForward = forward
        lastSide = side

        forward = 0
        side = 0

        if keysDown.w then
                forward = forward + 1
        end
        if keysDown.s then
                forward = forward - 1
        end
        if keysDown.a then
                side = side - 1
        end
        if keysDown.d then
                side = side + 1
        end

        canFly = (forward ~= 0 or side ~= 0)

        if canFly then
                stanceToggle = "Floating"
                turnBG.Parent = root
                floatBP.Parent = nil
                flyBV.Parent = root

                flySpeed = flySpeed + 1 + (flySpeed / MAX_FLY_SPEED)
                if flySpeed > MAX_FLY_SPEED then flySpeed = MAX_FLY_SPEED end
        else
                floatBP.position = root.Position
                floatBP.Parent = root

                flySpeed = flySpeed - 1
                if flySpeed < 0 then flySpeed = 0 end
        end

        local camCF = cam.CoordinateFrame
        local in_forward = canFly and forward or lastForward
        local in_side = canFly and side or lastSide

        flyBV.velocity = ((camCF.lookVector * in_forward) + (camCF * CFrame.new(in_side,in_forward * 0.2, 0).p) - camCF.p) * flySpeed

        turnBG.cframe = camCF * CFrame.Angles(-rad(forward * (flySpeed / MAX_FLY_SPEED)), 0,0)
end

game:service'RunService'.RenderStepped:connect(function()
        if flyToggled then
                pchar:FindFirstChildOfClass("Humanoid").PlatformStand = true
        end
        updateFly()
end)



function bringforthe()
if mouse.Target.Parent:FindFirstChildOfClass("Humanoid") then
ChatFunction(pp.Character.Head, "Your existence has brought my attention, so I have brought you.")
	--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "Your existence has brought my attention, so I have brought you.","Red")
	local bodyposition = Instance.new("BodyPosition",mouse.Target)
	bodyposition.MaxForce = Vector3.new(10000, 10000, 10000)
	bodyposition.Position = plr["Right Arm"].Position
	wait(5)
	bodyposition:Destroy()
		pp.Character.Head.ChatGui:Destroy()
	end
	end



mouse.KeyDown:connect(function(key)
	if key == "r" then
		bringforthe()
	end
end)




function relay()
	ChatFunction(pp.Character.Head, "Foolish mortals, my methods of transportation are far more superior.")
--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "Foolish mortals, my methods of transportation are far more superior.","Red")
local r1 = Instance.new("Part")
r1.Parent = plr
r1.BrickColor = BrickColor.new("Really black")
r1.CFrame = CFrame.new(-7, 2.25, 71, 0, -1, 0, -1, 0, 0, 0, 0, -1)
r1.CFrame = mouse.Hit
r1.Rotation = Vector3.new(-180, 0, 90)
r1.Shape = Enum.PartType.Cylinder
r1.Size = Vector3.new(0.5, 3, 3)
r1.BackSurface = Enum.SurfaceType.SmoothNoOutlines
r1.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
r1.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
r1.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
r1.RightSurface = Enum.SurfaceType.SmoothNoOutlines
r1.TopSurface = Enum.SurfaceType.SmoothNoOutlines
r1.Color = Color3.new(0.0666667, 0.0666667, 0.0666667)
r1.Anchored = true
plr.Torso.CFrame = CFrame.new(r1.CFrame.x, r1.CFrame.y + 5, r1.CFrame.z)
for i = 1,100 do
	wait(0.005)
	r1.Transparency = r1.Transparency + 0.01
end
r1:Destroy()
	pp.Character.Head.ChatGui:Destroy()
end

mouse.KeyDown:connect(function(key)
	if key == "b" then
		relay()
	end
end)




function ps()
	ChatFunction(pp.Character.Head, "The term 'Personal Space', is one of the few terms humans have made that is actually smart.")
--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "Your term 'Personal Space', is one of the terms humans have made that is actually smart.","Red")
	local push = Instance.new("Part")
push.Touched:connect(function(hit)
	if hit.Parent:FindFirstChildOfClass("Humanoid") then
		if hit.Parent.Name == pp.Name or hit.Parent.Parent.Name == pp.Name then
		else
		hit.Parent:FindFirstChildOfClass("Humanoid").Health = 0
end
	end
end)
push.Parent = game.Workspace
push.Material = Enum.Material.Neon
push.BrickColor = BrickColor.new("Really black")
push.Transparency = 0.25
push.Shape = Enum.PartType.Ball
push.Size = Vector3.new(8, 8, 8)
push.BackSurface = Enum.SurfaceType.SmoothNoOutlines
push.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
push.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
push.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
push.RightSurface = Enum.SurfaceType.SmoothNoOutlines
push.CanCollide = false
push.Anchored = false
push.TopSurface = Enum.SurfaceType.SmoothNoOutlines
push.CFrame = plr.Torso.CFrame
wait(0.05)
local weld = Instance.new("Weld",push)
weld.Part0 = push
--weld.C0 = push.CFrame:inverse()
weld.Part1 = plr.Torso
--weld.C1 = plr.Torso.CFrame:inverse()
wait(1.5)
push:Destroy()
	pp.Character.Head.ChatGui:Destroy()
end


function aieou()
	if mouse.Target.Parent:FindFirstChildOfClass("Humanoid") then
		if mouse.Target.Parent:FindFirstChild("Torso") then


			for i,v in pairs(mouse.Target.Parent:GetChildren()) do
				if v:IsA("Part") then
					if v.Name == "Torso" then

						--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "Your torso, it will make a fine addition to my collection.","Red")

mouse.Target.Parent:FindFirstChild("Torso").Size = Vector3.new(1, 1, 1)
					else
						v:Destroy()

					end
				end
			end
		end

	end
end


function minion()
	if mouse.Target.Parent:FindFirstChildOfClass("Humanoid") then
ChatFunction(pp.Character.Head, "You're now my minion, "..mouse.Target.Parent.Name..", now kill in my name.")
	--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "You're now my minion, "..mouse.Target.Parent.Name..", now kill in my name.","Red")
wait(2.5)
	pp.Character.Head.ChatGui:Destroy()
minion = mouse.Target.Parent
local push = Instance.new("Part")
push.Touched:connect(function(hit)
	if hit.Parent:FindFirstChildOfClass("Humanoid") then
		if hit.Parent.Name == pp.Name or hit.Parent.Parent.Name == pp.Name or hit.Parent.Name == mouse.Target.Parent.Name or hit.Parent.Parent.Name == mouse.Target.Parent.Name then
		else
ChatFunction(minion.Head, "Master "..pp.Name..", I have killed for you, in your name.")
	--game:GetService("Chat"):Chat(minion.Head, "Master "..pp.Name..", I have killed for you, in your name.","Red")
		hit.Parent:FindFirstChildOfClass("Humanoid").Health = 0
		wait(1.5)
		minion.Head.ChatGui:Destroy()
end
	end
end)
	local Minion1 = Instance.new("BillboardGui",mouse.Target.Parent:FindFirstChild("Head"))
	Minion1.Adornee = mouse.Target.Parent:FindFirstChild("Head")
	Minion1.AlwaysOnTop = true
	Minion1.Size = UDim2.new(0, 200, 0, 50)
	local Minion2 = Instance.new("TextLabel")
	Minion2.BackgroundTransparency = 1
	Minion2.Position = UDim2.new(0, 0, -0.899999976, 0)
	Minion2.Size = UDim2.new(0, 200, 0, 50)
	Minion2.Font = Enum.Font.Arcade
	Minion2.FontSize = Enum.FontSize.Size24
	Minion2.Text = "Minion of Insanity"
	Minion2.TextColor3 = Color3.new(0.333333, 0.666667, 0.498039)
	Minion2.TextScaled = true
	Minion2.TextWrapped = true
	Minion2.Parent = Minion1
push.Parent = mouse.Target.Parent
push.Material = Enum.Material.Neon
push.BrickColor = BrickColor.new("Really black")
push.Transparency = 0.25
push.Shape = Enum.PartType.Ball
push.Size = Vector3.new(8, 8, 8)
push.BackSurface = Enum.SurfaceType.SmoothNoOutlines
push.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
push.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
push.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
push.RightSurface = Enum.SurfaceType.SmoothNoOutlines
push.CanCollide = false
push.Anchored = false
push.TopSurface = Enum.SurfaceType.SmoothNoOutlines
push.CFrame = mouse.Target.Parent:FindFirstChild("Torso").CFrame
wait(0.05)
local weld = Instance.new("Weld",push)
weld.Part0 = push
--weld.C0 = push.CFrame:inverse()
weld.Part1 = mouse.Target.Parent:FindFirstChild("Torso")
--weld.C1 = plr.Torso.CFrame:inverse()
end
end

mouse.KeyDown:connect(function(key)
	if key == "v" then
minion()
end
end)

mouse.KeyDown:connect(function(key)
	if key == "g" then
		aieou()
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "e" then
		ps()
	end
end)



function possessed()
	if mouse.Target.Parent:FindFirstChildOfClass("Humanoid") then
		local possessee = mouse.Target.Parent
		local curse = Instance.new("Model")
		curse.Name = "Curse"
		curse.Parent = possessee
ChatFunction(possessee.Head, "Master "..pp.Name..", I shall be your servant, command me whenever you are ready.")
		--game:GetService("Chat"):Chat(possessee.Head, "Master "..pp.Name..", I shall be your servant, command me whenever you are ready.","Red")
	wait(3)
	possessee.Head.ChatGui:Destroy()
	end
end

mouse.KeyDown:connect(function(key)
if key == "z" then
possessed()

end
end)

function curse()
ChatFunction(pp.Character.Head, "Servants! The time is now! Rid this world of all sanity!")
wait(2)
pp.Character.Head.ChatGui:Destroy()
--game:GetService("Chat"):Chat(game.Players.LocalPlayer.Character, "Servants! The time is now! Rid this world of all sanity!","Red")
	for i,v in pairs(game:GetService("Workspace"):GetChildren()) do
		if v:IsA("Model") then
			if v:FindFirstChild("Curse") then

				wait(0.5)
ChatFunction(v.Head, "Master "..pp.Name.." has commanded me to do this.")
--game:GetService("Chat"):Chat(v.Head, "Master "..pp.Name.." has commanded me to do this.","Red")
--bp = Instance.new("BodyPosition",v)
--bp.MaxForce = Vector3.new(10000, 10000, 10000)
--bp.Position = Vector3.new(0, 3, 0)
wait(4)
v.Head.ChatGui:Destroy()
local servantdestruction = Instance.new("Part")
servantdestruction.Parent = v
servantdestruction.Material = Enum.Material.Ice
servantdestruction.BrickColor = BrickColor.new("Maroon")
servantdestruction.Transparency = 0.25
servantdestruction.Shape = Enum.PartType.Ball
servantdestruction.Size = Vector3.new(4, 4, 4)
servantdestruction.BackSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.RightSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.TopSurface = Enum.SurfaceType.SmoothNoOutlines
servantdestruction.CanCollide = false
servantdestruction.Color = Color3.new(0.458824, 0, 0)
servantdestruction.Anchored = true
servantdestruction.CFrame = v.Torso.CFrame
wait(0.25)
servantdestruction.Touched:connect(function(hit)
	if hit.Parent:FindFirstChildOfClass("Humanoid") then
		if hit.Parent.Name == pp.Name or hit.Parent.Parent.Name == pp.Name then
		else
		hit.Parent:FindFirstChildOfClass("Humanoid").Health = 0
end
	end
end)
sboom = Instance.new("Sound",game:GetService("Workspace"))
sboom.SoundId = "rbxassetid://144699494"
sboom.Pitch = 0.45
sboom:Play()
sboom.Volume = 10
for i = 1,25 do
	wait(0.00005)
servantdestruction.CFrame = v.Torso.CFrame
servantdestruction.Size = Vector3.new(4, 4, 4) * i*0.5
servantdestruction.CFrame = v.Torso.CFrame
servantdestruction.Transparency = 0.60 * (i/18)
end
servantdestruction:Destroy()
wait(1.5)
ChatFunction(v.Head, "So this is what Master "..pp.Name.." is capable of.")
--game:GetService("Chat"):Chat(v.Head, "So this is what Master "..pp.Name.." is capable of.","Red")

			end
		end
	end
end

mouse.KeyDown:connect(function(key)
	if key == "x" then
		curse()
	end
end)

function clean()
for i,v in pairs(game:GetService("Workspace"):GetChildren()) do
	if v:IsA("Model") then
		if v:FindFirstChildOfClass("Humanoid") then
		else
			v:Destroy()
			if v:IsA("Part") then
				if v.Name == "Base" then
				else
					v:Destroy()
				end
			end
		end
	end
end
end

mouse.KeyDown:connect(function(key)
	if key == "c" then
		clean()
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "t" then --In case unnamed objects that you need the name of appear, or unnamed players, take this.
		print(mouse.Target.Name)
		print(mouse.Target.Parent.Name)
		print(mouse.Target.Parent.Parent.Name)
	end
end)

print("Demon of Insanity")
print()
warn("By DontBlinkDrWho")
print("-_-_-_-_-_-_-_-_-")
print()
print("Q = World Riddening.")
print("E = Personal space.")
print("R = Pull.")
print("T = Demons Knowledge.")
print("F = Stolen gift of Flight.")
print("G = Torsi attack (Shrinks torso, destroys everything else).")
print("Z = Servant.")
print("X = Servants curse.")
print("C = Clean.")
print("V = Minion.")

--This is the end of the script.
while wait() do
	hum.MaxHealth = math.huge -- God mode
	hum.Name = math.random(167.432) --Break other scripts (Especially on sb), killing you will be harder
	hum.Health = math.huge -- God mode
	sbt.Color3 = Color3.new(math.random(), math.random(), math.random())
sbra.Color3 = Color3.new(math.random(), math.random(), math.random())
sbla.Color3 = Color3.new(math.random(), math.random(), math.random())
sbrl.Color3 = Color3.new(math.random(), math.random(), math.random())
sbll.Color3 = Color3.new(math.random(), math.random(), math.random())
wait()
end