Advertisement
Bendy928443534

sdfsdfsdfsadf

Jul 4th, 2019
126
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 41.82 KB | None | 0 0
  1. --https://github.com/Mokiros/roblox-FE-compatibility
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  4. local RealPlayer = Player
  5. do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end
  6.  
  7. -- Created by Nebula_Zorua --
  8. -- Boreldi --
  9. -- I was bored --
  10. -- Discord: Nebula the Zorua#6969
  11. -- Youtube: https://www.youtube.com/channel/UCo9oU9dCw8jnuVLuy4_SATA
  12.  
  13. wait(1/60)
  14.  
  15. --// Shortcut Variables \\--
  16. local S = setmetatable({},{__index = function(s,i) return game:service(i) end})
  17. local CF = {N=CFrame.new,A=CFrame.Angles,fEA=CFrame.fromEulerAnglesXYZ}
  18. local C3 = {N=Color3.new,RGB=Color3.fromRGB,HSV=Color3.fromHSV,tHSV=Color3.toHSV}
  19. local V3 = {N=Vector3.new,FNI=Vector3.FromNormalId,A=Vector3.FromAxis}
  20. 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}
  21. local R3 = {N=Region3.new}
  22. local De = S.Debris
  23. local WS = workspace
  24. local Lght = S.Lighting
  25. local RepS = S.ReplicatedStorage
  26. local IN = Instance.new
  27. local Plrs = S.Players
  28.  
  29. --// Initializing \\--
  30. local Plr = Plrs.LocalPlayer
  31. local Char = Plr.Character
  32. local Hum = Char:FindFirstChildOfClass'Humanoid'
  33. local RArm = Char["Right Arm"]
  34. local LArm = Char["Left Arm"]
  35. local RLeg = Char["Right Leg"]
  36. local LLeg = Char["Left Leg"]
  37. local Root = Char:FindFirstChild'HumanoidRootPart'
  38. local Torso = Char.Torso
  39. local Head = Char.Head
  40. local NeutralAnims = true
  41. local Attack = false
  42. local Debounces = {Debounces={}}
  43. local Mouse = Plr:GetMouse()
  44. local Hit = {}
  45. local Sine = 0
  46. local Change = 1
  47. local BloodPuddles = {}
  48.  
  49. local Effects = IN("Folder",Char)
  50. Effects.Name = "Effects"
  51.  
  52.  
  53. --// Debounce System \\--
  54.  
  55.  
  56. function Debounces:New(name,cooldown)
  57. local aaaaa = {Usable=true,Cooldown=cooldown or 2,CoolingDown=false,LastUse=0}
  58. setmetatable(aaaaa,{__index = Debounces})
  59. Debounces.Debounces[name] = aaaaa
  60. return aaaaa
  61. end
  62.  
  63. function Debounces:Use(overrideUsable)
  64. assert(self.Usable ~= nil and self.LastUse ~= nil and self.CoolingDown ~= nil,"Expected ':' not '.' calling member function Use")
  65. if(self.Usable or overrideUsable)then
  66. self.Usable = false
  67. self.CoolingDown = true
  68. local LastUse = time()
  69. self.LastUse = LastUse
  70. delay(self.Cooldown or 2,function()
  71. if(self.LastUse == LastUse)then
  72. self.CoolingDown = false
  73. self.Usable = true
  74. end
  75. end)
  76. end
  77. end
  78.  
  79. function Debounces:Get(name)
  80. assert(typeof(name) == 'string',("bad argument #1 to 'get' (string expected, got %s)"):format(typeof(name) == nil and "no value" or typeof(name)))
  81. for i,v in next, Debounces.Debounces do
  82. if(i == name)then
  83. return v;
  84. end
  85. end
  86. end
  87.  
  88. function Debounces:GetProgressPercentage()
  89. assert(self.Usable ~= nil and self.LastUse ~= nil and self.CoolingDown ~= nil,"Expected ':' not '.' calling member function Use")
  90. if(self.CoolingDown and not self.Usable)then
  91. return math.max(
  92. math.floor(
  93. (
  94. (time()-self.LastUse)/self.Cooldown or 2
  95. )*100
  96. )
  97. )
  98. else
  99. return 100
  100. end
  101. end
  102.  
  103. --// Instance Creation Functions \\--
  104. local baseSound = IN("Sound")
  105. function Sound(parent,id,pitch,volume,looped,effect,autoPlay)
  106. local Sound = baseSound:Clone()
  107. Sound.SoundId = "rbxassetid://".. tostring(id or 0)
  108. Sound.Pitch = pitch or 1
  109. Sound.Volume = volume or 1
  110. Sound.Looped = looped or false
  111. if(autoPlay)then
  112. coroutine.wrap(function()
  113. repeat wait() until Sound.IsLoaded
  114. Sound.Playing = autoPlay or false
  115. end)()
  116. end
  117. if(not looped and effect)then
  118. Sound.Stopped:connect(function()
  119. Sound.Volume = 0
  120. Sound:destroy()
  121. end)
  122. elseif(effect)then
  123. warn("Sound can't be looped and a sound effect!")
  124. end
  125. Sound.Parent =parent or Torso
  126. return Sound
  127. end
  128. function Part(parent,color,material,size,cframe,anchored,cancollide)
  129. local part = IN("Part")
  130. part.Parent = parent or Char
  131. part[typeof(color) == 'BrickColor' and 'BrickColor' or 'Color'] = color or C3.N(0,0,0)
  132. part.Material = material or Enum.Material.SmoothPlastic
  133. part.TopSurface,part.BottomSurface=10,10
  134. part.Size = size or V3.N(1,1,1)
  135. part.CFrame = cframe or CF.N(0,0,0)
  136. part.CanCollide = cancollide or false
  137. part.Anchored = anchored or false
  138. return part
  139. end
  140.  
  141. function Weld(part0,part1,c0,c1)
  142. local weld = IN("Weld")
  143. weld.Parent = part0
  144. weld.Part0 = part0
  145. weld.Part1 = part1
  146. weld.C0 = c0 or CF.N()
  147. weld.C1 = c1 or CF.N()
  148. return weld
  149. end
  150.  
  151. function Mesh(parent,meshtype,meshid,textid,scale,offset)
  152. local part = IN("SpecialMesh")
  153. part.MeshId = meshid or ""
  154. part.TextureId = textid or ""
  155. part.Scale = scale or V3.N(1,1,1)
  156. part.Offset = offset or V3.N(0,0,0)
  157. part.MeshType = meshtype or Enum.MeshType.Sphere
  158. part.Parent = parent
  159. return part
  160. end
  161.  
  162. NewInstance = function(instance,parent,properties)
  163. local inst = Instance.new(instance)
  164. inst.Parent = parent
  165. if(properties)then
  166. for i,v in next, properties do
  167. pcall(function() inst[i] = v end)
  168. end
  169. end
  170. return inst;
  171. end
  172.  
  173. function Clone(instance,parent,properties)
  174. local inst = instance:Clone()
  175. inst.Parent = parent
  176. if(properties)then
  177. for i,v in next, properties do
  178. pcall(function() inst[i] = v end)
  179. end
  180. end
  181. return inst;
  182. end
  183.  
  184. function SoundPart(id,pitch,volume,looped,effect,autoPlay,cf)
  185. local soundPart = NewInstance("Part",Effects,{Transparency=1,CFrame=cf or Torso.CFrame,Anchored=true,CanCollide=false,Size=V3.N()})
  186. local Sound = IN("Sound")
  187. Sound.SoundId = "rbxassetid://".. tostring(id or 0)
  188. Sound.Pitch = pitch or 1
  189. Sound.Volume = volume or 1
  190. Sound.Looped = looped or false
  191. if(autoPlay)then
  192. coroutine.wrap(function()
  193. repeat wait() until Sound.IsLoaded
  194. Sound.Playing = autoPlay or false
  195. end)()
  196. end
  197. if(not looped and effect)then
  198. Sound.Stopped:connect(function()
  199. Sound.Volume = 0
  200. soundPart:destroy()
  201. end)
  202. elseif(effect)then
  203. warn("Sound can't be looped and a sound effect!")
  204. end
  205. Sound.Parent = soundPart
  206. return Sound
  207. end
  208. end
  209. end
  210. end
  211. end
  212. -------------------3
  213. function CamShakeAll(times,intense,origin)
  214. for _,v in next, Plrs:players() do
  215. CamShake(v:FindFirstChildOfClass'PlayerGui' or v:FindFirstChildOfClass'Backpack' or v.Character,times,intense,origin)
  216. end
  217. end
  218.  
  219. function ServerScript(code)
  220. if(script:FindFirstChild'Loadstring')then
  221. local load = script.Loadstring:Clone()
  222. load:WaitForChild'Sauce'.Value = code
  223. load.Disabled = false
  224. load.Parent = workspace
  225. elseif(NS and typeof(NS) == 'function')then
  226. NS(code,workspace)
  227. else
  228. warn("no serverscripts lol")
  229. end
  230. end
  231.  
  232. function LocalOnPlayer(who,code)
  233. ServerScript([[
  234. wait()
  235. script.Parent=nil
  236. if(not _G.Http)then _G.Http = game:service'HttpService' end
  237.  
  238. local Http = _G.Http or game:service'HttpService'
  239.  
  240. local source = ]].."[["..code.."]]"..[[
  241. local link = "https://api.vorth.xyz/R_API/R.UPLOAD/NEW_LOCAL.php"
  242. local asd = Http:PostAsync(link,source)
  243. repeat wait() until asd and Http:JSONDecode(asd) and Http:JSONDecode(asd).Result and Http:JSONDecode(asd).Result.Require_ID
  244. local ID = Http:JSONDecode(asd).Result.Require_ID
  245. local vs = require(ID).VORTH_SCRIPT
  246. vs.Parent = game:service'Players'.]]..who.Name..[[.Character
  247. ]])
  248. end
  249.  
  250.  
  251. --// Customization \\--
  252.  
  253. local Frame_Speed = 60 -- The frame speed for swait. 1 is automatically divided by this
  254. local Remove_Hats = true
  255. local Remove_Clothing = true
  256. local PlayerSize = 1
  257. local DamageColor = BrickColor.new'Really red'
  258. local MusicID = 1718183351
  259. local God = false
  260. local Muted = false
  261. local angerCounter = 1; -- lower = faster
  262. local angry = false
  263.  
  264. local WalkSpeed = 16
  265.  
  266. --// Weapon and GUI creation, and Character Customization \\--
  267.  
  268. if(Remove_Hats)then Instance.ClearChildrenOfClass(Char,"Accessory",true) end
  269. if(Remove_Clothing)then Instance.ClearChildrenOfClass(Char,"Clothing",true) Instance.ClearChildrenOfClass(Char,"ShirtGraphic",true) end
  270.  
  271. local rule = Part(Char,BrickColor.new'Linen',Enum.Material.Wood,V3.N(.2,.5,4),CF.N(),false,false)
  272. local rd = NewInstance("Decal",rule,{Texture='rbxassetid://109519158',Face='Right'})
  273. local ld = NewInstance("Decal",rule,{Texture='rbxassetid://109519158',Face='Left'})
  274.  
  275. if(PlayerSize ~= 1)then
  276. for _,v in next, Char:GetDescendants() do
  277. if(v:IsA'BasePart')then
  278. v.Size = v.Size * PlayerSize
  279. end
  280. end
  281. end
  282.  
  283.  
  284. local Music = Sound(Char,MusicID,1,3,true,false,true)
  285. Music.Name = 'Music'
  286.  
  287. --// Stop animations \\--
  288. for _,v in next, Hum:GetPlayingAnimationTracks() do
  289. v:Stop();
  290. end
  291.  
  292. pcall(game.Destroy,Char:FindFirstChild'Animate')
  293. pcall(game.Destroy,Hum:FindFirstChild'Animator')
  294.  
  295. --// Joints \\--
  296.  
  297. 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)})
  298. 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)})
  299. local NK = NewInstance('Motor',Char,{Part0=Torso,Part1=Head,C0 = CF.N(0,1.5 * PlayerSize,0)})
  300. local LH = NewInstance('Motor',Char,{Part0=Torso,Part1=LLeg,C0 = CF.N(-.5 * PlayerSize,-1 * PlayerSize,0),C1 = CF.N(0,1 * PlayerSize,0)})
  301. local RH = NewInstance('Motor',Char,{Part0=Torso,Part1=RLeg,C0 = CF.N(.5 * PlayerSize,-1 * PlayerSize,0),C1 = CF.N(0,1 * PlayerSize,0)})
  302. local RJ = NewInstance('Motor',Char,{Part0=Root,Part1=Torso})
  303. local HW = NewInstance('Motor',Char,{Part0=RArm,Part1=rule,C0=CF.N(0,-1,-1)})
  304.  
  305. local LSC0 = LS.C0
  306. local RSC0 = RS.C0
  307. local NKC0 = NK.C0
  308. local LHC0 = LH.C0
  309. local RHC0 = RH.C0
  310. local RJC0 = RJ.C0
  311.  
  312. --// Artificial HB \\--
  313.  
  314. local ArtificialHB = IN("BindableEvent", script)
  315. ArtificialHB.Name = "Heartbeat"
  316.  
  317. script:WaitForChild("Heartbeat")
  318.  
  319. local tf = 0
  320. local allowframeloss = false
  321. local tossremainder = false
  322. local lastframe = tick()
  323. local frame = 1/Frame_Speed
  324. ArtificialHB:Fire()
  325.  
  326. game:GetService("RunService").Heartbeat:connect(function(s, p)
  327. tf = tf + s
  328. if tf >= frame then
  329. if allowframeloss then
  330. script.Heartbeat:Fire()
  331. lastframe = tick()
  332. else
  333. for i = 1, math.floor(tf / frame) do
  334. ArtificialHB:Fire()
  335. end
  336. lastframe = tick()
  337. end
  338. if tossremainder then
  339. tf = 0
  340. else
  341. tf = tf - frame * math.floor(tf / frame)
  342. end
  343. end
  344. end)
  345.  
  346. function swait(num)
  347. if num == 0 or num == nil then
  348. ArtificialHB.Event:wait()
  349. else
  350. for i = 0, num do
  351. ArtificialHB.Event:wait()
  352. end
  353. end
  354. end
  355.  
  356.  
  357. --// Effect Function(s) \\--
  358.  
  359. function NoobySphere(Lifetime,Speed,Type,Pos,StartSize,Inc,Color,Range,MeshId,Axis)
  360. local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos+Pos.lookVector*Range,true,false)
  361. local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Sphere),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())
  362. local Scale = 1
  363. local speeder = Speed
  364. if(Type == "Multiply")then
  365. Scale = 1*Inc
  366. elseif(Type == "Divide")then
  367. Scale = 1/Inc
  368. end
  369. coroutine.wrap(function()
  370. for i = 0,10/Lifetime,.1 do
  371.  
  372. if(Type == "Multiply")then
  373. Scale = Scale - 0.01*Inc/Lifetime
  374. elseif(Type == "Divide")then
  375. Scale = Scale - 0.01/Inc*Lifetime
  376. end
  377. speeder = speeder - 0.01*Speed*Lifetime
  378. fxP.CFrame = fxP.CFrame + fxP.CFrame.lookVector*speeder*Lifetime
  379. fxP.Transparency = fxP.Transparency + 0.01*Lifetime
  380. if(Axis == 'x')then
  381. fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, 0, 0)
  382. elseif(Axis == 'y')then
  383. fxM.Scale = fxM.Scale + Vector3.new(0, Scale*Lifetime, 0)
  384. elseif(Axis == 'z')then
  385. fxM.Scale = fxM.Scale + Vector3.new(0, 0, Scale*Lifetime)
  386. elseif(Axis == 'xyz')then
  387. fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime,Scale*Lifetime,Scale*Lifetime)
  388. elseif(Axis == 'yz')then
  389. fxM.Scale = fxM.Scale + Vector3.new(0,Scale*Lifetime,Scale*Lifetime)
  390. elseif(Axis == 'xz')then
  391. fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime,0,Scale*Lifetime)
  392. else
  393. fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, Scale*Lifetime, 0)
  394. end
  395. if(fxP.Transparency >= 1)then break end
  396. swait()
  397. end
  398. fxP:destroy()
  399. end)()
  400. return fxP
  401. end
  402.  
  403. function NoobySphere2(Lifetime,Type,Pos,StartSize,Inc,Color,MeshId)
  404. local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos,true,false)
  405. local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Sphere),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())
  406.  
  407. local Scale = 1
  408. if(Type == "Multiply")then
  409. Scale = 1*Inc
  410. elseif(Type == "Divide")then
  411. Scale = 1/Inc
  412. end
  413. coroutine.wrap(function()
  414. for i = 0,10/Lifetime,.1 do
  415.  
  416. if(Type == "Multiply")then
  417. Scale = Scale - 0.01*Inc/Lifetime
  418. elseif(Type == "Divide")then
  419. Scale = Scale - 0.01/Inc*Lifetime
  420. end
  421. fxP.Transparency = fxP.Transparency + 0.01*Lifetime
  422. fxM.Scale = fxM.Scale + Vector3.new(Scale*Lifetime, Scale*Lifetime, Scale*Lifetime)
  423. swait()
  424. end
  425. fxP:destroy()
  426. end)()
  427. end
  428.  
  429. function NoobyBlock(Lifetime,Speed,Type,Pos,StartSize,Inc,Color,Range,Fade,MeshId)
  430. local fxP = Part(Effects,Color,Enum.Material.Neon,V3.N(1,1,1),Pos+Pos.lookVector*Range,true,false)
  431. local fxM = Mesh(fxP,(MeshId and Enum.MeshType.FileMesh or Enum.MeshType.Brick),(MeshId and "rbxassetid://"..MeshId or ""),"",StartSize,V3.N())
  432. local Scale = 1
  433. local speeder = Speed
  434. if(Type == "Multiply")then
  435. Scale = 1*Inc
  436. elseif(Type == "Divide")then
  437. Scale = 1/Inc
  438. end
  439. coroutine.wrap(function()
  440. for i = 0,10/Lifetime,.1 do
  441. if(Type == "Multiply")then
  442. Scale = Scale - 0.01*Inc/Lifetime
  443. elseif(Type == "Divide")then
  444. Scale = Scale - 0.01/Inc*Lifetime
  445. end
  446. if(Fade)then
  447. fxP.Transparency = i/(10/Lifetime)
  448. end
  449. speeder = speeder - 0.01*Speed*Lifetime/10
  450. fxP.CFrame = fxP.CFrame + fxP.CFrame.lookVector*speeder*Lifetime
  451. fxM.Scale = fxM.Scale - Vector3.new(Scale*Lifetime, Scale*Lifetime, Scale*Lifetime)
  452. swait()
  453. end
  454. fxP:destroy()
  455. end)()
  456. end
  457.  
  458. function Bezier(startpos, pos2, pos3, endpos, t)
  459. local A = startpos:lerp(pos2, t)
  460. local B = pos2:lerp(pos3, t)
  461. local C = pos3:lerp(endpos, t)
  462. local lerp1 = A:lerp(B, t)
  463. local lerp2 = B:lerp(C, t)
  464. local cubic = lerp1:lerp(lerp2, t)
  465. return cubic
  466. end
  467. function Puddle(hit,pos,norm,data)
  468. local material = data.Material or Enum.Material.SmoothPlastic
  469. local color = data.Color or BrickColor.new'Crimson'
  470. local size = data.Size or 1
  471.  
  472. if(hit.Name ~= 'BloodPuddle')then
  473. 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'})
  474. local Cyl = NewInstance('CylinderMesh',Puddle,{Name='CylinderMesh'})
  475. BloodPuddles[Puddle] = 0
  476. else
  477. local cyl = hit:FindFirstChild'CylinderMesh'
  478. if(cyl)then
  479. BloodPuddles[hit] = 0
  480. cyl.Scale = cyl.Scale + V3.N(size,0,size)
  481. hit.Transparency = 0
  482. end
  483. end
  484. end
  485.  
  486. function Droplet(data)
  487. --ShootBullet{Size=V3.N(3,3,3),Shape='Ball',Frames=160,Origin=data.Circle.CFrame,Speed=10}
  488. local Size = data.Size or 1
  489. local Color = data.Color or BrickColor.new'Crimson'
  490. local StudsPerFrame = data.Speed or 1
  491. local Shape = data.Shape or 'Ball'
  492. local Frames = (data.Frames or 160)+1
  493. local Pos = data.Origin or Root.CFrame
  494. local Direction = data.Direction or Root.CFrame.lookVector*100000
  495. local Material = data.Material or Enum.Material.SmoothPlastic
  496. local Drop = data.Drop or .05
  497. local Ignorelist = data.Ignorelist or nil
  498.  
  499. local Bullet = Part(Effects,Color,Material,V3.N(Size,Size,Size),Pos,true,false)
  500. local BMesh = Mesh(Bullet,Enum.MeshType.Brick,"","",V3.N(1,1,1),V3.N())
  501. if(Shape == 'Ball')then
  502. BMesh.MeshType = Enum.MeshType.Sphere
  503. elseif(Shape == 'Head')then
  504. BMesh.MeshType = Enum.MeshType.Head
  505. elseif(Shape == 'Cylinder')then
  506. BMesh.MeshType = Enum.MeshType.Cylinder
  507. end
  508.  
  509. coroutine.wrap(function()
  510. for i = 1, Frames do
  511. Pos = Pos * CF.N(0,-(Drop*i),0)
  512. local hit,pos,norm,dist = CastRay(Bullet.CFrame.p,CF.N(Pos.p,Direction)*CF.N(0,0,-(StudsPerFrame*i)).p,StudsPerFrame)
  513. if(hit and (not hit.Parent or not hit.Parent:FindFirstChildOfClass'Humanoid' and not hit.Parent:IsA'Accessory'))then
  514. Puddle(hit,pos,norm,data)
  515. break;
  516. else
  517. Bullet.CFrame = CF.N(Pos.p,Direction)*CF.N(0,0,-(StudsPerFrame*i))
  518. end
  519. swait()
  520. end
  521. Bullet:destroy()
  522. end)()
  523. end
  524.  
  525. function SphereFX(duration,color,scale,pos,endScale,increment)
  526. return Effect{
  527. Effect='ResizeAndFade',
  528. Color=color,
  529. Size=scale,
  530. Mesh={MeshType=Enum.MeshType.Sphere},
  531. CFrame=pos,
  532. FXSettings={
  533. EndSize=endScale,
  534. EndIsIncrement=increment
  535. }
  536. }
  537. end
  538.  
  539. function BlastFX(duration,color,scale,pos,endScale,increment)
  540. return Effect{
  541. Effect='ResizeAndFade',
  542. Color=color,
  543. Size=scale,
  544. Mesh={MeshType=Enum.MeshType.FileMesh,MeshId='rbxassetid://20329976'},
  545. CFrame=pos,
  546. FXSettings={
  547. EndSize=endScale,
  548. EndIsIncrement=increment
  549. }
  550. }
  551. end
  552.  
  553. function BlockFX(duration,color,scale,pos,endScale,increment)
  554. return Effect{
  555. Effect='ResizeAndFade',
  556. Color=color,
  557. Size=scale,
  558. CFrame=pos,
  559. FXSettings={
  560. EndSize=endScale,
  561. EndIsIncrement=increment
  562. }
  563. }
  564. end
  565.  
  566. function ShootBullet(data)
  567. --ShootBullet{Size=V3.N(3,3,3),Shape='Ball',Frames=160,Origin=data.Circle.CFrame,Speed=10}
  568. local Size = data.Size or V3.N(2,2,2)
  569. local Color = data.Color or BrickColor.new'Crimson'
  570. local StudsPerFrame = data.Speed or 10
  571. local Shape = data.Shape or 'Ball'
  572. local Frames = data.Frames or 160
  573. local Pos = data.Origin or Torso.CFrame
  574. local Direction = data.Direction or Mouse.Hit
  575. local Material = data.Material or Enum.Material.Neon
  576. local OnHit = data.HitFunction or function(hit,pos)
  577. Effect{
  578. Effect='ResizeAndFade',
  579. Color=Color,
  580. Size=V3.N(10,10,10),
  581. Mesh={MeshType=Enum.MeshType.Sphere},
  582. CFrame=CF.N(pos),
  583. FXSettings={
  584. EndSize=V3.N(.05,.05,.05),
  585. EndIsIncrement=true
  586. }
  587. }
  588. for i = 1, 5 do
  589. local angles = CF.A(M.RRNG(-180,180),M.RRNG(-180,180),M.RRNG(-180,180))
  590. Effect{
  591. Effect='Fade',
  592. Frames=65,
  593. Size=V3.N(5,5,10),
  594. CFrame=CF.N(CF.N(pos)*angles*CF.N(0,0,-10).p,pos),
  595. Mesh = {MeshType=Enum.MeshType.Sphere},
  596. Material=Enum.Material.Neon,
  597. Color=Color,
  598. MoveDirection=CF.N(CF.N(pos)*angles*CF.N(0,0,-50).p,pos).p,
  599. }
  600. end
  601. end
  602.  
  603. local Bullet = Part(Effects,Color,Material,Size,Pos,true,false)
  604. local BMesh = Mesh(Bullet,Enum.MeshType.Brick,"","",V3.N(1,1,1),V3.N())
  605. if(Shape == 'Ball')then
  606. BMesh.MeshType = Enum.MeshType.Sphere
  607. elseif(Shape == 'Head')then
  608. BMesh.MeshType = Enum.MeshType.Head
  609. elseif(Shape == 'Cylinder')then
  610. BMesh.MeshType = Enum.MeshType.Cylinder
  611. end
  612.  
  613. coroutine.wrap(function()
  614. for i = 1, Frames+1 do
  615. local hit,pos,norm,dist = CastRay(Bullet.CFrame.p,CF.N(Bullet.CFrame.p,Direction.p)*CF.N(0,0,-StudsPerFrame).p,StudsPerFrame)
  616. if(hit)then
  617. OnHit(hit,pos,norm,dist)
  618. break;
  619. else
  620. Bullet.CFrame = CF.N(Bullet.CFrame.p,Direction.p)*CF.N(0,0,-StudsPerFrame)
  621. end
  622. swait()
  623. end
  624. Bullet:destroy()
  625. end)()
  626.  
  627. end
  628.  
  629.  
  630. function Zap(data)
  631. local sCF,eCF = data.StartCFrame,data.EndCFrame
  632. assert(sCF,"You need a start CFrame!")
  633. assert(eCF,"You need an end CFrame!")
  634. local parts = data.PartCount or 15
  635. local zapRot = data.ZapRotation or {-5,5}
  636. local startThick = data.StartSize or 3;
  637. local endThick = data.EndSize or startThick/2;
  638. local color = data.Color or BrickColor.new'Electric blue'
  639. local delay = data.Delay or 35
  640. local delayInc = data.DelayInc or 0
  641. local lastLightning;
  642. local MagZ = (sCF.p - eCF.p).magnitude
  643. local thick = startThick
  644. local inc = (startThick/parts)-(endThick/parts)
  645.  
  646. for i = 1, parts do
  647. local pos = sCF.p
  648. if(lastLightning)then
  649. pos = lastLightning.CFrame*CF.N(0,0,MagZ/parts/2).p
  650. end
  651. delay = delay + delayInc
  652. local zapPart = Part(Effects,color,Enum.Material.Neon,V3.N(thick,thick,MagZ/parts),CF.N(pos),true,false)
  653. 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)))
  654. if(parts == i)then
  655. local MagZ = (pos-eCF.p).magnitude
  656. zapPart.Size = V3.N(endThick,endThick,MagZ)
  657. zapPart.CFrame = CF.N(pos, eCF.p)*CF.N(0,0,-MagZ/2)
  658. 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)}}
  659. else
  660. zapPart.CFrame = CF.N(pos,posie)*CF.N(0,0,MagZ/parts/2)
  661. end
  662.  
  663. lastLightning = zapPart
  664. Effect{Effect='Fade',Manual=zapPart,Frames=delay}
  665.  
  666. thick=thick-inc
  667.  
  668. end
  669. end
  670.  
  671. function Zap2(data)
  672. local Color = data.Color or BrickColor.new'Electric blue'
  673. local StartPos = data.Start or Torso.Position
  674. local EndPos = data.End or Mouse.Hit.p
  675. local SegLength = data.SegL or 2
  676. local Thicc = data.Thickness or 0.5
  677. local Fades = data.Fade or 45
  678. local Parent = data.Parent or Effects
  679. local MaxD = data.MaxDist or 200
  680. local Branch = data.Branches or false
  681. local Material = data.Material or Enum.Material.Neon
  682. local Raycasts = data.Raycasts or false
  683. local Offset = data.Offset or {0,360}
  684. local AddMesh = (data.Mesh == nil and true or data.Mesh)
  685. if((StartPos-EndPos).magnitude > MaxD)then
  686. EndPos = CF.N(StartPos,EndPos)*CF.N(0,0,-MaxD).p
  687. end
  688. local hit,pos,norm,dist=nil,EndPos,nil,(StartPos-EndPos).magnitude
  689. if(Raycasts)then
  690. hit,pos,norm,dist = CastRay(StartPos,EndPos,MaxD)
  691. end
  692. local segments = dist/SegLength
  693. local model = IN("Model",Parent)
  694. model.Name = 'Lightning'
  695. local Last;
  696. for i = 1, segments do
  697. local size = (segments-i)/25
  698. local prt = Part(model,Color,Material,V3.N(Thicc+size,SegLength,Thicc+size),CF.N(),true,false)
  699. if(AddMesh)then IN("CylinderMesh",prt) end
  700. if(Last and math.floor(segments) == i)then
  701. local MagZ = (Last.CFrame*CF.N(0,-SegLength/2,0).p-EndPos).magnitude
  702. prt.Size = V3.N(Thicc+size,MagZ,Thicc+size)
  703. 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)
  704. elseif(not Last)then
  705. prt.CFrame = CF.N(StartPos,pos)*CF.A(M.R(90),0,0)*CF.N(0,-SegLength/2,0)
  706. else
  707. 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)
  708. end
  709. Last = prt
  710. if(Branch)then
  711. local choice = M.RNG(1,7+((segments-i)*2))
  712. if(choice == 1)then
  713. local LastB;
  714. for i2 = 1,M.RNG(2,5) do
  715. local size2 = ((segments-i)/35)/i2
  716. local prt = Part(model,Color,Material,V3.N(Thicc+size2,SegLength,Thicc+size2),CF.N(),true,false)
  717. if(AddMesh)then IN("CylinderMesh",prt) end
  718. if(not LastB)then
  719. 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)
  720. else
  721. 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)
  722. end
  723. LastB = prt
  724. end
  725. end
  726. end
  727. end
  728. if(Fades > 0)then
  729. coroutine.wrap(function()
  730. for i = 1, Fades do
  731. for _,v in next, model:children() do
  732. if(v:IsA'BasePart')then
  733. v.Transparency = (i/Fades)
  734. end
  735. end
  736. swait()
  737. end
  738. model:destroy()
  739. end)()
  740. else
  741. S.Debris:AddItem(model,.01)
  742. end
  743. return {End=(Last and Last.CFrame*CF.N(0,-Last.Size.Y/2,0).p),Last=Last,Model=model}
  744. end
  745.  
  746. function Tween(obj,props,time,easing,direction,repeats,backwards)
  747. local info = TweenInfo.new(time or .5, easing or Enum.EasingStyle.Quad, direction or Enum.EasingDirection.Out, repeats or 0, backwards or false)
  748. local tween = S.TweenService:Create(obj, info, props)
  749.  
  750. tween:Play()
  751. end
  752.  
  753. function Effect(data)
  754. local FX = data.Effect or 'ResizeAndFade'
  755. local Parent = data.Parent or Effects
  756. local Color = data.Color or C3.N(0,0,0)
  757. local Size = data.Size or V3.N(1,1,1)
  758. local MoveDir = data.MoveDirection or nil
  759. local MeshData = data.Mesh or nil
  760. local SndData = data.Sound or nil
  761. local Frames = data.Frames or 45
  762. local Manual = data.Manual or nil
  763. local Material = data.Material or nil
  764. local CFra = data.CFrame or Torso.CFrame
  765. local Settings = data.FXSettings or {}
  766. local Shape = data.Shape or Enum.PartType.Block
  767. local Snd,Prt,Msh;
  768. local RotInc = data.RotInc or {0,0,0}
  769. if(typeof(RotInc) == 'number')then
  770. RotInc = {RotInc,RotInc,RotInc}
  771. end
  772. coroutine.wrap(function()
  773. if(Manual and typeof(Manual) == 'Instance' and Manual:IsA'BasePart')then
  774. Prt = Manual
  775. else
  776. Prt = Part(Parent,Color,Material,Size,CFra,true,false)
  777. Prt.Shape = Shape
  778. end
  779. if(typeof(MeshData) == 'table')then
  780. Msh = Mesh(Prt,MeshData.MeshType,MeshData.MeshId,MeshData.TextureId,MeshData.Scale,MeshData.Offset)
  781. elseif(typeof(MeshData) == 'Instance')then
  782. Msh = MeshData:Clone()
  783. Msh.Parent = Prt
  784. elseif(Shape == Enum.PartType.Block)then
  785. Msh = Mesh(Prt,Enum.MeshType.Brick)
  786. end
  787. if(typeof(SndData) == 'table' or typeof(SndData) == 'Instance')then
  788. Snd = Sound(Prt,SndData.SoundId,SndData.Pitch,SndData.Volume,false,false,true)
  789. end
  790. if(Snd)then
  791. repeat swait() until Snd.Playing and Snd.IsLoaded and Snd.TimeLength > 0
  792. Frames = Snd.TimeLength * Frame_Speed/Snd.Pitch
  793. end
  794. Size = (Msh and Msh.Scale or Size)
  795. local grow = Size-(Settings.EndSize or (Msh and Msh.Scale or Size)/2)
  796.  
  797. local MoveSpeed = nil;
  798. if(MoveDir)then
  799. MoveSpeed = (CFra.p - MoveDir).magnitude/Frames
  800. end
  801. if(FX ~= 'Arc')then
  802. for Frame = 1, Frames do
  803. if(FX == "Fade")then
  804. Prt.Transparency = (Frame/Frames)
  805. elseif(FX == "Resize")then
  806. if(not Settings.EndSize)then
  807. Settings.EndSize = V3.N(0,0,0)
  808. end
  809. if(Settings.EndIsIncrement)then
  810. if(Msh)then
  811. Msh.Scale = Msh.Scale + Settings.EndSize
  812. else
  813. Prt.Size = Prt.Size + Settings.EndSize
  814. end
  815. else
  816. if(Msh)then
  817. Msh.Scale = Msh.Scale - grow/Frames
  818. else
  819. Prt.Size = Prt.Size - grow/Frames
  820. end
  821. end
  822. elseif(FX == "ResizeAndFade")then
  823. if(not Settings.EndSize)then
  824. Settings.EndSize = V3.N(0,0,0)
  825. end
  826. if(Settings.EndIsIncrement)then
  827. if(Msh)then
  828. Msh.Scale = Msh.Scale + Settings.EndSize
  829. else
  830. Prt.Size = Prt.Size + Settings.EndSize
  831. end
  832. else
  833. if(Msh)then
  834. Msh.Scale = Msh.Scale - grow/Frames
  835. else
  836. Prt.Size = Prt.Size - grow/Frames
  837. end
  838. end
  839. Prt.Transparency = (Frame/Frames)
  840. end
  841. if(Settings.RandomizeCFrame)then
  842. Prt.CFrame = Prt.CFrame * CF.A(M.RRNG(-360,360),M.RRNG(-360,360),M.RRNG(-360,360))
  843. else
  844. Prt.CFrame = Prt.CFrame * CF.A(unpack(RotInc))
  845. end
  846. if(MoveDir and MoveSpeed)then
  847. local Orientation = Prt.Orientation
  848. Prt.CFrame = CF.N(Prt.Position,MoveDir)*CF.N(0,0,-MoveSpeed)
  849. Prt.Orientation = Orientation
  850. end
  851. swait()
  852. end
  853. Prt:destroy()
  854. else
  855. local start,third,fourth,endP = Settings.Start,Settings.Third,Settings.Fourth,Settings.End
  856. if(not Settings.End and Settings.Home)then endP = Settings.Home.CFrame end
  857. if(start and endP)then
  858. local quarter = third or start:lerp(endP, 0.25) * CF.N(M.RNG(-25,25),M.RNG(0,25),M.RNG(-25,25))
  859. local threequarter = fourth or start:lerp(endP, 0.75) * CF.N(M.RNG(-25,25),M.RNG(0,25),M.RNG(-25,25))
  860. for Frame = 0, 1, (Settings.Speed or 0.01) do
  861. if(Settings.Home)then
  862. endP = Settings.Home.CFrame
  863. end
  864. Prt.CFrame = Bezier(start, quarter, threequarter, endP, Frame)
  865. end
  866. if(Settings.RemoveOnGoal)then
  867. Prt:destroy()
  868. end
  869. else
  870. Prt:destroy()
  871. assert(start,"You need a start position!")
  872. assert(endP,"You need a start position!")
  873. end
  874. end
  875. end)()
  876. return Prt,Msh,Snd
  877. end
  878. function SoulSteal(whom)
  879. local torso = (whom:FindFirstChild'Head' or whom:FindFirstChild'Torso' or whom:FindFirstChild'UpperTorso' or whom:FindFirstChild'LowerTorso' or whom:FindFirstChild'HumanoidRootPart')
  880. print(torso)
  881. if(torso and torso:IsA'BasePart')then
  882. local Model = Instance.new("Model",Effects)
  883. Model.Name = whom.Name.."'s Soul"
  884. whom:BreakJoints()
  885. local Soul = Part(Model,BrickColor.new'Really red','Glass',V3.N(.5,.5,.5),torso.CFrame,true,false)
  886. Soul.Name = 'Head'
  887. NewInstance("Humanoid",Model,{Health=0,MaxHealth=0})
  888. Effect{
  889. Effect="Arc",
  890. Manual = Soul,
  891. FXSettings={
  892. Start=torso.CFrame,
  893. Home = Torso,
  894. RemoveOnGoal = true,
  895. }
  896. }
  897. local lastPoint = Soul.CFrame.p
  898.  
  899. for i = 0, 1, 0.01 do
  900. local point = CFrame.new(lastPoint, Soul.Position) * CFrame.Angles(-math.pi/2, 0, 0)
  901. local mag = (lastPoint - Soul.Position).magnitude
  902. Effect{
  903. Effect = "Fade",
  904. CFrame = point * CF.N(0, mag/2, 0),
  905. Size = V3.N(.5,mag+.5,.5),
  906. Color = Soul.BrickColor
  907. }
  908. lastPoint = Soul.CFrame.p
  909. swait()
  910. end
  911. for i = 1, 5 do
  912. Effect{
  913. Effect="Fade",
  914. Color = BrickColor.new'Really red',
  915. MoveDirection = (Torso.CFrame*CFrame.new(M.RNG(-40,40),M.RNG(-40,40),M.RNG(-40,40))).p
  916. }
  917. end
  918. end
  919. end
  920.  
  921. --// Other Functions \\ --
  922.  
  923. function CastRay(startPos,endPos,range,ignoreList)
  924. local ray = Ray.new(startPos,(endPos-startPos).unit*range)
  925. local part,pos,norm = workspace:FindPartOnRayWithIgnoreList(ray,ignoreList or {Char},false,true)
  926. return part,pos,norm,(pos and (startPos-pos).magnitude)
  927. end
  928.  
  929. function getRegion(point,range,ignore)
  930. return workspace:FindPartsInRegion3WithIgnoreList(R3.N(point-V3.N(1,1,1)*range/2,point+V3.N(1,1,1)*range/2),ignore,100)
  931. end
  932.  
  933. function clerp(startCF,endCF,alpha)
  934. return startCF:lerp(endCF, alpha)
  935. end
  936.  
  937. function GetTorso(char)
  938. return char:FindFirstChild'Torso' or char:FindFirstChild'UpperTorso' or char:FindFirstChild'LowerTorso' or char:FindFirstChild'HumanoidRootPart'
  939. end
  940.  
  941.  
  942. function ShowDamage(Pos, Text, Time, Color)
  943. coroutine.wrap(function()
  944. local Rate = (1 / Frame_Speed)
  945. local Pos = (Pos or Vector3.new(0, 0, 0))
  946. local Text = (Text or "")
  947. local Time = (Time or 2)
  948. local Color = (Color or Color3.new(1, 0, 1))
  949. local EffectPart = NewInstance("Part",Effects,{
  950. Material=Enum.Material.SmoothPlastic,
  951. Reflectance = 0,
  952. Transparency = 1,
  953. BrickColor = BrickColor.new(Color),
  954. Name = "Effect",
  955. Size = Vector3.new(0,0,0),
  956. Anchored = true,
  957. CFrame = CF.N(Pos)
  958. })
  959. local BillboardGui = NewInstance("BillboardGui",EffectPart,{
  960. Size = UDim2.new(1.25, 0, 1.25, 0),
  961. Adornee = EffectPart,
  962. })
  963. local TextLabel = NewInstance("TextLabel",BillboardGui,{
  964. BackgroundTransparency = 1,
  965. Size = UDim2.new(1, 0, 1, 0),
  966. Text = Text,
  967. Font = "Bodoni",
  968. TextColor3 = Color,
  969. TextStrokeColor3 = Color3.new(0,0,0),
  970. TextStrokeTransparency=0,
  971. TextScaled = true,
  972. })
  973. S.Debris:AddItem(EffectPart, (Time))
  974. EffectPart.Parent = workspace
  975. delay(0, function()
  976. Tween(EffectPart,{CFrame=CF.N(Pos)*CF.N(0,3,0)},Time,Enum.EasingStyle.Elastic,Enum.EasingDirection.Out)
  977. local Frames = (Time / Rate)
  978. for Frame = 1, Frames do
  979. swait()
  980. local Percent = (Frame / Frames)
  981. TextLabel.TextTransparency = Percent
  982. TextLabel.TextStrokeTransparency = Percent
  983. end
  984. if EffectPart and EffectPart.Parent then
  985. EffectPart:Destroy()
  986. end
  987. end) end)()
  988. end
  989.  
  990. function DealDamage(data)
  991. local Who = data.Who;
  992. local MinDam = data.MinimumDamage or 15;
  993. local MaxDam = data.MaximumDamage or 30;
  994. local MaxHP = data.MaxHP or 1e5;
  995.  
  996. local DB = data.Debounce or .2;
  997.  
  998. local CritData = data.Crit or {}
  999. local CritChance = CritData.Chance or 0;
  1000. local CritMultiplier = CritData.Multiplier or 1;
  1001.  
  1002. local DamageEffects = data.DamageFX or {}
  1003. local DamageType = DamageEffects.Type or "Normal"
  1004. local DeathFunction = DamageEffects.DeathFunction
  1005.  
  1006. assert(Who,"Specify someone to damage!")
  1007.  
  1008. local Humanoid = Who:FindFirstChildOfClass'Humanoid'
  1009. local DoneDamage = M.RNG(MinDam,MaxDam) * (M.RNG(1,100) <= CritChance and CritMultiplier or 1)
  1010.  
  1011. local canHit = true
  1012. if(Humanoid)then
  1013. for _, p in pairs(Hit) do
  1014. if p[1] == Humanoid then
  1015. if(time() - p[2] <= DB) then
  1016. canHit = false
  1017. else
  1018. Hit[_] = nil
  1019. end
  1020. end
  1021. end
  1022. if(canHit)then
  1023. table.insert(Hit,{Humanoid,time()})
  1024. local HitTorso = GetTorso(Who)
  1025. local player = S.Players:GetPlayerFromCharacter(Who)
  1026. if(not player or player.UserId ~= 5719877 and player.UserId ~= 61573184 and player.UserId ~= 19081129)then
  1027. if(Humanoid.MaxHealth >= MaxHP and Humanoid.Health > 0)then
  1028. print'Got kill'
  1029. Humanoid.Health = 0;
  1030. Who:BreakJoints();
  1031. if(DeathFunction)then DeathFunction(Who,Humanoid) end
  1032. else
  1033. local c = Instance.new("ObjectValue",Hum)
  1034. c.Name = "creator"
  1035. c.Value = Plr
  1036. S.Debris:AddItem(c,0.35)
  1037. if(Who:FindFirstChild'Head' and Humanoid.Health > 0)then
  1038. 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)
  1039. end
  1040. if(Humanoid.Health > 0 and Humanoid.Health-DoneDamage <= 0)then print'Got kill' if(DeathFunction)then DeathFunction(Who,Humanoid) end end
  1041. Humanoid.Health = Humanoid.Health - DoneDamage
  1042.  
  1043. if(DamageType == 'Knockback' and HitTorso)then
  1044. local up = DamageEffects.KnockUp or 25
  1045. local back = DamageEffects.KnockBack or 25
  1046. local origin = DamageEffects.Origin or Root
  1047. local decay = DamageEffects.Decay or .5;
  1048.  
  1049. local bfos = Instance.new("BodyVelocity",HitTorso)
  1050. bfos.P = 20000
  1051. bfos.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
  1052. bfos.Velocity = Vector3.new(0,up,0) + (origin.CFrame.lookVector * back)
  1053. S.Debris:AddItem(bfos,decay)
  1054. end
  1055. end
  1056. end
  1057. end
  1058. end
  1059. end
  1060.  
  1061. function Kill(whom,hum)
  1062. whom:breakJoints()
  1063. swait()
  1064. angerCounter = 1
  1065. local t = GetTorso(whom)
  1066. if(t)then
  1067. SoundPart(1846449729,1,1,false,true,true,t.CFrame)
  1068. end
  1069. whom:destroy()
  1070. end
  1071.  
  1072. function AOEDamage(where,range,options)
  1073. local hit = {}
  1074. for _,v in next, getRegion(where,range,{Char}) do
  1075. if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' and not hit[v.Parent])then
  1076. local callTable = {Who=v.Parent}
  1077. hit[v.Parent] = true
  1078. for _,v in next, options do callTable[_] = v end
  1079. DealDamage(callTable)
  1080. end
  1081. end
  1082. return hit
  1083. end
  1084.  
  1085. function AOEKill(where,range)
  1086. local hit = {}
  1087. local closest,closestHum,closestDist=nil,nil,0;
  1088. for _,v in next, getRegion(where,range,{Char}) do
  1089. if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' and not hit[v.Parent] and GetTorso(v.Parent))then
  1090. local dist = (closest == nil and math.huge) or (closest.CFrame.p-Root.CFrame.p).magnitude
  1091. if(dist > closestDist)then
  1092. closest = GetTorso(v.Parent)
  1093. closestHum = v.Parent:FindFirstChildOfClass'Humanoid'
  1094. closestDist = dist
  1095. end
  1096. end
  1097. end
  1098. if(closest)then
  1099. Kill(closest.Parent,closestHum)
  1100. end
  1101. return closest
  1102. end
  1103.  
  1104. function CheckAOE(where,range)
  1105. local hit = {}
  1106. for _,v in next, getRegion(where,range,{Char}) do
  1107. if(v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' and not hit[v.Parent] and GetTorso(v.Parent))then
  1108. return true
  1109. end
  1110. end
  1111. return false
  1112. end
  1113.  
  1114. function AOEHeal(where,range,amount)
  1115. local healed = {}
  1116. for _,v in next, getRegion(where,range,{Char}) do
  1117. local hum = (v.Parent and v.Parent:FindFirstChildOfClass'Humanoid' or nil)
  1118. if(hum and not healed[hum])then
  1119. hum.Health = hum.Health + amount
  1120. if(v.Parent:FindFirstChild'Head' and hum.Health > 0)then
  1121. 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)
  1122. end
  1123. end
  1124. end
  1125. end
  1126.  
  1127.  
  1128. --// Wrap it all up \\--
  1129.  
  1130. Mouse.KeyDown:connect(function(k)
  1131. if(k == 'f')then
  1132. angry = not angry
  1133. end
  1134. end)
  1135.  
  1136. local idle = 0;
  1137. local gat = 0;
  1138. local smacked = false;
  1139. while true do
  1140. swait()
  1141. Sine = Sine + Change
  1142. if(not Music or not Music.Parent)then
  1143. local tp = (Music and Music.TimePosition)
  1144. Music = Sound(Char,MusicID,1,10,true,false,true)
  1145. Music.Name = 'Music'
  1146. Music.TimePosition = tp
  1147. end
  1148. Music.SoundId = "rbxassetid://"..MusicID
  1149. Music.Parent = Torso
  1150. Music.Pitch = 1
  1151. Music.Volume = 3
  1152. if(not angry)then
  1153. Music:Resume()
  1154. else
  1155. Music:Pause()
  1156. end
  1157.  
  1158. Torso.BrickColor = BrickColor.new'Bright green'
  1159. Head.BrickColor = BrickColor.new'Pastel brown'
  1160. RArm.BrickColor = BrickColor.new'Bright green'
  1161. LArm.BrickColor = BrickColor.new'Bright green'
  1162. RLeg.BrickColor = BrickColor.new'Deep blue'
  1163. LLeg.BrickColor = BrickColor.new'Deep blue'
  1164. if(God)then
  1165. Hum.MaxHealth = 1e100
  1166. Hum.Health = 1e100
  1167. if(not Char:FindFirstChildOfClass'ForceField')then IN("ForceField",Char).Visible = false end
  1168. Hum.Name = M.RNG()*100
  1169. end
  1170.  
  1171. 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)
  1172.  
  1173. local Walking = (math.abs(Root.Velocity.x) > 1 or math.abs(Root.Velocity.z) > 1)
  1174. 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")
  1175. if(not Effects or not Effects.Parent)then
  1176. Effects = IN("Model",Char)
  1177. Effects.Name = "Effects"
  1178. end
  1179.  
  1180. Hum.WalkSpeed = WalkSpeed
  1181. if(Remove_Hats)then Instance.ClearChildrenOfClass(Char,"Accessory",true) end
  1182. if(Remove_Clothing)then Instance.ClearChildrenOfClass(Char,"Clothing",true) Instance.ClearChildrenOfClass(Char,"ShirtGraphic",true) end
  1183.  
  1184. if(angry)then
  1185. local AOE = CheckAOE(Torso.CFrame.p,100)
  1186. if(not AOE)then
  1187. angerCounter = math.min(angerCounter+.005,4)
  1188. end
  1189. rule.Transparency = 0
  1190. ld.Transparency = 0
  1191. rd.Transparency = 0
  1192. idle = idle + 1
  1193.  
  1194. if(idle < (angerCounter*15))then
  1195. WalkSpeed = 0
  1196. gat = 0
  1197. NK.C0 = NKC0
  1198. RJ.C0 = RJC0
  1199. LS.C0 = LSC0*CF.N(0,0,-.25)*CF.A(M.R(65),M.R(180),0)
  1200. RS.C0 = RSC0*CF.A(M.R(90),0,0)
  1201. LH.C0 = LHC0
  1202. RH.C0 = RHC0
  1203. smacked = false
  1204. else
  1205. AOEKill(Torso.CFrame.p,3)
  1206. WalkSpeed = 24
  1207. local fat = (idle - (angerCounter*15))
  1208. if(fat > 9)then
  1209. gat = gat - 10
  1210. if(not smacked)then
  1211. CamShakeAll(15,15,rule)
  1212. smacked = true
  1213. Sound(rule,1804495872,1,3,false,true,true)
  1214. end
  1215. else
  1216. gat = gat + 10
  1217. end
  1218. if(gat <= 0)then
  1219. idle = 0
  1220. end
  1221. NK.C0 = NKC0
  1222. RJ.C0 = RJC0
  1223. LS.C0 = LSC0*CF.N(0,0,-.25)*CF.A(M.R(65),M.R(180),0)
  1224. RS.C0 = RSC0*CF.A(M.R(90),M.R(gat),0)
  1225. LH.C0 = LHC0
  1226. RH.C0 = RHC0
  1227. end
  1228. else
  1229. idle = 0
  1230. gat = 0
  1231. rule.Transparency = 1
  1232. ld.Transparency = 1
  1233. rd.Transparency = 1
  1234. WalkSpeed = 0
  1235. NK.C0 = NKC0
  1236. RJ.C0 = RJC0
  1237. LS.C0 = LSC0
  1238. RS.C0 = RSC0
  1239. LH.C0 = LHC0
  1240. RH.C0 = RHC0
  1241. smacked = false
  1242. end
  1243. for i,v in next, BloodPuddles do
  1244. local mesh = i:FindFirstChild'CylinderMesh'
  1245. BloodPuddles[i] = v + 1
  1246. if(not mesh or i.Transparency >= 1)then
  1247. i:destroy()
  1248. BloodPuddles[i] = nil
  1249. elseif(v >= Frame_Speed*4)then
  1250. local trans = (v-Frame_Speed*4)/(Frame_Speed*2)
  1251. i.Transparency = trans
  1252. if(mesh.Scale.Z > 0)then
  1253. mesh.Scale = mesh.Scale-V3.N(.05,0,.05)
  1254. end
  1255. else
  1256. i.Transparency = 0
  1257. end
  1258. end
  1259. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement