API tools faq
paste
Advertisement
meninodapacocaII

Untitled

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