API tools faq
paste
Advertisement
rtkz_wasa1974

Untitled

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