Advertisement
R0bustic

Untitled

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