View difference between Paste ID: X8DEPG4M and HTLarXXh

--- This script has been converted to FE by iPxter
+
 local Player,Mouse,mouse,UserInputService,ContextActionService = owner
 do
     print("Fixed by kilcrafter (crift_games1)")
     script.Parent = Player.Character
 
-	print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
+    --RemoteEvent for communicating
-	script.Parent = Player.Character
+    local Event = Instance.new("RemoteEvent")
     Event.Name = "UserInput_Event"
-	--RemoteEvent for communicating
+
-	local Event = Instance.new("RemoteEvent")
+    --Fake event to make stuff like Mouse.KeyDown work
-	Event.Name = "UserInput_Event"
+    local function fakeEvent()
         local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
-	--Fake event to make stuff like Mouse.KeyDown work
+        t.connect = t.Connect
-	local function fakeEvent()
+        return t
-		local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
+    end
-		t.connect = t.Connect
+
-		return t
+    --Creating fake input objects with fake variables
     local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
     local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
-	--Creating fake input objects with fake variables
+    local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
         CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
-	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
+    end}
-	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
+    --Merged 2 functions into one by checking amount of arguments
-		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
+    CAS.UnbindAction = CAS.BindAction
 
-	--Merged 2 functions into one by checking amount of arguments
+    --This function will trigger the events that have been :Connect()'ed
-	CAS.UnbindAction = CAS.BindAction
+    local function te(self,ev,...)
         local t = m[ev]
-	--This function will trigger the events that have been :Connect()'ed
+        if t and t._fakeEvent and t.Function then
-	local function te(self,ev,...)
+            t.Function(...)
-		local t = m[ev]
+        end
-		if t and t._fakeEvent and t.Function then
+    end
-			t.Function(...)
+    m.TrigEvent = te
     UIS.TrigEvent = te
 
-	m.TrigEvent = te
+    Event.OnServerEvent:Connect(function(plr,io)
-	UIS.TrigEvent = te
+        if plr~=Player then return end
         if io.isMouse then
-	Event.OnServerEvent:Connect(function(plr,io)
+            m.Target = io.Target
-	    if plr~=Player then return end
+            m.Hit = io.Hit
-		if io.isMouse then
+        else
-			m.Target = io.Target
+            local b = io.UserInputState == Enum.UserInputState.Begin
-			m.Hit = io.Hit
+            if io.UserInputType == Enum.UserInputType.MouseButton1 then
                 return m:TrigEvent(b and "Button1Down" or "Button1Up")
-			local b = io.UserInputState == Enum.UserInputState.Begin
+            end
-			if io.UserInputType == Enum.UserInputType.MouseButton1 then
+            for _,t in pairs(CAS.Actions) do
-				return m:TrigEvent(b and "Button1Down" or "Button1Up")
+                for _,k in pairs(t.Keys) do
                     if k==io.KeyCode then
-			for _,t in pairs(CAS.Actions) do
+                        t.Function(t.Name,io.UserInputState,io)
-				for _,k in pairs(t.Keys) do
+                    end
-					if k==io.KeyCode then
+                end
-						t.Function(t.Name,io.UserInputState,io)
+            end
             m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
             UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
         end
-			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
+    end)
-			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
+    Event.Parent = NLS([==[
-	    end
+    local Player = game:GetService("Players").LocalPlayer
     local Event = script:WaitForChild("UserInput_Event")
-	Event.Parent = NLS([==[
+
-	local Player = game:GetService("Players").LocalPlayer
+    local UIS = game:GetService("UserInputService")
-	local Event = script:WaitForChild("UserInput_Event")
+    local input = function(io,a)
         if a then return end
-	local UIS = game:GetService("UserInputService")
+        --Since InputObject is a client-side instance, we create and pass table instead
-	local input = function(io,a)
+        Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
-		if a then return end
+    end
-		--Since InputObject is a client-side instance, we create and pass table instead
+    UIS.InputBegan:Connect(input)
-		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
+    UIS.InputEnded:Connect(input)
 
-	UIS.InputBegan:Connect(input)
+    local Mouse = Player:GetMouse()
-	UIS.InputEnded:Connect(input)
+    local h,t
     --Give the server mouse data 30 times every second, but only if the values changed
-	local Mouse = Player:GetMouse()
+    --If player is not moving their mouse, client won't fire events
-	local h,t
+    while wait(1/30) do
-	--Give the server mouse data 30 times every second, but only if the values changed
+        if h~=Mouse.Hit or t~=Mouse.Target then
-	--If player is not moving their mouse, client won't fire events
+            h,t=Mouse.Hit,Mouse.Target
-	while wait(1/30) do
+            Event:FireServer({isMouse=true,Target=t,Hit=h})
-		if h~=Mouse.Hit or t~=Mouse.Target then
+        end
-			h,t=Mouse.Hit,Mouse.Target
+    end]==],Player.Character)
-			Event:FireServer({isMouse=true,Target=t,Hit=h})
+    Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
 end
-	end]==],Player.Character)
+
-	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
+
 -- Created by Nebula_Zorua --
 -- Some stupid bow --
 -- Based alot on Quincy from BTD 6 --
 -- I aM qUiNCy SoN oF qUiNcY --
 -- Discord: Nebula the Zorua#6969
 -- Youtube: https://www.youtube.com/channel/UCo9oU9dCw8jnuVLuy4_SATA
 
 
 wait(1/60)
 
 warn([[
 	BOW MASTER/NEBULA'S BOW
 		This was based on Quincy from BTD 6
 
 	MOVES:
 		MB1 - Basic shot
 		Z - Arrow Storm
 		X - Hyper Speed
 		; - EXPERIMENTAL; Arrow penetration (Goes through multiple people for collaterals, etc)
 ]])
 
 --// 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 = owner
 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 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 HyperCum = false
 local ClimaxFading = false
 
 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(script:FindFirstChild'CamShake')then
 			local cam = script.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
 		elseif(who == Plr or who == Char or who:IsDescendantOf(Plr))then
 			local intensity = intense
 			if(Hum and not Hum:FindFirstChild'CamShaking')then
 				local cam = workspace.CurrentCamera
 				local oCO = Hum.CameraOffset
 				local cs = Instance.new("BoolValue",Hum)
 				cs.Name = "CamShaking"
 				for i = 1, times do
 					local camDistFromOrigin
 					if(typeof(origin) == 'Instance' and origin:IsA'BasePart')then
 						camDistFromOrigin = math.floor( (cam.CoordinateFrame.p-origin.Position).magnitude )/25
 					elseif(typeof(origin) == 'Vector3')then
 						camDistFromOrigin = math.floor( (cam.CoordinateFrame.p-origin).magnitude )/25
 					end
 					if(camDistFromOrigin)then
 						intensity = math.min(intense, math.floor(intense/camDistFromOrigin))
 					end
 					--cam.CoordinateFrame = cam.CoordinateFrame*CFrame.fromEulerAnglesXYZ(math.random(-intensity,intensity)/200,math.random(-intensity,intensity)/200,math.random(-intensity,intensity)/200)
 					if(Hum)then
 						Hum.CameraOffset = Vector3.new(math.random(-intensity,intensity)/200,math.random(-intensity,intensity)/200,math.random(-intensity,intensity)/200)
 					end
 					swait()
 				end
 				if(Hum)then
 					Hum.CameraOffset = oCO
 				end
 				cs:destroy()
 			end
 		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'Really red'
 local MusicID = 0
 local God = false
 local Muted = false
 local DoPenetration = false
 local WalkSpeed = 16
 
 --// Weapon and GUI creation, and Character Customization \\--
 
 --Part(parent,color,material,size,cframe,anchored,cancollide)
 local bow = Part(Char,BrickColor.new'Really black',Enum.Material.SmoothPlastic,V3.N(.2,4.5,1.5),CF.N(),false,false)
 Mesh(bow,Enum.MeshType.FileMesh,'rbxassetid://395019777','rbxassetid://395021644',V3.N(.75,.75,.75))
 
 local dispArrow = Part(Char,BrickColor.new'Really black',Enum.Material.SmoothPlastic,V3.N(.2,.2,2.5),CF.N(),false,false)
 Mesh(dispArrow,Enum.MeshType.FileMesh,'rbxassetid://395019701','rbxassetid://395021644',V3.N(.75,.75,.75))
 
 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')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 HW = NewInstance('Weld',Char,{Part0=RArm,Part1=bow,C0=CF.N(0,-.5,0)*CF.A(M.R(-90),0,0)})
 local DAW = NewInstance('Weld',Char,{Part0=LArm,Part1=dispArrow,C0=CF.N(0,-1,0)})
 
 local LSC0 = LS.C0
 local RSC0 = RS.C0
 local NKC0 = NK.C0
 local LHC0 = LH.C0
 local RHC0 = RH.C0
 local RJC0 = RJ.C0
 local HWC0 = HW.C0
 local DWC0 = DAW.C0
 --// 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 weldBetween(a, b)
 	local weldd = Instance.new("ManualWeld")
 	weldd.Part0 = a
 	weldd.Part1 = b
 	weldd.C0 = CFrame.new()
 	weldd.C1 = b.CFrame:inverse() * a.CFrame
 	weldd.Parent = a
 	return weldd
 end
 
 
 function ShootArrow(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 Penetration = data.Penetration or (DoPenetration and 5 or 0)
 	local OnHit = data.HitFunction or function(arrow,hit,pos,norm,dist,pen)
 
 		local h = (hit and hit.Parent and hit.Parent:FindFirstChildOfClass'Humanoid') or (hit and hit.Parent and hit.Parent.Parent and hit.Parent.Parent:FindFirstChildOfClass'Humanoid')
 		if(h)then
 			local critChance = 5
 			local critMult = 2
 			if(hit.Name == 'Head')then
 				critChance = 100
 				critMult = 4
 			end
 			DealDamage{Who=h.Parent,MinDamage=25,MaxDamage=45,Crit={Chance=critChance,Multiplier=critMult}}
 
 		end
 		if(pen < 1)then
 			arrow.Anchored = false
 			weldBetween(hit,arrow)
 		end
 	end
 
 	local Bullet = Part(Char,Color,Material,dispArrow.Size,Pos,true,false)
 	Mesh(Bullet,Enum.MeshType.FileMesh,'rbxassetid://395019701','rbxassetid://395021644',V3.N(.75,.75,.75))
 
 	local igrone = {Char,workspace.CurrentCamera}
 	--[[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,igrone)
 			Bullet.CFrame = CF.N(Bullet.CFrame.p,Direction.p)*CF.N(0,0,-StudsPerFrame)
 			if(hit and not hit.Parent:IsA'Accessory' and hit.Transparency < .99 and hit.Material ~= Enum.Material.Glass)then
 				OnHit(Bullet,hit,pos,norm,dist)
 				break;
 			elseif(hit)then
 				if(hit.Material == Enum.Material.Glass)then
 					hit:destroy()
 				else
 					table.insert(igrone,hit)
 				end
 
 			end
 
 			if(i >= Frames)then
 				Bullet:destroy()
 				break;
 			end
 			swait()
 		end
 
 	end)()]]
 	coroutine.wrap(function()
 		while true do
 			local hit,pos,norm,dist = CastRay(Pos.p,Direction.p,2048,igrone)
 			Bullet.CFrame = CF.N(pos,pos+norm)*CF.A(M.R(180),0,0)
 			--local hitscan = Part(Effects,C3.N(1,1,1),Enum.Material.Neon,V3.N(.1,.1,dist),CF.N(Pos.p,pos+norm)*CF.N(0,0,-dist/2),true,false)
 			Effect{
 				CFrame=CF.N(Pos.p,Bullet.CFrame.p)*CF.N(0,0,-dist/2)*CF.A(0,M.R(90),0),
 				StartSize=V3.N(dist,.1,.1),
 				EndSize=V3.N(dist,.1,.1),
 				Mesh={Type=Enum.MeshType.Cylinder},
 				Color=C3.N(1,1,1)
 			}
 			if(hit and not hit.Parent:IsA'Accessory' and hit.Transparency < .99 and hit.Material ~= Enum.Material.Glass)then
 				OnHit(Bullet,hit,pos,norm,dist,Penetration)
 				local h = (hit and hit.Parent and hit.Parent:FindFirstChildOfClass'Humanoid') or (hit and hit.Parent and hit.Parent.Parent and hit.Parent.Parent:FindFirstChildOfClass'Humanoid')
 				if(not h or Penetration < 1)then
 					break;
 				else
 					Penetration = Penetration - 1
 					table.insert(igrone,h.Parent)
 				end
 			elseif(hit)then
 				if(hit.Material == Enum.Material.Glass)then
 					hit:destroy()
 				else
 					table.insert(igrone,hit)
 				end
 
 			end
 			swait()
 		end
 
 		S.Debris:AddItem(Bullet,5)
 	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;
 
 	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 == 'Slash3')then
 			PM = Mesh(P,Enum.MeshType.FileMesh,'rbxassetid://4770583','',Size,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')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
 			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
 			PM.Scale = PM.Scale - scaleGay
 			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)
 				P.Orientation = Orientation
 			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
 	end)()
 
 
 end
 
 function SoulSteal(whom)
 	local torso = (whom:FindFirstChild'Head' or whom:FindFirstChild'Torso' or whom:FindFirstChild'UpperTorso' or whom:FindFirstChild'LowerTorso' or whom:FindFirstChild'HumanoidRootPart')
 	print(torso)
 	if(torso and torso:IsA'BasePart')then
 		local Model = Instance.new("Model",Effects)
 		Model.Name = whom.Name.."'s Soul"
 		whom:BreakJoints()
 		local Soul = Part(Model,BrickColor.new'Really red','Glass',V3.N(.5,.5,.5),torso.CFrame,true,false)
 		Soul.Name = 'Head'
 		NewInstance("Humanoid",Model,{Health=0,MaxHealth=0})
 		Effect{
 			Effect="Arc",
 			Manual = Soul,
 			FXSettings={
 				Start=torso.CFrame,
 				Home = Torso,
 				RemoveOnGoal = true,
 			}
 		}
 		local lastPoint = Soul.CFrame.p
 
 		for i = 0, 1, 0.01 do
 				local point = CFrame.new(lastPoint, Soul.Position) * CFrame.Angles(-math.pi/2, 0, 0)
 				local mag = (lastPoint - Soul.Position).magnitude
 				Effect{
 					Effect = "Fade",
 					CFrame = point * CF.N(0, mag/2, 0),
 					Size = V3.N(.5,mag+.5,.5),
 					Color = Soul.BrickColor
 				}
 				lastPoint = Soul.CFrame.p
 			swait()
 		end
 		for i = 1, 5 do
 			Effect{
 				Effect="Fade",
 				Color = BrickColor.new'Really red',
 				MoveDirection = (Torso.CFrame*CFrame.new(M.RNG(-40,40),M.RNG(-40,40),M.RNG(-40,40))).p
 			}
 		end
 	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)
 			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 = Plr
 					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)
 					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 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 Shoot()
 	Attack = true
 	NeutralAnims = false
 	Hum.AutoRotate = false
 	local lim = 5
 	if(HyperCum)then lim = 1.5 end
 	for i = 0, lim, .1 do
 		local Alpha = .2
 		Root.CFrame = Root.CFrame:lerp(CF.N(Root.CFrame.p,CF.N(Mouse.Hit.x,Root.CFrame.y,Mouse.Hit.z).p),.2)
 		RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1+.05*M.C(Sine/18),0)*CF.A(0,M.R(90),0),Alpha)
 		NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
 		LS.C0 = LS.C0:lerp(LSC0*CF.N(1.5,.3+.1*M.S(Sine/18),-.4)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0+.1*M.S(Sine/18),0)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/18),0)*CF.A(0,0,M.R(-10)),Alpha)
 		RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/18),-.2),Alpha)
 		HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,0),Alpha)
 		DAW.C0 = DAW.C0:lerp(DWC0*CF.N(0,-.8,0)*CF.A(M.R(-90),0,0)*CF.A(M.R(0),0,0),Alpha)
 		swait()
 	end
 	for i = 0, lim, .1 do
 		local Alpha = i/lim
 		Root.CFrame = Root.CFrame:lerp(CF.N(Root.CFrame.p,CF.N(Mouse.Hit.x,Root.CFrame.y,Mouse.Hit.z).p),.2)
 		RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1+.05*M.C(Sine/18),0)*CF.A(0,M.R(90),0),Alpha)
 		NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
 		LS.C0 = LS.C0:lerp(LSC0*CF.N(.8,.3+.1*M.S(Sine/18),-.4)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0+.1*M.S(Sine/18),0)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/18),0)*CF.A(0,0,M.R(-10)),Alpha)
 		RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/18),-.2),Alpha)
 		HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,0),Alpha)
 		DAW.C0 = DAW.C0:lerp(DWC0*CF.N(0,-.8,0)*CF.A(M.R(-90),0,0)*CF.A(M.R(0),0,0),Alpha)
 		swait()
 	end
 
 	dispArrow.Transparency = 1
 	ShootArrow{Frames=Frame_Speed*7,Origin=bow.CFrame,Speed=5}
 	NeutralAnims = true
 	Hum.AutoRotate = true
 	if(not HyperCum)then wait(2) else wait(.1) end
 	dispArrow.Transparency = 0
 	Attack = false
 end
 
 function ShootFast()
 	if(HyperCum or ClimaxFading)then return end
 	HyperCum = true
 	Effect{
 		Frames=30,
 		StartSize=V3.N(.05,.05,.05),
 		EndSize=V3.N(10,10,10),
 		Mesh='Tornado2',
 		CFrame=Torso.CFrame,
 		Color=C3.N(1,0,0),
 		RotInc={0,1,0},
 	}
 	delay(7, function()
 		HyperCum = false
 		ClimaxFading = true
 		wait(2)
 		ClimaxFading = false
 	end)
 end
 
 function ArrowRain()
 	Attack = true
 	NeutralAnims = false
 	Hum.AutoRotate = false
 	local lim = 5
 	if(HyperCum)then lim = 1.5 end
 	for i = 0, lim, .1 do
 		local Alpha = .2
 		Root.CFrame = Root.CFrame:lerp(CF.N(Root.CFrame.p,CF.N(Mouse.Hit.x,Root.CFrame.y,Mouse.Hit.z).p),.2)
 		RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1+.05*M.C(Sine/18),0)*CF.A(0,M.R(90),0),Alpha)
 		NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
 		LS.C0 = LS.C0:lerp(LSC0*CF.N(1.5,.3+.1*M.S(Sine/18),-.4)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0+.1*M.S(Sine/18),0)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/18),0)*CF.A(0,0,M.R(-10)),Alpha)
 		RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/18),-.2),Alpha)
 		HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,0),Alpha)
 		DAW.C0 = DAW.C0:lerp(DWC0*CF.N(0,-.8,0)*CF.A(M.R(-90),0,0)*CF.A(M.R(0),0,0),Alpha)
 		swait()
 	end
 	for i = 0, lim, .1 do
 		local Alpha = i/lim
 		Root.CFrame = Root.CFrame:lerp(CF.N(Root.CFrame.p,CF.N(Mouse.Hit.x,Root.CFrame.y,Mouse.Hit.z).p),.2)
 		RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1+.05*M.C(Sine/18),0)*CF.A(0,M.R(90),0),Alpha)
 		NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
 		LS.C0 = LS.C0:lerp(LSC0*CF.N(.8,.3+.1*M.S(Sine/18),-.4)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0+.1*M.S(Sine/18),0)*CF.A(M.R(45),M.R(0),M.R(90)),Alpha)
 		LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/18),0)*CF.A(0,0,M.R(-10)),Alpha)
 		RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/18),-.2),Alpha)
 		HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,0),Alpha)
 		DAW.C0 = DAW.C0:lerp(DWC0*CF.N(0,-.8,0)*CF.A(M.R(-90),0,0)*CF.A(M.R(0),0,0),Alpha)
 		swait()
 	end
 	dispArrow.Transparency = 1
 	ShootArrow{Penetration=0,Frames=Frame_Speed*7,Origin=bow.CFrame,Speed=5,HitFunction = function(arrow,hit,pos)
 		arrow:destroy()
 		for i = 1, 25 do
 			local pos = CF.N(pos)*CF.N(M.RNG(-10,10),0,M.RNG(-10,10))
 			ShootArrow{Penetration=0,Frames=Frame_Speed*7,Origin=pos*CF.N(0,1048,0),Direction=pos,Speed=5,HitFunction = function(arrow,hit,pos)
 				arrow.Anchored = false
 				weldBetween(hit,arrow)
 				AOEDamage(pos,4,{MinimumDamage=25,MaximumDamage=45})
 				Effect{
 					StartSize=V3.N(.25,.25,.25),
 					EndSize=V3.N(2,2,2),
 					CFrame=CF.N(pos),
 					RotInc='random',
 					Color=C3.N(1,1,1)
 				}
 			end}
 			swait()
 		end
 	end}
 	NeutralAnims = true
 	Hum.AutoRotate = true
 	if(not HyperCum)then wait(2) else wait(.1) end
 	dispArrow.Transparency = 0
 	Attack = false
 end
 
 --// Wrap it all up \\--
 
 Mouse.Button1Down:connect(function()
 	if(Attack)then return end
 	Shoot()
 end)
 
 Mouse.KeyDown:connect(function(k)
 	if(k == 'z')then
 		ArrowRain()
 	elseif(k == 'x')then
 		ShootFast()
 	elseif(k == ';')then
 		DoPenetration = not DoPenetration
 		warn("Penetrating arrows is "..tostring(DoPenetration))
 	end
 end)
 
 coroutine.wrap(function()
 	while true do
 		swait(5)
 		if(HyperCum)then
 				Effect{
 				Frames=30,
 				StartSize=V3.N(.25,.25,.25),
 				EndSize=V3.N(5,5,5),
 				Mesh='Tornado2',
 				CFrame=Torso.CFrame,
 				Color=C3.N(1,0,0),
 				RotInc={0,.5,0},
 			}
 		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 = 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-.1*M.C(Sine/wsVal),0+.2*M.C(Sine/wsVal))*CF.A(M.R(8-0*M.C(Sine/wsVal))+-M.S(Sine/wsVal)/1.5,0,0),.2)
 		LH.C1 = LH.C1:lerp(CF.N(0,1*PlayerSize+.1*M.C(Sine/wsVal),0-.2*M.C(Sine/wsVal))*CF.A(M.R(8+0*M.C(Sine/wsVal))+M.S(Sine/wsVal)/1.5,0,0),.2)
 	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(RJC0*CF.N(0,-.1+.05*M.C(Sine/18),0),Alpha)
 			NK.C0 = NK.C0:lerp(NKC0,Alpha)
 			LS.C0 = LS.C0:lerp(LSC0*CF.N(.5,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(5),M.R(25)),Alpha)
 			RS.C0 = RS.C0:lerp(RSC0*CF.N(-.3,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(-5),M.R(-35)),Alpha)
 			LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0-.05*M.C(Sine/18),0)*CF.A(0,0,M.R(-10)),Alpha)
 			RH.C0 = RH.C0:lerp(RHC0*CF.N(0,0-.05*M.C(Sine/18),-.2),Alpha)
 			HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,M.R(25)),Alpha)
 			DAW.C0 = DAW.C0:lerp(DWC0*CF.N(.5,0,0)*CF.A(M.R(-90),M.R(25),0),Alpha)
 			-- idle
 		elseif(State == 'Run')then
 			local wsVal = 7 / (Hum.WalkSpeed/16)
 			local Alpha = math.min(.2 * (Hum.WalkSpeed/16),1)
 			RJ.C0 = RJ.C0:lerp(CF.N(0,0-.1*M.C(Sine/(wsVal/2)),0)*CF.A(M.R(-15+2.5*M.C(Sine/(wsVal/2))),M.R(8*M.C(Sine/wsVal)),0),Alpha)
 			NK.C0 = NK.C0:lerp(NKC0,Alpha)
 			LS.C0 = LS.C0:lerp(LSC0*CF.N(.5,0+.1*M.C(Sine/(wsVal/2)),-.1)*CF.A(M.R(90),M.R(5),M.R(25)),Alpha)
 			RS.C0 = RS.C0:lerp(RSC0*CF.N(-.3,0+.1*M.C(Sine/(wsVal/2)),-.1)*CF.A(M.R(90),M.R(-5),M.R(-35)),Alpha)
 			LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0+.1*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+.1*M.C(Sine/(wsVal/2)),0)*CF.A(0,-M.R(4*M.C(Sine/wsVal)),0),Alpha)
 			HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,M.R(25)),Alpha)
 			DAW.C0 = DAW.C0:lerp(DWC0*CF.N(.5,0,0)*CF.A(M.R(-90),M.R(25),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(.5,0+.1*M.C(Sine/(wsVal/2)),-.1)*CF.A(M.R(90),M.R(5),M.R(25)),Alpha)
 			RS.C0 = RS.C0:lerp(RSC0*CF.N(-.3,0+.1*M.C(Sine/(wsVal/2)),-.1)*CF.A(M.R(90),M.R(-5),M.R(-35)),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)
 			HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,M.R(25)),Alpha)
 			DAW.C0 = DAW.C0:lerp(DWC0*CF.N(.5,0,0)*CF.A(M.R(-90),M.R(25),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.N(.5,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(5),M.R(25)),Alpha)
 			RS.C0 = RS.C0:lerp(RSC0*CF.N(-.3,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(-5),M.R(-35)),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)
 			HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,M.R(25)),Alpha)
 			DAW.C0 = DAW.C0:lerp(DWC0*CF.N(.5,0,0)*CF.A(M.R(-90),M.R(25),0),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.N(.5,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(5),M.R(25)),Alpha)
 			RS.C0 = RS.C0:lerp(RSC0*CF.N(-.3,0+.1*M.S(Sine/18),-.1)*CF.A(M.R(90),M.R(-5),M.R(-35)),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)
 			HW.C0 = HW.C0:lerp(HWC0*CF.A(0,0,M.R(25)),Alpha)
 			DAW.C0 = DAW.C0:lerp(DWC0*CF.N(.5,0,0)*CF.A(M.R(-90),M.R(25),0),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