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