API tools faq
paste
wamandnj

Untitled

wamandnj
Mar 5th, 2019
177
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 25.44 KB | None | 0 0
raw download clone embed print report diff
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  3. local RealPlayer = Player
  4. do print("FE Compatibility code by Mokiros");InternalData = {}InternalData.RealOwner = owner;InternalData.RealObjs = {};InternalData.SoundLoudness = {};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()}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;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 t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end,__call=function(self,...)local t=rawget(self,"_RealService")if t then return t(...)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 self[t]end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;x.RunService=v({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")setmetatable(x,{__index=function(self,t)return r:GetService(t)or typeof(r[t])=="function"and function(m,...)return r[t](r,...)end or r[t]end,__newindex=s.__newindex,__call=s.__call})game,owner=x,x.Players.LocalPlayer
  5. script.Parent = InternalData.RealOwner.Character
  6. local Event = Instance.new("RemoteEvent");Event.Name = "UserInput";InternalData.Event = Event
  7. local function createObject (connections, index)
  8. local proxy = newproxy (true);local meta = getmetatable (proxy);
  9. local runbind = function (self, i, ...) connections[i]:Fire (...); end;
  10. while (#connections > 0) do connections[table.remove(connections, 1)] = Instance.new ('BindableEvent');end;
  11. meta.__index = function (self, i)
  12. if (i == 'TriggerEvent') then return runbind end;
  13. return connections[i] and connections[i].Event or index[i];
  14. end;
  15. meta.__newindex = index;meta.__metatable = false;return proxy
  16. end;
  17. local Mouse = createObject({"KeyUp","KeyDown","Button1Down","Button1Up"},{["Target"] = nil;["Hit"] = CFrame.new()})
  18. local UserInputService = createObject({"InputBegan","InputEnded"},{})
  19. local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  20. self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  21. end};ContextActionService.UnBindAction = ContextActionService.BindAction
  22. Event.OnServerEvent:Connect(function(FiredBy,Input)
  23. if FiredBy ~= InternalData.RealOwner then return end
  24. if Input.MouseEvent then
  25. Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  26. elseif Input.Sound then
  27. if InternalData.SoundLoudness[Input.Sound] then InternalData.SoundLoudness[Input.Sound] = Input.Loudness end
  28. else
  29. local Begin = Input.UserInputState == Enum.UserInputState.Begin
  30. if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TriggerEvent(Begin and "Button1Down" or "Button1Up") end
  31. for _,Action in pairs(ContextActionService.Actions) do
  32. for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  33. end
  34. Mouse:TriggerEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower());UserInputService:TriggerEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  35. end
  36. end)
  37. InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  38. Event.Parent = NLS([[
  39. local Player = owner;
  40. local Sounds = {};
  41. local Event = script:WaitForChild("UserInput");
  42. local UserInputService = game:GetService("UserInputService");
  43. local Mouse = Player:GetMouse();
  44. local Input = function(Input,gameProcessedEvent)
  45. if gameProcessedEvent then return end
  46. Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  47. end
  48. Event.OnClientEvent:connect(function(Args)
  49. if Args[1] == "NewSound" then table.insert(Sounds,Args[2]) end
  50. end)
  51. UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  52. local Hit,Target
  53. while wait(1/30) do
  54. for x,Sound in pairs(Sounds) do
  55. if Sound.Parent then Event:FireServer({["Sound"]=Sound,["Loudness"]=Sound.PlaybackLoudness}) end
  56. end
  57. if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  58. Hit = Mouse.Hit;Target = Mouse.Target;
  59. Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  60. end
  61. end
  62. ]],InternalData.RealOwner.Character)
  63. end
  64. InternalData.NewOwner = setmetatable({},{
  65. __index = function (self,Index)
  66. local Type = type(InternalData.RealOwner[Index])
  67. if Type == "function" then
  68. if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  69. return function (self)return InternalData["Mouse"] end
  70. end
  71. return function (self,...)return InternalData.RealOwner[Index](InternalData.RealOwner,...) end
  72. elseif Index == "FakePlayer" then
  73. return true
  74. end
  75. return InternalData.RealOwner[Index]
  76. end;
  77. __tostring = function(self) return tostring(InternalData.RealOwner) end
  78. })
  79. --LoadLibrary("RbxUtility").Create
  80. InternalData.LoadLibrary = LoadLibrary;LoadLibrary = function(Library)
  81. if Library == "RbxUtility" then
  82. return setmetatable({},{
  83. __tostring = function() return "RbxUtility" end;
  84. __index = function(self, Index)
  85. if Index:lower() == "create" then
  86. return function(Type)
  87. return function(Data)
  88. Data = Data or {}
  89. local Inst = Instance.new(Type)
  90. for x,y in pairs(Data) do
  91. if InternalData.RealObjs[y] then y = InternalData.RealObjs[y] end
  92. if y == owner then y = InternalData.RealOwner end
  93. Inst[x] = y
  94. end
  95. return Inst
  96. end
  97. end
  98. end
  99. return InternalData.LoadLibrary(Library)[Index]
  100. end
  101. })
  102. end
  103. return InternalData.LoadLibrary(Library)
  104. end
  105. InternalData.RealInstance = Instance;Instance = setmetatable({},{
  106. __index = function (self,Index)
  107. if Index:lower() == 'new' then
  108. return function (Type, Parent)
  109. if Parent == owner then Parent = InternalData.RealOwner end
  110. if InternalData.RealObjs[Parent] then Parent = InternalData.RealObjs[Parent] end
  111. local Real = InternalData.RealInstance.new(Type,Parent)
  112. if not Type then return end
  113. if Type == "BillboardGui" then
  114. local ToReturn = setmetatable({},{
  115. __index = function (self,Index)
  116. if type(Real[Index]) == "function" then
  117. if Index:lower() == "clone" then
  118. return function (self)
  119. local Real = Real:Clone()
  120. local ToReturn = setmetatable({RealObject = Real},{
  121. __index = function (self,Index)
  122. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  123. return Real[Index]
  124. end;
  125. __newindex = function (self,Index,Value)
  126. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  127. if Value == owner then Value = InternalData.RealOwner end
  128. Real[Index] = Value
  129. end;
  130. __tostring = function(self) return tostring(Real) end;
  131. })
  132. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  133. end
  134. end
  135. return function (self,...) return Real[Index](Real,...)end
  136. end
  137. return Real[Index]
  138. end;
  139. __newindex = function (self,Index,Value)
  140. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  141. if Value == owner then Value = InternalData.RealOwner end
  142. Real[Index] = Value
  143. end;
  144. __tostring = function(self) return tostring(Real) end;
  145. })
  146. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  147. elseif Type:lower() == "sound" then
  148. Real.Parent = owner.Character;
  149. local ToReturn = setmetatable({RealObject = Real},{
  150. __index = function (self,Index)
  151. if Index:lower() == "playbackloudness" then
  152. return InternalData.SoundLoudness[Real] or 0
  153. elseif type(Real[Index]) == "function" then
  154. if Index:lower() == "clone" then
  155. return function (self)
  156. local Real = Real:Clone()
  157. local ToReturn = setmetatable({},{
  158. __index = function (self,Index)
  159. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  160. return Real[Index]
  161. end;
  162. __newindex = function (self,Index,Value)
  163. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  164. if Value == owner then Value = InternalData.RealOwner end
  165. Real[Index] = Value
  166. end;
  167. __tostring = function(self) return tostring(Real) end;
  168. })
  169. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  170. end
  171. end
  172. return function (self,...) return Real[Index](Real,...)end
  173. end
  174. return Real[Index]
  175. end;
  176. __newindex = function (self,Index,Value)
  177. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  178. if Value == owner then Value = InternalData.RealOwner end
  179. Real[Index] = Value
  180. end;
  181. __tostring = function(self) return tostring(Real) end;
  182. })
  183. InternalData.RealObjs[ToReturn] = Real;InternalData.SoundLoudness[Real] = 0;repeat wait() until InternalData.Event.Parent InternalData.Event:FireClient(InternalData.RealOwner,{"NewSound",Real}) return ToReturn;
  184. else
  185. local ToReturn = setmetatable({RealObject = Real},{
  186. __index = function (self,Index)
  187. if type(Real[Index]) == "function" then
  188. if Index:lower() == "clone" then
  189. return function (self)
  190. local Real = Real:Clone()
  191. local ToReturn = setmetatable({},{
  192. __index = function (self,Index)
  193. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  194. return Real[Index]
  195. end;
  196. __newindex = function (self,Index,Value)
  197. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  198. if Value == owner then Value = InternalData.RealOwner end
  199. Real[Index] = Value
  200. end;
  201. __tostring = function(self) return tostring(Real) end;
  202. })
  203. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  204. end
  205. end
  206. return function (self,...) return Real[Index](Real,...)end
  207. end
  208. return Real[Index]
  209. end;
  210. __newindex = function (self,Index,Value)
  211. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  212. if Value == owner then Value = InternalData.RealOwner end
  213. Real[Index] = Value
  214. end;
  215. __tostring = function(self) return tostring(Real) end;
  216. })
  217. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  218. end
  219. end
  220. end
  221. return InternalData.RealInstance[Index]
  222. end;
  223. __tostring = function(self) return tostring(InternalData.RealInstance) end;
  224. });
  225. InternalData.RealGame = game;game = setmetatable({},{
  226. __index = function (self,Index)
  227. if InternalData.RealGame[Index] then
  228. local Type = type(InternalData.RealGame[Index])
  229. if Type == "function" then
  230. if Index:lower() == "getservice" or Index:lower() == "service" then
  231. return function (self,Service)
  232. local FakeServices = {
  233. ["players"] = function()
  234. return setmetatable({},{
  235. __index = function (self2,Index2)
  236. local RealService = InternalData.RealGame:GetService(Service)
  237. local Type2 = type(RealService[Index2])
  238. if Type2 == "function" then
  239. return function (self,...) return RealService[Index2](RealService,...)end
  240. else
  241. if Index2:lower() == "localplayer" then return InternalData.NewOwner end
  242. return RealService[Index2]
  243. end
  244. end;
  245. __tostring = function(self) return tostring(InternalData.RealGame:GetService(Service)) end
  246. })
  247. end;
  248. ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  249. ["userinputservice"] = function() return InternalData["UserInputService"] end;
  250. ["debris"] = function()
  251. return setmetatable({},{
  252. __index = function(self2,Index2)
  253. local RealService = InternalData.RealGame:GetService(Service)
  254. local Type2 = type(RealService[Index2])
  255. if Type2 == "function" then
  256. if Index2:lower() == "additem" then
  257. return function (self,Item,Time)
  258. if InternalData.RealObjs[Item] then Item = InternalData.RealObjs[Item] end
  259. return RealService:AddItem(Item,Time)
  260. end
  261. end
  262. return function (self,...) return RealService[Index2](RealService,...) end
  263. end
  264. return RealService[Index2]
  265. end;
  266. __tostring = function(self) return tostring(InternalData.RealGame:GetService("Debris")) end
  267. })
  268. end;
  269. ["runservice"] = function()
  270. return setmetatable({},{
  271. __index = function(self2,Index2)
  272. local RealService = InternalData.RealGame:GetService(Service)
  273. local Type2 = type(RealService[Index2])
  274. if Type2 == "function" then
  275. return function (self,...) return RealService[Index2](RealService,...) end
  276. else
  277. local RunServices = {
  278. ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return InternalData.RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  279. ["renderstepped"] = function() return RealService["Stepped"] end
  280. }
  281. if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  282. return RealService[Index2]
  283. end
  284. end;
  285. __tostring = function(self) return tostring(InternalData.RealGame:GetService("RunService")) end
  286. })
  287. end
  288. }
  289. if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  290. return InternalData.RealGame:GetService(Service)
  291. end
  292. end
  293. return function (self,...) return InternalData.RealGame[Index](InternalData.RealGame,...) end
  294. else
  295. if game:GetService(Index) then return game:GetService(Index) end
  296. return InternalData.RealGame[Index]
  297. end
  298. end
  299. return nil
  300. end;
  301. __tostring = function(self) return tostring(InternalData.game) end
  302. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete!")
  303.  
  304. wait(1/30)
  305.  
  306. local player = game.Players.LocalPlayer
  307. local character = player.Character
  308. local humanoid = character:WaitForChild("Humanoid")
  309. local mouse = player:GetMouse()
  310.  
  311. local enabled = false
  312. local bassactive = false
  313.  
  314. humanoid.WalkSpeed = 26
  315. humanoid.MaxHealth = "inf"
  316. humanoid.Health = "inf"
  317.  
  318. --Health
  319. coroutine.resume(coroutine.create(function()
  320. while true do
  321. humanoid.PlatformStand = false
  322. humanoid.MaxHealth = "inf"
  323. humanoid.Health = "inf"
  324. if bassactive == false then
  325. humanoid.WalkSpeed = 26
  326. else
  327. humanoid.WalkSpeed = 100
  328. end
  329. wait()
  330. end
  331. end))
  332.  
  333. for i,v in pairs(character:GetChildren()) do
  334. if v:IsA("Part") then
  335. v.Transparency = 1
  336. v.BrickColor = BrickColor.new("Institutional white")
  337. elseif v:IsA("Accessory") then
  338. v:Destroy()
  339. end
  340. end
  341.  
  342. --Music
  343. local music = Instance.new("Sound", character.Torso)
  344. music.SoundId = 'rbxassetid://1181897442'
  345. music.Looped = true
  346. music.Pitch = 0.1
  347. music:Play()
  348.  
  349. --Chat noise
  350. local chatnoise = Instance.new("Sound", character.Torso)
  351. chatnoise.SoundId = 'rbxassetid://168143115'
  352. chatnoise.Pitch = 6
  353. character.Head.face:Destroy()
  354.  
  355. --BASS
  356. local bassnoise = Instance.new("Sound", character.Torso)
  357. bassnoise.SoundId = 'rbxassetid://387927244'
  358.  
  359. --Text
  360. local bgui = Instance.new("BillboardGui",character)
  361. bgui.Size = UDim2.new(0,100,0,40)
  362. bgui.StudsOffset = Vector3.new(0,2,0)
  363. bgui.Adornee = character.Head
  364. local text = Instance.new("TextLabel", bgui)
  365. text.BackgroundTransparency = 1
  366. text.BorderSizePixel = 0
  367. text.Text = "By SlaveDash"
  368. text.Font = "ArialBold"
  369. text.FontSize = "Size24"
  370. text.TextStrokeTransparency = 0.7
  371. text.TextStrokeColor3 = Color3.new(255,255,255)
  372. text.TextColor3 = Color3.new(255,255,255)
  373. text.Size = UDim2.new(1,0,0.5,0)
  374. player.Chatted:connect(function(chat)
  375. if enabled == true then
  376. chat = game:GetService("Chat"):FilterStringForBroadcast(chat, player)
  377. for i=1,string.len(chat) do
  378. text.Text = string.sub(chat, 1, i)
  379. chatnoise:Play()
  380. wait()
  381. end
  382. wait(2)
  383. text.Text = ""
  384. end
  385. end)
  386. wait(0.2)
  387. for i=1,10 do
  388. wait()
  389. text.Transparency = text.Transparency + (0.05 * i)
  390. end
  391. text.Text = ""
  392. text.FontSize = "Size28"
  393. for i=1,10 do
  394. text.Transparency = text.Transparency - (0.05 * i)
  395. wait()
  396. end
  397.  
  398. --Startup
  399.  
  400. local color = Color3.new(0,0,0)
  401.  
  402. local folder = Instance.new("Folder", character)
  403. folder.Name = "Body Parts"
  404.  
  405. coroutine.resume(coroutine.create(function()
  406. while true do
  407. wait()
  408. if bassactive == false then
  409. for i,v in pairs(character:GetChildren()) do
  410. if v:IsA("Part") then
  411. local shadow = v:Clone()
  412. shadow:ClearAllChildren()
  413. if shadow.Name == "Head" then
  414. shadow.Size = Vector3.new(1.25,1.25,1.25)
  415. end
  416. shadow.CanCollide = false
  417. shadow.Anchored = true
  418. shadow.Transparency = 0.95
  419. shadow.Material = Enum.Material.Neon
  420. shadow.BrickColor = BrickColor.new("Institutional white")
  421. shadow.Parent = folder
  422. game.Debris:AddItem(shadow, 1)
  423. coroutine.resume(coroutine.create(function()
  424. for i=1,10 do
  425. wait()
  426. shadow.CFrame = shadow.CFrame:lerp(v.CFrame + (Vector3.new(math.random(-1,1),math.random(-1,1),math.random(-1,1)) * 3), 0.1)
  427. end
  428. shadow:Destroy()
  429. end))
  430. end
  431. end
  432. end
  433. end
  434. end))
  435.  
  436. local function Chat(texty, enddelay)
  437. for i=1,string.len(texty) do
  438. text.Text = string.sub(texty, 1, i)
  439. chatnoise:Play()
  440. if string.sub(texty, i, i) == "." then
  441. wait(0.5)
  442. elseif string.sub(texty, i, i) == "," then
  443. wait(0.2)
  444. end
  445. wait()
  446. end
  447. wait(enddelay)
  448. text.Text = ""
  449. end
  450.  
  451. for i,v in pairs(character:GetChildren()) do
  452. if v:IsA("Part") then
  453. v.Transparency = 1
  454. v.BrickColor = BrickColor.new("Institutional white")
  455. elseif v:IsA("Accessory") then
  456. v:Destroy()
  457. end
  458. end
  459.  
  460. if character.Head:FindFirstChild("face") then
  461. character.Head:FindFirstChild("face"):Destroy()
  462. end
  463.  
  464. --Introducton
  465. --[[
  466. wait(1)
  467. Chat("I'm not me anymore...", 2)
  468. wait(1)
  469. Chat("This pain..", 1)
  470. Chat("This pain welling up inside of me, about to burst like a grenade.", 2)
  471. Chat("I can't take it anymore.", 1)
  472. Chat("When will this end?", 1)
  473. Chat("Why can't I be free?", 1)
  474. Chat("I want to be free!")
  475. Chat("I.. I want my freedom back. I want to be young again. Eternal youth is what I want.", 2)
  476. Chat("But, I won't ever become that, will I?", 2)
  477. Chat("It hurts...", 2)
  478. Chat("But it's time to let go.", 3)
  479. --]]
  480.  
  481.  
  482. local change = Vector3.new(0,0,0)
  483.  
  484. --Functions
  485.  
  486. local function Mesh(parent,meshtype)
  487. local mesh = Instance.new("SpecialMesh")
  488. mesh.MeshType = meshtype
  489. mesh.Name = "Meshy"
  490. mesh.Parent = parent
  491. end
  492.  
  493. local function Effect(place, parent)
  494. local effect = Instance.new("Part")
  495. effect.Size = Vector3.new(0.4,0.4,0.4)
  496. effect.Name = "Effect"
  497. effect.BrickColor = BrickColor.new("Institutional white")
  498. Mesh(effect, "Sphere")
  499. effect.CFrame = CFrame.new(place.Position + Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5)))
  500. effect.Anchored = true
  501. effect.Material = Enum.Material.Neon
  502. effect.CanCollide = false
  503. effect.Parent = parent
  504. coroutine.resume(coroutine.create(function()
  505. for i=1,10 do
  506. effect.Transparency = effect.Transparency + 0.1
  507. effect.CFrame = effect.CFrame:lerp(place.CFrame, 0.05 * i)
  508. wait()
  509. end
  510. effect:Destroy()
  511. end))
  512. end
  513.  
  514. --Develop
  515.  
  516. for i=1,100 do
  517. change = change:lerp(Vector3.new(0,1,0), 0.05)
  518. Effect(character.Torso, character.Torso)
  519. music.Pitch = change.Y
  520. , wait()
  521. end
  522. music.Pitch = 1
  523.  
  524. enabled = true
  525.  
  526. local zdown = false
  527.  
  528. local function HitEffect(place, parent)
  529. local hitef = Instance.new("Part", parent)
  530. hitef.Size = Vector3.new()
  531. hitef.Anchored = true
  532. hitef.Shape = "Ball"
  533. hitef.CanCollide = false
  534. hitef.Material = Enum.Material.Neon
  535. hitef.BrickColor = BrickColor.new("Institutional white")
  536. hitef.CFrame = place
  537. coroutine.resume(coroutine.create(function()
  538. for i=1,5 do
  539. hitef.Transparency = hitef.Transparency + 0.2
  540. hitef.Size = hitef.Size:lerp(Vector3.new(2,2,2), 0.2)
  541. wait()
  542. end
  543. hitef:Destroy()
  544. end))
  545. end
  546.  
  547. local function Check(item, range)
  548. local dist = range
  549. local hum = nil
  550. local root = nil
  551. local scanned = {}
  552. for i,v in pairs(game.Workspace:GetDescendants()) do
  553. if v:IsA("Model") then
  554. if v:FindFirstChild("Humanoid") then
  555. root = v:FindFirstChild("HumanoidRootPart")
  556. if not root then
  557. root = v:FindFirstChild("Torso")
  558. if not root then
  559. root = v:FindFirstChild("UpperTorso")
  560. end
  561. end
  562. if root then
  563. table.insert(scanned, 1, v)
  564. end
  565. end
  566. end
  567. end
  568. for i,v in pairs(scanned) do
  569. if v:IsA("Model") and v ~= character then
  570. hum = v:FindFirstChild("Humanoid")
  571. root = v:FindFirstChild("HumanoidRootPart")
  572. if not root then
  573. root = v:FindFirstChild("Torso")
  574. if not root then
  575. root = v:FindFirstChild("UpperTorso")
  576. end
  577. end
  578. if hum and root then
  579. if (root.Position - item.Position).magnitude < dist then
  580. dist = (root.Position - item.Position).magnitude
  581. else
  582. hum = nil
  583. root = nil
  584. end
  585. end
  586. end
  587. end
  588. if hum and root then
  589. hum:TakeDamage(17)
  590. HitEffect(root.CFrame + Vector3.new(math.random(-3,3),math.random(-3,3),math.random(-3,3)), character.Torso)
  591. end
  592. end
  593.  
  594. local function CreateFist(place, parent)
  595. local fist = Instance.new("Part", parent)
  596. fist.Size = Vector3.new(1,1,2)
  597. fist.BrickColor = BrickColor.new("Institutional white")
  598. fist.Transparency = 0.7
  599. fist.Material = Enum.Material.Neon
  600. fist.Anchored = true
  601. fist.CanCollide = false
  602. local phase = Vector3.new(0,fist.Transparency, 0)
  603. fist.CFrame = CFrame.new(place.Position + Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5))) * CFrame.Angles(math.random(-360,360),math.random(-360,360),math.random(-360,360))
  604. Check(fist, 15)
  605. coroutine.resume(coroutine.create(function()
  606. for i=1,10 do
  607. phase = phase:lerp(Vector3.new(0,1,0), 0.05 * i)
  608. fist.Transparency = phase.Y
  609. fist.Size = fist.Size:lerp(Vector3.new(0,0,25), 0.1 * i)
  610. wait()
  611. end
  612. fist:Destroy()
  613. end))
  614. end
  615.  
  616. mouse.KeyUp:connect(function(key)
  617. key = key:lower()
  618. if key == "z" then
  619. zdown = false
  620. end
  621. end)
  622.  
  623. mouse.KeyDown:connect(function(key)
  624. key = key:lower()
  625. if key == "r" then
  626. bassnoise:Play()
  627. humanoid.WalkSpeed = 26
  628. if character.Torso.Anchored == true then
  629. bassactive = false
  630. for i,v in pairs(character:GetChildren()) do --UNANCHOR
  631. if v:IsA("Part") then
  632. v.Anchored = false
  633. end
  634. end
  635. else
  636. bassactive = true
  637. humanoid.WalkSpeed = 100
  638. for i,v in pairs(character:GetChildren()) do --ANCHOR
  639. if v:IsA("Part") then
  640. v.Anchored = true
  641. end
  642. end
  643. end
  644. elseif key == "e" then
  645. character.Torso.CFrame = CFrame.new(mouse.Hit.p + Vector3.new(0,3,0))
  646. elseif key == "z" then
  647. zdown = true
  648. repeat
  649. CreateFist(character.Torso, character.Torso)
  650. wait()
  651. until zdown == false
  652. end
  653. end)
Add Comment
Please, Sign In to add comment
Public Pastes
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!