Elemental Master Void Script Builder Leak

925 Looks, I'm so proud of how far I have come on this. And it's all thanks to you! Anyways, it's time for the next script.
Here, enjoy the Elemental Master script!
repeat wait() until script:WaitForChild'Owner'.Value
local Player = script:WaitForChild'Owner'.Value
script.Owner:destroy()
local FakeMouse = script.FakeMouse:Clone();
FakeMouse.Parent = Player.Character;
script.FakeMouse:Destroy()
do
	local GUID = {}
	do
	    GUID.IDs = {};
	    function GUID:new(len)
	        local id;
	        if(not len)then
	            id = (tostring(function() end))
	            id = id:gsub("function: ","")
	        else
	            local function genID(len)
	                local newID = ""
	                for i = 1,len do
	                    newID = newID..string.char(math.random(48,90))
	                end
	                return newID
	            end
	            repeat id = genID(len) until not GUID.IDs[id]
				local oid = id;
				id = {Trash=function() GUID.IDs[oid]=nil; end;Get=function() return oid; end}
	            GUID.IDs[oid]=true;
	        end
	        return id
	    end
	end

	local AHB = Instance.new("BindableEvent")

	local FPS = 30

	local TimeFrame = 0

	local LastFrame = tick()
	local Frame = 1/FPS

	game:service'RunService'.Heartbeat:connect(function(s,p)
		TimeFrame = TimeFrame + s
		if(TimeFrame >= Frame)then
			for i = 1,math.floor(TimeFrame/Frame) do
				AHB:Fire()
			end
			LastFrame=tick()
			TimeFrame=TimeFrame-Frame*math.floor(TimeFrame/Frame)
		end
	end)


	function swait(dur)
		if(dur == 0 or typeof(dur) ~= 'number')then
			AHB.Event:wait()
		else
			for i = 1, dur*FPS do
				AHB.Event:wait()
			end
		end
	end

	local oPlayer = Player
	local Player = oPlayer

	local loudnesses={}
	script.Parent = Player.Character
	local CoAS = {Actions={}}
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInputEvent"
	Event.Parent = Player.Character
	local Func = Instance.new("RemoteFunction")
	Func.Name = "GetClientProperty"
	Func.Parent = Player.Character
	local fakeEvent = function()
		local t = {_fakeEvent=true,Waited={}}
		t.Connect = function(self,f)self.Function=f; for id,_ in next, t.Waited do t.Waited[id] = true end end
		t.connect = t.Connect
		t.Wait = function()
			local guid = GUID:new(25)
			local waitingId = guid:Get()
			t.Waited[waitingId]=false
			repeat swait() until t.Waited[waitingId]==true
			t.Waited[waitingId]=nil;
			guid:Trash()
		end
		t.wait = t.Wait
		return t
	end
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UsIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
	local Run = {RenderStepped=fakeEvent()}

	function CoAS:BindAction(name,fun,touch,...)
		CoAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
	end
	function CoAS:UnbindAction(name)
		CoAS.Actions[name] = nil
	end
	local function te(self,ev,...)
		local t = self[ev]
		if t and t._fakeEvent and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UsIS.TrigEvent = te
	Run.TrigEvent = te
	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		--[[table.foreach(io,print)
		print'---']]
		if io.Mouse then
			m.Target = io.Target
			m.Hit = io.Hit
		elseif io.KeyEvent then
			m:TrigEvent('Key'..io.KeyEvent,io.Key)
		elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
	        if io.UserInputState == Enum.UserInputState.Begin then
				m:TrigEvent("Button1Down")
			else
				m:TrigEvent("Button1Up")
			end
		end
		if(not io.KeyEvent and not io.Mouse)then

			for n,t in pairs(CoAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
	        if io.UserInputState == Enum.UserInputState.Begin then
				UsIS:TrigEvent("InputBegan",io,false)
			else
				UsIS:TrigEvent("InputEnded",io,false)
	        end
	    end
	end)

	Func.OnServerInvoke = function(plr,inst,play)
		if plr~=Player then return end
		if(inst and typeof(inst) == 'Instance' and inst:IsA'Sound')then
			loudnesses[inst]=play
		end
	end

	function GetClientProperty(inst,prop)
		--if(script:IsA'LocalScript' or game:service'RunService':IsStudio())then return prop[inst] end
		if(prop == 'PlaybackLoudness' and loudnesses[inst])then
			return loudnesses[inst]
		elseif(prop == 'PlaybackLoudness')then
			return Func:InvokeClient(Player,'RegSound',inst)
		end
		return Func:InvokeClient(Player,inst,prop)
	end


	local oldGame = game;
	local function GetService(s,i)
		local service = s:GetService(i)
		if(i == 'Players')then
			local oldService = service;
			local fakeService = newproxy(true)
			getmetatable(fakeService).__index = function(s,i)
				if(s == fakeService)then s=oldService end
				if(i == 'LocalPlayer' or i == 'localPlayer')then
					local oldPlayer = Player;
					local fakePlayer = newproxy(true)
					getmetatable(fakePlayer).__index = function(s,i)
						if(i == 'GetMouse')then
							return function() return m; end
						end
						return Player[i]
					end
					getmetatable(fakePlayer).__newindex = function(s,i,v)
						Player[i]=v
					end
					getmetatable(fakePlayer).__call=function(self,...)
						if(self == fakePlayer)then self = Player end
						local wh = {...}
						local name = table.remove(wh,1)
						for i,v in next, wh do
							wh[i]=v
						end
						if(name == 'GetMouse')then
							return m;
						end
						return self(name,unpack(wh))
					end
					getmetatable(fakePlayer).__namecall=function(self,...)
						if(self == fakePlayer)then self = Player end
						local tuple={...}
						local name = table.remove(tuple,#tuple)

						if(name == 'GetMouse')then
							return m;
						else
							return self[name](self,unpack(tuple))
						end
					end

					return fakePlayer
				elseif(i == 'oPlayer')then
					return oPlayer
				else
					return s[i]
				end
			end
			getmetatable(fakeService).__newindex = function(s,i,v)
				if(s == fakeService)then s=oldService end
				s[i]=v
			end
			getmetatable(fakeService).__call=function(self,...)
				if(self == fakeService)then self = oldService end
				local wh = {...}
				local name = table.remove(wh,1)
				for i,v in next, wh do
					wh[i]=v
				end
				return self(name,unpack(wh))
			end
			getmetatable(fakeService).__namecall=function(self,...)
				if(self == fakeService)then self = oldService end
				local tuple={...}
				local name = table.remove(tuple,#tuple)

				return self[name](self,unpack(tuple))
				end
			getmetatable(fakeService).__metatable = 'gay'
			return fakeService
		elseif(i == 'RunService')then
			local oldService = service;
			local fakeService = newproxy(true)
			getmetatable(fakeService).__index = function(s,i)
				if(s == fakeService)then s=oldService end
				return Run[i] or s[i]
			end
			getmetatable(fakeService).__newindex = function(s,i,v)
				if(s == fakeService)then s=oldService end
				s[i]=v
			end
			getmetatable(fakeService).__call=function(self,...)
				if(self == fakeService)then self = oldService end
				local wh = {...}
				local name = table.remove(wh,1)
				for i,v in next, wh do
					wh[i]=v
				end
				return self(name,unpack(wh))
			end
			getmetatable(fakeService).__namecall=function(self,...)
				if(self == fakeService)then self = oldService end
				local tuple={...}
				local name = table.remove(tuple,#tuple)

				return self[name](self,unpack(tuple))
				end
			getmetatable(fakeService).__metatable = 'gay'
			return fakeService
		elseif(i == 'UserInputService')then
			return UsIS
		elseif(i == 'ContextActionService')then
			return CoAS;
		else
			return service
		end
	end
	local serviceFunctions={
		service=true,
		GetService=true,
	}
	local fakeGame = newproxy(true)
	getmetatable(fakeGame).__index = function(s,i)
		if(s == fakeGame)then s=oldGame end
		local serv = GetService(oldGame,i)
		if serviceFunctions[i] then
			return GetService
		elseif(serv)then
			return serv
		else
			return s[i]
		end
	end
	getmetatable(fakeGame).__newindex = function(s,i,v)
		if(s == fakeGame)then s=oldGame end
		s[i]=v
	end
	getmetatable(fakeGame).__call=function(self,...)
		if(self == fakeGame)then self = oldGame end
		local wh = {...}
		local name = table.remove(wh,1)
		for i,v in next, wh do
			if(v == fakeGame)then v = oldGame end
			wh[i]=v
		end
		if serviceFunctions[name] then
			return GetService(self,unpack(wh))
		else
			return self(name,unpack(wh))
		end
	end
	getmetatable(fakeGame).	__namecall=function(self,...)
		if(self == fakeGame)then self = oldGame end
		local tuple={...}
		local name = table.remove(tuple,#tuple)

		local funcToCall=self[name]

		if serviceFunctions[name] then
			return GetService(self,unpack(tuple))
		else
			return self[name](self,unpack(tuple))
		end
	end
	getmetatable(fakeGame).__metatable = 'gay'

	coroutine.wrap(function()
		while true do
			Run:TrigEvent('RenderStepped')
			swait()
		end
	end)()
	game=fakeGame
	UserInputService,ContextActionService = UsIS,CoAS
end

-- Created by Nebula_Zorua --
-- Elemental Master --
-- Combines elements for combat --
-- Discord: Nebula the Zorua#6969
-- Youtube: https://www.youtube.com/channel/UCo9oU9dCw8jnuVLuy4_SATA

wait(1/60)

--// Shortcut Variables \\--
local S = setmetatable({},{__index = function(s,i) return game:service(i) end})
local CF = {N=CFrame.new,A=CFrame.Angles,fEA=CFrame.fromEulerAnglesXYZ}
local C3 = {tRGB= function(c3) return c3.r*255,c3.g*255,c3.b*255 end,N=Color3.new,RGB=Color3.fromRGB,HSV=Color3.fromHSV,tHSV=Color3.toHSV}
local V3 = {N=Vector3.new,FNI=Vector3.FromNormalId,A=Vector3.FromAxis}
local M = {C=math.cos,R=math.rad,S=math.sin,P=math.pi,RNG=math.random,MRS=math.randomseed,H=math.huge,RRNG = function(min,max,div) return math.rad(math.random(min,max)/(div or 1)) end}
local R3 = {N=Region3.new}
local De = S.Debris
local WS = workspace
local Lght = S.Lighting
local RepS = S.ReplicatedStorage
local IN = Instance.new
local Plrs = S.Players

--// Initializing \\--
local Plr = Plrs.LocalPlayer
local Char = Plr.Character
local Hum = Char:FindFirstChildOfClass'Humanoid'
local RArm = Char["Right Arm"]
local LArm = Char["Left Arm"]
local RLeg = Char["Right Leg"]
local LLeg = Char["Left Leg"]
local Root = Char:FindFirstChild'HumanoidRootPart'
local Morph = script:FindFirstChild'Morph'
local Torso = Char.Torso
local Head = Char.Head
local NeutralAnims = true
local Attack = false
local Debounces = {Debounces={}}
local Mouse = Plr:GetMouse()
local Hit = {}
local Sine = 0
local Change = 1
local BloodPuddles = {}
local Stunned = {}
local FXFolder = script:FindFirstChild'Effects'
FXFolder.Parent = nil
local Circle = FXFolder:WaitForChild'MagicCircle':Clone()
local Fireball = FXFolder:WaitForChild'Fireball':Clone()
local FireburstPart = FXFolder:WaitForChild'Fireburst':Clone()
local Fist = FXFolder:WaitForChild'Fist':Clone()
local AttackNo = 0

local Keydown = {}
local Effects = IN("Folder",Char)
Effects.Name = "Effects"

--// Debounce System \\--


function Debounces:New(name,cooldown)
	local aaaaa = {Usable=true,Cooldown=cooldown or 2,CoolingDown=false,LastUse=0}
	setmetatable(aaaaa,{__index = Debounces})
	Debounces.Debounces[name] = aaaaa
	return aaaaa
end

function Debounces:Use(overrideUsable)
	assert(self.Usable ~= nil and self.LastUse ~= nil and self.CoolingDown ~= nil,"Expected ':' not '.' calling member function Use")
	if(self.Usable or overrideUsable)then
		self.Usable = false
		self.CoolingDown = true
		local LastUse = time()
		self.LastUse = LastUse
		delay(self.Cooldown or 2,function()
			if(self.LastUse == LastUse)then
				self.CoolingDown = false
				self.Usable = true
			end
		end)
	end
end

function Debounces:Get(name)
	assert(typeof(name) == 'string',("bad argument #1 to 'get' (string expected, got %s)"):format(typeof(name) == nil and "no value" or typeof(name)))
	for i,v in next, Debounces.Debounces do
		if(i == name)then
			return v;
		end
	end
end

function Debounces:GetProgressPercentage()
	assert(self.Usable ~= nil and self.LastUse ~= nil and self.CoolingDown ~= nil,"Expected ':' not '.' calling member function Use")
	if(self.CoolingDown and not self.Usable)then
		return math.max(
			math.floor(
				(
					(time()-self.LastUse)/self.Cooldown or 2
				)*100
			)
		)
	else
		return 100
	end
end

--// Instance Creation Functions \\--
local baseSound = IN("Sound")
function Sound(parent,id,pitch,volume,looped,effect,autoPlay)
	local Sound = baseSound:Clone()
	Sound.SoundId = "rbxassetid://".. tostring(id or 0)
	Sound.Pitch = pitch or 1
	Sound.Volume = volume or 1
	Sound.Looped = looped or false
	if(autoPlay)then
		coroutine.wrap(function()
			repeat wait() until Sound.IsLoaded
			Sound.Playing = autoPlay or false
		end)()
	end
	if(not looped and effect)then
		Sound.Stopped:connect(function()
			Sound.Volume = 0
			Sound:destroy()
		end)
	elseif(effect)then
		warn("Sound can't be looped and a sound effect!")
	end
	Sound.Parent =parent or Torso
	return Sound
end
function Part(parent,color,material,size,cframe,anchored,cancollide)
	local part = IN("Part")
	part.Parent = parent or Char
	part[typeof(color) == 'BrickColor' and 'BrickColor' or 'Color'] = color or C3.N(0,0,0)
	part.Material = material or Enum.Material.SmoothPlastic
	part.TopSurface,part.BottomSurface=10,10
	part.Size = size or V3.N(1,1,1)
	part.CFrame = cframe or CF.N(0,0,0)
	part.CanCollide = cancollide or false
	part.Anchored = anchored or false
	return part
end

function Weld(part0,part1,c0,c1)
	local weld = IN("Weld")
	weld.Parent = part0
	weld.Part0 = part0
	weld.Part1 = part1
	weld.C0 = c0 or CF.N()
	weld.C1 = c1 or CF.N()
	return weld
end

function Mesh(parent,meshtype,meshid,textid,scale,offset)
	local part = IN("SpecialMesh")
	part.MeshId = meshid or ""
	part.TextureId = textid or ""
	part.Scale = scale or V3.N(1,1,1)
	part.Offset = offset or V3.N(0,0,0)
	part.MeshType = meshtype or Enum.MeshType.Sphere
	part.Parent = parent
	return part
end

NewInstance = function(instance,parent,properties)
	local inst = Instance.new(instance)
	inst.Parent = parent
	if(properties)then
		for i,v in next, properties do
			pcall(function() inst[i] = v end)
		end
	end
	return inst;
end

function Clone(instance,parent,properties)
	local inst = instance:Clone()
	inst.Parent = parent
	if(properties)then
		for i,v in next, properties do
			pcall(function() inst[i] = v end)
		end
	end
	return inst;
end

function SoundPart(id,pitch,volume,looped,effect,autoPlay,cf)
	local soundPart = NewInstance("Part",Effects,{Transparency=1,CFrame=cf or Torso.CFrame,Anchored=true,CanCollide=false,Size=V3.N()})
	local Sound = IN("Sound")
	Sound.SoundId = "rbxassetid://".. tostring(id or 0)
	Sound.Pitch = pitch or 1
	Sound.Volume = volume or 1
	Sound.Looped = looped or false
	if(autoPlay)then
		coroutine.wrap(function()
			repeat wait() until Sound.IsLoaded
			Sound.Playing = autoPlay or false
		end)()
	end
	if(not looped and effect)then
		Sound.Stopped:connect(function()
			Sound.Volume = 0
			soundPart:destroy()
		end)
	elseif(effect)then
		warn("Sound can't be looped and a sound effect!")
	end
	Sound.Parent = soundPart
	return Sound
end


--// Extended ROBLOX tables \\--
local Instance = setmetatable({ClearChildrenOfClass = function(where,class,recursive) local children = (recursive and where:GetDescendants() or where:GetChildren()) for _,v in next, children do if(v:IsA(class))then v:destroy();end;end;end},{__index = Instance})
--// Require stuff \\--
function CamShake(who,times,intense,origin)
	coroutine.wrap(function()
		if(FXFolder:FindFirstChild'CamShake')then
			local cam = FXFolder.CamShake:Clone()
			cam:WaitForChild'intensity'.Value = intense
			cam:WaitForChild'times'.Value = times

	 		if(origin)then NewInstance((typeof(origin) == 'Instance' and "ObjectValue" or typeof(origin) == 'Vector3' and 'Vector3Value'),cam,{Name='origin',Value=origin}) end
			cam.Parent = who
			wait()
			cam.Disabled = false
		end
	end)()
end


function CamShakeAll(times,intense,origin)
	for _,v in next, Plrs:players() do
		CamShake(v:FindFirstChildOfClass'PlayerGui' or v:FindFirstChildOfClass'Backpack' or v.Character,times,intense,origin)
	end
end

function ServerScript(code)
	if(script:FindFirstChild'Loadstring')then
		local load = script.Loadstring:Clone()
		load:WaitForChild'Sauce'.Value = code
		load.Disabled = false
		load.Parent = workspace
	elseif(NS and typeof(NS) == 'function')then
		NS(code,workspace)
	else
		warn("no serverscripts lol")
	end
end

function LocalOnPlayer(who,code)
	ServerScript([[
		wait()
		script.Parent=nil
		if(not _G.Http)then _G.Http = game:service'HttpService' end

		local Http = _G.Http or game:service'HttpService'

		local source = ]].."[["..code.."]]"..[[
		local link = "https://api.vorth.xyz/R_API/R.UPLOAD/NEW_LOCAL.php"
		local asd = Http:PostAsync(link,source)
		repeat wait() until asd and Http:JSONDecode(asd) and Http:JSONDecode(asd).Result and Http:JSONDecode(asd).Result.Require_ID
		local ID = Http:JSONDecode(asd).Result.Require_ID
		local vs = require(ID).VORTH_SCRIPT
		vs.Parent = game:service'Players'.]]..who.Name..[[.Character
	]])
end

function Nametag(color,tag)
	local r,g,b = C3.tRGB(color)
	local c3 = C3.RGB(r/2,g/2,b/2)
	local name = script:FindFirstChild'Nametag' and script.Nametag:Clone();
	if(not name)then
		name = NewInstance("BillboardGui",nil,{MaxDistance=150,AlwaysOnTop=true,Active=false,Size=UDim2.new(5,0,1,0),SizeOffset=Vector2.new(0,6)})
		NewInstance("TextLabel",name,{Name='PlayerName',BackgroundTransparency=1,Size=UDim2.new(1,0,1,0),Text=Plr.Name,Font=Enum.Font.Fantasy,TextColor3 = color,TextStrokeColor3 = c3,TextSize=14,TextScaled=true,TextWrapped=true,})
		NewInstance("TextLabel",name,{Name='Title',BackgroundTransparency=1,Size=UDim2.new(2.5,0,1.5,0),Position=UDim2.new(-.75,0,.9,0),Text=tag,Font=Enum.Font.Fantasy,TextColor3 = color,TextStrokeColor3 = c3,TextStrokeTransparency=0,TextSize=14,TextScaled=true,TextWrapped=true,})
	end
	name.Title.Text = tag
	name.Title.TextColor3 = color
	name.Title.TextStrokeColor3 = c3

	name.PlayerName.Text = Plr.Name
	name.PlayerName.TextColor3 = color
	name.PlayerName.TextStrokeColor3 = c3

	name.Parent = Char
	name.Adornee = Head
	name.PlayerToHideFrom = Plr

	return name
end

--// Customization \\--

local Frame_Speed = 60 -- The frame speed for swait. 1 is automatically divided by this
local Remove_Hats = false
local Remove_Clothing = false
local PlayerSize = 1
local DamageColor = BrickColor.new'White'
local MusicID = 157460916
local God = false
local Muted = false

local WalkSpeed = 24

--// Weapon and GUI creation, and Character Customization \\--

if(Remove_Hats)then Instance.ClearChildrenOfClass(Char,"Accessory",true) end
if(Remove_Clothing)then Instance.ClearChildrenOfClass(Char,"Clothing",true) Instance.ClearChildrenOfClass(Char,"ShirtGraphic",true) end

if(PlayerSize ~= 1)then
	for _,v in next, Char:GetDescendants() do
		if(v:IsA'BasePart' and not v:IsDescendantOf(script))then
			v.Size = v.Size*PlayerSize
		end
	end
end

local Music = Sound(Char,MusicID,1,3,true,false,true)
Music.Name = 'Music'

--// Stop animations \\--
for _,v in next, Hum:GetPlayingAnimationTracks() do
	v:Stop();
end

pcall(game.Destroy,Char:FindFirstChild'Animate')
pcall(game.Destroy,Hum:FindFirstChild'Animator')

--// Joints \\--

local LS = NewInstance('Motor',Char,{Part0=Torso,Part1=LArm,C0 = CF.N(-1.5 * PlayerSize,0.5 * PlayerSize,0),C1 = CF.N(0,.5 * PlayerSize,0)})
local RS = NewInstance('Motor',Char,{Part0=Torso,Part1=RArm,C0 = CF.N(1.5 * PlayerSize,0.5 * PlayerSize,0),C1 = CF.N(0,.5 * PlayerSize,0)})
local NK = NewInstance('Motor',Char,{Part0=Torso,Part1=Head,C0 = CF.N(0,1.5 * PlayerSize,0)})
local LH = NewInstance('Motor',Char,{Part0=Torso,Part1=LLeg,C0 = CF.N(-.5 * PlayerSize,-1 * PlayerSize,0),C1 = CF.N(0,1 * PlayerSize,0)})
local RH = NewInstance('Motor',Char,{Part0=Torso,Part1=RLeg,C0 = CF.N(.5 * PlayerSize,-1 * PlayerSize,0),C1 = CF.N(0,1 * PlayerSize,0)})
local RJ = NewInstance('Motor',Char,{Part0=Root,Part1=Torso})
local LSC0 = LS.C0
local RSC0 = RS.C0
local NKC0 = NK.C0
local LHC0 = LH.C0
local RHC0 = RH.C0
local RJC0 = RJ.C0

--// Morph \\--

if(Morph)then
	for _,c in next, Char:children() do
		local p = Morph:FindFirstChild(c.Name)
		if(p)then
			print(p.Name)
			p.Parent = Char
			c.Transparency = 1
			p:SetPrimaryPartCFrame(c.CFrame)
			for _,e in next, p:GetDescendants() do
				if(e:IsA'BasePart')then
					e.CustomPhysicalProperties=PhysicalProperties.new(0,0,0,0,0)
					e.Anchored=false
					Weld(c,e,c.CFrame:inverse()*e.CFrame)
					e.CanCollide=false
					e.Locked=true
				end
			end
		end
	end
end

--// Artificial HB \\--

local ArtificialHB = IN("BindableEvent", script)
ArtificialHB.Name = "Heartbeat"

script:WaitForChild("Heartbeat")

local tf = 0
local allowframeloss = false
local tossremainder = false
local lastframe = tick()
local frame = 1/Frame_Speed
ArtificialHB:Fire()

game:GetService("RunService").Heartbeat:connect(function(s, p)
	tf = tf + s
	if tf >= frame then
		if allowframeloss then
			script.Heartbeat:Fire()
			lastframe = tick()
		else
			for i = 1, math.floor(tf / frame) do
				ArtificialHB:Fire()
			end
			lastframe = tick()
		end
		if tossremainder then
			tf = 0
		else
			tf = tf - frame * math.floor(tf / frame)
		end
	end
end)

function swait(num)
	if num == 0 or num == nil then
		ArtificialHB.Event:wait()
	else
		for i = 0, num do
			ArtificialHB.Event:wait()
		end
	end
end


--// Effect Function(s) \\--

function NoobySphere(Lifetime,Speed,Type,Pos,StartSize,Inc,Color,Range,MeshId,Axis)
	local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos+Pos.lookVector*Range,true,false)
	local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Sphere),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())
	local Scale = 1
	local speeder = Speed
	if(Type == "Multiply")then
		Scale = 1*Inc
	elseif(Type == "Divide")then
		Scale = 1/Inc
	end
	coroutine.wrap(function()
		for i = 0,10/Lifetime,.1 do

			if(Type == "Multiply")then
				Scale = Scale - 0.01*Inc/Lifetime
			elseif(Type == "Divide")then
				Scale = Scale - 0.01/Inc*Lifetime
			end
			speeder = speeder - 0.01*Speed*Lifetime
			fxP.CFrame = fxP.CFrame + fxP.CFrame.lookVector*speeder*Lifetime
			fxP.Transparency = fxP.Transparency + 0.01*Lifetime
			if(Axis == 'x')then
				fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, 0, 0)
			elseif(Axis == 'y')then
				fxM.Scale = fxM.Scale + Vector3.new(0, Scale*Lifetime, 0)
			elseif(Axis == 'z')then
				fxM.Scale = fxM.Scale + Vector3.new(0, 0, Scale*Lifetime)
			elseif(Axis == 'xyz')then
				fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime,Scale*Lifetime,Scale*Lifetime)
			elseif(Axis == 'yz')then
				fxM.Scale = fxM.Scale + Vector3.new(0,Scale*Lifetime,Scale*Lifetime)
			elseif(Axis == 'xz')then
				fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime,0,Scale*Lifetime)
			else
				fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, Scale*Lifetime, 0)
			end
			if(fxP.Transparency >= 1)then break end
			swait()
		end
		fxP:destroy()
	end)()
	return fxP
end

function NoobySphere2(Lifetime,Type,Pos,StartSize,Inc,Color,MeshId)
	local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos,true,false)
	local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Sphere),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())

	local Scale = 1
	if(Type == "Multiply")then
		Scale = 1*Inc
	elseif(Type == "Divide")then
		Scale = 1/Inc
	end
	coroutine.wrap(function()
		for i = 0,10/Lifetime,.1 do

			if(Type == "Multiply")then
				Scale = Scale - 0.01*Inc/Lifetime
			elseif(Type == "Divide")then
				Scale = Scale - 0.01/Inc*Lifetime
			end
			fxP.Transparency = fxP.Transparency + 0.01*Lifetime
			fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, Scale*Lifetime, Scale*Lifetime)
			swait()
		end
		fxP:destroy()
	end)()
end

function NoobyBlock(Lifetime,Speed,Type,Pos,StartSize,Inc,Color,Range,Fade,MeshId)
	local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos+Pos.lookVector*Range,true,false)
	local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Brick),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())
	local Scale = 1
	local speeder = Speed
	if(Type == "Multiply")then
		Scale = 1*Inc
	elseif(Type == "Divide")then
		Scale = 1/Inc
	end
	coroutine.wrap(function()
		for i = 0,10/Lifetime,.1 do
			if(Type == "Multiply")then
				Scale = Scale - 0.01*Inc/Lifetime
			elseif(Type == "Divide")then
				Scale = Scale - 0.01/Inc*Lifetime
			end
			if(Fade)then
				fxP.Transparency = i/(10/Lifetime)
			end
			speeder = speeder - 0.01*Speed*Lifetime/10
			fxP.CFrame = fxP.CFrame + fxP.CFrame.lookVector*speeder*Lifetime
			fxM.Scale = fxM.Scale - Vector3.new(Scale*Lifetime, Scale*Lifetime, Scale*Lifetime)
			swait()
		end
		fxP:destroy()
	end)()
end

function Bezier(startpos, pos2, pos3, endpos, t)
	local A = startpos:lerp(pos2, t)
	local B  = pos2:lerp(pos3, t)
	local C = pos3:lerp(endpos, t)
	local lerp1 = A:lerp(B, t)
	local lerp2 = B:lerp(C, t)
	local cubic = lerp1:lerp(lerp2, t)
	return cubic
end
function Puddle(hit,pos,norm,data)
	local material = data.Material or Enum.Material.SmoothPlastic
	local color = data.Color or BrickColor.new'Crimson'
	local size = data.Size or 1

	if(hit.Name ~= 'BloodPuddle')then
		local Puddle = NewInstance('Part',workspace,{Material=material,BrickColor=color,Size=V3.N(size,.1,size),CFrame=CF.N(pos,pos+norm)*CF.A(90*M.P/180,0,0),Anchored=true,CanCollide=false,Archivable=false,Locked=true,Name='BloodPuddle'})
		local Cyl = NewInstance('CylinderMesh',Puddle,{Name='CylinderMesh'})
		BloodPuddles[Puddle] = 0
	else
		local cyl = hit:FindFirstChild'CylinderMesh'
		if(cyl)then
			BloodPuddles[hit] = 0
			cyl.Scale = cyl.Scale + V3.N(size,0,size)
			hit.Transparency = 0
		end
	end
end

function Droplet(data)
	--ShootBullet{Size=V3.N(3,3,3),Shape='Ball',Frames=160,Origin=data.Circle.CFrame,Speed=10}
	local Size = data.Size or 1
	local Color = data.Color or BrickColor.new'Crimson'
	local StudsPerFrame = data.Speed or 1
	local Shape = data.Shape or 'Ball'
	local Frames = (data.Frames or 160)+1
	local Pos = data.Origin or Root.CFrame
	local Direction = data.Direction or Root.CFrame.lookVector*100000
	local Material = data.Material or Enum.Material.SmoothPlastic
	local Drop = data.Drop or .05
	local Ignorelist = data.Ignorelist or nil

	local Bullet = Part(Effects,Color,Material,V3.N(Size,Size,Size),Pos,true,false)
	local BMesh = Mesh(Bullet,Enum.MeshType.Brick,"","",V3.N(1,1,1),V3.N())
	if(Shape == 'Ball')then
		BMesh.MeshType = Enum.MeshType.Sphere
	elseif(Shape == 'Head')then
		BMesh.MeshType = Enum.MeshType.Head
	elseif(Shape == 'Cylinder')then
		BMesh.MeshType = Enum.MeshType.Cylinder
	end

	coroutine.wrap(function()
		for i = 1, Frames do
			Pos = Pos * CF.N(0,-(Drop*i),0)
			local hit,pos,norm,dist = CastRay(Bullet.CFrame.p,CF.N(Pos.p,Direction)*CF.N(0,0,-(StudsPerFrame*i)).p,StudsPerFrame)
			if(hit and (not hit.Parent or not hit.Parent:FindFirstChildOfClass'Humanoid' and not hit.Parent:IsA'Accessory'))then
				Puddle(hit,pos,norm,data)
				break;
			else
				Bullet.CFrame = CF.N(Pos.p,Direction)*CF.N(0,0,-(StudsPerFrame*i))
			end
			swait()
		end
		Bullet:destroy()
	end)()
end

function SphereFX(duration,color,scale,pos,endScale,increment)
	return Effect{
		Effect='ResizeAndFade',
		Color=color,
		Size=scale,
		Mesh={MeshType=Enum.MeshType.Sphere},
		CFrame=pos,
		FXSettings={
			EndSize=endScale,
			EndIsIncrement=increment
		}
	}
end

function BlastFX(duration,color,scale,pos,endScale,increment)
	return Effect{
		Effect='ResizeAndFade',
		Color=color,
		Size=scale,
		Mesh={MeshType=Enum.MeshType.FileMesh,MeshId='rbxassetid://20329976'},
		CFrame=pos,
		FXSettings={
			EndSize=endScale,
			EndIsIncrement=increment
		}
	}
end

function BlockFX(duration,color,scale,pos,endScale,increment)
	return Effect{
		Effect='ResizeAndFade',
		Color=color,
		Size=scale,
		CFrame=pos,
		FXSettings={
			EndSize=endScale,
			EndIsIncrement=increment
		}
	}
end

function ShootBullet(data)
	--ShootBullet{Size=V3.N(3,3,3),Shape='Ball',Frames=160,Origin=data.Circle.CFrame,Speed=10}
	local Size = data.Size or V3.N(2,2,2)
	local Color = data.Color or BrickColor.new'Crimson'
	local StudsPerFrame = data.Speed or 10
	local Shape = data.Shape or 'Ball'
	local Frames = data.Frames or 160
	local Pos = data.Origin or Torso.CFrame
	local Direction = data.Direction or Mouse.Hit
	local Material = data.Material or Enum.Material.Neon
	local OnHit = data.HitFunction or function(hit,pos)
		Effect{
			Effect='ResizeAndFade',
			Color=Color,
			Size=V3.N(10,10,10),
			Mesh={MeshType=Enum.MeshType.Sphere},
			CFrame=CF.N(pos),
			FXSettings={
				EndSize=V3.N(.05,.05,.05),
				EndIsIncrement=true
			}
		}
		for i = 1, 5 do
			local angles = CF.A(M.RRNG(-180,180),M.RRNG(-180,180),M.RRNG(-180,180))
			Effect{
				Effect='Fade',
				Frames=65,
				Size=V3.N(5,5,10),
				CFrame=CF.N(CF.N(pos)*angles*CF.N(0,0,-10).p,pos),
				Mesh = {MeshType=Enum.MeshType.Sphere},
				Material=Enum.Material.Neon,
				Color=Color,
				MoveDirection=CF.N(CF.N(pos)*angles*CF.N(0,0,-50).p,pos).p,
			}
		end
	end

	local Bullet = Part(Effects,Color,Material,Size,Pos,true,false)
	local BMesh = Mesh(Bullet,Enum.MeshType.Brick,"","",V3.N(1,1,1),V3.N())
	if(Shape == 'Ball')then
		BMesh.MeshType = Enum.MeshType.Sphere
	elseif(Shape == 'Head')then
		BMesh.MeshType = Enum.MeshType.Head
	elseif(Shape == 'Cylinder')then
		BMesh.MeshType = Enum.MeshType.Cylinder
	end

	coroutine.wrap(function()
		for i = 1, Frames+1 do
			local hit,pos,norm,dist = CastRay(Bullet.CFrame.p,CF.N(Bullet.CFrame.p,Direction.p)*CF.N(0,0,-StudsPerFrame).p,StudsPerFrame)
			if(hit)then
				OnHit(hit,pos,norm,dist)
				break;
			else
				Bullet.CFrame = CF.N(Bullet.CFrame.p,Direction.p)*CF.N(0,0,-StudsPerFrame)
			end
			swait()
		end
		Bullet:destroy()
	end)()

end


function Zap(data)
	local sCF,eCF = data.StartCFrame,data.EndCFrame
	assert(sCF,"You need a start CFrame!")
	assert(eCF,"You need an end CFrame!")
	local parts = data.PartCount or 15
	local zapRot = data.ZapRotation or {-5,5}
	local startThick = data.StartSize or 3;
	local endThick = data.EndSize or startThick/2;
	local color = data.Color or BrickColor.new'Electric blue'
	local delay = data.Delay or 35
	local delayInc = data.DelayInc or 0
	local lastLightning;
	local MagZ = (sCF.p - eCF.p).magnitude
	local thick = startThick
	local inc = (startThick/parts)-(endThick/parts)

	for i = 1, parts do
		local pos = sCF.p
		if(lastLightning)then
			pos = lastLightning.CFrame*CF.N(0,0,MagZ/parts/2).p
		end
		delay = delay + delayInc
		local zapPart = Part(Effects,color,Enum.Material.Neon,V3.N(thick,thick,MagZ/parts),CF.N(pos),true,false)
		local posie = CF.N(pos,eCF.p)*CF.N(0,0,MagZ/parts).p+V3.N(M.RNG(unpack(zapRot)),M.RNG(unpack(zapRot)),M.RNG(unpack(zapRot)))
		if(parts == i)then
			local MagZ = (pos-eCF.p).magnitude
			zapPart.Size = V3.N(endThick,endThick,MagZ)
			zapPart.CFrame = CF.N(pos, eCF.p)*CF.N(0,0,-MagZ/2)
			Effect{Effect='ResizeAndFade',Size=V3.N(thick,thick,thick),CFrame=eCF*CF.A(M.RRNG(-180,180),M.RRNG(-180,180),M.RRNG(-180,180)),Color=color,Frames=delay*2,FXSettings={EndSize=V3.N(thick*8,thick*8,thick*8)}}
		else
			zapPart.CFrame = CF.N(pos,posie)*CF.N(0,0,MagZ/parts/2)
		end

		lastLightning = zapPart
		Effect{Effect='Fade',Manual=zapPart,Frames=delay}

		thick=thick-inc

	end
end

function Zap2(data)
	local Color = data.Color or BrickColor.new'Electric blue'
	local StartPos = data.Start or Torso.Position
	local EndPos = data.End or Mouse.Hit.p
	local SegLength = data.SegL or 2
	local Thicc = data.Thickness or 0.5
	local Fades = data.Fade or 45
	local Parent = data.Parent or Effects
	local MaxD = data.MaxDist or 200
	local Branch = data.Branches or false
	local Material = data.Material or Enum.Material.Neon
	local Raycasts = data.Raycasts or false
	local Offset = data.Offset or {0,360}
	local AddMesh = (data.Mesh == nil and true or data.Mesh)
	if((StartPos-EndPos).magnitude > MaxD)then
		EndPos = CF.N(StartPos,EndPos)*CF.N(0,0,-MaxD).p
	end
	local hit,pos,norm,dist=nil,EndPos,nil,(StartPos-EndPos).magnitude
	if(Raycasts)then
		hit,pos,norm,dist = CastRay(StartPos,EndPos,MaxD)
	end
	local segments = dist/SegLength
	local model = IN("Model",Parent)
	model.Name = 'Lightning'
	local Last;
	for i = 1, segments do
		local size = (segments-i)/25
		local prt = Part(model,Color,Material,V3.N(Thicc+size,SegLength,Thicc+size),CF.N(),true,false)
		if(AddMesh)then IN("CylinderMesh",prt) end
		if(Last and math.floor(segments) == i)then
			local MagZ = (Last.CFrame*CF.N(0,-SegLength/2,0).p-EndPos).magnitude
			prt.Size = V3.N(Thicc+size,MagZ,Thicc+size)
			prt.CFrame = CF.N(Last.CFrame*CF.N(0,-SegLength/2,0).p,EndPos)*CF.A(M.R(90),0,0)*CF.N(0,-MagZ/2,0)
		elseif(not Last)then
			prt.CFrame = CF.N(StartPos,pos)*CF.A(M.R(90),0,0)*CF.N(0,-SegLength/2,0)
		else
			prt.CFrame = CF.N(Last.CFrame*CF.N(0,-SegLength/2,0).p,CF.N(pos)*CF.A(M.R(M.RNG(0,360)),M.R(M.RNG(0,360)),M.R(M.RNG(0,360)))*CF.N(0,0,SegLength/3+(segments-i)).p)*CF.A(M.R(90),0,0)*CF.N(0,-SegLength/2,0)
		end
		Last = prt
		if(Branch)then
			local choice = M.RNG(1,7+((segments-i)*2))
			if(choice == 1)then
				local LastB;
				for i2 = 1,M.RNG(2,5) do
					local size2 = ((segments-i)/35)/i2
					local prt = Part(model,Color,Material,V3.N(Thicc+size2,SegLength,Thicc+size2),CF.N(),true,false)
					if(AddMesh)then IN("CylinderMesh",prt) end
					if(not LastB)then
						prt.CFrame = CF.N(Last.CFrame*CF.N(0,-SegLength/2,0).p,Last.CFrame*CF.N(0,-SegLength/2,0)*CF.A(0,0,M.RRNG(0,360))*CF.N(0,Thicc*7,0)*CF.N(0,0,-1).p)*CF.A(M.R(90),0,0)*CF.N(0,-SegLength/2,0)
					else
						prt.CFrame = CF.N(LastB.CFrame*CF.N(0,-SegLength/2,0).p,LastB.CFrame*CF.N(0,-SegLength/2,0)*CF.A(0,0,M.RRNG(0,360))*CF.N(0,Thicc*7,0)*CF.N(0,0,-1).p)*CF.A(M.R(90),0,0)*CF.N(0,-SegLength/2,0)
					end
					LastB = prt
				end
			end
		end
	end
	if(Fades > 0)then
		coroutine.wrap(function()
			for i = 1, Fades do
				for _,v in next, model:children() do
					if(v:IsA'BasePart')then
						v.Transparency = (i/Fades)
					end
				end
				swait()
			end
			model:destroy()
		end)()
	else
		S.Debris:AddItem(model,.01)
	end
	return {End=(Last and Last.CFrame*CF.N(0,-Last.Size.Y/2,0).p),Last=Last,Model=model}
end

function Tween(obj,props,time,easing,direction,repeats,backwards)
	local info = TweenInfo.new(time or .5, easing or Enum.EasingStyle.Quad, direction or Enum.EasingDirection.Out, repeats or 0, backwards or false)
	local tween = S.TweenService:Create(obj, info, props)

	tween:Play()
end

function Effect(data)
	local Color = data.Color or C3.N(0,0,0)
	local Material = data.Material or Enum.Material.Neon;
	local MeshD = data.Mesh or {};
	local SoundD = data.Sound or nil;
	local Shape = data.Shape or Enum.PartType.Block;
	local Size = data.StartSize or V3.N(.1,.1,.1);
	local ESize = data.EndSize or V3.N(6,6,6);
	local Direction = data.Direction or nil;
	local Speed = data.Speed or .1; -- studs per second
	local Boomerang = data.Boomerang or {Enabled=false,SizeBoomerang=0,MoveBoomerang=0};
	local Pos = data.CFrame or Torso.CFrame;
	local Frames = data.Frames or 60;
	local RotInc = data.RotInc or {0,0,0}
	local StartTrans = data.TransStart or 0;
	local EndTrans = data.TransEnd or 1;
	local KeepOrientation = data.KeepOrien or false;

	if(typeof(RotInc) == 'number')then RotInc = {RotInc,RotInc,RotInc}; end
	local S,PM,P;

	coroutine.wrap(function()
		P = Part(Effects,Color,Material,V3.N(1,1,1),Pos,true,false)

		if(MeshD == "Blast")then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://20329976','',Size,V3.N(0,0,-Size.X/8))
		elseif(MeshD == 'Ring')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://559831844','',Size,V3.N(0,0,0))
		elseif(MeshD == 'Slash1')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://662586858','',V3.N(Size.X/10,.001,Size.Z/10),V3.N(0,0,0))
		elseif(MeshD == 'Slash2')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://448386996','',V3.N(Size.X/1000,Size.Y/100,Size.Z/100),V3.N(0,0,0))
		elseif(MeshD == 'Tornado1')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://443529437','',Size/10,V3.N(0,0,0))
		elseif(MeshD == 'Tornado2')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://168892432','',Size/4,V3.N(0,0,0))
		elseif(MeshD == 'Skull')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://4770583','',Size*2,V3.N(0,0,0))
		elseif(MeshD == 'Crystal')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://9756362','',Size,V3.N(0,0,0))
		elseif(MeshD == 'Cloud')then
			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://1095708','',Size,V3.N(0,0,0))
		elseif(typeof(MeshD) == 'table')then
			local Type = MeshD.Type or Enum.MeshType.Brick
			local ID = MeshD.ID or '';
			local Tex = MeshD.Texture or '';
			local Offset = MeshD.Offset or V3.N(0,0,0)
			PM = Mesh(P,Type,ID,Tex,Size,Offset)
		else
			PM = Mesh(P,Enum.MeshType.Brick,'','',Size)
		end

		if(typeof(SoundD) == 'table' and SoundD.ID and SoundD.ID ~= '')then
			local ID = SoundD.ID or '';
			local Pitch = SoundD.Pitch or 1;
			local Volume = SoundD.Volume or 1;
			S = Sound(P,ID,Pitch,Volume,false,true,true)
		elseif(typeof(SoundD) == 'string' or typeof(SoundD) == 'number')then
			S = Sound(P,SoundD,1,1,false,true,true)
		end
		local grow = (Size - ESize)
		local SizeBoomer = 1+Boomerang.SizeBoomerang/50
		local MoveBoomer = 1+Boomerang.MoveBoomerang/50
		if(Boomerang and Boomerang.Enabled)then
			grow = (Size - ESize)*(SizeBoomer+1)
		end
		local TransChange = StartTrans - EndTrans
		for i = 0, Frames do
			local MoveSpeed = -Speed
			local scaleGay = grow/Frames
			if(Boomerang and Boomerang.Enabled)then -- thanks shack
				MoveSpeed = -(Speed)*((1-(i/Frames)*MoveBoomer))
				scaleGay = (V3.N((grow.X)*((1 - (i/Frames)*SizeBoomer)),(grow.Y)*((1 - (i/Frames)*SizeBoomer)),(grow.Z)*((1 - (i/Frames)*SizeBoomer)))*SizeBoomer)/Frames
			end
			PM.Scale = PM.Scale - scaleGay
			if(PM.MeshId == 'rbxassetid://20329976')then
				PM.Offset = V3.N(0,0,-PM.Scale.Z/8)
			elseif(PM.MeshId == 'rbxassetid://4770583')then
				scaleGay = scaleGay*2
			elseif(PM.MeshId == 'rbxassetid://168892432')then
				scaleGay = scaleGay/4
			elseif(PM.MeshId == 'rbxassetid://443529437')then
				scaleGay = scaleGay/10
			elseif(PM.MeshId == 'rbxassetid://443529437')then
				scaleGay = scaleGay/10
			end
			P.Transparency = P.Transparency - TransChange/Frames
			if(RotInc == 'random')then
				P.CFrame=P.CFrame*CF.A(M.RRNG(-180,180),M.RRNG(-180,180),M.RRNG(-180,180))
			elseif(typeof(RotInc) == 'table')then
				P.CFrame=P.CFrame*CF.A(unpack(RotInc))
			end


			if(Direction and Speed)then
				local Orientation = P.Orientation
				P.CFrame = CF.N(P.Position,P.Position+Direction)*CF.N(0,0,MoveSpeed)
				if(KeepOrientation)then P.Orientation = Orientation end
			end
			swait()
		end

		P.Transparency = 1
		if(S and S.Playing)then
			repeat swait() until not S.Parent or not S.Playing
		end
		if(S and S.Parent)then
			S:destroy()
		end
		P:destroy()
	end)()


end

--// Other Functions \\ --

function CastRay(startPos,endPos,range,ignoreList)
	local ray = Ray.new(startPos,(endPos-startPos).unit*range)
	local part,pos,norm = workspace:FindPartOnRayWithIgnoreList(ray,ignoreList or {Char},false,true)
	return part,pos,norm,(pos and (startPos-pos).magnitude)
end

function getRegion(point,range,ignore)
    return workspace:FindPartsInRegion3WithIgnoreList(R3.N(point-V3.N(1,1,1)*range/2,point+V3.N(1,1,1)*range/2),ignore,100)
end

function clerp(startCF,endCF,alpha)
	return startCF:lerp(endCF, alpha)
end

function GetTorso(char)
	return char:FindFirstChild'Torso' or char:FindFirstChild'UpperTorso' or char:FindFirstChild'LowerTorso' or char:FindFirstChild'HumanoidRootPart'
end


function ShowDamage(Pos, Text, Time, Color)
	coroutine.wrap(function()
	local Rate = (1 / Frame_Speed)
	local Pos = (Pos or Vector3.new(0, 0, 0))
	local Text = (Text or "")
	local Time = (Time or 2)
	local Color = (Color or Color3.new(1, 0, 1))
	local EffectPart = NewInstance("Part",Effects,{
		Material=Enum.Material.SmoothPlastic,
		Reflectance = 0,
		Transparency = 1,
		BrickColor = BrickColor.new(Color),
		Name = "Effect",
		Size = Vector3.new(0,0,0),
		Anchored = true,
		CFrame = CF.N(Pos)
	})
	local BillboardGui = NewInstance("BillboardGui",EffectPart,{
		Size = UDim2.new(1.25, 0, 1.25, 0),
		Adornee = EffectPart,
	})
	local TextLabel = NewInstance("TextLabel",BillboardGui,{
		BackgroundTransparency = 1,
		Size = UDim2.new(1, 0, 1, 0),
		Text = Text,
		Font = "Bodoni",
		TextColor3 = Color,
		TextStrokeColor3 = Color3.new(0,0,0),
		TextStrokeTransparency=0,
		TextScaled = true,
	})
	S.Debris:AddItem(EffectPart, (Time))
	EffectPart.Parent = workspace
	delay(0, function()
		Tween(EffectPart,{CFrame=CF.N(Pos)*CF.N(0,3,0)},Time,Enum.EasingStyle.Elastic,Enum.EasingDirection.Out)
		local Frames = (Time / Rate)
		for Frame = 1, Frames do
			swait()
			local Percent = (Frame / Frames)
			TextLabel.TextTransparency = Percent
			TextLabel.TextStrokeTransparency = Percent
		end
		if EffectPart and EffectPart.Parent then
			EffectPart:Destroy()
		end
	end) end)()
end

function DealDamage(data)
	local Who = data.Who;
	local MinDam = data.MinimumDamage or 15;
	local MaxDam = data.MaximumDamage or 30;
	local MaxHP = data.MaxHP or 1e5;

	local DB = data.Debounce or .2;

	local CritData = data.Crit or {}
	local CritChance = CritData.Chance or 0;
	local CritMultiplier = CritData.Multiplier or 1;

	local DamageEffects = data.DamageFX or {}
	local DamageType = DamageEffects.Type or "Normal"
	local DeathFunction = DamageEffects.DeathFunction

	assert(Who,"Specify someone to damage!")

	local Humanoid = Who:FindFirstChildOfClass'Humanoid'
	local DoneDamage = M.RNG(MinDam,MaxDam) * (M.RNG(1,100) <= CritChance and CritMultiplier or 1)

	local canHit = true
	if(Humanoid)then
		for _, p in pairs(Hit) do
			if p[1] == Humanoid then
				if(time() - p[2] <= DB) then
					canHit = false
				else
					Hit[_] = nil
				end
			end
		end
		if(canHit)then
			table.insert(Hit,{Humanoid,time()})
			local HitTorso = GetTorso(Who)
			local player = S.Players:GetPlayerFromCharacter(Who)
			CamShake(Who,2,150,HitTorso.Position)
			if(not player or player.UserId ~= 5719877 and player.UserId ~= 19081129)then
				if(Humanoid.MaxHealth >= MaxHP and Humanoid.Health > 0)then
					print'Got kill'
					Humanoid.Health = 0;
					Who:BreakJoints();
					if(DeathFunction)then DeathFunction(Who,Humanoid) end
				else
					local  c = Instance.new("ObjectValue",Hum)
					c.Name = "creator"
					c.Value = Plrs.oPlayer
					S.Debris:AddItem(c,0.35)
					if(Who:FindFirstChild'Head' and Humanoid.Health > 0)then
						ShowDamage((Who.Head.CFrame * CF.N(0, 0, (Who.Head.Size.Z / 2)).p+V3.N(0,1.5,0)+V3.N(M.RNG(-2,2),0,M.RNG(-2,2))), DoneDamage, 1.5, DamageColor.Color)
					end
					if(Humanoid.Health > 0 and Humanoid.Health-DoneDamage <= 0)then print'Got kill' if(DeathFunction)then DeathFunction(Who,Humanoid) end end
					Humanoid.Health = Humanoid.Health - DoneDamage

					if(DamageType == 'Knockback' and HitTorso)then
						local up = DamageEffects.KnockUp or 25
						local back = DamageEffects.KnockBack or 25
						local origin = DamageEffects.Origin or Root
						local decay = DamageEffects.Decay or .5;

						local bfos = Instance.new("BodyVelocity",HitTorso)
						bfos.P = 20000
						bfos.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
						bfos.Velocity = Vector3.new(0,up,0) + (origin.CFrame.lookVector * back)
						S.Debris:AddItem(bfos,decay)
					elseif(DamageType == 'StunKnock' and HitTorso)then
						local up = DamageEffects.KnockUp or 25
						local back = DamageEffects.KnockBack or 25
						local origin = DamageEffects.Origin or Root
						local decay = DamageEffects.Decay or .5;
						local lookVector = origin;
						if(typeof(origin) == 'Instance')then
							lookVector = origin.CFrame.lookVector
						elseif(typeof(origin) == 'CFrame')then
							lookVector = origin.lookVector
						end
						local bfos = Instance.new("BodyVelocity",HitTorso)
						bfos.P = 20000
						bfos.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
						bfos.Velocity = Vector3.new(0,up,0) + (lookVector * back)
						S.Debris:AddItem(bfos,decay)
						if(not Stunned[Who] and player)then
							local stunScr=FXFolder:FindFirstChild'Stunner' and FXFolder:FindFirstChild'Stunner':Clone()
							local t = {0,M.RNG(time()+3,time()+5),nil}
							if(stunScr)then
								stunScr.Disabled=false
								stunScr.Parent=Who
								local stunEmit = FXFolder:FindFirstChild'AttEffects' and FXFolder.AttEffects:FindFirstChild'Stun'
								local hed = Who:FindFirstChild'Head'
								if(stunEmit)then
									local e = stunEmit:Clone()
									e.Name='StunEmitter'
									e.Parent=hed
									Weld(e,hed)
									t[3]=e
								end
							end
							Stunned[Who] = t
						end
					elseif(DamageType == 'Stun' and HitTorso and not Stunned[Who] and player)then
						local stunScr=FXFolder:FindFirstChild'Stunner' and FXFolder:FindFirstChild'Stunner':Clone()
						local t = {0,M.RNG(time()+3,time()+5),nil}
						if(stunScr)then
							stunScr.Disabled=false
							stunScr.Parent=Who
							local stunEmit = FXFolder:FindFirstChild'AttEffects' and FXFolder.AttEffects:FindFirstChild'Stun'
							local hed = Who:FindFirstChild'Head'
							if(stunEmit)then
								local e = stunEmit:Clone()
								e.Name='StunEmitter'
								e.Parent=hed
								Weld(e,hed)
								t[3]=e
							end
						end
						Stunned[Who] = t
					end
				end
			end
		end
	end
end

function AOEDamage(where,range,options)
	local hit = {}
	for _,v in next, getRegion(where,range,{Char}) do
		if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' and not hit[v.Parent])then
			local callTable = {Who=v.Parent}
			hit[v.Parent] = true
			for _,v in next, options do callTable[_] = v end
			DealDamage(callTable)
		end
	end
	return hit
end

function AOEBurn(where,range,options)
	local hit = {}
	for _,v in next, getRegion(where,range,{Char}) do
		if(v:IsA'BasePart' and (v.Material == Enum.Material.Wood or v.Material == Enum.Material.WoodPlanks))then
			-- TODO: Burn shit
		end
	end
	return hit
end

function AOEHeal(where,range,amount)
	local healed = {}
	for _,v in next, getRegion(where,range,{Char}) do
		local hum = (v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' or nil)
		if(hum and not healed[hum])then
			hum.Health = hum.Health + amount
			if(v.Parent:FindFirstChild'Head' and hum.Health > 0)then
				ShowDamage((v.Parent.Head.CFrame * CF.N(0, 0, (v.Parent.Head.Size.Z / 2)).p+V3.N(0,1.5,0)), "+"..amount, 1.5, BrickColor.new'Lime green'.Color)
			end
		end
	end
end

function FireBurst(hit,pos,damage,silent)
	local explosion = FireburstPart:Clone()
	explosion.CFrame = pos
	explosion.Particles.Enabled=true
	explosion.PointLight.Range=20
	explosion.Parent = Effects
	if(not silent)then Sound(explosion,304529688,1.25,1,false,true,true) end
	delay(.2,function()
		explosion.Particles.Enabled=false
		wait(.3)
		explosion.PointLight.Enabled=false
	end)
	if(damage>0)then
		AOEDamage(explosion.Position,22.5,{
			MinimumDamage=damage,
			MaximumDamage=damage,
		})
	end


	delay(2,function()
		explosion:destroy()
	end)
end

function FireballSpell()
	Attack = true
	NeutralAnims = false
	Root.Anchored=true
	WalkSpeed=0
	local Charge = 0;
	local magicCircle = Circle:Clone();
	magicCircle.Parent = Effects
	magicCircle.Anchored=false
	magicCircle.Shine:Emit(10)
	Sound(magicCircle,313945165,1.25,2,false,true,true)
	local weld = Weld(magicCircle,RArm,CF.N(0,0,2)*CF.A(M.R(90),0,0))

	for i = 0, 1, 0.1 do
		swait()
		local Alpha = .3
		magicCircle.Mesh.Scale=magicCircle.Mesh.Scale+Vector3.new(.7,.7,0)
		Root.CFrame = CF.N(Root.CFrame.p,Mouse.Hit.p)
		RJ.C0 = RJ.C0:lerp(CFrame.new(-0.00613903953, 0.00628685951, 0.00286255172, 0.684637189, 0, 0.728884161, 0, 1, 0, -0.728884161, 0, 0.684637189),Alpha)
		LH.C0 = LH.C0:lerp(CFrame.new(-0.477180183, -0.989661753, 0.00763072772, 0.997303426, 0.0733890384, -4.17232513e-07, -0.073389031, 0.997303426, 5.92281481e-07, 4.76837158e-07, -5.58793545e-07, 1.00000012),Alpha)
		RH.C0 = RH.C0:lerp(CFrame.new(0.49552381, -0.98963362, 0.0170124341, 0.99842298, -0.056141004, 5.66244125e-07, 0.0561410002, 0.998422921, 1.16993164e-07, -5.66244125e-07, -8.38190317e-08, 1.00000012),Alpha)
		LS.C0 = LS.C0:lerp(CFrame.new(-1.52261209, 0.626422524, 0.000381739461, 0.971170783, 0.238385111, -9.23871994e-07, -0.238385096, 0.971170723, 3.82314255e-07, 9.83476639e-07, -1.49011612e-07, 1.00000024),Alpha)
		RS.C0 = RS.C0:lerp(CFrame.new(1.39878774, 0.493852645, 0.0957473963, 0.684637129, -0.72888422, 3.18605409e-08, 0, -4.37113883e-08, -1, 0.72888422, 0.684637129, -2.992644e-08),Alpha)
		NK.C0 = NK.C0:lerp(CFrame.new(0.00997409597, 1.49900126, -0.000828668475, 0.684637189, 0, -0.728884161, 0, 1, 0, 0.728884161, 0, 0.684637189),Alpha)
	end
	repeat swait()
		Root.CFrame = CF.N(Root.CFrame.p,Mouse.Hit.p)
		if(Charge<60)then
			Charge=Charge+.5
			magicCircle.Mesh.Scale=magicCircle.Mesh.Scale+Vector3.new(.033,.033,0)
		end
	until not Keydown.z
	for i = 1, Charge/12+6 do
		local projectile = Fireball:Clone();
		projectile.CFrame = magicCircle.CFrame
		projectile.Parent = Effects
		Sound(projectile,304448425,1.25,1,false,true,true)
		Root.CFrame = CF.N(Root.CFrame.p,Mouse.Hit.p)
		coroutine.wrap(function()
			local velocity = Mouse.Hit
			for i = 1, 600 do
				velocity=velocity*CFrame.new(0,0,-1)
				local hit,pos,norm,dist = CastRay(projectile.CFrame.p,CF.N(projectile.CFrame.p,velocity.p)*CF.N(0,0,-5).p,7)
				if(hit)then
					projectile.Particles.Enabled=false
					FireBurst(hit,CF.N(pos),10+Charge/2)
					projectile.PointLight.Enabled=false
					wait(1)
					break
				else
					projectile.CFrame = CF.N(projectile.CFrame.p,velocity.p)*CF.N(0,0,-5)
				end
				swait()
			end
			projectile:destroy()
		end)()
		wait(.1)
	end
	coroutine.wrap(function()
		local start = magicCircle.Mesh.Scale
		weld:destroy()
		magicCircle.Anchored=true
		wait(.5)
		for i = 0, 1, .05 do
			magicCircle.Mesh.Scale=start:lerp(Vector3.new(0,0,0),i)
			magicCircle.Back.Transparency = i
			magicCircle.Front.Transparency = i
			swait()
		end
		magicCircle:destroy()
	end)()
	WalkSpeed = 24
	Root.Anchored=false
	Attack = false
	NeutralAnims = true
end

function FirePunch()
	Attack = true
	NeutralAnims = false
	--WalkSpeed = 0
	local magicCircle = Circle:Clone();
	magicCircle.Parent = Effects
	magicCircle.Anchored=false
	local weld = Weld(magicCircle,RArm,CF.N(0,0,2)*CF.A(M.R(90),0,0))
	for i = 0, 1, 0.1 do
		swait()
		local Alpha = .3
		RJ.C0 = RJ.C0:lerp(CFrame.new(0.00876712799, 0.00628685951, 0.00824260712, 0, 0, -1, 0, 1, 0, 1, 0, 0),Alpha)
		LH.C0 = LH.C0:lerp(CFrame.new(-0.47773385, -1.05271745, 0.00763320923, 0.984459341, 0.175613061, 0, -0.175613061, 0.984459341, 0, 0, 0, 1),Alpha)
		RH.C0 = RH.C0:lerp(CFrame.new(0.487425029, -1.00636411, 0.0170097351, 0.984691381, -0.174307063, 0, 0.174307063, 0.984691381, 0, 0, 0, 1),Alpha)
		LS.C0 = LS.C0:lerp(CFrame.new(-1.49135685, 0.501278877, 0.000385284424, 0, 1, 0, 0, 0, -1, -1, 0, 0),Alpha)
		RS.C0 = RS.C0:lerp(CFrame.new(0.798054039, 0.410905868, -0.42839992, 0.335944802, 0.941881657, 1.46846153e-08, 4.37113883e-08, 1.91068547e-15, -1, -0.941881657, 0.335944802, -4.11709564e-08),Alpha)
		NK.C0 = NK.C0:lerp(CFrame.new(-0.0132169724, 1.49900126, 0.0086812973, 0, 0, 1, 0, 1, 0, -1, 0, 0),Alpha)
	end
	magicCircle.Shine:Emit(10)
	Sound(magicCircle,313945165,1.25,2,false,true,true)
	for i = 0, .7, 0.1 do
		swait()
		magicCircle.Mesh.Scale=magicCircle.Mesh.Scale+Vector3.new(.7,.7,0)
		local Alpha = .3
		RJ.C0 = RJ.C0:lerp(CFrame.new(0.0846859813, 0.00628685951, -1.30178809, 0.666946054, 0, 0.745106041, 0, 1, 0, -0.745106041, 0, 0.666946054),Alpha)
		LH.C0 = LH.C0:lerp(CFrame.new(-0.602384865, -0.990931034, 0.0419017226, 0.971215248, 0, 0.238203585, 0, 1, 0, -0.238203615, 0, 0.971215308),Alpha)
		RH.C0 = RH.C0:lerp(CFrame.new(0.533700585, -1.00146437, -0.0745356157, 0.622861147, 0.131178856, -0.771256208, -0.0987099782, 0.991140902, 0.0888603702, 0.776080191, 0.0207830146, 0.63029182),Alpha)
		LS.C0 = LS.C0:lerp(CFrame.new(-1.35173285, 0.608601332, 0.000362926279, 0.912227154, 0.409684956, 1.22487545e-05, -0.409684986, 0.912227094, 2.32488328e-05, -1.66893005e-06, -2.62260437e-05, 1),Alpha)
		RS.C0 = RS.C0:lerp(CFrame.new(1.37284052, 0.474084795, -0.319298357, 0.856939018, -0.515390158, -0.00534040015, 0.00142899936, 0.012737005, -0.999917865, 0.515415847, 0.856861055, 0.0116513278),Alpha)
		NK.C0 = NK.C0:lerp(CFrame.new(-0.125598311, 1.49900126, -0.00111817941, 0.666946054, 0, -0.745106041, 0, 1, 0, 0.745106041, 0, 0.666946054),Alpha)
	end
	local fist = Fist:Clone();
	fist.CFrame = magicCircle.CFrame*CF.N(0,0,-2)*CF.A(M.R(90),0,0)
	fist.Parent = Effects
	AOEDamage(fist.CFrame.p,10,{
		MinimumDamage=5,
		MaximumDamage=15,
		DamageFX={
			Type='Knockback',
			KnockBack=45,
			KnockUp=15,
			Origin=Root,
			Decay=.5;
		}
	})
	FireBurst(nil,fist.CFrame,0)
	magicCircle.Anchored = true
	weld:destroy()
	coroutine.wrap(function()
		local start = magicCircle.Mesh.Scale
		local start2 = fist.Size
		local start3 = fist.Transparency
		wait(1)
		for i = 0, 1, .05 do
			magicCircle.Mesh.Scale=start:lerp(Vector3.new(0,0,0),i)
			fist.Size = start2:lerp(Vector3.new(0,0,0),i)
			fist.Transparency = start3+(1-start3)*i
			magicCircle.Back.Transparency = i
			magicCircle.Front.Transparency = i
			swait()
		end
		fist:destroy()
		magicCircle:destroy()
	end)()
	--WalkSpeed = 24
	Attack = false
	NeutralAnims = true
end
function WaterSlap()
	Attack = true
	NeutralAnims = false
	local magicCircle = Circle:Clone();
	magicCircle:WaitForChild'Front'.Texture = 'rbxassetid://408441353'
	magicCircle:WaitForChild'Back'.Texture = 'rbxassetid://408441330'
	magicCircle.Shine.Color = ColorSequence.new(Color3.fromRGB(255,255,0),Color3.fromRGB(0,0,255))
	magicCircle.Parent = Effects
	magicCircle.Anchored=false
	local weld = Weld(magicCircle,LArm,CF.N(0,0,2)*CF.A(M.R(90),0,0))
	for i = 0, 1, 0.1 do
		swait()
		local Alpha = .3
		RJ.C0 = RJ.C0:lerp(CFrame.new(0.0253826827, 0.00812374055, -0.257290602, 0.78052628, -2.55876301e-07, 0.625122964, -0.243553087, 0.920980513, 0.304099888, -0.575726151, -0.389608592, 0.718849421),Alpha)
		LH.C0 = LH.C0:lerp(CFrame.new(-0.496665955, -0.990922153, 0.0076207961, 1, 1.49011612e-08, 2.98023224e-08, 1.49011612e-08, 0.99999994, 0, 2.98023224e-08, 0, 0.99999994),Alpha)
		RH.C0 = RH.C0:lerp(CFrame.new(0.543252945, -0.935092628, 0.00204178691, 0.95470798, -0.243553087, -0.170922846, 0.172396973, 0.920980513, -0.349391133, 0.242511868, 0.304099888, 0.921255291),Alpha)
		LS.C0 = LS.C0:lerp(CFrame.new(-1.23207033, 0.493078738, 0.160156831, 1.40070915e-06, 0.905741692, 0.423830271, -1, 2.20537186e-06, -1.32620335e-06, -2.14576721e-06, -0.423830301, 0.905741692),Alpha)
		RS.C0 = RS.C0:lerp(CFrame.new(1.37682283, 0.701343179, -0.220273614, 0.886153698, -0.39422518, 0.243553117, 0.0838617459, -0.380476147, -0.920980513, 0.455739856, 0.836555004, -0.304099917),Alpha)
		NK.C0 = NK.C0:lerp(CFrame.new(0.00605266914, 1.49898243, -0.00365240639, 0.896775424, 7.4505806e-07, -0.442486018, -5.73694706e-07, 1, 5.06639481e-07, 0.442486048, -2.08616257e-07, 0.896775365),Alpha)
	end
	magicCircle.Shine:Emit(10)
	Sound(magicCircle,170264196,1.25,2,false,true,true)
	for i = 0, .8, 0.1 do
		swait()
		local Alpha = .3
		magicCircle.Mesh.Scale=magicCircle.Mesh.Scale+Vector3.new(.7,.7,0)
		RJ.C0 = RJ.C0:lerp(CFrame.new(0.00494207442, -0.146138459, -0.214696676, 0.595462084, -5.32384412e-08, -0.80338341, 0.41565606, 0.855754614, 0.308081269, 0.687499046, -0.517381907, 0.509569407),Alpha)
		LH.C0 = LH.C0:lerp(CFrame.new(-0.650362015, -0.625687957, -0.106279731, 0.906900465, 0.41565606, -0.0690051019, -0.415656239, 0.855754614, -0.30808112, -0.0690043569, 0.308081269, 0.948854208),Alpha)
		RH.C0 = RH.C0:lerp(CFrame.new(0.502297759, -1.03493989, 0.0170234144, 0.940928638, -0.338604957, 1.08480453e-05, 0.338604987, 0.940928698, -1.64806843e-05, -4.67896461e-06, 1.92224979e-05, 1),Alpha)
		LS.C0 = LS.C0:lerp(CFrame.new(-1.33072042, 0.712415516, -0.104047954, -0.524101377, -0.430475205, -0.734853029, -0.786817193, -0.0854822248, 0.611237764, -0.325939536, 0.898545504, -0.293903857),Alpha)
		RS.C0 = RS.C0:lerp(CFrame.new(1.32530236, 0.468288094, 0.000397048425, 0.936763644, -0.349962771, 1.57952309e-06, 0.349962771, 0.936763525, -5.36441803e-06, 3.27825546e-07, 5.60283661e-06, 1),Alpha)
		NK.C0 = NK.C0:lerp(CFrame.new(8.87950882e-05, 1.49899459, -0.00496737426, 0.858393252, 1.51991844e-06, 0.512992144, -1.22189522e-06, 1, -8.64267349e-07, -0.512992203, 1.49011612e-07, 0.858393192),Alpha)
	end
	magicCircle.Anchored = true
	weld:destroy()
	coroutine.wrap(function()
		local start = magicCircle.Mesh.Scale
		wait(1.5)
		for i = 0, 1, .05 do
			magicCircle.Mesh.Scale=start:lerp(Vector3.new(0,0,0),i)
			magicCircle.Back.Transparency = i
			magicCircle.Front.Transparency = i
			swait()
		end
		magicCircle:destroy()
	end)()
	Attack = false
	NeutralAnims = true
end
--// Wrap it all up \\--

Mouse.KeyDown:connect(function(k)
	if(k=='m')then
		Muted = not Muted
	end
	Keydown[k]=true
	if(Attack)then return end
	if(k == 'z')then
		FireballSpell()
	end
end)

Mouse.KeyUp:connect(function(k)
	Keydown[k]=false
end)

Mouse.Button1Down:connect(function()
	if(Attack)then return end
	AttackNo=AttackNo+1
	if(AttackNo>2)then AttackNo=1 end
	if(AttackNo==1)then
		FirePunch()
	elseif(AttackNo==2)then
		WaterSlap()
	end
end)
coroutine.resume(coroutine.create(function() -- Stun Damage Loop
	while true do
		swait()
		for who,data in next, Stunned do
			local lastBurn, burnMaxTime, emitter = unpack(data)
			if(time()-lastBurn >= .5)then
				data[1] = time()
				for _,v in next, who:children() do if(v.Name == 'Health' and v:IsA'Script')then v.Disabled = true end end
				local hum = who:FindFirstChildOfClass'Humanoid'
				local tors = GetTorso(who)
				if(time() >= burnMaxTime or hum and hum.Health <= 0)then
					local f=Instance.new("BoolValue")
					f.Name = 'ResumeControl'
					f.Parent = who
					if(emitter)then
						emitter:destroy()
					end
					Stunned[who] = nil;
					for _,v in next, who:children() do if(v.Name == 'Health' and v:IsA'Script')then v.Disabled = false end end
				end
			end
		end
	end
end))

while true do
	swait()
	Sine = Sine + Change
	if(not Music or not Music.Parent)then
		local tp = (Music and Music.TimePosition)
		Music = Sound(Char,MusicID,1,10,true,false,true)
		Music.Name = 'Music'
		Music.TimePosition = tp
	end
	Music.SoundId = "rbxassetid://"..MusicID
	Music.Parent = Torso
	Music.Pitch = 1
	Music.Volume = 3
	if(not Muted)then
		Music:Resume()
	else
		Music:Pause()
	end


	if(God)then
		Hum.MaxHealth = 1e100
		Hum.Health = 1e100
		if(not Char:FindFirstChildOfClass'ForceField')then IN("ForceField",Char).Visible = false end
		Hum.Name = M.RNG()*100
	end

	local hitfloor,posfloor = workspace:FindPartOnRay(Ray.new(Root.CFrame.p,((CFrame.new(Root.Position,Root.Position - Vector3.new(0,1,0))).lookVector).unit * (4*PlayerSize)), Char)

	local Walking = (math.abs(Root.Velocity.x) > 1 or math.abs(Root.Velocity.z) > 1)
	local State = (Hum.PlatformStand and 'Paralyzed' or Hum.Sit and 'Sit' or not hitfloor and Root.Velocity.y < -1 and "Fall" or not hitfloor and Root.Velocity.y > 1 and "Jump" or hitfloor and Walking and (Hum.WalkSpeed < 24 and "Walk" or "Run") or hitfloor and "Idle")
	if(not Effects or not Effects.Parent)then
		Effects = IN("Model",Char)
		Effects.Name = "Effects"
	end
	if(State == 'Run')then
		local wsVal = 9 / (Hum.WalkSpeed/16)
		local Alpha = math.min(.4 * (Hum.WalkSpeed/16),1)
		Change = 1
		RH.C1 = RH.C1:lerp(CF.N(0,1*PlayerSize-.5*M.C(Sine/wsVal)/2,0+.25*M.C(Sine/wsVal)/2)*CF.A(M.R(5-45*M.C(Sine/wsVal))+-M.S(Sine/wsVal)/2.5,0,0),Alpha)
		LH.C1 = LH.C1:lerp(CF.N(0,1*PlayerSize+.5*M.C(Sine/wsVal)/2,0-.25*M.C(Sine/wsVal)/2)*CF.A(M.R(5+45*M.C(Sine/wsVal))+M.S(Sine/wsVal)/2.5,0,0),Alpha)
	elseif(State == 'Walk')then
		local wsVal = 7 / (Hum.WalkSpeed/16)
		local Alpha = math.min(.2 * (Hum.WalkSpeed/16),1)
		Change = 1
		RH.C1 = RH.C1:lerp(CF.N(0,1*PlayerSize-.5*M.C(Sine/wsVal)/2,0+.5*M.C(Sine/wsVal)/2)*CF.A(M.R(15-25*M.C(Sine/wsVal))+-M.S(Sine/wsVal)/2.5,0,0),Alpha)
		LH.C1 = LH.C1:lerp(CF.N(0,1*PlayerSize+.5*M.C(Sine/wsVal)/2,0-.5*M.C(Sine/wsVal)/2)*CF.A(M.R(15+25*M.C(Sine/wsVal))+M.S(Sine/wsVal)/2.5,0,0),Alpha)
	else
		RH.C1 = RH.C1:lerp(CF.N(0,1,0),.2)
		LH.C1 = LH.C1:lerp(CF.N(0,1,0),.2)
	end
	Hum.WalkSpeed = WalkSpeed
	if(Remove_Hats)then Instance.ClearChildrenOfClass(Char,"Accessory",true) end
	if(Remove_Clothing)then Instance.ClearChildrenOfClass(Char,"Clothing",true) Instance.ClearChildrenOfClass(Char,"ShirtGraphic",true) end

	if(NeutralAnims)then
		if(State == 'Idle')then
			local Alpha = .1
			Change=1
			RJ.C0 = RJ.C0:lerp(CFrame.new(0.00245178537, -.1+.1*M.C(Sine/32), 0.000279115717, 0.957476616, 0, -0.288511187, 0, 1, 0, 0.288511187, 0, 0.957476616),Alpha)
			LH.C0 = LH.C0:lerp(CFrame.new(-0.496666014, -0.990931034-.1*M.C(Sine/32), 0.00763559435, 1.00000012, 0, 0, 0, 1, 0, 0, 0, 1.00000012)*CF.A(0,0,M.R(-4+2*M.C(Sine/38))),Alpha)
			RH.C0 = RH.C0:lerp(CFrame.new(0.498346388, -0.991055012-.1*M.C(Sine/32), 0.0170083065, 1.00000012, 0, 0, 0, 1, 0, 0, 0, 1.00000012)*CF.A(0,0,M.R(4-2*M.C(Sine/38))),Alpha)
			--[[LS.C0 = LS.C0:lerp(CFrame.new(-0.516406953, 0.464706182+.05*M.S(Sine/42), -0.534985006, 0.197841793, -0.980234087, 1.69277191e-05, 0.77649945, 0.156711236, -0.610319853, 0.598253667, 0.120759889, 0.792155206)*CF.A(M.R(0+5*M.S(Sine/42)),0,0),Alpha)
			RS.C0 = RS.C0:lerp(CFrame.new(0.706458271, 0.499285042+.05*M.S(Sine/42), -0.363079935, 0.42256853, 0.851608455, -0.310159862, -0.729046047, 0.116078667, -0.674550056, -0.538449585, 0.511164367, 0.669912934)*CF.A(M.R(0+5*M.S(Sine/42)),0,0),Alpha)
			]]
			LS.C0 = LS.C0:lerp(CFrame.new(-0.917338252, 0.411551744, -0.575931072, -0.0951177329, -0.995466232, 1.58846378e-05, 0.788562357, -0.0753576159, -0.610320091, 0.607554078, -0.0580397546, 0.792155027)*CF.A(M.R(0+5*M.S(Sine/42)),M.R(0+1.9*M.S(Sine/51)),M.R(0-3*M.S(Sine/61))),Alpha)
			RS.C0 = RS.C0:lerp(CFrame.new(0.820931792, 0.388566852, -0.421563238, 0.37996459, 0.916040719, -0.128439352, -0.268703103, -0.0235590898, -0.962934971, -0.885113418, 0.400393188, 0.237191349)*CF.A(M.R(0-5*M.S(Sine/42)),M.R(0-1.5*M.S(Sine/49)),M.R(0-3*M.S(Sine/57))),Alpha)
			NK.C0 = NK.C0:lerp(CFrame.new(-0.00378017989, 1.49900126, -0.00434756465, 0.957476616, 0, 0.288511187, 0, 1, 0, -0.288511187, 0, 0.957476616)*CF.A(M.R(0+2*M.C(Sine/32)),0,0),Alpha)
			-- idle
		elseif(State == 'Run')then
			local wsVal = 9 / (Hum.WalkSpeed/16)
			local Alpha = math.min(.4 * (Hum.WalkSpeed/16),1)
			RJ.C0 = RJ.C0:lerp(CF.N(0,-.075+.05*M.C(Sine/(wsVal/2)),0)*CF.A(M.R(-15+2.5*M.C(Sine/(wsVal/2))),M.R(4*M.C(Sine/wsVal)),0),Alpha)
			NK.C0 = NK.C0:lerp(NKC0,Alpha)
			LS.C0 = LS.C0:lerp(LSC0*CF.N(0,0,0-.3*M.C(Sine/wsVal))*CF.A(M.R(0+45*M.C(Sine/wsVal)),0,M.R(-5)),Alpha)
			RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0,0+.3*M.C(Sine/wsVal))*CF.A(M.R(0-45*M.C(Sine/wsVal)),0,M.R(5)),Alpha)
			LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/(wsVal/2)),0)*CF.A(0,-M.R(4*M.C(Sine/wsVal)),0),Alpha)
			RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/(wsVal/2)),0)*CF.A(0,-M.R(4*M.C(Sine/wsVal)),0),Alpha)
		elseif(State == 'Walk')then
			local wsVal = 7 / (Hum.WalkSpeed/16)
			local Alpha = math.min(.2 * (Hum.WalkSpeed/16),1)
			local Alpha2 = math.min(.15 * (Hum.WalkSpeed/16),1)
			RJ.C0 = RJ.C0:lerp(CF.N(0,-.075+.1*M.C(Sine/(wsVal/2)+-M.S(Sine/(wsVal/2))/7),0)*CF.A(M.R(-9-2.5*M.C(Sine/(wsVal/2))),M.R(10*M.C(Sine/wsVal)),Root.RotVelocity.y/75),Alpha2)
			NK.C0 = NK.C0:lerp(NKC0*CF.A(0,-Head.RotVelocity.y/75,0),Alpha)
			LS.C0 = LS.C0:lerp(LSC0*CF.N(0,0,-.27*M.C(Sine/wsVal))*CF.A(M.R(45*M.C(Sine/wsVal)),0,M.R(-5)+LArm.RotVelocity.y/75),Alpha)
			RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0,.27*M.C(Sine/wsVal))*CF.A(M.R(-45*M.C(Sine/wsVal)),0,M.R(5)-RArm.RotVelocity.y/75),Alpha)
			LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.1*M.C(Sine/(wsVal/2)),0)*CF.A(0,0,0),Alpha)
			RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.1*M.C(Sine/(wsVal/2)),0)*CF.A(0,0,0),Alpha)
		elseif(State == 'Jump')then
			local Alpha = .1
			local idk = math.min(math.max(Root.Velocity.Y/50,-M.R(90)),M.R(90))
			LS.C0 = LS.C0:lerp(LSC0*CF.A(M.R(-5),0,M.R(-90)),Alpha)
			RS.C0 = RS.C0:lerp(RSC0*CF.A(M.R(-5),0,M.R(90)),Alpha)
			RJ.C0 = RJ.C0:lerp(RJC0*CF.A(math.min(math.max(Root.Velocity.Y/100,-M.R(45)),M.R(45)),0,0),Alpha)
			NK.C0 = NK.C0:lerp(NKC0*CF.A(math.min(math.max(Root.Velocity.Y/100,-M.R(45)),M.R(45)),0,0),Alpha)
			LH.C0 = LH.C0:lerp(LHC0*CF.A(0,0,M.R(-5)),Alpha)
			RH.C0 = RH.C0:lerp(RHC0*CF.N(0,1,-1)*CF.A(M.R(-5),0,M.R(5)),Alpha)
		elseif(State == 'Fall')then
			local Alpha = .1
			local idk = math.min(math.max(Root.Velocity.Y/50,-M.R(90)),M.R(90))
			LS.C0 = LS.C0:lerp(LSC0*CF.A(M.R(-5),0,M.R(-90)+idk),Alpha)
			RS.C0 = RS.C0:lerp(RSC0*CF.A(M.R(-5),0,M.R(90)-idk),Alpha)
			RJ.C0 = RJ.C0:lerp(RJC0*CF.A(math.min(math.max(Root.Velocity.Y/100,-M.R(45)),M.R(45)),0,0),Alpha)
			NK.C0 = NK.C0:lerp(NKC0*CF.A(math.min(math.max(Root.Velocity.Y/100,-M.R(45)),M.R(45)),0,0),Alpha)
			LH.C0 = LH.C0:lerp(LHC0*CF.A(0,0,M.R(-5)),Alpha)
			RH.C0 = RH.C0:lerp(RHC0*CF.N(0,1,-1)*CF.A(M.R(-5),0,M.R(5)),Alpha)
		elseif(State == 'Paralyzed')then
			-- paralyzed
		elseif(State == 'Sit')then
			-- sit
		end
	end

	for i,v in next, BloodPuddles do
		local mesh = i:FindFirstChild'CylinderMesh'
		BloodPuddles[i] = v + 1
		if(not mesh or i.Transparency >= 1)then
			i:destroy()
			BloodPuddles[i] = nil
		elseif(v >= Frame_Speed*4)then
			local trans = (v-Frame_Speed*4)/(Frame_Speed*2)
			i.Transparency = trans
	            if(mesh.Scale.Z > 0)then
	                mesh.Scale = mesh.Scale-V3.N(.05,0,.05)
	            end
		else
			i.Transparency = 0
		end
	end
end