API tools faq
paste
Advertisement
Bendy928443534

Untitled

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