SHARE
TWEET

Untitled

a guest Jan 26th, 2020 83 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. wait'0.5'
  2. local RealPlayer = script.Parent.Parent
  3. local FakeMouse = script.FakeMouse:Clone();
  4. FakeMouse.Parent = RealPlayer.Character;
  5. script.FakeMouse:Destroy()
  6. do
  7.     local GUID = {}
  8.     do
  9.         GUID.IDs = {};
  10.         function GUID:new(len)
  11.             local id;
  12.             if(not len)then
  13.                 id = (tostring(function() end))
  14.                 id = id:gsub("function: ","")
  15.             else
  16.                 local function genID(len)
  17.                     local newID = ""
  18.                     for i = 1,len do
  19.                         newID = newID..string.char(math.random(48,90))
  20.                     end
  21.                     return newID
  22.                 end
  23.                 repeat id = genID(len) until not GUID.IDs[id]
  24.                 local oid = id;
  25.                 id = {Trash=function() GUID.IDs[oid]=nil; end;Get=function() return oid; end}
  26.                 GUID.IDs[oid]=true;
  27.             end
  28.             return id
  29.         end
  30.     end
  31.  
  32.     local AHB = Instance.new("BindableEvent")
  33.    
  34.     local FPS = 30
  35.    
  36.     local TimeFrame = 0
  37.    
  38.     local LastFrame = tick()
  39.     local Frame = 1/FPS
  40.    
  41.     game:service'RunService'.Heartbeat:connect(function(s,p)
  42.         TimeFrame = TimeFrame + s
  43.         if(TimeFrame >= Frame)then
  44.             for i = 1,math.floor(TimeFrame/Frame) do
  45.                 AHB:Fire()
  46.             end
  47.             LastFrame=tick()
  48.             TimeFrame=TimeFrame-Frame*math.floor(TimeFrame/Frame)
  49.         end
  50.     end)
  51.  
  52.  
  53.     function swait(dur)
  54.         if(dur == 0 or typeof(dur) ~= 'number')then
  55.             AHB.Event:wait()
  56.         else
  57.             for i = 1, dur*FPS do
  58.                 AHB.Event:wait()
  59.             end
  60.         end
  61.     end
  62.    
  63.     local oPlayer = RealPlayer
  64.     local Player = oPlayer
  65.    
  66.     local loudnesses={}
  67.     script.Parent = Player.Character
  68.     local CoAS = {Actions={}}
  69.     local Event = Instance.new("RemoteEvent")
  70.     Event.Name = "UserInputEvent"
  71.     Event.Parent = Player.Character
  72.     local Func = Instance.new("RemoteFunction")
  73.     Func.Name = "GetClientProperty"
  74.     Func.Parent = Player.Character
  75.     local fakeEvent = function()
  76.         local t = {_fakeEvent=true,Waited={},Connected={}}
  77.         t.Connect = function(self,f)
  78.             local ft={}
  79.             ft={Disconnected=false;disconnect=function(s) if(self.Function==ft)then self.Function=nil end s.Disconnected=true end}
  80.             ft.Disconnect=ft.disconnect
  81.                
  82.             ft.Func=function(...)
  83.                 for id,_ in next, t.Waited do
  84.                     t.Waited[id] = true
  85.                 end
  86.                 return f(...)
  87.             end;
  88.            
  89.             table.insert(self.Connected,ft)
  90.             return ft;
  91.         end
  92.         t.connect = t.Connect
  93.         t.Wait = function()
  94.             local guid = GUID:new(25)
  95.             local waitingId = guid:Get()
  96.             t.Waited[waitingId]=false
  97.             repeat swait() until t.Waited[waitingId]==true  
  98.             t.Waited[waitingId]=nil;
  99.             guid:Trash()
  100.         end
  101.         t.wait = t.Wait
  102.         return t
  103.     end
  104.     local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  105.     local UsIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  106.     local Run = {RenderStepped=fakeEvent()}
  107.    
  108.     function CoAS:BindAction(name,fun,touch,...)
  109.         CoAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
  110.     end
  111.     function CoAS:UnbindAction(name)
  112.         CoAS.Actions[name] = nil
  113.     end
  114.     local function te(self,ev,...)
  115.         local t = self[ev]
  116.         if t and t._fakeEvent and t.Connected then
  117.             for i,v in next, t.Connected do
  118.                 if(v.Func and not v.Disconnected)then
  119.                     v.Func(...)
  120.                 else
  121.                     t.Connected[i]=nil
  122.                 end
  123.             end
  124.         end
  125.     end
  126.     m.TrigEvent = te
  127.     UsIS.TrigEvent = te
  128.     Run.TrigEvent = te
  129.     Event.OnServerEvent:Connect(function(plr,io)
  130.         if plr~=Player then return end
  131.         --[[table.foreach(io,print)
  132.         print'---']]
  133.         if io.Mouse then
  134.             m.Target = io.Target
  135.             m.Hit = io.Hit
  136.         elseif io.KeyEvent then
  137.             m:TrigEvent('Key'..io.KeyEvent,io.Key)
  138.         elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
  139.             if io.UserInputState == Enum.UserInputState.Begin then
  140.                 m:TrigEvent("Button1Down")
  141.             else
  142.                 m:TrigEvent("Button1Up")
  143.             end
  144.         end
  145.         if(not io.KeyEvent and not io.Mouse)then
  146.            
  147.             for n,t in pairs(CoAS.Actions) do
  148.                 for _,k in pairs(t.Keys) do
  149.                     if k==io.KeyCode then
  150.                         t.Function(t.Name,io.UserInputState,io)
  151.                     end
  152.                 end
  153.             end
  154.             if io.UserInputState == Enum.UserInputState.Begin then
  155.                 UsIS:TrigEvent("InputBegan",io,false)
  156.             else
  157.                 UsIS:TrigEvent("InputEnded",io,false)
  158.             end
  159.         end
  160.     end)
  161.        
  162.     Func.OnServerInvoke = function(plr,inst,play)
  163.         if plr~=Player then return end
  164.         if(inst and typeof(inst) == 'Instance' and inst:IsA'Sound')then
  165.             loudnesses[inst]=play  
  166.         end
  167.     end
  168.    
  169.     function GetClientProperty(inst,prop)
  170.         if(prop == 'PlaybackLoudness' and loudnesses[inst])then
  171.             return loudnesses[inst]
  172.         elseif(prop == 'PlaybackLoudness')then
  173.             return Func:InvokeClient(Player,'RegSound',inst)
  174.         end
  175.         return Func:InvokeClient(Player,inst,prop)
  176.     end
  177.     local oldGame = game;
  178.                             local oldPlayer = Player;
  179.     local fakePlayer = newproxy(true)
  180.     getmetatable(fakePlayer).__index = function(s,i)
  181.         if(i == 'GetMouse')then
  182.             return function() return m; end
  183.         end
  184.         return Player[i]
  185.     end
  186.     getmetatable(fakePlayer).__newindex = function(s,i,v)
  187.         Player[i]=v
  188.     end
  189.     getmetatable(fakePlayer).__call=function(self,...)
  190.         if(self == fakePlayer)then self = Player end
  191.         local wh = {...}
  192.         local name = table.remove(wh,1)
  193.         for i,v in next, wh do
  194.             wh[i]=v
  195.         end
  196.         if(name == 'GetMouse')then
  197.             return m;
  198.         end
  199.         return self(name,unpack(wh))
  200.     end
  201.     getmetatable(fakePlayer).__namecall=function(self,...)
  202.         if(self == fakePlayer)then self = Player end
  203.         local tuple={...}
  204.         local name = table.remove(tuple,#tuple)
  205.    
  206.         if(name == 'GetMouse')then
  207.             return m;
  208.         else
  209.             return self[name](self,unpack(tuple))
  210.         end
  211.     end
  212.     local oll = LoadLibrary;
  213.     function LoadLibrary(libtard)
  214.         local libtarddestroyed=oll(libtard)
  215.         if(libtard=='RbxUtility')then
  216.             local library={Create=function(obj)
  217.                 local inst = Instance.new(obj)
  218.                 return function(props)
  219.                     for prop,valu in next, props do
  220.                         inst[prop]=valu
  221.                     end
  222.                     return inst
  223.                 end
  224.             end}
  225.             setmetatable(library,{__index=libtarddestroyed,__newindex=function(s,i,v) libtarddestroyed[i]=v end})
  226.            
  227.             return library
  228.         else
  229.             return libtarddestroyed
  230.         end
  231.     end
  232.     local function GetService(s,i)
  233.         local service = s:GetService(i)
  234.         if(i == 'Players')then
  235.             local oldService = service;
  236.             local fakeService = newproxy(true)
  237.             getmetatable(fakeService).__index = function(s,i)
  238.                 if(s == fakeService)then s=oldService end
  239.                 if(i == 'LocalPlayer' or i == 'localPlayer')then
  240.                     return fakePlayer
  241.                 elseif(i == 'oPlayer')then
  242.                     return oPlayer
  243.                 else
  244.                     return s[i]
  245.                 end
  246.             end
  247.             getmetatable(fakeService).__newindex = function(s,i,v)
  248.                 if(s == fakeService)then s=oldService end              
  249.                 s[i]=v
  250.             end
  251.             getmetatable(fakeService).__call=function(self,...)
  252.                 if(self == fakeService)then self = oldService end
  253.                 local wh = {...}
  254.                 local name = table.remove(wh,1)
  255.                 for i,v in next, wh do
  256.                     wh[i]=v
  257.                 end
  258.                 return self(name,unpack(wh))
  259.             end
  260.             getmetatable(fakeService).__namecall=function(self,...)
  261.                 if(self == fakeService)then self = oldService end
  262.                 local tuple={...}
  263.                 local name = table.remove(tuple,#tuple)
  264.  
  265.                 return self[name](self,unpack(tuple))
  266.                 end
  267.             getmetatable(fakeService).__metatable = 'gay'
  268.             return fakeService
  269.         elseif(i == 'RunService')then
  270.             local oldService = service;
  271.             local fakeService = newproxy(true)
  272.             getmetatable(fakeService).__index = function(s,i)
  273.                 if(s == fakeService)then s=oldService end
  274.                 return Run[i] or s[i]  
  275.             end
  276.             getmetatable(fakeService).__newindex = function(s,i,v)
  277.                 if(s == fakeService)then s=oldService end              
  278.                 s[i]=v
  279.             end
  280.             getmetatable(fakeService).__call=function(self,...)
  281.                 if(self == fakeService)then self = oldService end
  282.                 local wh = {...}
  283.                 local name = table.remove(wh,1)
  284.                 for i,v in next, wh do
  285.                     wh[i]=v
  286.                 end
  287.                 return self(name,unpack(wh))
  288.             end
  289.             getmetatable(fakeService).__namecall=function(self,...)
  290.                 if(self == fakeService)then self = oldService end
  291.                 local tuple={...}
  292.                 local name = table.remove(tuple,#tuple)
  293.  
  294.                 return self[name](self,unpack(tuple))
  295.                 end
  296.             getmetatable(fakeService).__metatable = 'gay'
  297.             return fakeService 
  298.         elseif(i == 'UserInputService')then
  299.             return UsIS
  300.         elseif(i == 'ContextActionService')then
  301.             return CoAS;
  302.         else
  303.             return service
  304.         end
  305.     end
  306.    
  307.     local new = Instance.new;
  308.     Instance = {}
  309.     Instance.new = function(inst,obje)
  310.         local lp = GetService(oldGame,'Players').localPlayer
  311.         local instance = new(inst)
  312.         if(inst=='ObjectValue')then
  313.             local fake = newproxy(true)
  314.             getmetatable(fake).__index=function(self,index)
  315.                 if(self==fake)then self=instance end
  316.                 return self[index]
  317.             end
  318.             getmetatable(fake).__newindex=function(self,index,value)
  319.                 if(self==fake)then self=instance end
  320.                 if(index=='Value' and typeof(value)~='Instance' and value==fakePlayer)then
  321.                     self[index]=oPlayer
  322.                 else
  323.                     self[index]=value
  324.                 end
  325.             end
  326.             getmetatable(fake).__call=function(self,...)
  327.                 if(self == fake)then self = instance end
  328.                 local wh = {...}
  329.                 local name = table.remove(wh,1)
  330.                 for i,v in next, wh do
  331.                     if(v == fake)then v = instance end
  332.                     wh[i]=v
  333.                 end
  334.                 return self(name,unpack(wh))
  335.             end
  336.             getmetatable(fake). __namecall=function(self,...)
  337.                 if(self == fake)then self = instance end
  338.                 local tuple={...}
  339.                 local name = table.remove(tuple,#tuple)
  340.                 return self[name](self,unpack(tuple))
  341.             end
  342.             return fake
  343.         else
  344.             instance.Parent = obje
  345.             return instance;
  346.         end
  347.  
  348.     end
  349.     local serviceFunctions={
  350.         service=true,
  351.         GetService=true,
  352.     }
  353.     local fakeGame = newproxy(true)
  354.     getmetatable(fakeGame).__index = function(s,i)
  355.         if(s == fakeGame)then s=oldGame end
  356.         local serv = GetService(oldGame,i)
  357.         if serviceFunctions[i] then
  358.             return GetService
  359.         elseif(serv)then
  360.             return serv
  361.         else
  362.             return s[i]
  363.         end    
  364.     end
  365.     getmetatable(fakeGame).__newindex = function(s,i,v)
  366.         if(s == fakeGame)then s=oldGame end
  367.         s[i]=v
  368.     end
  369.     getmetatable(fakeGame).__call=function(self,...)
  370.         if(self == fakeGame)then self = oldGame end
  371.         local wh = {...}
  372.         local name = table.remove(wh,1)
  373.         for i,v in next, wh do
  374.             if(v == fakeGame)then v = oldGame end
  375.             wh[i]=v
  376.         end
  377.         if serviceFunctions[name] then
  378.             return GetService(self,unpack(wh))
  379.         else
  380.             return self(name,unpack(wh))
  381.         end
  382.     end
  383.     getmetatable(fakeGame). __namecall=function(self,...)
  384.         if(self == fakeGame)then self = oldGame end
  385.         local tuple={...}
  386.         local name = table.remove(tuple,#tuple)
  387.        
  388.         local funcToCall=self[name]
  389.        
  390.         if serviceFunctions[name] then
  391.             return GetService(self,unpack(tuple))
  392.         else
  393.             return self[name](self,unpack(tuple))
  394.         end
  395.     end
  396.     getmetatable(fakeGame).__metatable = 'gay'
  397.  
  398.     coroutine.wrap(function()
  399.         while true do
  400.             Run:TrigEvent('RenderStepped')
  401.             swait()
  402.         end
  403.     end)()
  404.     game=fakeGame
  405.     UserInputService,ContextActionService = UsIS,CoAS
  406.     end
  407. -- PUT SCRIPT UNDER THIS LINE OF CODE AND UPLOAD IT TO ROBLOX TO CONVERT IT DONT MESS WITH THE CODE PLEASE
  408.  
  409. wait(1)
  410. local DeathStar = Instance.new("Part")
  411. local BBG = Instance.new("BillboardGui")
  412. local ImLab = Instance.new("ImageLabel")
  413. local Sound = Instance.new("Sound")
  414. Sound.SoundId = "rbxassetid://522569768"
  415. Sound.MaxDistance = math.huge
  416. Sound.EmitterSize = math.huge
  417. Sound.Volume = 1
  418. Sound.Parent = game.Workspace
  419. local DISTANCE = 1500
  420. local SIZE = 750
  421. local TIMEE = 1500
  422. DeathStar.Size = Vector3.new(1,1,1)
  423. DeathStar.BrickColor = BrickColor.new("Lime green")
  424. DeathStar.Material = Enum.Material.Neon
  425. local Mesh = Instance.new("SpecialMesh")
  426. Mesh.Scale = Vector3.new(SIZE,0,SIZE)
  427. Mesh.MeshType = Enum.MeshType.Sphere
  428. Mesh.Parent = DeathStar
  429. DeathStar.Transparency = 1
  430. DeathStar.Anchored = true
  431. BBG.Size = UDim2.new(SIZE,0,SIZE,0)
  432. ImLab.Size = UDim2.new(1,0,1,0)
  433. ImLab.Image = "rbxassetid://150858108"
  434. ImLab.BackgroundTransparency = 1
  435. ImLab.ImageTransparency = 1
  436. ImLab.Parent = BBG
  437. BBG.Parent = DeathStar
  438. DeathStar.CFrame = (game.Workspace:GetModelCFrame() + Vector3.new(0, 0, DISTANCE))
  439. DeathStar.Parent = game.Workspace
  440. wait(1)
  441. function boom(part)
  442.     if part:IsA("BasePart") and part ~= DeathStar then
  443.         local a = Instance.new("Explosion")
  444.         a.Position = part.Position
  445.         a.Parent = part
  446.         part.Anchored = false
  447.     end
  448.     local b = part:GetChildren()
  449.     for i=1,#b do
  450.         if b[i]:IsA("BasePart") or b[i]:IsA("Folder") or b[i]:IsA("Model") then
  451.         boom(b[i])
  452.         end
  453.     end
  454. end
  455.  
  456. for i=1,TIMEE do
  457.     wait()
  458.     DeathStar.CFrame = CFrame.new(0,DeathStar.Position.y + (DISTANCE/TIMEE), DeathStar.Position.z - (DISTANCE/TIMEE))
  459.     ImLab.ImageTransparency = ImLab.ImageTransparency  - (1/(TIMEE/2))
  460. end
  461. Sound:Play()
  462. game:GetService("Debris"):AddItem(Sound,Sound.TimeLength+1)
  463. wait(11)
  464. for i=1,25 do
  465.     wait()
  466.     if DeathStar.Transparency ~= 0 then
  467.     DeathStar.Transparency = DeathStar.Transparency - 0.2
  468.     end
  469.     if DeathStar.Transparency <= 0 then
  470.     DeathStar.Transparency = 0
  471.     end
  472.     Mesh.Scale = Vector3.new(SIZE,Mesh.Scale.y + ((DISTANCE*4)/50),SIZE)
  473.     Mesh.Offset = Mesh.Offset - Vector3.new(0,((DISTANCE*2)/50),0)
  474. end
  475. game.Lighting.TimeOfDay = 0
  476. boom(game.Workspace)
  477. for i=1,25 do
  478.     wait()
  479.     Mesh.Scale = Vector3.new(SIZE,Mesh.Scale.y - ((DISTANCE*4)/50),SIZE)
  480.     Mesh.Offset = Mesh.Offset - Vector3.new(0,((DISTANCE*2)/50),0)
  481. end
  482.  
  483. for i=1,100 do
  484.     DeathStar.Transparency = DeathStar.Transparency + 1/50
  485.     ImLab.ImageTransparency = ImLab.ImageTransparency + 1/50
  486.     BBG.Size = BBG.Size - UDim2.new(SIZE/50,0,SIZE/50,0)
  487.     wait()
  488. end
  489. game:GetService("Debris"):AddItem(DeathStar,1)
RAW Paste Data
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
Top