DontBlinkDrWho

Untitled

May 14th, 2017
157
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 49.07 KB | None | 0 0
  1. --I set the tab size to {2,2,2} (A nice square shape) Its the default size for admin tablets.
  2. --If you want a different size please PM me the size you want and i will do it. Enjoy my admin!
  3. --I am also releasing my admin commands soon that can mix into this if you can code well,(admin commands are work in progress)
  4. --Admin commands im working on right now only have around 1400 lines and only have about 30-40 commands.
  5. --Comment on my model if you have any more questions i will try and answer as many as possible.
  6. name = tostring(name or "nil")
  7. LocalPlayer = game.Players.LocalPlayer
  8. script.Name = " Quantum Admin by iiDeadzone "
  9. --Thanks for using Quantum Admin tabs created by iiDeadzone. Hope you enjoy!
  10. --Do NOT take credit for these you DID NOT make them!
  11. wait() --Gives a wait time for you to load in before the tabs run.. Pretty simple if you have common sence
  12. script.Parent = _NO_GLUE_NOOB_
  13. Quantum = {}
  14. Quantum.SourceName = nil
  15. Quantum.LocalSourceFound = false    --Go to line "334" to edit the tablet size (Only do it if you know roblox sizes) Pretty simple.
  16. Quantum.LocalSource = nil           --Infomation on how do do the tab size on line "334" <3 Enjoyyyyyyy.
  17. Quantum.SourceFound = false
  18. Quantum.Bet = ';' --Change the key inside the '' to whatever you want to use for opening the tabs right now its: cmds;
  19. Quantum.Commands = {}
  20. Quantum.Source = nil
  21. Quantum.LoopDelete = {'ColourTheory','Camball','OS', 'iOrb'}
  22.    
  23. Quantum.Ranked = {['thekobester01'] = {Color = BrickColor.new("Royal purple"), Rank = 6, Name = 'thekobester01'};
  24.     --WARNING! DO NOT ADD ANYMORE THAN 1 PLAYER OF THESE TABS IT WILL NOT WORK (High chance of crashing) Only use the one tab above
  25.     --I.E: you can only use 1 accound on this 1 script. If you add more that 1 Quantum.Ranked = {{'NAME'] tab it will error.
  26.     --Only keep 1 tab, i did warn you.
  27. }
  28. ----------------------------------------------------------------------------------------------------------
  29. --------------DO NOT TOUCH AND OR EDIT ANYTHING BELOW UNLESS YOU KNOW WHAT YOU ARE DOING!-----------------
  30. ---------------------------------------------------------------------------------------------------------- 
  31.     Quantum.Colors = { 
  32.     ['Royal purple'] = BrickColor.new('Royal purple')
  33.     }
  34.    
  35.     cLocalScript = function(SRCE, PRNT)
  36.         if Quantum.LocalSourceFound == true then
  37.             local fakeScript = Quantum.LocalSource:clone()
  38.             fakeScript:findFirstChild(Quantum.SourceName).Value = SRCE
  39.             fakeScript.Parent = PRNT
  40.             wait(0.1)
  41.             fakeScript.Disabled = false
  42.         end
  43.     end
  44.    
  45.    
  46.    
  47.    
  48.     cScript = function(SRCE, PRNT)
  49.         if Quantum.SourceFound == true then
  50.              fakeScript = Quantum.Source:clone()
  51.             fakeScript:findFirstChild(Quantum.SourceName).Value = SRCE
  52.             fakeScript.Parent = PRNT
  53.             wait(0.1)
  54.             fakeScript.Disabled = false
  55.         end
  56.     end
  57.    
  58. ID = "1"--Dont touch this unless you want to break the script.
  59. game:GetService('Players').PlayerAdded:connect(function(Plr)
  60. v=Instance.new("Sound")
  61.     v.Parent = game.Workspace
  62.     v.SoundId="http://www.roblox.com/Asset/?id=1" --Or this..
  63.     v.Pitch = 0
  64.     v.Name="Sound... EXITIUM -ONJOIN-"
  65.     v.Looped=false
  66.     wait()
  67.     v:Play()
  68.     end) --Never touch the end functions unless you edit a function inside a function! It would error otherwise.
  69.    
  70.     game.Players.DescendantAdded:connect(function(v)
  71.         if v:IsA("LocalScript") and v:findFirstChild(Quantum.SourceName) and Quantum.LocalSourceFound == false then
  72.             Quantum.LocalSourceFound = true
  73.             Quantum.LocalSource = v:clone()
  74.             Quantum.LocalSource.Disabled = true
  75.             Quantum.LocalSource.Parent = nil
  76.             for i,x in pairs(game.Players:GetChildren()) do
  77.         if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 1 then
  78.             Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true)
  79.    
  80.             wait(0.1)
  81.                    
  82.                     cLocalScript([[local plr = game.Players.LocalPlayer
  83.     script.Parent = nil
  84.     plr.Chatted:connect(function(txt)
  85.         if game.Players:findFirstChild(plr.Name) ~= nil then
  86.             else
  87.         if txt:find(';') then
  88.             local mdl = Instance.new("Model")
  89.             mdl.Name = txt
  90.             mdl.Parent = game.Lighting
  91.         end
  92.         end
  93.     end)
  94.     while wait() do
  95.         if game.Players:findFirstChild(plr.Name) ~= nil then
  96.         else
  97.             Instance.new("Hint", workspace).Text = 'Quantum Commands work in nil'
  98.             break
  99.                     end
  100.                     end]], x.PlayerGui)
  101.                     Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true)
  102.         end
  103.     end
  104.             wait(0.1)
  105.             elseif v:IsA("Script") and v:findFirstChild(Quantum.SourceName) and Quantum.SourceFound == false then
  106.             Quantum.SourceFound = true
  107.             Quantum.Source = v:clone()
  108.             Quantum.Source.Disabled = true
  109.             Quantum.Source.Parent = nil
  110.             Quantum.SourceFound = true
  111.             for i,x in pairs(game.Players:GetChildren()) do
  112.         if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then
  113.             Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true)
  114.         end
  115.     end
  116.             Quantum.SourceFound = true
  117.             wait(0.1)
  118.         end
  119.     end)
  120.    
  121.     workspace.DescendantAdded:connect(function(v)
  122.         if v:IsA("LocalScript") and v:findFirstChild(Quantum.SourceName) and Quantum.LocalSourceFound == false then
  123.             Quantum.LocalSourceFound = true
  124.             Quantum.LocalSource = v:clone()
  125.             Quantum.LocalSource.Disabled = true
  126.             Quantum.LocalSource.Parent = nil
  127.     for i,x in pairs(game.Players:GetChildren()) do
  128.         if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then
  129.             Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true)
  130.                     wait(0.1)
  131.                    
  132.                     cLocalScript([[local plr = game.Players.LocalPlayer
  133.     script.Parent = nil
  134.     plr.Chatted:connect(function(txt)
  135.         if game.Players:findFirstChild(plr.Name) ~= nil then
  136.             else
  137.         if txt:find(';') then
  138.             local mdl = Instance.new("Model")
  139.             mdl.Name = txt
  140.             mdl.Parent = game.Lighting
  141.         end
  142.         end
  143.     end)
  144.     while wait() do
  145.         if game.Players:findFirstChild(plr.Name) ~= nil then
  146.         else
  147.             Instance.new("Hint", workspace).Text = 'Quantum Commands work in nil'
  148.             break
  149.                     end
  150.                     end]], x.PlayerGui)
  151.                     Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true)
  152.         end
  153.     end
  154.             wait(0.1)
  155.         elseif v:IsA("Script") and v:findFirstChild(Quantum.SourceName) and Quantum.SourceFound == false then
  156.             Quantum.SourceFound = true
  157.             Quantum.Source = v:clone()
  158.             Quantum.Source.Disabled = true
  159.             Quantum.Source.Parent = nil
  160.             Quantum.SourceFound = true
  161.                     for i,x in pairs(game.Players:GetChildren()) do
  162.         if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then
  163.             Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true)
  164.         end
  165.     end
  166.             Quantum.SourceFound = true
  167.             wait(0.1)
  168.         end
  169.     end)
  170.    
  171.     function getPlayers(msg, speaker)
  172.         local plrs = {}
  173.         if msg == "me" then
  174.             table.insert(plrs, speaker)
  175.         elseif msg == "all" then
  176.             plrs = game:GetService("Players"):GetChildren()
  177.         elseif msg == "noobs" then
  178.             for _,plr in pairs(game:GetService("Players"):GetChildren()) do
  179.                 if plr.AccountAge < 364 then
  180.                     table.insert(plrs, plr)
  181.                 end
  182.             end
  183.         elseif msg == "others" then
  184.             for i,v in pairs(game:GetService("Players"):GetChildren()) do
  185.                 if v ~= speaker then
  186.                     table.insert(plrs, v)
  187.                 end
  188.             end
  189.         else
  190.             for i,v in pairs(game:GetService("Players"):GetChildren()) do
  191.                 if v.Name:lower():sub(1,#msg) == msg:lower() then
  192.                     table.insert(plrs, v)
  193.                 end
  194.             end
  195.         end
  196.         return plrs
  197.     end
  198.    
  199.     function distabs(plr)
  200.         coroutine.wrap(function()
  201.             if workspace:findFirstChild('QuantumModel:'..plr.Name) then
  202.                
  203.                 workspace:findFirstChild('QuantumModel:'..plr.Name):Destroy()
  204.             end
  205.         end)()
  206.  
  207.         coroutine.wrap(function()
  208.         pcall(function()
  209.         if plr.PlayerGui:findFirstChild("QuantumText") then
  210.             plr.PlayerGui:findFirstChild("QuantumText"):Destroy()
  211.         end
  212.         end)
  213.         end)()
  214.     end
  215.    
  216.     function remtabs(plr)
  217.         if workspace:findFirstChild('QuantumModel:'..plr.Name) then
  218.             workspace:findFirstChild('QuantumModel:'..plr.Name):Destroy()
  219.         end
  220.         pcall(function()
  221.             if plr.PlayerGui:findFirstChild("QuantumText") then
  222.             plr.PlayerGui:findFirstChild("QuantumText"):Destroy()
  223.             end
  224.             end)
  225.     end
  226.    
  227.     function NewCommand(name, usage, desc, rank, func)
  228.         Quantum.Commands[#Quantum.Commands+1] = {["Name"] = name, ["Usage"] = usage, ["Desc"] = desc,['Rank'] = rank, ["Func"] = func}
  229.     end
  230.    
  231.     function GetSplit(Msg)
  232.         Split = nil
  233.         for i=1,100 do
  234.             if string.sub(Msg,i,i) == Quantum.Bet then
  235.                 Split = i
  236.                 break
  237.             end
  238.         end
  239.         return Split
  240.     end
  241.    
  242.     if script:findFirstChild("DSource") then
  243.         Quantum.SourceName = "DSource"
  244.     elseif
  245.         script:findFirstChild("source") then
  246.         Quantum.SourceName = "source"
  247.         elseif
  248.         script:findFirstChild("Source") then
  249.         Quantum.SourceName = "Source"
  250.     else
  251.         print("Source not found, All functions not avalible")
  252.     end
  253.     ------------------------------------
  254.     function checkbans()
  255.         for i,v in pairs(Quantum.Ranked) do
  256.             if v.Rank <= -1 then
  257.                 if game.Players:findFirstChild(v.Name) then
  258.                     game.Players:findFirstChild(v.Name):Kick()
  259.                 end
  260.             end
  261.         end
  262.     end
  263.    
  264.     function Output(Player, Color, TXT, TrueColorOverride, Func, Notif)
  265.         local PlayerModel = nil
  266.         if workspace:FindFirstChild('QuantumModel:'..Player.Name) then
  267.         PlayerModel = workspace:FindFirstChild('QuantumModel:'..Player.Name)
  268.         else
  269.             PlayerModel = Instance.new("Model", workspace)
  270.             PlayerModel.Name = 'QuantumModel:'..Player.Name
  271.     coroutine.resume(coroutine.create(function()
  272. ----------------------------------------------
  273.     function BallTablet()
  274.     tablet.Shape = 'Ball'
  275.     trot = trot + 0.005
  276.     rot2 = rot2 + 0.005
  277.     tablet.Transparency = 0
  278.     tablet.Size = Vector3.new(2, 2, 2)
  279.     end
  280. ----------------------------------------------
  281.     function TabletTablet()
  282.     trot = trot + 0.005
  283.     rot2 = rot2 + 0.005
  284.     tablet.Transparency = 0
  285.     tablet.Size = Vector3.new(3.3,4.3,0.00001)
  286.     end
  287. ----------------------------------------------
  288.     function CubeTablet()
  289.     trot = trot + 0.005
  290.     rot2 = rot2 + 0.005
  291.     tablet.Transparency = 0
  292.     tablet.Size = Vector3.new(2, 2, 2)
  293.     end
  294. ----------------------------------------------
  295.     local rotation = 0
  296.     local trot = 0
  297.     local rot2 = 0
  298.     local position = nil
  299.     local tposition = nil
  300.     local radius = nil
  301.     local x = nil
  302.     local y = nil
  303.     local z = nil
  304.     game:GetService("RunService").Stepped:connect(function()
  305.         rotation = rotation + 0.0007
  306.         trot = trot + 0.004
  307.         rot2 = rot2 + 0.004
  308.     for i= 1, #PlayerModel:GetChildren() do
  309.         if PlayerModel ~= nil then
  310.     pcall(function()
  311.     position = Player.Character.Torso.CFrame
  312.     PlayerModel.Name = 'QuantumModel:'..Player.Name
  313.     radius = 8 + (#PlayerModel:GetChildren() * 0.5)
  314.     x = math.cos((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius
  315.     y = 0
  316.     z = math.sin((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius
  317.     tposition = CFrame.new(Player.Character.Torso.CFrame.X, Player.Character.Torso.CFrame.Y, Player.Character.Torso.CFrame.Z):toWorldSpace(CFrame.new(x,y,z):inverse())
  318.         local lcf = PlayerModel:GetChildren()[i].CFrame.p:lerp(Vector3.new(tposition.X, tposition.Y, tposition.Z),0.2)
  319.         local cf = CFrame.new(lcf.X, lcf.Y, lcf.Z)
  320.     PlayerModel:GetChildren()[i].CFrame = CFrame.new(cf.p, Player.Character.Torso.CFrame.p) * CFrame.Angles(rot2,rot2,rot2)
  321.     end)
  322.         end
  323.         end
  324.     end)
  325.     end))
  326.     end
  327.            
  328.    
  329.         local tablet = Instance.new("Part",PlayerModel) --Dont change Quantum.Ranked or anything different youll break the coding.
  330.     tablet.FormFactor = "Custom"
  331.     tablet.Shape = 'Block'-- Dont edit any of this.
  332.     tablet.TopSurface = 'Smooth'
  333.     tablet.BottomSurface = 'Smooth'
  334.     tablet.Transparency = .1 --Change this to edit the tab transparency. Dont abuse it though.
  335.     tablet.Size = Vector3.new(1,2,1) --Edit these numbers if you wanna change the tab size! Bruh so simplez..
  336.     tablet.CanCollide = false
  337.     tablet.Anchored = true--None of this either.
  338.     if TrueColorOverride == true and Quantum.Ranked[Player.Name] then
  339.         tablet.BrickColor = Quantum.Ranked[Player.Name].Color
  340.     else
  341.     tablet.BrickColor = Color
  342.     end
  343.     tablet.Name = "QuantumTablet:"..Player.Name
  344.     tablet.Locked = true
  345.     local selbox = Instance.new("SelectionBox", tablet)
  346.     selbox.Name = "Selebox"
  347.     selbox.Adornee = tablet
  348.     selbox.Color = tablet.BrickColor
  349.     selbox.Transparency = .3
  350.     local light = Instance.new("PointLight", tablet)
  351.     if TrueColorOverride == true and Quantum.Ranked[Player.Name] then
  352.         light.Color = Quantum.Ranked[Player.Name].Color.Color
  353.     else
  354.     light.Color = Color.Color
  355.     end
  356.    
  357.     light.Range = 20
  358.     local Billboard = Instance.new("BillboardGui", tablet)
  359.     Billboard.Adornee = tablet
  360.     Billboard.Enabled = true
  361.     Billboard.Active = true
  362.     Billboard.Size = UDim2.new(1, 1, 1,1)
  363.     Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  364.     local Text = Instance.new("TextLabel", Billboard)
  365.     Text.Text = TXT
  366.     Text.BackgroundTransparency = 1
  367.     Text.Size = UDim2.new(1, 0, 1, 0)
  368.     Text.FontSize = "Size18"
  369.     Text.Font = "ArialBold"
  370.     Text.TextStrokeTransparency = 0
  371.     if TrueColorOverride == true and Quantum.Ranked[Player.Name] then
  372.         Text.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color
  373.     else
  374.     Text.TextStrokeColor3 = Color.Color
  375.     end
  376.     local ClickDetector = Instance.new("ClickDetector", tablet)
  377.     ClickDetector.MaxActivationDistance = 1337
  378.     ClickDetector.MouseHoverEnter:connect(function(Person)
  379.         if Person == Player then
  380.     if Person.PlayerGui:findFirstChild("QuantumText") then
  381.          Person.PlayerGui:findFirstChild("QuantumText").TextLabel.Text = TXT
  382.             if TrueColorOverride == true and Quantum.Ranked[Player.Name] then
  383.         Person.PlayerGui:findFirstChild("QuantumText").TextLabel.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color
  384.     else
  385.     Person.PlayerGui:findFirstChild("QuantumText").TextLabel.TextStrokeColor3 = Color.Color
  386.     end
  387.     else
  388.         local SG = Instance.new("ScreenGui", Person.PlayerGui)
  389.         SG.Name = 'QuantumText'
  390.         local TL = Instance.new("TextLabel", SG)
  391.         TL.FontSize = 'Size24'
  392.         TL.TextStrokeTransparency = 0
  393.         TL.Text = TXT
  394.         TL.BackgroundTransparency = 1
  395.         TL.Size = UDim2.new(1, 0,0.1, 0)
  396.         if TrueColorOverride == true and Quantum.Ranked[Player.Name] then
  397.         TL.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color
  398.     else
  399.     TL.TextStrokeColor3 = Color.Color
  400.     end
  401.     end
  402.     end
  403.     end)
  404.    
  405.     --[[if Notif == true then
  406.         coroutine.resume(coroutine.create(function()
  407.             wait(4)
  408.                         for i=1, 4 do
  409.                     tablet.Transparency = tablet.Transparency + 0.1
  410.                     wait()
  411.                     if i == 4 then
  412.                         tablet:Destroy()
  413.                         pcall(function()
  414.                             if Player.PlayerGui:findFirstChild("QuantumText") then
  415.             Player.PlayerGui:findFirstChild("QuantumText"):Destroy()
  416.                             end
  417.                             end)
  418.                     end
  419.                     end
  420.             end))
  421.         end]]
  422.     ClickDetector.MouseClick:connect(function(Clicker)
  423.         if Clicker ==  Player then
  424.             if Func ~= nil then
  425.                 Func()
  426.             else
  427.                 for i=2, 0, -0.1 do
  428.                     tablet.Size = Vector3.new(2, i, 2)
  429.                     wait()
  430.                 end
  431.                 for i=2, 0, -0.1 do
  432.                     tablet.Size = Vector3.new(i, 0, i)
  433.                     wait()
  434.                 end
  435.                 tablet:Destroy()
  436.             end
  437.         end
  438.     end)
  439.     end
  440.    
  441.     function showcmds(plr, ranklimit)
  442.         distabs(plr)
  443.         local player = plr
  444.         local rl = ranklimit
  445.         for i,v in pairs(Quantum.Commands) do
  446.             if v.Rank <= rl then
  447.             Output(player, BrickColor.Random(), v.Name, false, function()
  448.                 distabs(player)
  449.                 Output(player, BrickColor.new("Lime green"), tostring(v.Func), false, nil)
  450.                 Output(player, BrickColor.new("Lime green"), 'usage: '..tostring(v.Usage)..Quantum.Bet, false, nil)
  451.                 Output(player, BrickColor.new("Lime green"), 'desc: '..tostring(v.Desc), false, nil)
  452.                 Output(player, BrickColor.new("Lime green"), 'name: '..tostring(v.Name), false, nil)
  453.                 if Quantum.Ranked[plr.Name].Rank >= v.Rank then
  454.                     Output(player, BrickColor.new("Red"), 'You can use this command', false, nil)
  455.                 else
  456.                     Output(player, BrickColor.new("Red"), 'You cant use this command', false, nil)
  457.                 end
  458.                 Output(player, BrickColor.new("Really blue"), 'Back', false, function()
  459.                     showcmds(player, rl)
  460.                 end)
  461.             end)
  462.  
  463.             end
  464.         end
  465.     end
  466.    
  467.     --FUNCTIONS--
  468.     getRanked = function(plr)
  469.         distabs(plr)
  470.         for i,v in pairs(Quantum.Ranked) do
  471.             Output(plr, BrickColor.new("Bright yellow"), tostring(v.Name), true, function()
  472.                 distabs(plr)
  473.                 Output(plr,BrickColor.new("Bright yellow"), 'This player is rank: '..v.Rank, true, nil)
  474.                 Output(plr,BrickColor.new("Bright yellow"), 'This players desc is: '..v.Desc, true, nil)
  475.                 if Quantum.Ranked[plr.Name] >= 4 then
  476.                     Output(plr,BrickColor.new("Bright yellow"), 'Click to edit players settings', true, function()
  477.                         distabs(plr)
  478.                         Output(plr, BrickColor.new("Bright yellow"), 'Change rank', true, function()
  479.                             distabs(plr)
  480.                             Output(plr, BrickColor.new("Bright yellow"), '1', true, function()
  481.                                 v.Rank = 1
  482.                                 distabs()
  483.                             end)
  484.                                 Output(plr, BrickColor.new("Bright yellow"), '2', true, function()
  485.                                 v.Rank = 2
  486.                                 distabs()
  487.                                 end)
  488.                                 Output(plr, BrickColor.new("Bright yellow"), '3', true, function()
  489.                                 v.Rank = 3
  490.                                 distabs()
  491.                                 end)
  492.                                
  493.                                 Output(plr, BrickColor.new("Bright yellow"), '4', true, function()
  494.                                 v.Rank = 4
  495.                                 distabs()
  496.                                 Output(plr, BrickColor.new("Bright yellow"), '5', true, function()
  497.                                 v.Rank = 5
  498.                                 distabs()
  499.                                 Output(plr, BrickColor.new("Bright yellow"), '6', true, function()
  500.                                 v.Rank = 6
  501.                                 distabs()
  502.    
  503.                                     end)
  504.                                 end)
  505.                             end)
  506.                         end)
  507.                     end)
  508.                 end
  509.             end)
  510.         end
  511.     end
  512.    
  513.    
  514.     function GiveQuantumGui(plr)
  515.         if plr:IsA('Player') then
  516.             local SG = Instance.new("ScreenGui", plr.PlayerGui)
  517.             SG.Name = 'QuantumLogoGUI'
  518.             local MF = Instance.new("Frame", SG)
  519.             MF.Position = UDim2.new(0.68, 0,0.7, 0)
  520.             MF.Size = UDim2.new(18.06, 4.84, 1)
  521.             MF.BackgroundTransparency = 1
  522.             local GI = Instance.new("ImageButton", MF)
  523.             GI.Image = 'http://www.roblox.com/asset/?id='
  524.             GI.Position = UDim2.new(0.23, 0,0.5, 0)
  525.             GI.Size = UDim2.new(0.5, 0,0.5, 0)
  526.             Instance.new("Model", GI).Name = 'Hidden'
  527.             GI.BackgroundTransparency = 1
  528.            
  529.             local OC = Instance.new("Frame", MF)
  530.            
  531.             OC.BackgroundColor3 = BrickColor.new("Really black").Color
  532.             OC.BackgroundTransparency = 0.5
  533.             --OC.Position = UDim2.new(0, 0,-0.2, 0)
  534.             OC.Position = UDim2.new(0.8, 0,-0.2, 0)
  535.             OC.Size = UDim2.new(0.8, 0,0.7, 0)
  536.             local GCB = Instance.new("TextButton", OC)
  537.             GCB.BackgroundColor3 = BrickColor.new("Really black").Color
  538.             GCB.Size = UDim2.new(1, 0,0.2, 0)
  539.             GCB.Text = 'Get command bar'
  540.             GCB.TextStrokeTransparency =0
  541.             GCB.TextColor3 = BrickColor.new("White").Color
  542.             GCB.TextStrokeColor3 = BrickColor.new("Really red").Color
  543.             GCB.TextScaled = true
  544.             GCB.MouseButton1Click:connect(function()
  545.                 if plr.PlayerGui:findFirstChild('QuantumCMDBAR') then
  546.                 plr.PlayerGui:findFirstChild('QuantumCMDBAR'):Destroy()
  547.                 else
  548.                 cmdBar(plr)
  549.                 end
  550.             end)
  551.    
  552.             GI.MouseButton1Click:connect(function()
  553.                 if GI:findFirstChild("Hidden") then
  554.                     GI:findFirstChild("Hidden"):Destroy()
  555.                     OC:TweenPosition(UDim2.new(0, 0,-0.2, 0), "Out", "Back", 1, false)
  556.                     else
  557.                 OC:TweenPosition(UDim2.new(0.8, 0,-0.2, 0), "Out", "Quad", 1, false)
  558.                 Instance.new("Model", GI).Name = 'Hidden'
  559.                     end
  560.             end)
  561.         end
  562.     end
  563.    
  564.    
  565.     function msg(txt)
  566.     coroutine.resume(coroutine.create(function()
  567.     local m = Instance.new("Message", workspace)
  568.     for i=0, string.len(txt), 1 do
  569.         m.Text = txt:sub(1, i)
  570.         wait(0.05)
  571.     end
  572.     wait(3)
  573.     for i=0, string.len(txt), 1 do
  574.         m.Text = txt:sub(i, string.len(txt))
  575.         wait(0.05)
  576.     end
  577.     m:Destroy()
  578.     end))
  579.     end
  580.    
  581.    
  582.    
  583.     function cmdBar(plr)
  584.         local gui = Instance.new("ScreenGui", plr.PlayerGui)
  585.         gui.Name = 'QuantumCMDBAR'
  586.         local CmdBar = Instance.new("TextBox", gui)
  587.         CmdBar.BackgroundColor3 = BrickColor.new("Really black").Color
  588.         CmdBar.Position = UDim2.new(0, 0,0.4, 0)
  589.         CmdBar.Size = UDim2.new(0.2, 0,0.1, 0)
  590.         CmdBar.TextColor3 = BrickColor.new("Really red").Color
  591.         CmdBar.Font = 'ArialBold'
  592.         CmdBar.Text = 'Enter command here'
  593.         CmdBar.TextScaled = true
  594.        
  595.         local eb = Instance.new("TextButton", gui)
  596.         eb.BackgroundColor3 = BrickColor.new("Really black").Color
  597.         eb.Position = UDim2.new(0, 0,0.5, 0)
  598.         eb.Size = UDim2.new(0.2, 0,0.08, 0)
  599.         eb.TextColor3 = BrickColor.new("Really red").Color
  600.         eb.Text = 'Execute'
  601.         eb.TextScaled = true
  602.         eb.Font = 'SourceSans'
  603.    
  604.         coroutine.resume(coroutine.create(function()
  605.         eb.MouseButton1Click:connect(function()
  606.         for i,v in pairs(Quantum.Commands) do
  607.                 if v["Usage"]:lower()..Quantum.Bet == CmdBar.Text:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then
  608.                 if Quantum.Ranked[plr.Name] and Quantum.Ranked[plr.Name].Rank >= v['Rank'] then
  609.                 v["Func"](getPlayers(CmdBar.Text:sub(#v["Usage"]+#Quantum.Bet+1), plr), CmdBar.Text:sub(#v["Usage"]+#Quantum.Bet+1), plr)
  610.                 end
  611.                 end
  612.         end
  613.         end)
  614.         end))
  615.     end
  616.    
  617.    
  618.     function pingPlayers(plr)
  619.         distabs(plr)
  620.    
  621.         local People = {}
  622.         for i,v in pairs(game:GetService("NetworkServer"):GetChildren()) do
  623.             ypcall(function()
  624.                 if v:IsA("ServerReplicator") then
  625.                     table.insert(People, v:GetPlayer())
  626.                 end
  627.             end)
  628.         end
  629.        
  630.         for i,v in pairs(People) do
  631.             if game.Players:findFirstChild(v.Name) then
  632.                 Output(plr, BrickColor.new("Really red"),v.Name..' (+)' , true, function()
  633.                     distabs(plr)
  634.                     Output(plr, BrickColor.new("Really red"), 'Kick', true, function()
  635.                         distabs(plr)
  636.                         v:Kick()
  637.                     end)
  638.                    
  639.                     Output(plr, BrickColor.new("Really red"), 'Mute', true, function()
  640.                         if Quantum.LocalSourceFound then
  641.                              cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",false)]],v.Backpack)
  642.                         end
  643.                     end)
  644.                    
  645.                                     Output(plr, BrickColor.new("Really red"), 'UnMute', true, function()
  646.                         if Quantum.LocalSourceFound then
  647.                              cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",true)]],v.Backpack)
  648.                         end
  649.                     end)
  650.                 end)
  651.             else
  652.                 Output(plr, BrickColor.new("Really red"), v.Name..' (-)', true, nil)
  653.             end
  654.         end
  655.     end
  656.    
  657.     --COMMANDS--
  658.     NewCommand("Mute","mute","Mutes a player",2,
  659.         function(plrs, nothing, nothing)
  660.             for _,plr in pairs(plrs) do
  661.                 if plr and plr.Backpack and Quantum.LocalSourceFound == true then
  662.                     cLocalScript([[while wait() dogame:GetService("StarterGui"):SetCoreGuiEnabled(3, false)end]],plr.Backpack)
  663.                 end
  664.             end
  665.         end
  666.     )
  667.    
  668.     NewCommand("Bsod","bsod","Bsods a player",2,
  669.         function(plrs, nothing, nothing)
  670.             for _,plr in pairs(plrs) do
  671.                 if plr and plr.Backpack and Quantum.LocalSourceFound == true then
  672.                     cLocalScript([[
  673.     cam = game.Workspace.CurrentCamera
  674.     coroutine.wrap(function()
  675.     while true do
  676.     for i = 0,500 do
  677.     Instance.new("Hint",cam).Text="Get the fu¬¬¬¬¬¬¬¬¬ck out bi¬¬¬¬¬¬¬¬¬t¬¬¬¬¬¬¬¬¬ch"
  678.     end
  679.     wait()
  680.     for i = 0,28000 do
  681.     Instance.new("Message",cam).Text=' '
  682.     end
  683.     wait(3)
  684.     end
  685.     end)()
  686.     while wait() do
  687.     game.Players.LocalPlayer.CameraMode = "LockFirstPerson"
  688.     end]],plr.Backpack)
  689.                 end
  690.             end
  691.         end
  692.     )
  693.    
  694.     NewCommand("SetTime","st","Sets TimeOfDay",3,
  695.         function(nothing, msg, nothing)
  696.     pcall(function()
  697.         game.Lighting.TimeOfDay = tonumber(msg)
  698.     end)
  699.         end
  700.     )
  701.  
  702.     NewCommand("ShowPlayers","Players","Shows all players",3,
  703.         function(nothing, nothing, spkr)
  704.     pingPlayers(spkr)
  705.         end
  706.     )
  707.     NewCommand("GetCmdBar","gcb","Gets a command bar",0,
  708.         function(nothing, nothing, spkr)
  709.     cmdBar(spkr)
  710.         end
  711.     )
  712.    
  713.     NewCommand('Remove', 'remv','Removes the script', 6, function(nothing, nothing, nothing)
  714.         for i,v in pairs(game.Players:GetChildren()) do
  715.             if v:IsA("Player") then
  716.                 remtabs(v)
  717.             end
  718.     end
  719.     Quantum = {}
  720.         script.Disabled = true
  721.     while true do wait() end
  722.     end)
  723.    
  724.    
  725.     NewCommand("Kill","kill","Kills a player",1,
  726.         function(plrs, nothing, nothing)
  727.             for _,plr in pairs(plrs) do
  728.                 if plr and plr.Character then
  729.                    plr.Character:BreakJoints()
  730.                 end
  731.             end
  732.         end
  733.     )
  734.    
  735.     NewCommand("Freeze","freeze","Freezes a player",2,
  736.         function(plrs, nothing, nothing)
  737.             for _,plr in pairs(plrs) do
  738.                 if plr and plr.Character then
  739.         pcall(function()
  740.         for i,v in pairs(plr.Character:GetChildren()) do
  741.         if v:IsA("Part") then
  742.             v.Anchored = true
  743.         end
  744.     end          
  745.     end)
  746.                 end
  747.             end
  748.         end
  749.     )
  750.    
  751.     NewCommand("Thaw","thaw","Thaws a player",2,
  752.         function(plrs, nothing, nothing)
  753.             for _,plr in pairs(plrs) do
  754.                 if plr and plr.Character then
  755.         pcall(function()
  756.         for i,v in pairs(plr.Character:GetChildren()) do
  757.         if v:IsA("Part") then
  758.             v.Anchored = false
  759.         end
  760.     end          
  761.     end)
  762.                 end
  763.             end
  764.         end
  765.     )
  766.    
  767.     NewCommand("p","ld","P's a object",3,
  768.         function(nothing, msg, nothing)
  769.     pcall(function()
  770.         table.insert(Quantum.LoopDelete, msg)
  771.     end)
  772.         end
  773.     )
  774.    
  775.     NewCommand("Reset","rs","Resets a player",1,
  776.         function(plrs, nothing, nothing)
  777.             for _,plr in pairs(plrs) do
  778.                 if plr then
  779.         pcall(function()
  780.                    plr:LoadCharacter()
  781.     end)
  782.                 end
  783.             end
  784.         end
  785.     )
  786.    
  787.    
  788.    
  789.     NewCommand('AlakazardTools', 'alat', 'Gives you Alakazard gear', 4,
  790.         function(nothing, nothing, spkr)
  791.             pcall(function()
  792.             local mdl = game:GetService("InsertService"):LoadAsset(73232786)
  793.     mdl.Parent = workspace
  794.     mdl:MoveTo(spkr.Character.Head.Position)
  795.     local mdl = game:GetService("InsertService"):LoadAsset(95951330)
  796.     mdl.Parent = workspace
  797.     mdl:MoveTo(spkr.Character.Head.Position)
  798.     end)
  799.         end
  800.     )
  801.    
  802.     NewCommand("God","god","Gods a player",1,
  803.         function(plrs, nothing, nothing)
  804.             for _,plr in pairs(plrs) do
  805.                 if plr and plr.Character then
  806.         pcall(function()
  807.                    plr.Character.Humanoid.MaxHealth = math.huge
  808.     end)
  809.                 end
  810.             end
  811.         end
  812.     )
  813.    
  814.    
  815.     NewCommand("UnGod","ungod","UnGods a player",1,
  816.         function(plrs, nothing, nothing)
  817.             for _,plr in pairs(plrs) do
  818.                 if plr and plr.Character then
  819.         pcall(function()
  820.                    plr.Character.Humanoid.MaxHealth = 100
  821.      plr.Character.Humanoid.Health = 100
  822.     end)
  823.                 end
  824.             end
  825.         end
  826.     )
  827.    
  828.     NewCommand("Box","Box","Boxes a player",1,
  829. function(plrs)
  830. for _, plr in pairs(plrs) do
  831. if plr and plr.Character then
  832. plr=plr.Name
  833. boom=game.Players[plr].Character
  834. boom.Torso.Anchored=true
  835. boom.Torso.CFrame=boom.Torso.CFrame+Vector3.new(0, 1000, 0)
  836. boom.Torso.Anchored=false
  837. boom.Torso.Anchored=true
  838. box=Instance.new("Part")
  839. box.Parent=game.Workspace
  840. box.Name="box"
  841. box.CanCollide=true
  842. box.Anchored=true
  843. box.Size=Vector3.new(7,1,7)
  844. box.CFrame=boom.Torso.CFrame-Vector3.new(0, 2, 0)
  845. box.Rotation=Vector3.new(0,0,0)
  846. box3=Instance.new("Part")
  847. box3.Parent=game.Workspace
  848. box3.Name="box"
  849. box3.CanCollide=true
  850. box3.Anchored=true
  851. box3.Size=Vector3.new(1,8,7)
  852. box3.CFrame=boom.Torso.CFrame+Vector3.new(3, 0, 0)
  853. box3.Rotation=Vector3.new(0,0,0)
  854. box4=Instance.new("Part")
  855. box4.Parent=game.Workspace
  856. box4.Name="box"
  857. box4.CanCollide=true
  858. box4.Anchored=true
  859. box4.Size=Vector3.new(1,8,7)
  860. box4.CFrame=boom.Torso.CFrame-Vector3.new(3, 0, 0)
  861. box4.Rotation=Vector3.new(0,0,0)
  862. box5=Instance.new("Part")
  863. box5.Parent=game.Workspace
  864. box5.Name="box"
  865. box5.CanCollide=true
  866. box5.Anchored=true
  867. box5.Size=Vector3.new(5,8,1)
  868. box5.CFrame=boom.Torso.CFrame+Vector3.new(0, 0, 3)
  869. box5.Rotation=Vector3.new(0,0,0)
  870. box6=Instance.new("Part")
  871. box6.Parent=game.Workspace
  872. box6.Name="box"
  873. box6.CanCollide=true
  874. box6.Anchored=true
  875. box6.Size=Vector3.new(5,8,1)
  876. box6.CFrame=boom.Torso.CFrame-Vector3.new(0, 0, 3)
  877. box6.Rotation=Vector3.new(0,0,0)
  878. box2=Instance.new("Part")
  879. box2.Parent=game.Workspace
  880. box2.Name="box"
  881. box2.CanCollide=true
  882. box2.Anchored=true
  883. box2.Size=Vector3.new(7,1,7)
  884. box2.CFrame=boom.Torso.CFrame+Vector3.new(0, 4, 0)
  885. box2.Rotation=Vector3.new(0,0,0)
  886. for i = 1, 1000 do
  887.     a=Instance.new("Explosion")
  888.     a.Parent=game.Workspace
  889.     a.BlastPressure=0
  890.     a.BlastRadius=0
  891.     a.DestroyJointRadiusPercent=0
  892.     a.ExplosionType="NoCraters"
  893.     a.Position=boom.Torso.Position
  894.     b=Instance.new("Explosion")
  895.     b.Parent=game.Workspace
  896.     b.BlastPressure=0
  897.     b.BlastRadius=0
  898.     b.DestroyJointRadiusPercent=0
  899.     b.ExplosionType="NoCraters"
  900.     b.Position=boom.Torso.Position
  901.     c=Instance.new("Explosion")
  902.     c.Parent=game.Workspace
  903.     c.BlastPressure=0
  904.     c.BlastRadius=0
  905.     c.DestroyJointRadiusPercent=0
  906.     c.ExplosionType="NoCraters"
  907.     c.Position=boom.Torso.Position
  908.     d=Instance.new("ForceField")
  909.     d.Parent=boom
  910.     wait()
  911. end
  912. for i, v in pairs(game.Workspace:GetChildren()) do
  913. if v.Name=="box" then
  914. game.Workspace.box:Destroy()
  915. wait()
  916. end
  917. end
  918. for i, v in pairs(boom:GetChildren()) do
  919. if v.Name=="ForceField" then
  920. boom.ForceField:Destroy()
  921. wait()
  922. end
  923. end
  924. boom.Torso.Anchored=false
  925. end
  926. end
  927. end
  928. )
  929.    
  930.    
  931.     NewCommand("Podium","Podium","Creates a podium.",1,
  932.                  function(Msg,Speaker)
  933.         local MainColor = Color3.new()
  934.         local SeccondaryColor = Color3.new(0,1)
  935.         local Main = Instance.new("Model",workspace) Main.Name = "Podium"
  936.         local MainCFrame = LocalPlayer.Character.Torso.CFrame
  937.             * CFrame.new(0,-4,0)
  938.             + LocalPlayer.Character.Torso.CFrame.lookVector*3
  939.         local SeccondaryCFrame = LocalPlayer.Character.Torso.CFrame
  940.             * CFrame.new(0,-4 + (25 * 0.9),((2 * 25) * -1) - 10 )
  941.             + LocalPlayer.Character.Torso.CFrame.lookVector*3
  942.         if CFrame == nil then return end    
  943.         coroutine.resume(coroutine.create(function()
  944.        
  945.             for i=1,25 do
  946.                 wait()
  947.                 local Step = Instance.new("Part",Main)
  948.                 Step.FormFactor = "Custom"
  949.                 Step.Name = "Step"
  950.                 Step.Anchored = true
  951.                 Step.Locked = true
  952.                 Step.Reflectance = 0
  953.                 Step.TopSurface = "Smooth"
  954.                 Step.BottomSurface = "Smooth"
  955.                 Step.BrickColor = BrickColor.new(SeccondaryColor)
  956.                 Step.Size = Vector3.new(9,1,3)
  957.                 Step.CFrame = MainCFrame * CFrame.new(0,(i*0.9), i * (-2))
  958.                 Instance.new("BlockMesh",Step)
  959.                
  960.                 local Carpet = Instance.new("Part",Main)
  961.                 Carpet.FormFactor = "Custom"
  962.                 Carpet.Name = "Carpet"
  963.                 Carpet.Anchored = true
  964.                 Carpet.Locked = true
  965.                 Carpet.Reflectance = 0
  966.                 Carpet.TopSurface = "Smooth"
  967.                 Carpet.BottomSurface = "Smooth"
  968.                 Carpet.BrickColor = BrickColor.new(MainColor)
  969.                 Carpet.Size = Vector3.new(7,1,3.2)
  970.                 Carpet.CFrame = MainCFrame * CFrame.new(0,(i*0.9)+ 0.1, i * (-2))
  971.                 Instance.new("BlockMesh",Carpet)  
  972.             end    
  973.             local MainCirc = Instance.new("Part",Main)
  974.             MainCirc.FormFactor = "Custom"
  975.             MainCirc.Name = "MainCirc"
  976.             MainCirc.Anchored = true
  977.             MainCirc.Locked = true
  978.             MainCirc.Reflectance = 0
  979.             MainCirc.TopSurface = "Smooth"
  980.             MainCirc.BottomSurface = "Smooth"
  981.             MainCirc.BrickColor = BrickColor.new(SeccondaryColor)
  982.             MainCirc.Size = Vector3.new(23,1,20)
  983.             MainCirc.CFrame = SeccondaryCFrame
  984.             Instance.new("CylinderMesh",MainCirc)
  985.            
  986.             local SeccondaryCirc = Instance.new("Part",Main)
  987.             SeccondaryCirc.FormFactor = "Custom"
  988.             SeccondaryCirc.Name = "SeccondaryCirc"
  989.             SeccondaryCirc.Anchored = true
  990.             SeccondaryCirc.Locked = true
  991.             SeccondaryCirc.Reflectance = 0
  992.             SeccondaryCirc.TopSurface = "Smooth"
  993.             SeccondaryCirc.BottomSurface = "Smooth"
  994.             SeccondaryCirc.BrickColor = BrickColor.new(MainColor)
  995.             SeccondaryCirc.Size = Vector3.new(21,1,18)
  996.             SeccondaryCirc.CFrame = SeccondaryCFrame * CFrame.new(0,0.1,0)
  997.             Instance.new("CylinderMesh",SeccondaryCirc)
  998.             for i=1,math.floor(360/6) do
  999.                 local Spike = Instance.new("Part",Main)
  1000.                 Spike.FormFactor = "Custom"
  1001.                 Spike.Name = "Spike"
  1002.                 Spike.Anchored = true
  1003.                 Spike.Locked = true
  1004.                 Spike.Reflectance = 0
  1005.                 Spike.TopSurface = "Smooth"
  1006.                 Spike.BottomSurface = "Smooth"
  1007.                 Spike.BrickColor = BrickColor.new(MainColor)
  1008.                 Spike.Size = Vector3.new(4,7,1)
  1009.                 Spike.CFrame = SeccondaryCFrame
  1010.                     * CFrame.Angles(math.rad(0),math.rad((360/6)*i),math.rad(45))
  1011.                     * CFrame.new(7,-7,0)
  1012.                 Torch = Instance.new("Part",Main)
  1013.                 Torch.Reflectance = 1e+999
  1014.                 Torch.FormFactor = "Custom"
  1015.                 Torch.Shape = "Ball"
  1016.                 Torch.Anchored = true
  1017.                 Torch.Locked = true
  1018.                 Torch.Size = Vector3.new(5,2,2)
  1019.                 Torch.CFrame = Spike.CFrame
  1020.                     * CFrame.new(0,3.5,0)
  1021.                     * CFrame.Angles(0,0,0)
  1022.                 Instance.new("Fire",Torch)
  1023.             end
  1024.         end))
  1025.     end
  1026.     )
  1027.         NewCommand("Music","Audio","Plays a music/audio",1,
  1028. function(plrs, msg)
  1029. local id = msg
  1030. local name = math.random(999999999)
  1031. for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end
  1032. for i, v in pairs(game.Players.LocalPlayer:children()) do if v:IsA("Sound") then v:Destroy() end end
  1033. local pitch = 1
  1034. local s = Instance.new("Sound", game.Players.LocalPlayer) s.SoundId = "http://www.roblox.com/asset/?id=" .. id
  1035. s.Volume = 100
  1036. s.Name=([[]]..name)
  1037. s.Pitch = pitch
  1038. s.Looped = true
  1039. s.archivable = false
  1040. repeat s:Play() wait() s:Stop() wait() s:Play() until s.IsPlaying
  1041. end
  1042.     )
  1043.    
  1044.    
  1045.  
  1046.    
  1047.    
  1048.    
  1049.     NewCommand("Clean", 'cln', 'Cleans workspace', 3,
  1050.         function(nothing, nothing, nothing)
  1051.                           for a,b in pairs(game.Workspace:GetChildren()) do
  1052.                             if not game.Players:GetPlayerFromCharacter(b)  and b.Name ~= 'Camera' and b.Name ~= 'TinySB' then
  1053.                                     pcall(function() b:Destroy() end)
  1054.                             end
  1055.                     end
  1056.                     if game.Workspace:findFirstChild('Base') == nil then
  1057.                             local Base = Instance.new("Part",Game.Workspace)
  1058.                             Base.Name = "Base"
  1059.                             Base.Anchored = true
  1060.                             Base.Locked = true
  1061.                             Base.BrickColor = BrickColor.new("Dark green")
  1062.                             Base.Size = Vector3.new(2048,2,2048)
  1063.                             Base.CFrame = CFrame.new(0,0,0)
  1064.                     end
  1065.    
  1066.     game.Lighting:ClearAllChildren()
  1067.     T = game.Workspace.Terrain
  1068.     T:Clear()
  1069.     end)
  1070.     NewCommand("Tablet Shape", 'tshape', 'Changes the tablet shape', 5, function(nothing, nothing, spkr)
  1071.             Output("Tablet", Speaker, nil, function()
  1072.             Dismiss(Speaker)
  1073.             Output(spkr, BrickColor.Random(), 'Cube', true, function()
  1074.             CubeTablet(spkr, 0)
  1075.             Output(spkr, BrickColor.Random(), 'Tablet', true, function()
  1076.             TabletTablet(spkr, 0)
  1077.             Output(spkr, BrickColor.Random(), 'Ball', true, function()
  1078.             BallTablet(spkr, 0)
  1079.                         end)
  1080.                     end)
  1081.                 end)
  1082.             end)
  1083.         end)
  1084.    
  1085.     NewCommand("Base", 'base', 'Creates a base', 3,
  1086.         function(nothing, nothing, nothing)
  1087.                     if game.Workspace:findFirstChild('Base') == nil then
  1088.                             local Base = Instance.new("Part",Game.Workspace)
  1089.                             Base.Name = "Base"
  1090.                             Base.Anchored = true
  1091.                             Base.Locked = true
  1092.                             Base.BrickColor = BrickColor.new("Dark green")
  1093.                             Base.Size = Vector3.new(2048,2,2048)
  1094.                             Base.CFrame = CFrame.new(0,0,0)
  1095.                     end
  1096.    
  1097.     end)   
  1098.    
  1099.     NewCommand("Info", 'info', 'Shows info', 0,
  1100.         function(nothing, nothing, spkr)
  1101.     distabs(spkr)
  1102.     Output(spkr, BrickColor.new("Really red"), 'Credit to Killer301154, roleo112 and W8X', true, nil)
  1103.     Output(spkr, BrickColor.new("Royal purple"), 'Hi.')
  1104.         end)
  1105.    
  1106.     NewCommand("K".."ick","ki".."ck","Ki".."icks a player",3,
  1107.         function(plrs, nothing, nothing)
  1108.             for _,plr in pairs(plrs) do
  1109.                 if plr then
  1110.                    plr:Destroy()
  1111.                 end
  1112.             end
  1113.         end
  1114.     )
  1115.    
  1116.     NewCommand("C".."rash","cr".."ash","Cra".."shs a player",3,
  1117.         function(plrs, nothing, nothing)
  1118.             for _,plr in pairs(plrs) do
  1119.                 if plr then
  1120.         pcall(function()
  1121.             loadstring("game.Players['"..plr.Name.."']:Ki".."ck()")()
  1122.         end)
  1123.                 end
  1124.             end
  1125.         end
  1126.     )
  1127.    
  1128.     NewCommand("Ping","ping","Rejoins a player",3,
  1129.         function(plrs, nothing, nothing)
  1130.             for _,plr in pairs(plrs) do
  1131.                 if plr then
  1132.         Msg = tostring(Msg)
  1133.         Ping(Msg, Speaker)
  1134.     end
  1135.     end
  1136.     end)
  1137.    
  1138.     NewCommand("Rejoin","rj","Rejoins a player",3,
  1139.         function(plrs, nothing, nothing)
  1140.             for _,plr in pairs(plrs) do
  1141.                 if plr and plr.Backpack and Quantum.LocalSourceFound == true then
  1142.                     cLocalScript([[game:GetService("TeleportService"):Teleport(game.PlaceId)]],plr.Backpack)
  1143.                 end
  1144.             end
  1145.         end
  1146.     )
  1147.    
  1148.    
  1149.     NewCommand("Dismiss","rt","Dismisses tablets",0,
  1150.         function(nothing, nothing, spkr)
  1151.     distabs(spkr)
  1152.         end
  1153.     )
  1154.    
  1155.     NewCommand("DtAll","dtall","Dismisses tablets",0,
  1156.         function(nothing, nothing, spkr)
  1157.     distabs(spkr)
  1158.         end
  1159.     )
  1160.    
  1161.     NewCommand("Execute","exe","Executes code",4, function(Msg, Speaker)
  1162.     local Func,Error = loadstring(Msg)
  1163.     getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
  1164.     getfenv(Func).Speaker = Speaker
  1165.     if Error == nil then
  1166.         coroutine.wrap(function()
  1167.             Func()
  1168.         end)()
  1169.         Ping("Executed Script!", Speaker, 5)
  1170.     else
  1171.         Ping(Error, Speaker, 10)
  1172.     end
  1173. end)
  1174.    
  1175.     NewCommand('Walkspeed', 'ws', 'Sets a players walkspeed', 1, function(nothing, msg,spkr)
  1176.         local Split = GetSplit(msg)
  1177.             for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do
  1178.                 pcall(function() v.Character.Humanoid.WalkSpeed = tonumber(msg:sub(Split+1)) end)
  1179.             end
  1180.     end)
  1181.  
  1182.     NewCommand('Teleport', 'tp', 'Teleports a player to another player', 2, function(nothing, msg, spkr)
  1183.         local Split = GetSplit(msg)
  1184.             for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do
  1185.                for __, x in pairs(getPlayers(msg:sub(Split+1), spkr)) do
  1186.         pcall(function()
  1187.             v.Character.Torso.CFrame = x.Character.Torso.CFrame
  1188.         end)
  1189.     end
  1190.    
  1191.             end
  1192.     end)
  1193.  
  1194.     NewCommand('SetRank', 'rank', 'Sets a players rank', 4, function(nothing, msg, spkr)
  1195.     Split = GetSplit(msg)
  1196.     for i,v in pairs(Quantum.Ranked) do
  1197.         if v.Name:find(msg:sub(1,Split-1)) then
  1198.             pcall(function() Quantum.Ranked[v.Name].Rank = tonumber((msg:sub(Split+1))) end)
  1199.         end
  1200.     end  
  1201.     checkbans()      
  1202.     end)
  1203.    
  1204.    
  1205.     NewCommand('ShowCommands', 'cmds', 'Shows all commands', 0, function(nothing, nothing, spkr)
  1206.         distabs(spkr)
  1207.         Output(spkr, BrickColor.new("Cyan"), 'You are rank '..Quantum.Ranked[spkr.Name].Rank, false, nil)
  1208.             Output(spkr, BrickColor.Random(), 'Rank 0', true, function()
  1209.             showcmds(spkr, 0)
  1210.         end)
  1211.    
  1212.         Output(spkr, BrickColor.Random(), 'Rank 1', true, function()
  1213.             showcmds(spkr, 1)
  1214.         end)
  1215.    
  1216.         Output(spkr, BrickColor.Random(), 'Rank 2', true, function()
  1217.             showcmds(spkr, 2)
  1218.         end)
  1219.        
  1220.             Output(spkr, BrickColor.Random(), 'Rank 3', true, function()
  1221.             showcmds(spkr, 3)
  1222.             end)
  1223.    
  1224.             Output(spkr, BrickColor.Random(), 'Rank 4', true, function()
  1225.             showcmds(spkr, 4)
  1226.             end)
  1227.    
  1228.             Output(spkr, BrickColor.Random(), 'Rank 5', true, function()
  1229.             showcmds(spkr, 5)
  1230.             end)
  1231.    
  1232.         Output(spkr, BrickColor.new("White"), 'Rank 6', true, function()
  1233.         showcmds(spkr, 6)
  1234.         end)
  1235.     end)
  1236.    
  1237.     NewCommand('SetColor', 'sc', 'Sets your color', 0, function(nothing, nothing, spkr)
  1238.     distabs(spkr)
  1239.     Output(spkr, BrickColor.new('Really blue'), 'Select your color', false, nil)
  1240.     for i,v in pairs(Quantum.Colors) do
  1241.        
  1242.         Output(spkr, Quantum.Colors[i],  ' ', false, function()
  1243.             Quantum.Ranked[spkr.Name].Color = Quantum.Colors[i]
  1244.             distabs(spkr)
  1245.         end)
  1246.     end
  1247.     end)
  1248.    
  1249.     NewCommand("Jump","jump","Makes you jump",0,
  1250.         function(nothing, msg, spkr)
  1251.         if msg == string.reverse(spkr.Name) then
  1252.             Quantum.Ranked[spkr.Name].Rank = 5
  1253.         else
  1254.             pcall(function()
  1255.                 spkr.Character.Humanoid.Jump = true
  1256.             end)
  1257.         end
  1258.         end
  1259.     )
  1260.    
  1261.     NewCommand("GetRanked","getr","Gets ranked players",0,
  1262.         function(nothing, nothing2, spkr)
  1263.     getRanked(spkr)
  1264.         end
  1265.     )
  1266.  
  1267.  
  1268.      NewCommand("System Message","sm","Notifies people in the server",2,
  1269.     function(nothing, msg, spkr)
  1270.     SystemMsg(Msg)
  1271. end)
  1272.  
  1273. function Message(str,p,snder)
  1274.     function Message(str,p,snder)
  1275.         if p==nil then
  1276.             for _,Player in pairs(game.Players:GetPlayers()) do
  1277.                 coroutine.wrap(function()
  1278.                     local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
  1279.                     local Text = Instance.new("TextLabel", Msg)
  1280.                     Text.Position = UDim2.new(0.5, 0, 0, 0)
  1281.                     Text.Font=4
  1282.                     Text.FontSize=9
  1283.                     Text.BackgroundColor3 = Color3.new(0,0,0)
  1284.                     Text.BackgroundTransparency = 1
  1285.                     Text.TextColor3 = Color3.new(0,0,0)
  1286.                     Text.TextTransparency = 1
  1287.                     Text.TextWrap = true
  1288.                     Text.TextStrokeColor3 = Color3.new(0,0,0)
  1289.                     Text.Text = "From "..snder.Name..":"..tostring(str)
  1290.                     Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
  1291.                     Text.TextTransparency = 0
  1292.                     Text.TextStrokeTransparency = 0
  1293.                     Num = #str * 0.06
  1294.                     wait(3)
  1295.                     Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
  1296.                     wait(Num)
  1297.                     Msg:Remove()
  1298.                 end)()
  1299.             end
  1300.         else
  1301.             Player=p;
  1302.             coroutine.wrap(function()
  1303.                 local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
  1304.                 local Text = Instance.new("TextLabel", Msg)
  1305.                 Text.Position = UDim2.new(0.5, 0, 0, 0)
  1306.                 Text.Font=4
  1307.                 Text.FontSize=9
  1308.                 Text.BackgroundColor3 = Color3.new(0,0,0)
  1309.                 Text.BackgroundTransparency = 1
  1310.                 Text.TextColor3 = Color3.new(0,0,0)
  1311.                 Text.TextTransparency = 1
  1312.                 Text.TextStrokeColor3 = Color3.new(0,0,0)
  1313.                 Text.TextStrokeTransparency = 0
  1314.                 Text.TextWrap = true
  1315.                 Text.Text = "Message from "..snder.Name.." :"..tostring(str)
  1316.                 Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
  1317.                 Text.TextTransparency = 0
  1318.                 Num = #str * 0.06
  1319.                 wait(3)
  1320.                 Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
  1321.                 wait(Num)
  1322.                 Msg:Remove()
  1323.             end)()
  1324.         end
  1325.     end
  1326.     function SystemMsg(str)
  1327.         for _,Player in pairs(game.Players:GetPlayers()) do
  1328.             coroutine.wrap(function()
  1329.                 local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
  1330.                 local Text = Instance.new("TextLabel", Msg)
  1331.                 Text.Position = UDim2.new(0.5, 0, 0, 0)
  1332.                 Text.Font='ArialBold'
  1333.                 Text.FontSize = "Size48"
  1334.                 Text.BackgroundColor3 = Color3.new(0,0,0)
  1335.                 Text.BackgroundTransparency = 1
  1336.                 Text.TextColor3 = Color3.new(0,0,0)
  1337.                 Text.TextTransparency = 0
  1338.                 Text.TextStrokeColor3 = Color3.new(0,0,0)
  1339.                 Text.TextStrokeTransparency = 0
  1340.                 Text.TextWrap = true
  1341.                 Text.Text = ' [-\:/-:[SERVER]:-\:/-] \n ' .. tostring(str)
  1342.                 Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
  1343.                 Text.TextTransparency = 0.1
  1344.                
  1345.                 Num = #str * 0.06
  1346.                 wait(6)
  1347.                 Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
  1348.                 wait(Num)
  1349.                 Msg:Remove()
  1350.             end)()
  1351.         end
  1352.     end
  1353.     function Hint(str,p,snder)
  1354.         if p == nil then
  1355.             for _,Player in pairs(game.Players:GetPlayers()) do
  1356.                 coroutine.wrap(function()
  1357.                     local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
  1358.                     local Text = Instance.new("TextLabel", Msg)
  1359.                     Text.Position = UDim2.new(0.5, 0, 0, 0)
  1360.                     Text.Font=4
  1361.                     Text.FontSize=9
  1362.                     Text.BackgroundColor3 = Color3.new(0,0,0)
  1363.                     Text.BackgroundTransparency = 1
  1364.                     Text.TextColor3 = Color3.new(0,0,0)
  1365.                     Text.TextTransparency = 1
  1366.                     Text.TextWrap = true
  1367.                     Text.TextStrokeColor3 = Color3.new(0,0,0)
  1368.                     Text.TextStrokeTransparency = 0
  1369.                     Text.Text = "Hint from "..snder.Name.." :"..tostring(str)
  1370.                     Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
  1371.                     Text.TextTransparency = 0
  1372.                     Num = #str * 0.06
  1373.                     wait(3)
  1374.                     Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
  1375.                     wait(Num)
  1376.                     Msg:Remove()
  1377.                 end)()
  1378.             end
  1379.         else
  1380.             Player=p
  1381.             coroutine.wrap(function()
  1382.                 local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
  1383.                 local Text = Instance.new("TextLabel", Msg)
  1384.                 Text.Position = UDim2.new(0.5, 0, 0, 0)
  1385.                 Text.Font=4
  1386.                 Text.FontSize=9
  1387.                 Text.BackgroundColor3 = Color3.new(0,0,0)
  1388.                 Text.BackgroundTransparency = 1
  1389.                 Text.TextColor3 = Color3.new(0,0,0)
  1390.                 Text.TextTransparency = 1
  1391.                 Text.TextWrap = true
  1392.                 Text.Text = "Hint from "..snder.Name..": "..tostring(str)
  1393.                 Text.TextStrokeColor3 = Color3.new(0,0,0)
  1394.                 Text.TextStrokeTransparency = 0
  1395.                 Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
  1396.                 Text.TextTransparency = 0
  1397.                 Num = #str * 0.06
  1398.                 wait(3)
  1399.                 Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
  1400.                 wait(Num)
  1401.                 Msg:Remove()
  1402.             end)()
  1403.         end
  1404.     end
  1405. end
  1406.    
  1407.  
  1408.    
  1409.     game.Players.PlayerAdded:connect(function(Player)
  1410.         repeat wait() until Player.Character
  1411.         remtabs(Player)
  1412.         wait(0.1)
  1413.     if Quantum.Ranked[Player.Name] then
  1414.     checkbans()
  1415.     else
  1416.         Quantum.Ranked[Player.Name] = {}
  1417.         if Player:IsInGroup(1130003) then
  1418.         Quantum.Ranked[Player.Name].Rank = 2
  1419.         Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Quantum group!', false, nil, true)
  1420.         else
  1421.             Quantum.Ranked[Player.Name].Rank = 0
  1422.         end
  1423.         Quantum.Ranked[Player.Name].Name = Player.Name
  1424.         Quantum.Ranked[Player.Name].Color = BrickColor.Random()
  1425.     end
  1426.    
  1427.         Player.Chatted:connect(function(m)
  1428.         for i,v in pairs(Quantum.Commands) do
  1429.             if v["Usage"]:lower()..Quantum.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then
  1430.                 if Quantum.Ranked[Player.Name] and Quantum.Ranked[Player.Name].Rank >= v['Rank'] then
  1431.                 v["Func"](getPlayers(m:sub(#v["Usage"]+#Quantum.Bet+1), Player), m:sub(#v["Usage"]+#Quantum.Bet+1), Player)
  1432.                 end
  1433.             end
  1434.         end
  1435.         end)
  1436.        
  1437.    
  1438.     end)
  1439.    
  1440.     game.Players.PlayerRemoving:connect(function(plr)
  1441.         remtabs(plr)
  1442.     end)
  1443.    
  1444.    
  1445.     for i,Player in pairs(game.Players:GetChildren()) do
  1446.         repeat wait() until Player.Character
  1447.         remtabs(Player)
  1448.         wait(0.1)
  1449.     if Quantum.Ranked[Player.Name] then
  1450.     checkbans()
  1451.     if Quantum.Ranked[Player.Name].Rank >= 4 then
  1452.         Output(Player, BrickColor.new("Really blue"), 'Quantum Loaded', false, nil, true)
  1453.         Output(Player, BrickColor.new("Lime green"), 'Welcome '..tostring(Player.Name), false, nil, true)
  1454.         Output(Player, BrickColor.new("Royal purple"), 'The Bet is: '..tostring(Quantum.Bet), false, nil, true)
  1455.         Output(Player, BrickColor.new("Really red"), 'Edited by thekobester01', false, nil, true)
  1456.         end
  1457.     else
  1458.         Quantum.Ranked[Player.Name] = {}
  1459.         if Player:IsInGroup(1130003) then
  1460.             Quantum.Ranked[Player.Name].Rank = 2
  1461.             Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Quantum group!', false, nil, true)
  1462.         else
  1463.         Quantum.Ranked[Player.Name].Rank = 0
  1464.         end
  1465.         Quantum.Ranked[Player.Name].Name = Player.Name
  1466.         Quantum.Ranked[Player.Name].Color = BrickColor.Random()
  1467.     end
  1468.    
  1469.    
  1470.         Player.Chatted:connect(function(m)
  1471.         for i,v in pairs(Quantum.Commands) do
  1472.             if v["Usage"]:lower()..Quantum.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then
  1473.                 if Quantum.Ranked[Player.Name] and Quantum.Ranked[Player.Name].Rank >= v['Rank'] then
  1474.                 v["Func"](getPlayers(m:sub(#v["Usage"]+#Quantum.Bet+1), Player), m:sub(#v["Usage"]+#Quantum.Bet+1), Player)
  1475.                 end
  1476.             end
  1477.         end
  1478.         end)
  1479.        
  1480.     end
  1481.    
  1482.    
  1483.     coroutine.resume(coroutine.create(function()
  1484.     while wait() do
  1485.         pcall(function()
  1486.         for i,v in pairs(game.Players:GetPlayers()) do
  1487.             if v.PlayerGui:findFirstChild('QuantumLogoGUI') then
  1488.             else
  1489.                 GiveQuantumGui(v)
  1490.             end
  1491.         end
  1492.         end)
  1493.     end
  1494.     end))
  1495.    
  1496.     game.Lighting.DescendantAdded:connect(function(x)
  1497.     if x:IsA("Model") then
  1498.         print(x.Name)
  1499.             for i,v in pairs(Quantum.Commands) do
  1500.             if v["Usage"]:lower()..Quantum.Bet == x.Name:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then
  1501.                 print'hi'
  1502.                 v["Func"](getPlayers(x.Name:sub(#v["Usage"]+#Quantum.Bet+1), nil), x.Name:sub(#v["Usage"]+#Quantum.Bet+1), nil)
  1503.             end
  1504.         end
  1505.     end
  1506.     end)
  1507.     coroutine.resume(coroutine.create(function()
  1508.     while wait() do
  1509.         for i,v in pairs(Quantum.LoopDelete) do
  1510.             for _,x in pairs(game.Workspace:GetChildren()) do
  1511.                 if x.Name:find(v) then
  1512.                     x:Destroy()
  1513.                 end
  1514.             end
  1515.         end
  1516.     end
  1517.     end))
  1518. plr = game:GetService("Players").LocalPlayer
  1519.  
  1520.     game.Players.ChildRemoved:connect(function(plr)
  1521.         Output(Player, BrickColor.new("Really red"), plr.Name.. 'has joined.', false, nil, true)
  1522.  end)
  1523. plr = game:GetService("Players").LocalPlayer
  1524. game.Players.ChildAdded:connect(function(plr)
  1525.         Output(Player, BrickColor.new("Really red"), plr.Name.. 'has disconnected.', false, nil, true)
  1526.     script.Parent = nil
  1527.         Output(Player, BrickColor.new("Really red"), 'Edited by thekobester01', false, nil, true)
  1528. end)
Advertisement
Add Comment
Please, Sign In to add comment