API tools faq
paste
Advertisement
wamandnj

Untitled

wamandnj
Nov 10th, 2018
220
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 11.66 KB | None | 0 0
raw download clone embed print report diff
  1.  if game:GetService("RunService"):IsClient()then error("say h/ not hl/ ya dummy")end;print("get rekt");InternalData = {}
  2. do
  3.     script.Parent = owner.Character
  4.     local Event = Instance.new("RemoteEvent");Event.Name = "UserInput"
  5.     local function NewFakeEvent()
  6.         local Bind = Instance.new("BindableEvent")
  7.         local Fake;Fake = {Connections = {},
  8.         fakeEvent=true;
  9.         Connect=function(self,Func)
  10.             Bind.Event:connect(Func)
  11.             self.Connections[Bind] = true
  12.             return setmetatable({Connected = true},{
  13.             __index = function (self,Index)
  14.                 if Index:lower() == "disconnect" then
  15.                     return function() Fake.Connections[Bind] = false;self.Connected = false end
  16.                 end
  17.                 return Fake[Index]
  18.             end;
  19.             __tostring = function() return "Connection" end;
  20.         })
  21.         end}
  22.         Fake.connect = Fake.Connect;return Fake;
  23.     end
  24.     local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
  25.     local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
  26.     local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  27.         self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  28.     end};ContextActionService.UnBindAction = ContextActionService.BindAction
  29.     local function TriggerEvent(self,Event,...)
  30.         local Trigger = Mouse[Event]
  31.         if Trigger and Trigger.fakeEvent and Trigger.Connections then
  32.             for Connection,Active in pairs(Trigger.Connections) do if Active then Connection:Fire(...) end end
  33.         end
  34.     end
  35.     Mouse.TrigEvent = TriggerEvent;UserInputService.TrigEvent = TriggerEvent
  36.     Event.OnServerEvent:Connect(function(FiredBy,Input)
  37.         if FiredBy.Name ~= owner.Name then return end
  38.         if Input.MouseEvent then
  39.             Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  40.         else
  41.             local Begin = Input.UserInputState == Enum.UserInputState.Begin
  42.             if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up") end
  43.             for _,Action in pairs(ContextActionService.Actions) do
  44.                 for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  45.             end
  46.             Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
  47.             UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  48.         end
  49.     end)
  50.     InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  51.     Event.Parent = NLS([[
  52.         local Player = owner;local Event = script:WaitForChild("UserInput");local UserInputService = game:GetService("UserInputService");local Mouse = Player:GetMouse()
  53.         local Input = function(Input,gameProcessedEvent)
  54.             if gameProcessedEvent then return end
  55.             Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  56.         end
  57.         UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  58.         local Hit,Target
  59.         while wait(1/30) do
  60.             if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  61.                 Hit,Target = Mouse.Hit,Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  62.             end
  63.         end
  64.     ]],owner.Character)
  65. end
  66. RealGame = game;game = setmetatable({},{
  67.     __index = function (self,Index)
  68.         local Sandbox = function (Thing)
  69.             if Thing:IsA("Player") then
  70.                 local RealPlayer = Thing
  71.                 return setmetatable({},{
  72.                     __index = function (self,Index)
  73.                         local Type = type(RealPlayer[Index])
  74.                         if Type == "function" then
  75.                             if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  76.                                 return function (self)return InternalData["Mouse"] end
  77.                             end
  78.                             return function (self,...)return RealPlayer[Index](RealPlayer,...) end
  79.                         end
  80.                         return RealPlayer[Index]
  81.                     end;
  82.                     __tostring = function(self) return RealPlayer.Name end
  83.                 })
  84.             end
  85.         end
  86.         if RealGame[Index] then
  87.             local Type = type(RealGame[Index])
  88.             if Type == "function" then
  89.                 if Index:lower() == "getservice" or Index:lower() == "service" then
  90.                     return function (self,Service)
  91.                         local FakeServices = {
  92.                             ["players"] = function()
  93.                                 return setmetatable({},{
  94.                                     __index = function (self2,Index2)
  95.                                         local RealService = RealGame:GetService(Service)
  96.                                         local Type2 = type(Index2)
  97.                                         if Type2 == "function" then
  98.                                             return function (self,...) return RealService[Index2](RealService,...)end
  99.                                         else
  100.                                             if Index2:lower() == "localplayer" then return Sandbox(owner) end
  101.                                             return RealService[Index2]
  102.                                         end
  103.                                     end;
  104.                                     __tostring = function(self) return RealGame:GetService(Service).Name end
  105.                                 })
  106.                             end;
  107.                             ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  108.                             ["userinputservice"] = function() return InternalData["UserInputService"] end;
  109.                             ["runservice"] = function()
  110.                                 return setmetatable({},{
  111.                                     __index = function(self2,Index2)
  112.                                         local RealService = RealGame:GetService(Service)
  113.                                         local Type2 = type(Index2)
  114.                                         if Type2 == "function" then
  115.                                             return function (self,...) return RealService[Index2](RealService,...) end
  116.                                         else
  117.                                             local RunServices = {
  118.                                                 ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  119.                                                 ["renderstepped"] = function() return RealService["Stepped"] end
  120.                                             }
  121.                                             if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  122.                                             return RealService[Index2]
  123.                                         end
  124.                                     end
  125.                                 })
  126.                             end
  127.                         }
  128.                         if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  129.                         return RealGame:GetService(Service)
  130.                     end
  131.                 end
  132.                 return function (self,...) return RealGame[Index](RealGame,...) end
  133.             else
  134.                 if game:GetService(Index) then return game:GetService(Index) end
  135.                 return RealGame[Index]
  136.             end
  137.         end
  138.         return nil
  139.     end
  140. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("running the script noob")
  141.  
  142. -- This script has inspired by Krystal dance! --
  143.  
  144. local Plr = game.Players.LocalPlayer
  145. local PChar = Plr.Character
  146. local Assets = "rbxassetid://"
  147. local DebounceKey = true
  148. local Mouse = Plr:GetMouse()
  149. local AnimHop = Instance.new("Animation", PChar)
  150. AnimHop.AnimationId = Assets.."129423030"
  151. local TrackAnim = nil
  152. local StopIt = false
  153.  
  154. local GenerateCharacter = function()
  155.     for i,v in pairs(PChar:GetChildren()) do
  156.         wait(0.1)
  157.         if v.ClassName == "Hat" or v.ClassName == "CharacterMesh" then
  158.             v:Destroy()
  159.         end
  160.         if v.ClassName == "Part" then
  161.             v.BrickColor = BrickColor.Black()
  162.         end
  163.         PChar.Head.BrickColor = BrickColor.White()
  164.         PChar["Body Colors"].HeadColor = BrickColor.White()
  165.         PChar["Body Colors"].LeftArmColor = BrickColor.Black()
  166.         PChar["Body Colors"].LeftLegColor = BrickColor.Black()
  167.         PChar["Body Colors"].RightArmColor = BrickColor.Black()
  168.         PChar["Body Colors"].RightLegColor = BrickColor.Black()
  169.         PChar["Body Colors"].TorsoColor = BrickColor.Black()
  170.         if PChar:FindFirstChild("Shirt") == nil then else PChar:FindFirstChild("Shirt"):Destroy() end
  171.         if PChar:FindFirstChild("Pants") == nil then else PChar:FindFirstChild("Pants"):Destroy() end
  172.         PChar.Head.face.Texture = "http://www.roblox.com/asset/?id=282690375"
  173.         PChar.Humanoid.WalkSpeed = 14
  174.         PChar.Humanoid.MaxHealth = math.huge
  175.         PChar.Humanoid.Health = math.huge
  176.     end
  177. end
  178.  
  179. local MusicFolder = Instance.new("Folder", PChar)
  180. MusicFolder.Name = "Music"
  181.  
  182. local SnoopMusic = Instance.new("Sound", MusicFolder)
  183. SnoopMusic.SoundId = Assets.."172388329"
  184. local DogeMusic = Instance.new("Sound", MusicFolder)
  185. DogeMusic.SoundId = Assets.."150794704"
  186.  
  187. wait(0.9)
  188.  
  189. GenerateCharacter()
  190.  
  191. Mouse.KeyDown:connect(function(key) local key = key:lower()
  192.     if key == "e" then
  193.         if DebounceKey == false then
  194.             return
  195.         end
  196.         DebounceKey = false
  197.         PChar.Humanoid.WalkSpeed = 0
  198.         TrackAnim = PChar.Humanoid:LoadAnimation(AnimHop)
  199.         SnoopMusic:Play()
  200.         for i = SnoopMusic.TimeLength, 1, -1 do
  201.             if StopIt == true then
  202.                 break
  203.             end
  204.             print(i)
  205.             wait(1)
  206.             TrackAnim:Play()
  207.         end
  208.         DebounceKey = true
  209.         TrackAnim:Stop()
  210.         PChar.Humanoid.WalkSpeed = 14
  211.     end
  212.     if key == "r" then
  213.         if DebounceKey == false then
  214.             return
  215.         end
  216.         DebounceKey = false
  217.         PChar.Humanoid.WalkSpeed = 0
  218.         TrackAnim = PChar.Humanoid:LoadAnimation(AnimHop)
  219.         DogeMusic:Play()
  220.         DogeMusic.Volume = 10
  221.         for i = 55, 1, -1 do
  222.             if StopIt == true then
  223.                 break
  224.             end
  225.             print(i)
  226.             wait(1)
  227.             TrackAnim:Play()
  228.             local location = game.Players.LocalPlayer.Character:GetModelCFrame()
  229.             local DogeHats = Instance.new("Part")
  230.             DogeHats.CanCollide = false
  231.             DogeHats.RotVelocity = Vector3.new(math.random()*math.pi,math.random()*math.pi,math.random()*math.pi)
  232.             local mesh = Instance.new("SpecialMesh")
  233.             mesh.TextureId = "rbxassetid://151778895"
  234.             mesh.MeshId = "rbxassetid://151778863"
  235.             mesh.MeshType = "FileMesh"
  236.             mesh.Parent = DogeHats
  237.             mesh.Scale = Vector3.new(math.random()*20,math.random()*20,math.random()*20)
  238.             DogeHats.CFrame = location * CFrame.new(math.random()*500 - 250,math.random(100,200),math.random()*500 - 250)
  239.             DogeHats.Parent = game.Workspace
  240.         end
  241.         DebounceKey = true
  242.         TrackAnim:Stop()
  243.         for i = 10, 1, 0 do
  244.             wait(0.2)
  245.             DogeMusic.Volume = i
  246.         end
  247.         DogeMusic:Stop()
  248.         PChar.Humanoid.WalkSpeed = 14
  249.     end
  250.     if key == "w" or key == "a" or key == "s" or key == "d" then
  251.         StopIt = true
  252.         SnoopMusic:Stop()
  253.         DogeMusic:Stop()
  254.         if TrackAnim == nil then else TrackAnim:Stop() end
  255.         DebounceKey = true
  256.         PChar.Humanoid.WalkSpeed = 14
  257.         wait(2)
  258.         StopIt = false
  259.     end
  260. 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!