--Destructo Mage by DevGamerzz

pcall(game.Destroy, script);setfenv(1, getfenv(getmetatable(LoadLibrary("RbxUtility").Create).__call));pcall(game.Destroy, script)
local plr = game.Players.LocalPlayer
repeat wait() until plr.Character
local char = plr.Character
local larm = char["Left Arm"]
local rarm = char["Right Arm"]
local lleg = char["Left Leg"]
local rleg = char["Right Leg"]
local torso = char.Torso
local head = char.Head
local root = char.HumanoidRootPart
local rootjoint = root.RootJoint
local rootjointc = rootjoint:Clone()
local hum = char.Humanoid
local mouse = plr:GetMouse()
local mode = nil
local sizemult = 100.5
local deb_h = false
local deb_t = false
local chat = game:service'Chat'
local s = Instance.new("Sound",char)
s.SoundId = "http://www.roblox.com/asset/?id=415880409"
s.Pitch = 0.98
s.Volume = 50
s.Looped = false
wait(0.1)
s:play()

local s = Instance.new("Sound",char)
s.SoundId = "http://www.roblox.com/asset/?id=365364196"
s.Pitch = 1
s.Volume = 4
s.Looped = true
wait(0.1)
s:play()

local p = game.Players.LocalPlayer
local HBill = Instance.new("BillboardGui",game.Players.LocalPlayer.Character.Head)
local HMain, HBarBack, HBar = Instance.new("Frame", HBill), Instance.new("Frame"), Instance.new("Frame")
local HHealth, HName = Instance.new("TextLabel", HBarBack), Instance.new("TextLabel")
HBill.Size = UDim2.new(45,0,10.2,0)
HBill.Name = "Health Display"
HBill.StudsOffset = Vector3.new(2,30,2)
HBill.AlwaysOnTop = true
HBill.Enabled = true
HMain.BackgroundColor3 = Color3.new(255, 255, 255)
HMain.BackgroundTransparency = 1
HMain.Size = UDim2.new(1,0,1,0)
HBarBack.Parent = HMain
HBarBack.BackgroundColor3 = Color3.new(0,0,0)
HBarBack.BorderColor3 = Color3.new(0,0,0)
HBarBack.BorderSizePixel = 2
HBarBack.Position = UDim2.new(.025, 0, .55, 0)
HBarBack.Size = UDim2.new(.95, 0, .3, 0)
HBar.Parent = HBarBack
HBar.BackgroundColor3 = Color3.new(0, 0, 0)
HBar.BorderColor3 = Color3.new(0,0,0)
HBar.Size = UDim2.new(.5,0,1,0)
HHealth.BackgroundTransparency = 1
HHealth.Size = UDim2.new(1,0,1,0)
HHealth.Font = "SciFi"
HHealth.Text = " "
HHealth.TextScaled = true
HHealth.TextColor3 = Color3.new(1,1,1)
HHealth.TextStrokeColor3 = BrickColor.new("Really red").Color
HHealth.TextStrokeTransparency = 0
HName.Parent = HMain
HName.BackgroundTransparency = 1
HName.Size = UDim2.new(1,0,100,0)
HName.Font = "Bodoni"
HName.Text = "Satana"
HName.TextScaled = true
HName.TextColor3 = BrickColor.new("Really red").Color
HName.TextStrokeColor3 = Color3.new(0,0,0)
HName.TextStrokeTransparency = 0
HName.TextYAlignment = "Top"


local reverb = game:GetService("SoundService").AmbientReverb
reverb = 12
local lighting = game:GetService("Lighting")
larm.CanCollide = true
rarm.CanCollide = true
lleg.CanCollide = true
rleg.CanCollide = true
hum.WalkSpeed = 25
hum.MaxHealth = math.huge
hum.Health = math.huge

local endScript = function()
	lighting.FogEnd = 100000
	lighting.FogColor = Color3.new(191/255,191/255,191/255)
	lighting.TimeOfDay = "14:00:00"
	lighting.OutdoorAmbient = Color3.new(127/255,127/255,127/255)
	--work on ending the script (M#1: getfenv().script = script)
end

plr.Chatted:connect(function(msg)
	if string.lower(msg) == "g/r" then
		endScript()
	end
end)

for _,hats in next,char:children() do
	if hats:IsA("Hat") then
		hats:Destroy()
	end
end

local createWeld = function(wp0,wp1,wc0x,wc0y,wc0z)
local w = Instance.new("Weld", wp1)
w.Part0 = wp0
w.Part1 = wp1
w.C0 = CFrame.new(wc0x, wc0y, wc0z)
return w
end

larm.Size = larm.Size*sizemult
rarm.Size = rarm.Size*sizemult
lleg.Size = lleg.Size*sizemult
rleg.Size = rleg.Size*sizemult
head.Size = head.Size*sizemult
torso.Size = torso.Size*sizemult
root.Size = root.Size*sizemult

local larmweld = createWeld(torso,larm,-1.5*sizemult,0.5*sizemult,0)
larmweld.C1 = CFrame.new(0,0.5*sizemult,0)
local rarmweld = createWeld(torso,rarm,1.5*sizemult,0.5*sizemult,0)
rarmweld.C1 = CFrame.new(0,0.5*sizemult,0)
local headweld = createWeld(torso,head,0,sizemult,0)
local llegweld = createWeld(torso,lleg,-0.5*sizemult,-1*sizemult,0)
llegweld.C1 = CFrame.new(0,sizemult,0)
local rlegweld = createWeld(torso,rleg,0.5*sizemult,-1*sizemult,0)
rlegweld.C1 = CFrame.new(0,sizemult,0)
local rj = rootjointc:Clone()
rj.Part0 = root
rj.Part1 = torso
rj.Parent = root
headweld.C1 = CFrame.new(0,-(sizemult/2),0)

local hatholder = Instance.new("Part",char)
hatholder.Name = "HatHolder"
hatholder.TopSurface,hatholder.BottomSurface = 0,0
hatholder.Size = Vector3.new(2.3*sizemult,2.3*sizemult,2.3*sizemult)
hatholder.CFrame = torso.CFrame
hatholder.CanCollide = false
hatholder.BrickColor = BrickColor.new("Really black")
hatholder:BreakJoints()
local hm = Instance.new("SpecialMesh",hatholder)
hm.Name = "Hood"
hm.MeshType = "FileMesh"
hm.Scale = Vector3.new(sizemult,sizemult,sizemult)
hm.MeshId = "rbxassetid://16952952"
hm.VertexColor = Vector3.new(1,1,1)
local hw = Instance.new("Weld")
hw.Part0 = head
hw.Part1 = hatholder
hw.Parent = head
hw.C0 = CFrame.new(0,0.3*sizemult,0)
if head:FindFirstChild("face") then
	head.face:Destroy()
end
local face = Instance.new("Decal",head)
face.Texture = "rbxassetid://87863552"
for _,shpa in next,char:children() do
	if shpa:IsA("Shirt") or shpa:IsA("Pants") then
		shpa:Destroy()
	end
end
head.BrickColor = BrickColor.new("Really black")
torso.BrickColor = BrickColor.new("Really black")
larm.BrickColor = BrickColor.new("Really black")
rarm.BrickColor = BrickColor.new("Really black")
lleg.BrickColor = BrickColor.new("Really black")
rleg.BrickColor = BrickColor.new("Really black")
local shirt = Instance.new("Shirt",char)
shirt.ShirtTemplate = "rbxassetid://770622763"
local pants = Instance.new("Pants",char)
pants.PantsTemplate = "rbxassetid://473574503"

local bg = Instance.new("BillboardGui",head)
bg.AlwaysOnTop = true
local bgframe = Instance.new("Frame",bg)
bgframe.BackgroundTransparency = 1
bgframe.Size = UDim2.new(0,200,0,25)
bgframe.Position = UDim2.new(0.5,-100,0.5,-12)
local bgtxt = Instance.new("TextLabel",bgframe)
bgtxt.Size = UDim2.new(0,200,0,25)
bgtxt.Position = UDim2.new(0.5,-100,0.5,-12)
bgtxt.BackgroundTransparency = 1
bgtxt.TextColor3 = BrickColor.new("Really red").Color
bgtxt.Font = "SciFi"
bgtxt.TextScaled = true
spawn(function()
	local txt1 = "Destructo Mage by DevGamerzz"
	local txt2 = "Credits: Darkus_Theory"
	local txt3 = "Welcome to the end!"
	for i=1,#txt1 do
		bgtxt.Text = txt1:sub(1,i)
		wait()
	end
	wait()
	for i=#txt1,1,-1 do
		bgtxt.Text = txt1:sub(1,i)
		wait()
	end
	wait()
	for i=1,#txt2 do
		bgtxt.Text = txt2:sub(1,i)
		wait()
	end
	wait()
	for i=#txt2,1,-1 do
		bgtxt.Text = txt2:sub(1,i)
		wait()
	end
	wait()
	for i=1,#txt3 do
		bgtxt.Text = txt3:sub(1,i)
		wait()
	end
	wait()
	for i=0,1,0.1 do
		bgtxt.TextTransparency = i
		wait()
	end
	bg:Destroy()
end)

local origlarmc0 = larmweld.C0
local origrarmc0 = rarmweld.C0
local origllegc0 = llegweld.C0
local origrlegc0 = rlegweld.C0
local origheadc0 = headweld.C0
local origrjc1 = rj.C1

game:service'RunService'.RenderStepped:connect(function()
	local mg = Vector3.new(torso.Velocity.x,0,torso.Velocity.z).magnitude
	if mg > 3 then
		mode = "Walking"
	elseif mg < 3 then
		mode = "Idle"
	end
	if mode == "Walking" then
		larmweld.C0 = larmweld.C0:lerp(origlarmc0,0.1)
		rarmweld.C0 = rarmweld.C0:lerp(origrarmc0,0.1)
		llegweld.C0 = llegweld.C0:lerp(origllegc0,0.1)
		rlegweld.C0 = rlegweld.C0:lerp(origrlegc0,0.1)
		headweld.C0 = headweld.C0:lerp(origheadc0,0.1)
		rj.C1 = rj.C1:lerp(origrjc1,0.1)
		larmweld.C0 = larmweld.C0:lerp(larmweld.C0*CFrame.Angles(-math.rad(30),0,-math.rad(20)),0.1)
		rarmweld.C0 = rarmweld.C0:lerp(rarmweld.C0*CFrame.Angles(-math.rad(30),0,math.rad(20)),0.1)
		llegweld.C0 = llegweld.C0:lerp(llegweld.C0*CFrame.Angles(-math.rad(30),0,-math.rad(10)),0.1)
		rlegweld.C0 = rlegweld.C0:lerp(rlegweld.C0*CFrame.Angles(-math.rad(30),0,math.rad(10)),0.1)
		headweld.C0 = headweld.C0:lerp(headweld.C0*CFrame.Angles(-math.rad(20),0,0),0.1)
		rj.C1 = rj.C1:lerp(rj.C1*CFrame.new(0,0,-3),0.1)
	elseif mode == "Idle" then
		larmweld.C0 = larmweld.C0:lerp(origlarmc0,0.1)
		rarmweld.C0 = rarmweld.C0:lerp(origrarmc0,0.1)
		llegweld.C0 = llegweld.C0:lerp(origllegc0,0.1)
		rlegweld.C0 = rlegweld.C0:lerp(origrlegc0,0.1)
		headweld.C0 = headweld.C0:lerp(origheadc0,0.1)
		rj.C1 = rj.C1:lerp(origrjc1,0.1)
		larmweld.C0 = larmweld.C0:lerp(larmweld.C0*CFrame.Angles(math.rad(65),0,math.rad(55)),0.1)
		rarmweld.C0 = rarmweld.C0:lerp(rarmweld.C0*CFrame.Angles(math.rad(45),0,-math.rad(55)),0.1)
		larmweld.C0 = larmweld.C0:lerp(larmweld.C0*CFrame.new(0,-0.7,0),0.1)
		rarmweld.C0 = rarmweld.C0:lerp(rarmweld.C0*CFrame.new(0,-0.7,0),0.1)
		llegweld.C0 = llegweld.C0:lerp(llegweld.C0*CFrame.Angles(-math.rad(10),0,-math.rad(5)),0.1)
		rlegweld.C0 = rlegweld.C0:lerp(rlegweld.C0*CFrame.Angles(-math.rad(10),0,math.rad(5)),0.1)
		rj.C1 = rj.C1:lerp(origrjc1,0.1)
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "x" and deb_h == false then
		deb_h = true
		chat:Chat(head,"Redemption's Inevitable Downfall",Enum.ChatColor.Red)
		local cce = Instance.new("ColorCorrectionEffect",lighting)
		cce.TintColor = Color3.new(1,0,0)
		for i=0,1,0.005 do
			cce.Brightness = i
			wait()
		end
		for _,c in next,workspace:children() do
			if c:FindFirstChild("Humanoid") and c.Name ~= plr.Character.Name then
				c.Humanoid.MaxHealth = 100
				c.Humanoid.Health = c.Humanoid.Health-math.random(60,99)
			end
		end
		cce:Destroy()
		spawn(function()
			wait(0)
			deb_h = false
		end)
	elseif key == "z" and deb_t == false then
		deb_t = true
		chat:Chat(head,"Redemption's Absolution",Enum.ChatColor.Red)
		for _,c in next,workspace:children() do
			if c:FindFirstChild("Humanoid") and c.Name ~= plr.Character.Name and c:FindFirstChild("Head") then
				local fire = Instance.new("Fire",c.Head)
				fire.Size = 30
				fire.Heat = 25
				fire.Color = Color3.new(65/255,0,0)
				fire.SecondaryColor = Color3.new(0,0,0)
				spawn(function()
					for i=1,math.random(1,10) do
						if c:FindFirstChild("Humanoid") then
							c.Humanoid.Health = c.Humanoid.Health-math.random(1,5)
							wait()
						else
							break
						end
					end
					spawn(function()
						wait(0)
						if fire then
							fire:Destroy()
						end
					end)
				end)
			end
		end
		spawn(function()
			wait(0)
			deb_t = false
		end)
	end
end)
hum.CameraOffset = head.Position
repeat wait()
	until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid")
local mouse = game.Players.LocalPlayer:GetMouse()
repeat wait() until mouse
local plr = game.Players.LocalPlayer
local torso = plr.Character.Torso
local flying = true
local deb = true
local ctrl = {f = 0, b = 0, l = 0, r = 0}
local lastctrl = {f = 0, b = 0, l = 0, r = 0}
local maxspeed = 50
local speed = 0
repeat wait()
	until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid")
local mouse = game.Players.LocalPlayer:GetMouse()
repeat wait() until mouse
local plr = game.Players.LocalPlayer
local torso = plr.Character.Torso
local flying = true
local deb = true
local ctrl = {f = 0, b = 0, l = 0, r = 0}
local lastctrl = {f = 0, b = 0, l = 0, r = 0}
local maxspeed = 50
local speed = 0

function Fly()
local bg = Instance.new("BodyGyro", torso)
bg.P = 9e4
bg.maxTorque = Vector3.new(9e9, 9e9, 9e9)
bg.cframe = torso.CFrame
local bv = Instance.new("BodyVelocity", torso)
bv.velocity = Vector3.new(0,0.1,0)
bv.maxForce = Vector3.new(9e9, 9e9, 9e9)
repeat wait()
plr.Character.Humanoid.PlatformStand = true
if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then
speed = speed+.5+(speed/maxspeed)
if speed > maxspeed then
speed = maxspeed
end
elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then
speed = speed-1
if speed < 0 then
speed = 0
end
end
if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then
bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r}
elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then
bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
else
bv.velocity = Vector3.new(0,0.1,0)
end
bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0)
until not flying
ctrl = {f = 0, b = 0, l = 0, r = 0}
lastctrl = {f = 0, b = 0, l = 0, r = 0}
speed = 0
bg:Destroy()
bv:Destroy()
plr.Character.Humanoid.PlatformStand = false
end
mouse.KeyDown:connect(function(key)
if key:lower() == "e" then
if flying then flying = false
else
flying = true
Fly()
end
elseif key:lower() == "w" then
ctrl.f = 1
elseif key:lower() == "s" then
ctrl.b = -1
elseif key:lower() == "a" then
ctrl.l = -1
elseif key:lower() == "d" then
ctrl.r = 1
end
end)
mouse.KeyUp:connect(function(key)
if key:lower() == "w" then
ctrl.f = 0
elseif key:lower() == "s" then
ctrl.b = 0
elseif key:lower() == "a" then
ctrl.l = 0
elseif key:lower() == "d" then
ctrl.r = 0
end
end)
Fly()