Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Created by Nebula_Zorua --
- -- Heartbeat --
- -- Bwah. --
- -- Discord: Nebula the Zorua#6969
- -- Youtube: https://www.youtube.com/channel/UCo9oU9dCw8jnuVLuy4_SATA
- -- Original https://pastebin.com/raw/fReRRCNs
- -- Edit Houjou_Reisuke
- --// 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 = {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 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 Hearts = {}
- 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 \\--
- function Sound(parent,id,pitch,volume,looped,effect,autoPlay)
- 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
- 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(.2,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.Anchored = (anchored or true)
- part.CanCollide = cancollide or false
- return part
- 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
- function AOEKill(where,range)
- for _,v in next, getRegion(where,range,{Char}) do
- if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid')then
- Kill(v.Parent)
- end
- end
- 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)then
- local intensity = intense
- local cam = workspace.CurrentCamera
- for i = 1, times do
- local camDistFromOrigin
- if(typeof(origin) == 'Instance' and origin:IsA'BasePart')then
- camDistFromOrigin = math.floor( (cam.CFrame.p-origin.Position).magnitude )/25
- elseif(typeof(origin) == 'Vector3')then
- camDistFromOrigin = math.floor( (cam.CFrame.p-origin).magnitude )/25
- end
- if(camDistFromOrigin)then
- intensity = math.min(intense, math.floor(intense/camDistFromOrigin))
- end
- cam.CFrame = cam.CFrame:lerp(cam.CFrame*CFrame.new(math.random(-intensity,intensity)/100,math.random(-intensity,intensity)/100,math.random(-intensity,intensity)/100)*CFrame.Angles(math.rad(math.random(-intensity,intensity)/100),math.rad(math.random(-intensity,intensity)/100),math.rad(math.random(-intensity,intensity)/100)),.4)
- swait()
- 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 RunLocal(where,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.]]..where:GetFullName()
- )
- 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'Maroon'
- local MusicID = 1306847940
- local God = true
- local Muted = false
- local WalkSpeed = 8
- --// Weapon and GUI creation, and Character Customization \\--
- local BloodRainPart = NewInstance("Part",Char,{Transparency=1,Anchored=true,CanCollide=false,CFrame=CF.N(0,240,0),Size=V3.N(750,.05,750)})
- local Particles = NewInstance("ParticleEmitter",BloodRainPart,{
- Color=ColorSequence.new(C3.RGB(161,0,0)),
- LightEmission=0,
- LightInfluence=0,
- Size=NumberSequence.new(2),
- Texture="rbxassetid://419625073",
- Transparency=NumberSequence.new(0),
- Acceleration=V3.N(0,-workspace.Gravity,0),
- LockedToPart=true,
- Lifetime=NumberRange.new(10,15),
- Rate=math.huge,
- SpreadAngle=Vector2.new(1,1)
- })
- local Particles2 = Particles:Clone()
- Particles2.Parent= BloodRainPart
- local Skybox = NewInstance("Part",Effects,{Anchored=true,CanCollide=false,Size=V3.N(.05,.05,.05)})
- local SkyMesh = NewInstance("SpecialMesh",Skybox,{
- Scale=V3.N(-3000,-1000,-3000),
- VertexColor=V3.N(1,0,0),
- MeshId="http://www.roblox.com/asset/?id=1527559",
- TextureId="http://www.roblox.com/asset/?id=1529460"
- })
- --local h = workspace.Heart:Clone() local vis = Instance.new("Model",workspace) vis.Name = 'hearts' local countX = 0; for i = 1, 360,30 do local hrt = h:Clone(); hrt.Parent = vis; hrt.CFrame = CFrame.Angles(0,math.rad(i),0)*CFrame.new(0,0,-853) end
- for _, c in next, Char:GetDescendants() do
- if c and c.Parent then
- if c.Name == "Handle" and c.Parent.ClassName == "Accessory" then
- local ACCESSORY = c.Parent
- c.Parent = Char
- if c then
- if c:FindFirstChild("HatAttachment") or c:FindFirstChild("FaceFrontAttachment") or c:FindFirstChild("HairAttachment") then
- local weldd = IN("Weld")
- weldd.Part0 = Head
- weldd.Part1 = c
- weldd.C0 = CF.N()
- weldd.C1 = c.CFrame:inverse() * Head.CFrame
- weldd.Parent = Head
- else
- local weldd = IN("Weld")
- weldd.Part0 = Torso
- weldd.Part1 = c
- weldd.C0 = CF.N()
- weldd.C1 = c.CFrame:inverse() * Torso.CFrame
- weldd.Parent = Torso
- end
- end
- ACCESSORY:remove()
- elseif c.Parent.ClassName ~= "Accessory" and c.ClassName == "Part" and c.Name ~= "Eye" and c.Parent ~= Effects and c.Parent.Parent ~= Effects then
- c.Material = "Glass"
- c.Color = C3.N(.2,0,0)
- if c:FindFirstChildOfClass("SpecialMesh") and c ~= Skybox then
- c:FindFirstChildOfClass("SpecialMesh").TextureId = ""
- end
- if c == Head then
- if c:FindFirstChild("face") and Plr.Name ~= 'CKbackup' then
- c.face:remove()
- end
- end
- elseif c.ClassName == "Part" and c.Name == "Eye" then
- c.Color = C3.N(1,0,0)
- c.Material = "Glass"
- elseif c.Name == "Body Colors" then
- c:remove()
- elseif (c.ClassName == "Shirt" or c.ClassName == "Pants") then
- c:remove()
- end
- end
- end
- for i = 1, 360,30 do
- --local hrt = h:Clone(); hrt.Parent = vis; hrt.CFrame =
- local hrt = NewInstance("Part",Effects,{Name='Heart',Anchored=true,CanCollide=false,Color=C3.N(1,0,0),Size=V3.N(345,307,16),Locked=true,Archivable=false,CFrame=CF.A(0,M.R(i),M.R(180))*CF.N(0,0,-923)})
- local hrtMesh = NewInstance("SpecialMesh",hrt,{MeshId="rbxassetid://105992239",Offset=V3.N(0,0,-10),Scale=V3.N(-750,-750,-100)})
- table.insert(Hearts,{hrt,hrtMesh,i})
- end
- 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 LSC0 = LS.C0
- local RSC0 = RS.C0
- local NKC0 = NK.C0
- local LHC0 = LH.C0
- local RHC0 = RH.C0
- local RJC0 = RJ.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 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 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 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 FX = data.Effect or 'ResizeAndFade'
- local Parent = data.Parent or Effects
- local Color = data.Color or C3.N(.2,0,0)
- local Size = data.Size or V3.N(1,1,1)
- local MoveDir = data.MoveDirection or nil
- local MeshData = data.Mesh or nil
- local SndData = data.Sound or nil
- local Frames = data.Frames or 45
- local Manual = data.Manual or nil
- local Material = data.Material or nil
- local CFra = data.CFrame or Torso.CFrame
- local Settings = data.FXSettings or {}
- local Shape = data.Shape or Enum.PartType.Block
- local Snd,Prt,Msh;
- coroutine.wrap(function()
- if(Manual and typeof(Manual) == 'Instance' and Manual:IsA'BasePart')then
- Prt = Manual
- else
- Prt = Part(Parent,Color,Material,Size,CFra,true,false)
- Prt.Shape = Shape
- end
- if(typeof(MeshData) == 'table')then
- Msh = Mesh(Prt,MeshData.MeshType,MeshData.MeshId,MeshData.TextureId,MeshData.Scale,MeshData.Offset)
- elseif(typeof(MeshData) == 'Instance')then
- Msh = MeshData:Clone()
- Msh.Parent = Prt
- elseif(Shape == Enum.PartType.Block)then
- Msh = Mesh(Prt,Enum.MeshType.Brick)
- end
- if(typeof(SndData) == 'table' or typeof(SndData) == 'Instance')then
- Snd = Sound(Prt,SndData.SoundId,SndData.Pitch,SndData.Volume,false,false,true)
- end
- if(Snd)then
- repeat swait() until Snd.Playing and Snd.IsLoaded and Snd.TimeLength > 0
- Frames = Snd.TimeLength * Frame_Speed/Snd.Pitch
- end
- Size = (Msh and Msh.Scale or Size)
- local grow = Size-(Settings.EndSize or (Msh and Msh.Scale or Size)/2)
- local MoveSpeed = nil;
- if(MoveDir)then
- MoveSpeed = (CFra.p - MoveDir).magnitude/Frames
- end
- if(FX ~= 'Arc')then
- for Frame = 1, Frames do
- if(FX == "Fade")then
- Prt.Transparency = (Frame/Frames)
- elseif(FX == "Resize")then
- if(not Settings.EndSize)then
- Settings.EndSize = V3.N(0,0,0)
- end
- if(Settings.EndIsIncrement)then
- if(Msh)then
- Msh.Scale = Msh.Scale + Settings.EndSize
- else
- Prt.Size = Prt.Size + Settings.EndSize
- end
- else
- if(Msh)then
- Msh.Scale = Msh.Scale - grow/Frames
- else
- Prt.Size = Prt.Size - grow/Frames
- end
- end
- elseif(FX == "ResizeAndFade")then
- if(not Settings.EndSize)then
- Settings.EndSize = V3.N(0,0,0)
- end
- if(Settings.EndIsIncrement)then
- if(Msh)then
- Msh.Scale = Msh.Scale + Settings.EndSize
- else
- Prt.Size = Prt.Size + Settings.EndSize
- end
- else
- if(Msh)then
- Msh.Scale = Msh.Scale - grow/Frames
- else
- Prt.Size = Prt.Size - grow/Frames
- end
- end
- Prt.Transparency = (Frame/Frames)
- end
- if(Settings.RandomizeCFrame)then
- Prt.CFrame = Prt.CFrame * CF.A(M.RRNG(-360,360),M.RRNG(-360,360),M.RRNG(-360,360))
- end
- if(MoveDir and MoveSpeed)then
- local Orientation = Prt.Orientation
- Prt.CFrame = CF.N(Prt.Position,MoveDir)*CF.N(0,0,-MoveSpeed)
- Prt.Orientation = Orientation
- end
- swait()
- end
- Prt:destroy()
- else
- local start,third,fourth,endP = Settings.Start,Settings.Third,Settings.Fourth,Settings.End
- if(not Settings.End and Settings.Home)then endP = Settings.Home.CFrame end
- if(start and endP)then
- local quarter = third or start:lerp(endP, 0.25) * CF.N(M.RNG(-25,25),M.RNG(0,25),M.RNG(-25,25))
- local threequarter = fourth or start:lerp(endP, 0.75) * CF.N(M.RNG(-25,25),M.RNG(0,25),M.RNG(-25,25))
- for Frame = 0, 1, (Settings.Speed or 0.01) do
- if(Settings.Home)then
- endP = Settings.Home.CFrame
- end
- Prt.CFrame = Bezier(start, quarter, threequarter, endP, Frame)
- end
- if(Settings.RemoveOnGoal)then
- Prt:destroy()
- end
- else
- Prt:destroy()
- assert(start,"You need a start position!")
- assert(endP,"You need a start position!")
- end
- end
- end)()
- return Prt,Msh,Snd
- 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(who,minDam,maxDam,Knock,Type,critChance,critMult)
- if(who)then
- local hum = who:FindFirstChildOfClass'Humanoid'
- local Damage = M.RNG(minDam,maxDam)
- local canHit = true
- if(hum)then
- for _, p in pairs(Hit) do
- if p[1] == hum then
- if(time() - p[2] < 0.1) then
- canHit = false
- else
- Hit[_] = nil
- end
- end
- end
- if(canHit)then
- table.insert(Hit,{hum,time()})
- if(hum.Health >= math.huge)then
- who:BreakJoints()
- if(who:FindFirstChild'Head' and hum.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))), "INSTANT", 1.5, C3.N(1,0,0))
- end
- else
- local player = S.Players:GetPlayerFromCharacter(who)
- if(Type == "Fire")then
- --idk..
- else
- local c = Instance.new("ObjectValue",hum)
- c.Name = "creator"
- c.Value = Plr
- game:service'Debris':AddItem(c,0.35)
- if(M.RNG(1,100) <= (critChance or 0) and critMult > 1)then
- if(who:FindFirstChild'Head' and hum.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))), "[CRIT] "..Damage*(critMult or 2), 1.5, BrickColor.new'New Yeller'.Color)
- end
- hum.Health = hum.Health - Damage*(critMult or 2)
- else
- if(who:FindFirstChild'Head' and hum.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))), Damage, 1.5, DamageColor.Color)
- end
- hum.Health = hum.Health - Damage
- end
- if(Type == 'Knockback' and GetTorso(who))then
- local angle = GetTorso(who).Position - Root.Position + Vector3.new(0, 0, 0).unit
- local body = NewInstance('BodyVelocity',GetTorso(who),{
- P = 500,
- maxForce = V3.N(math.huge,0,math.huge),
- velocity = Root.CFrame.lookVector * Knock + Root.Velocity / 1.05
- })
- game:service'Debris':AddItem(body,.5)
- elseif(Type == "Electric")then
- if(M.RNG(1,100) >= critChance)then
- if(who:FindFirstChild'Head' and hum.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))), "[PARALYZED]", 1.5, BrickColor.new"New Yeller".Color)
- end
- local asd = hum.WalkSpeed/2
- hum.WalkSpeed = asd
- local paralyzed = true
- coroutine.wrap(function()
- while paralyzed do
- swait(25)
- if(M.RNG(1,25) == 1)then
- if(who:FindFirstChild'Head' and hum.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))), "[STATIC]", 1.5, BrickColor.new"New Yeller".Color)
- end
- hum.PlatformStand = true
- end
- end
- end)()
- delay(4, function()
- paralyzed = false
- hum.WalkSpeed = hum.WalkSpeed + asd
- end)
- end
- elseif(Type == 'Knockdown' and GetTorso(who))then
- local rek = GetTorso(who)
- hum.PlatformStand = true
- delay(1,function()
- hum.PlatformStand = false
- end)
- local angle = (GetTorso(who).Position - (Root.Position + Vector3.new(0, 0, 0))).unit
- local bodvol = NewInstance("BodyVelocity",rek,{
- velocity = angle * Knock,
- P = 5000,
- maxForce = Vector3.new(8e+003, 8e+003, 8e+003),
- })
- local rl = NewInstance("BodyAngularVelocity",rek,{
- P = 3000,
- maxTorque = Vector3.new(500000, 500000, 500000) * 50000000000000,
- angularvelocity = Vector3.new(math.random(-10, 10), math.random(-10, 10), math.random(-10, 10)),
- })
- game:GetService("Debris"):AddItem(bodvol, .5)
- game:GetService("Debris"):AddItem(rl, .5)
- end
- end
- end
- end
- end
- end
- end
- function Kill(chr)
- coroutine.wrap(function()
- chr:BreakJoints()
- if(GetTorso(chr))then GetTorso(chr):BreakJoints() end
- swait(1)
- for _,v in next, chr:children() do
- if(v:IsA'Clothing' or v:IsA'Accessory' or v:IsA'Humanoid' or v:IsA'Model' or v:IsA'CharacterMesh')then
- v:destroy()
- elseif(v:IsA'BasePart')then
- for _,c in next, v:children() do if(c:IsA'Decal')then c:destroy() end end
- v.Color = C3.N(0,0,0)
- v.Material = Enum.Material.Neon
- v.CanCollide = false
- local bld = Instance.new("ParticleEmitter",v) -- thanks nooby
- bld.LightEmission = .25
- bld.Texture = "rbxasset://textures/particles/fire_main.dds"
- bld.Color = ColorSequence.new(C3.N(1,0,0))
- bld.Rate = 150
- bld.Lifetime = NumberRange.new(1)
- bld.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,0.75,0),NumberSequenceKeypoint.new(1,0,0)})
- bld.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,0,0),NumberSequenceKeypoint.new(1,1,0)})
- bld.Speed = NumberRange.new(0,0)
- bld.VelocitySpread = 50000
- bld.Rotation = NumberRange.new(-500,500)
- bld.RotSpeed = NumberRange.new(-500,500)
- local rek = NewInstance("BodyVelocity",v,{maxForce=V3.N(math.huge,math.huge,math.huge),P=3000,Velocity=V3.N(M.RNG(-25,25),0,M.RNG(-25,25))})
- coroutine.wrap(function()
- for i = 0, 1.05, .05 do
- v.Transparency = i
- swait()
- end
- swait(Frame_Speed)
- rek:destroy()
- local rek = NewInstance("BodyVelocity",v,{maxForce=V3.N(math.huge,math.huge,math.huge),P=3000,Velocity=V3.N(M.RNG(-5,5),M.RNG(-5,5),M.RNG(-5,5))})
- bld.Enabled = false
- bld.Speed = NumberRange.new(5,10)
- bld.Acceleration = V3.N(0,10,0)
- S.Debris:AddItem(v,3)
- end)()
- end
- end
- end)()
- end
- function AOEDamage(where,range,minDam,maxDam,Knock,Type,critChance,critMult)
- for _,v in next, getRegion(where,range,{Char}) do
- if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid')then
- DealDamage(v.Parent,minDam,maxDam,Knock,Type,critChance,critMult)
- end
- end
- 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 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)then
- local intensity = intense
- local cam = workspace.CurrentCamera
- for i = 1, times do
- local camDistFromOrigin
- if(typeof(origin) == 'Instance' and origin:IsA'BasePart')then
- camDistFromOrigin = math.floor( (cam.CFrame.p-origin.Position).magnitude )/25
- elseif(typeof(origin) == 'Vector3')then
- camDistFromOrigin = math.floor( (cam.CFrame.p-origin).magnitude )/25
- end
- if(camDistFromOrigin)then
- intensity = math.min(intense, math.floor(intense/camDistFromOrigin))
- end
- cam.CFrame = cam.CFrame:lerp(cam.CFrame*CFrame.new(math.random(-intensity,intensity)/100,math.random(-intensity,intensity)/100,math.random(-intensity,intensity)/100)*CFrame.Angles(math.rad(math.random(-intensity,intensity)/100),math.rad(math.random(-intensity,intensity)/100),math.rad(math.random(-intensity,intensity)/100)),.4)
- swait()
- 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
- --// Attack Functions \--
- function Grab()
- Attack = true
- NeutralAnims = false
- WalkSpeed = 0
- local hit,pos,hummie;
- local Hook = Part(Effects,C3.N(),Enum.Material.Neon,V3.N(.05,.05,.05),Root.CFrame,true,false)
- Hook.Transparency = 1
- local A = NewInstance("Attachment",Hook)
- local B = NewInstance("Attachment",RArm,{Position=V3.N(0,-RArm.Size.Y/2,0)})
- local Chain = NewInstance("Beam",Hook,{Attachment0=A,Attachment1=B,Color=C3.RGB(1,0,0),FaceCamera=true,LightInfluence=0,Texture="rbxassetid://73042633",TextureLength=5,Transparency=NumberSequence.new(0),TextureSpeed=0,CurveSize0=0,CurveSize1=0,FaceCamera=true,Segments=10,Width0=1,Width1=1})
- for i = 0, 5, .1 do
- Hook.CFrame = Root.CFrame*CF.N(0,0,-i*6)
- Chain.TextureLength = Chain.TextureLength + .1
- for _,v in next, getRegion(Hook.Position,1,{Char}) do
- if(v.Parent and GetTorso(v.Parent) and v.Parent:FindFirstChildOfClass'Humanoid')then
- hit = GetTorso(v.Parent);
- hummie = v.Parent:FindFirstChildOfClass'Humanoid';
- break;
- end
- end
- local Alpha = .3
- RJ.C0 = RJ.C0:lerp(RJC0*CF.A(0,M.R(90),0),Alpha)
- NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
- LH.C0 = LH.C0:lerp(LHC0*CF.A(0,0,M.R(-15)),Alpha)
- RH.C0 = RH.C0:lerp(RHC0*CF.A(0,0,M.R(15)),Alpha)
- LS.C0 = LS.C0:lerp(LSC0*CF.A(0,0,M.R(-15)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.A(0,0,M.R(90)),Alpha)
- if(hit)then break end
- swait()
- end
- for i = 0, 3, .1 do
- Hook.CFrame = Hook.CFrame:lerp(RArm.CFrame*CF.N(0,0,-1),.2)
- if(hit)then hit.CFrame = Hook.CFrame; hit.Velocity = V3.N() Effect{
- Effect='ResizeAndFade',
- CFrame=CF.N(hit.CFrame.p)*CF.A(M.RRNG(0,360),M.RRNG(0,360),M.RRNG(0,360)),
- Mesh={Enum.MeshType.Sphere},
- Material = Enum.Material.Neon,
- Color=C3.N(1,0,0),
- Size=V3.N(2,5,2),
- FXSettings={
- EndSize=V3.N(0,.1,0),
- EndIsIncrement=true
- }
- }
- SoundPart(444667844,.5,5,false,true,true,hit.CFrame) end
- if((Hook.CFrame.p-RArm.CFrame.p).magnitude < 2)then
- break
- end
- Chain.TextureLength = 3
- local Alpha = .3
- RJ.C0 = RJ.C0:lerp(RJC0*CF.A(0,M.R(90),0),Alpha)
- NK.C0 = NK.C0:lerp(NKC0*CF.A(0,M.R(-90),0),Alpha)
- LH.C0 = LH.C0:lerp(LHC0*CF.A(0,0,M.R(-15)),Alpha)
- RH.C0 = RH.C0:lerp(RHC0*CF.A(0,0,M.R(15)),Alpha)
- LS.C0 = LS.C0:lerp(LSC0*CF.A(0,0,M.R(-15)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.A(0,0,M.R(90)),Alpha)
- swait()
- end
- if(hit) then
- Kill(hit.Parent)
- end
- Hook:destroy()
- WalkSpeed = 8
- Attack = false
- NeutralAnims = true
- end
- function Stompie()
- Attack = true
- NeutralAnims = false
- Hum.JumpPower = 0
- WalkSpeed = 2
- repeat swait()
- for i = 0, 2, .1 do
- local Alpha = .1
- RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1,0)*CF.A(M.R(25),0,0),Alpha)
- NK.C0 = NK.C0:lerp(NKC0,Alpha)
- LH.C0 = LH.C0:lerp(LHC0*CF.N(0,.75,-.5),Alpha)
- RH.C0 = RH.C0:lerp(RHC0*CF.A(M.R(-25),0,0),Alpha)
- LS.C0 = LS.C0:lerp(LSC0*CF.A(M.R(-25),0,M.R(-15)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.A(M.R(-25),0,M.R(15)),Alpha)
- swait()
- 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)
- repeat swait() 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) until hitfloor
- Sound(Root,438666141,1,7.5,false,true,true)
- AOEKill(Torso.CFrame.p,35)
- CamShakeAll(25,250,Torso.CFrame.p)
- Effect{
- CFrame=CF.N(posfloor)*CF.A(0,0,M.R(90)),
- Size=V3.N(.05,35,35),
- Color=BrickColor.new'Maroon',
- Mesh={MeshType=Enum.MeshType.Cylinder},
- FXSettings={
- EndIsIncrement=true,
- EndSize=V3.N(0,.01,.01)
- }
- }
- for i = 1, 15 do
- local cf =CF.N(posfloor)*CF.N(M.RNG(-15,15),0,M.RNG(-15,15))*CF.A(M.RRNG(-25,25),M.RRNG(-25,25),M.RRNG(-25,25))*CF.A(0,0,M.R(90))
- Effect{
- Effect='Fade',
- Size=V3.N(15,.25,.25),
- CFrame=cf,
- MoveDirection=cf*CF.N(15,0,0).p,
- Color=BrickColor.new'Really black',
- Mesh={MeshType=Enum.MeshType.Cylinder},
- }
- end
- for i = 0, 1, .1 do
- local Alpha = .3
- RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,-.1,0)*CF.A(M.R(-25),0,0),Alpha)
- NK.C0 = NK.C0:lerp(NKC0,Alpha)
- LH.C0 = LH.C0:lerp(LHC0*CF.N(0,0,-.5)*CF.A(M.R(25),0,0),Alpha)
- RH.C0 = RH.C0:lerp(RHC0*CF.A(M.R(25),0,0),Alpha)
- LS.C0 = LS.C0:lerp(LSC0*CF.A(M.R(-25),0,M.R(-15)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.A(M.R(-25),0,M.R(15)),Alpha)
- swait()
- end
- until not S.UserInputService:IsKeyDown(Enum.KeyCode.Z)
- WalkSpeed = 8
- Attack = false
- NeutralAnims = true
- end
- --// KeyDown, etc \\--
- Mouse.KeyDown:connect(function(k)
- if(Attack)then return end
- if(string.byte(k) == 50)then WalkSpeed = (WalkSpeed > 8 and 8 or 24) end
- if(k == 'c')then Grab() end
- if(k == 'z')then Stompie() end
- end)
- --// Wrap it all up \\--
- while true do
- swait()
- for _,v in next, Hearts do
- local part,mesh,count = v[1],v[2],v[3]
- v[3] = v[3] + .25
- part.CFrame = CF.A(0,M.R(count),M.R(180))*CF.N(0,0,-853)
- mesh.Scale = V3.N(-Music.PlaybackLoudness,-Music.PlaybackLoudness,-100)
- end
- Skybox.CFrame = Skybox.CFrame*CF.A(0,M.R(-.25),0)
- Particles.Acceleration = V3.N(0,-workspace.Gravity,0)
- Particles2.Acceleration = V3.N(0,-workspace.Gravity,0)
- Sine = Sine + Change
- if(not Music or not Music.Parent)then
- local tPos = 0
- pcall(function()tPos = Music.TimePosition; Music:destroy() end)
- Music = Sound(Char,MusicID,1,10,true,false,true)
- Music.Name = 'Music'
- Music.TimePosition = tPos
- end
- Music.SoundId = "rbxassetid://"..MusicID
- Music.Pitch = 1
- Music.Volume = 10
- 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 < 16 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 = 28 / (Hum.WalkSpeed/16)
- local Alpha = math.min(.2 * (Hum.WalkSpeed/16),1)
- Change = 3
- RH.C1 = RH.C1:lerp(CF.N(0,1,0)*CF.N(0,0-.2*M.C(Sine/wsVal),0+.4*M.C(Sine/wsVal))*CF.A(M.R(15+25*M.C(Sine/wsVal))+-M.S(Sine/wsVal),0,0),Alpha)
- LH.C1 = LH.C1:lerp(CF.N(0,1,0)*CF.N(0,0+.2*M.C(Sine/wsVal),0-.4*M.C(Sine/wsVal))*CF.A(M.R(15-25*M.C(Sine/wsVal))+M.S(Sine/wsVal),0,0),Alpha)
- elseif(State == 'Walk')then
- local wsVal = 7 / (Hum.WalkSpeed/8)
- local Alpha = math.min(.3 * (Hum.WalkSpeed/8),1)
- Change = .9
- RH.C1 = RH.C1:lerp(CF.N(0,1,0)*CF.N(0,0-.5*M.C(Sine/wsVal)/2,0+.6*M.C(Sine/wsVal)/2)*CF.A(M.R(15-2*M.C(Sine/wsVal))+-M.S(Sine/wsVal)/2.5,0,0),Alpha)
- LH.C1 = LH.C1:lerp(CF.N(0,1,0)*CF.N(0,0+.5*M.C(Sine/wsVal)/2,0-.6*M.C(Sine/wsVal)/2)*CF.A(M.R(15+2*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
- for _, c in next, Char:GetDescendants() do
- if c.ClassName == "Part" and c.Name ~= "Eye" and not Effects:IsAncestorOf(c) and c.Name ~= 'Heart' then
- c.Material = "Glass"
- c.Color = C3.N(.2,0,0)
- if c:FindFirstChildOfClass("SpecialMesh") and c ~= Skybox then
- c:FindFirstChildOfClass("SpecialMesh").TextureId = ""
- end
- if c == Head then
- if c:FindFirstChild("face") and Plr.Name ~= 'CKbackup' then
- c.face:remove()
- end
- end
- elseif c.ClassName == "Part" and c.Name == "Eye" then
- c.Color = C3.N(1,0,0)
- c.Material = "Glass"
- elseif c.Name == "Body Colors" then
- c:remove()
- elseif (c.ClassName == "Shirt" or c.ClassName == "Pants") and c.Name ~= "Cloth" then
- c:remove()
- end
- end
- if(NeutralAnims)then
- if(State == 'Idle')then
- local Alpha = .1
- Change = .75
- RJ.C0 = RJ.C0:lerp(RJC0*CF.N(0,.2*M.C(Sine/6),0)*CF.A(M.R(-5+5*M.C(Sine/12)),M.R(-10),0),Alpha)
- NK.C0 = NK.C0:lerp(NKC0*CF.A(M.R(-5+5*M.C(Sine/12)),0,0),Alpha)
- LS.C0 = LS.C0:lerp(LSC0*CF.A(0,0,M.R(-7-5*M.C(Sine/12))),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.A(0,0,M.R(7+5*M.C(Sine/12))),Alpha)
- LH.C0 = LH.C0:lerp(LHC0*CF.N(0,-.2*M.C(Sine/6),0)*CF.A(M.R(5-5*M.C(Sine/12)),M.R(10),0),Alpha)
- RH.C0 = RH.C0:lerp(RHC0*CF.N(0,-.2*M.C(Sine/6),0)*CF.A(M.R(5-5*M.C(Sine/12)),M.R(-10),0),Alpha)
- -- idle
- elseif(State == 'Run')then
- local wsVal = 28 / (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(0,0,0-.3*M.S(Sine/wsVal))*CF.A(M.R(0+45*M.S(Sine/wsVal)),0,M.R(-5)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0,0+.3*M.S(Sine/wsVal))*CF.A(M.R(0-45*M.S(Sine/wsVal)),0,M.R(5)),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)
- elseif(State == 'Walk')then
- local wsVal = 7 / (Hum.WalkSpeed/8)
- local Alpha = math.min(.3 * (Hum.WalkSpeed/8),1)
- RJ.C0 = RJ.C0:lerp(CF.N(0,0-.1*M.C(Sine/(wsVal/2)),0)*CF.A(M.R(-5-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(0,0,-.1*M.C(Sine/wsVal))*CF.A(M.R(37*M.C(Sine/wsVal)),0,M.R(-5)),Alpha)
- RS.C0 = RS.C0:lerp(RSC0*CF.N(0,0,.1*M.C(Sine/wsVal))*CF.A(M.R(-37*M.C(Sine/wsVal)),0,M.R(5)),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)
- 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
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement