Advertisement
RobloxScriptBuilder

Untitled

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