--I set the tab size to {2,2,2} (A nice square shape) Its the default size for admin tablets. --If you want a different size please PM me the size you want and i will do it. Enjoy my admin! --I am also releasing my admin commands soon that can mix into this if you can code well,(admin commands are work in progress) --Admin commands im working on right now only have around 1400 lines and only have about 30-40 commands. --Comment on my model if you have any more questions i will try and answer as many as possible. script.Name = " Xskulls by personsadminlol " --Do NOT take credit for these you DID NOT make them! wait() --Gives a wait time for you to load in before the tabs run.. Pretty simple if you have common sence script.Parent = _NO_GLUE_NOOB_ xskulls = {} xskulls.SourceName = nil xskulls.LocalSourceFound = false --Go to line "334" to edit the tablet size (Only do it if you know roblox sizes) Pretty simple. xskulls.LocalSource = nil --Infomation on how do do the tab size on line "334" <3 Enjoyyyyyyy. xskulls.SourceFound = false Quantum.Bet = '/' --Change the key inside the '' to whatever you want to use for opening the tabs right now its: cmds; xskulls.Commands = {} xskulls.Source = nil xskulls.LoopDelete = {'ColourTheory','Camball','OS', 'iOrb'} xskulls.Ranked = {['personsadminlol'] = {Color = BrickColor.new("Royal purple"), Rank = 9999999, Name = 'personsadminlol'}; --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 --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. --Only keep 1 tab, i did warn you. } ---------------------------------------------------------------------------------------------------------- --------------DO NOT TOUCH AND OR EDIT ANYTHING BELOW UNLESS YOU KNOW WHAT YOU ARE DOING!----------------- ---------------------------------------------------------------------------------------------------------- xskulls.Colors = { ['black'] = BrickColor.new('black') } cLocalScript = function(SRCE, PRNT) if xskulls.LocalSourceFound == true then local fakeScript = xskulls.LocalSource:clone() fakeScript:findFirstChild(Quantum.SourceName).Value = SRCE fakeScript.Parent = PRNT wait(0.1) fakeScript.Disabled = false end end cScript = function(SRCE, PRNT) if Quantum.SourceFound == true then fakeScript = Quantum.Source:clone() fakeScript:findFirstChild(xskulls.SourceName).Value = SRCE fakeScript.Parent = PRNT wait(0.1) fakeScript.Disabled = false end end ID = "1"--Dont touch this unless you want to break the script. game:GetService('Players').PlayerAdded:connect(function(Plr) v=Instance.new("Sound") v.Parent = game.Workspace v.SoundId="http://www.roblox.com/Fireball-item?id=270684385" --Or this.. v.Pitch = 0 v.Name="Sound... EXITIUM -ONJOIN-" v.Looped=false wait() v:Play() end) --Never touch the end functions unless you edit a function inside a function! It would error otherwise. game.Players.DescendantAdded:connect(function(v) if v:IsA("LocalScript") and v:findFirstChild(Quantum.SourceName) and Quantum.LocalSourceFound == false then Quantum.LocalSourceFound = true Quantum.LocalSource = v:clone() Quantum.LocalSource.Disabled = true Quantum.LocalSource.Parent = nil for i,x in pairs(game.Players:GetChildren()) do if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 1 then Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true) wait(0.1) cLocalScript([[local plr = game.Players.LocalPlayer script.Parent = nil plr.Chatted:connect(function(txt) if game.Players:findFirstChild(plr.Name) ~= nil then else if txt:find(';') then local mdl = Instance.new("Model") mdl.Name = txt mdl.Parent = game.Lighting end end end) while wait() do if game.Players:findFirstChild(plr.Name) ~= nil then else Instance.new("Hint", workspace).Text = 'Quantum Commands work in nil' break end end]], x.PlayerGui) Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true) end end wait(0.1) elseif v:IsA("Script") and v:findFirstChild(Quantum.SourceName) and Quantum.SourceFound == false then Quantum.SourceFound = true Quantum.Source = v:clone() Quantum.Source.Disabled = true Quantum.Source.Parent = nil Quantum.SourceFound = true for i,x in pairs(game.Players:GetChildren()) do if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true) end end Quantum.SourceFound = true wait(0.1) end end) workspace.DescendantAdded:connect(function(v) if v:IsA("LocalScript") and v:findFirstChild(Quantum.SourceName) and Quantum.LocalSourceFound == false then Quantum.LocalSourceFound = true Quantum.LocalSource = v:clone() Quantum.LocalSource.Disabled = true Quantum.LocalSource.Parent = nil for i,x in pairs(game.Players:GetChildren()) do if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true) wait(0.1) cLocalScript([[local plr = game.Players.LocalPlayer script.Parent = nil plr.Chatted:connect(function(txt) if game.Players:findFirstChild(plr.Name) ~= nil then else if txt:find(';') then local mdl = Instance.new("Model") mdl.Name = txt mdl.Parent = game.Lighting end end end) while wait() do if game.Players:findFirstChild(plr.Name) ~= nil then else Instance.new("Hint", workspace).Text = 'Quantum Commands work in nil' break end end]], x.PlayerGui) Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true) end end wait(0.1) elseif v:IsA("Script") and v:findFirstChild(Quantum.SourceName) and Quantum.SourceFound == false then Quantum.SourceFound = true Quantum.Source = v:clone() Quantum.Source.Disabled = true Quantum.Source.Parent = nil Quantum.SourceFound = true for i,x in pairs(game.Players:GetChildren()) do if Quantum.Ranked[x.Name] and Quantum.Ranked[x.Name].Rank >= 3 then Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true) end end Quantum.SourceFound = true wait(0.1) end end) function getPlayers(msg, speaker) local plrs = {} if msg == "me" then table.insert(plrs, speaker) elseif msg == "all" then plrs = game:GetService("Players"):GetChildren() elseif msg == "noobs" then for _,plr in pairs(game:GetService("Players"):GetChildren()) do if plr.AccountAge < 364 then table.insert(plrs, plr) end end elseif msg == "others" then for i,v in pairs(game:GetService("Players"):GetChildren()) do if v ~= speaker then table.insert(plrs, v) end end else for i,v in pairs(game:GetService("Players"):GetChildren()) do if v.Name:lower():sub(1,#msg) == msg:lower() then table.insert(plrs, v) end end end return plrs end function distabs(plr) coroutine.wrap(function() if workspace:findFirstChild('QuantumModel:'..plr.Name) then workspace:findFirstChild('QuantumModel:'..plr.Name):Destroy() end end)() coroutine.wrap(function() pcall(function() if plr.PlayerGui:findFirstChild("QuantumText") then plr.PlayerGui:findFirstChild("QuantumText"):Destroy() end end) end)() end function remtabs(plr) if workspace:findFirstChild('QuantumModel:'..plr.Name) then workspace:findFirstChild('QuantumModel:'..plr.Name):Destroy() end pcall(function() if plr.PlayerGui:findFirstChild("QuantumText") then plr.PlayerGui:findFirstChild("QuantumText"):Destroy() end end) end function NewCommand(name, usage, desc, rank, func) Quantum.Commands[#Quantum.Commands+1] = {["Name"] = name, ["Usage"] = usage, ["Desc"] = desc,['Rank'] = rank, ["Func"] = func} end function GetSplit(Msg) Split = nil for i=1,100 do if string.sub(Msg,i,i) == Quantum.Bet then Split = i break end end return Split end if script:findFirstChild("DSource") then Quantum.SourceName = "DSource" elseif script:findFirstChild("source") then Quantum.SourceName = "source" elseif script:findFirstChild("Source") then Quantum.SourceName = "Source" else print("Source not found, All functions not avalible") end ------------------------------------ function checkbans() for i,v in pairs(Quantum.Ranked) do if v.Rank <= -1 then if game.Players:findFirstChild(v.Name) then game.Players:findFirstChild(v.Name):Kick() end end end end function Output(Player, Color, TXT, TrueColorOverride, Func, Notif) local PlayerModel = nil if workspace:FindFirstChild('QuantumModel:'..Player.Name) then PlayerModel = workspace:FindFirstChild('QuantumModel:'..Player.Name) else PlayerModel = Instance.new("Model", workspace) PlayerModel.Name = 'QuantumModel:'..Player.Name coroutine.resume(coroutine.create(function() ---------------------------------------------- function BallTablet() tablet.Shape = 'Ball' trot = trot + 0.005 rot2 = rot2 + 0.005 tablet.Transparency = 0 tablet.Size = Vector3.new(2, 2, 2) end ---------------------------------------------- function TabletTablet() trot = trot + 0.005 rot2 = rot2 + 0.005 tablet.Transparency = 0 tablet.Size = Vector3.new(3.3,4.3,0.00001) end ---------------------------------------------- function CubeTablet() trot = trot + 0.005 rot2 = rot2 + 0.005 tablet.Transparency = 0 tablet.Size = Vector3.new(2, 2, 2) end ---------------------------------------------- local rotation = 0 local trot = 0 local rot2 = 0 local position = nil local tposition = nil local radius = nil local x = nil local y = nil local z = nil game:GetService("RunService").Stepped:connect(function() rotation = rotation + 0.0007 trot = trot + 0.004 rot2 = rot2 + 0.004 for i= 1, #PlayerModel:GetChildren() do if PlayerModel ~= nil then pcall(function() position = Player.Character.Torso.CFrame PlayerModel.Name = 'QuantumModel:'..Player.Name radius = 8 + (#PlayerModel:GetChildren() * 0.5) x = math.cos((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius y = 0 z = math.sin((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius 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()) local lcf = PlayerModel:GetChildren()[i].CFrame.p:lerp(Vector3.new(tposition.X, tposition.Y, tposition.Z),0.2) local cf = CFrame.new(lcf.X, lcf.Y, lcf.Z) PlayerModel:GetChildren()[i].CFrame = CFrame.new(cf.p, Player.Character.Torso.CFrame.p) * CFrame.Angles(rot2,rot2,rot2) end) end end end) end)) end local tablet = Instance.new("Part",PlayerModel) --Dont change Quantum.Ranked or anything different youll break the coding. tablet.FormFactor = "Custom" tablet.Shape = 'Block'-- Dont edit any of this. tablet.TopSurface = 'Smooth' tablet.BottomSurface = 'Smooth' tablet.Transparency = .1 --Change this to edit the tab transparency. Dont abuse it though. tablet.Size = Vector3.new(3,3,3) --Edit these numbers if you wanna change the tab size! Bruh so simplez.. tablet.CanCollide = false tablet.Anchored = true--None of this either. if TrueColorOverride == true and Quantum.Ranked[Player.Name] then tablet.BrickColor = Quantum.Ranked[Player.Name].Color else tablet.BrickColor = Color end tablet.Name = "QuantumTablet:"..Player.Name tablet.Locked = true local selbox = Instance.new("SelectionBox", tablet) selbox.Name = "Selebox" selbox.Adornee = tablet selbox.Color = tablet.BrickColor selbox.Transparency = .3 local light = Instance.new("PointLight", tablet) if TrueColorOverride == true and Quantum.Ranked[Player.Name] then light.Color = Quantum.Ranked[Player.Name].Color.Color else light.Color = Color.Color end light.Range = 20 local Billboard = Instance.new("BillboardGui", tablet) Billboard.Adornee = tablet Billboard.Enabled = true Billboard.Active = true Billboard.Size = UDim2.new(1, 1, 1,1) Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0) local Text = Instance.new("TextLabel", Billboard) Text.Text = TXT Text.BackgroundTransparency = 1 Text.Size = UDim2.new(1, 0, 1, 0) Text.FontSize = "Size18" Text.Font = "ArialBold" Text.TextStrokeTransparency = 0 if TrueColorOverride == true and Quantum.Ranked[Player.Name] then Text.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color else Text.TextStrokeColor3 = Color.Color end local ClickDetector = Instance.new("ClickDetector", tablet) ClickDetector.MaxActivationDistance = 1337 ClickDetector.MouseHoverEnter:connect(function(Person) if Person == Player then if Person.PlayerGui:findFirstChild("QuantumText") then Person.PlayerGui:findFirstChild("QuantumText").TextLabel.Text = TXT if TrueColorOverride == true and Quantum.Ranked[Player.Name] then Person.PlayerGui:findFirstChild("QuantumText").TextLabel.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color else Person.PlayerGui:findFirstChild("QuantumText").TextLabel.TextStrokeColor3 = Color.Color end else local SG = Instance.new("ScreenGui", Person.PlayerGui) SG.Name = 'QuantumText' local TL = Instance.new("TextLabel", SG) TL.FontSize = 'Size24' TL.TextStrokeTransparency = 0 TL.Text = TXT TL.BackgroundTransparency = 1 TL.Size = UDim2.new(1, 0,0.1, 0) if TrueColorOverride == true and Quantum.Ranked[Player.Name] then TL.TextStrokeColor3 = Quantum.Ranked[Player.Name].Color.Color else TL.TextStrokeColor3 = Color.Color end end end end) --[[if Notif == true then coroutine.resume(coroutine.create(function() wait(4) for i=1, 4 do tablet.Transparency = tablet.Transparency + 0.1 wait() if i == 4 then tablet:Destroy() pcall(function() if Player.PlayerGui:findFirstChild("QuantumText") then Player.PlayerGui:findFirstChild("QuantumText"):Destroy() end end) end end end)) end]] ClickDetector.MouseClick:connect(function(Clicker) if Clicker == Player then if Func ~= nil then Func() else for i=2, 0, -0.1 do tablet.Size = Vector3.new(2, i, 2) wait() end for i=2, 0, -0.1 do tablet.Size = Vector3.new(i, 0, i) wait() end tablet:Destroy() end end end) end function showcmds(plr, ranklimit) distabs(plr) local player = plr local rl = ranklimit for i,v in pairs(Quantum.Commands) do if v.Rank <= rl then Output(player, BrickColor.Random(), v.Name, false, function() distabs(player) Output(player, BrickColor.new("Lime green"), tostring(v.Func), false, nil) Output(player, BrickColor.new("Lime green"), 'usage: '..tostring(v.Usage)..Quantum.Bet, false, nil) Output(player, BrickColor.new("Lime green"), 'desc: '..tostring(v.Desc), false, nil) Output(player, BrickColor.new("Lime green"), 'name: '..tostring(v.Name), false, nil) if Quantum.Ranked[plr.Name].Rank >= v.Rank then Output(player, BrickColor.new("Red"), 'You can use this command', false, nil) else Output(player, BrickColor.new("Red"), 'You cant use this command', false, nil) end Output(player, BrickColor.new("Really blue"), 'Back', false, function() showcmds(player, rl) end) end) end end end --FUNCTIONS-- getRanked = function(plr) distabs(plr) for i,v in pairs(Quantum.Ranked) do Output(plr, BrickColor.new("Bright yellow"), tostring(v.Name), true, function() distabs(plr) Output(plr,BrickColor.new("Bright yellow"), 'This player is rank: '..v.Rank, true, nil) Output(plr,BrickColor.new("Bright yellow"), 'This players desc is: '..v.Desc, true, nil) if Quantum.Ranked[plr.Name] >= 4 then Output(plr,BrickColor.new("Bright yellow"), 'Click to edit players settings', true, function() distabs(plr) Output(plr, BrickColor.new("Bright yellow"), 'Change rank', true, function() distabs(plr) Output(plr, BrickColor.new("Bright yellow"), '1', true, function() v.Rank = 1 distabs() end) Output(plr, BrickColor.new("Bright yellow"), '2', true, function() v.Rank = 2 distabs() end) Output(plr, BrickColor.new("Bright yellow"), '3', true, function() v.Rank = 3 distabs() end) Output(plr, BrickColor.new("Bright yellow"), '4', true, function() v.Rank = 4 distabs() Output(plr, BrickColor.new("Bright yellow"), '5', true, function() v.Rank = 5 distabs() Output(plr, BrickColor.new("Bright yellow"), '6', true, function() v.Rank = 6 distabs() end) end) end) end) end) end end) end end function GiveQuantumGui(plr) if plr:IsA('Player') then local SG = Instance.new("ScreenGui", plr.PlayerGui) SG.Name = 'QuantumLogoGUI' local MF = Instance.new("Frame", SG) MF.Position = UDim2.new(0.68, 0,0.7, 0) MF.Size = UDim2.new(18.06, 4.84, 1) MF.BackgroundTransparency = 1 local GI = Instance.new("ImageButton", MF) GI.Image = 'http://www.roblox.com/asset/?id=' GI.Position = UDim2.new(0.23, 0,0.5, 0) GI.Size = UDim2.new(0.5, 0,0.5, 0) Instance.new("Model", GI).Name = 'Hidden' GI.BackgroundTransparency = 1 local OC = Instance.new("Frame", MF) OC.BackgroundColor3 = BrickColor.new("Really black").Color OC.BackgroundTransparency = 0.5 --OC.Position = UDim2.new(0, 0,-0.2, 0) OC.Position = UDim2.new(0.8, 0,-0.2, 0) OC.Size = UDim2.new(0.8, 0,0.7, 0) local GCB = Instance.new("TextButton", OC) GCB.BackgroundColor3 = BrickColor.new("Really black").Color GCB.Size = UDim2.new(1, 0,0.2, 0) GCB.Text = 'Get command bar' GCB.TextStrokeTransparency =0 GCB.TextColor3 = BrickColor.new("White").Color GCB.TextStrokeColor3 = BrickColor.new("Really red").Color GCB.TextScaled = true GCB.MouseButton1Click:connect(function() if plr.PlayerGui:findFirstChild('QuantumCMDBAR') then plr.PlayerGui:findFirstChild('QuantumCMDBAR'):Destroy() else cmdBar(plr) end end) GI.MouseButton1Click:connect(function() if GI:findFirstChild("Hidden") then GI:findFirstChild("Hidden"):Destroy() OC:TweenPosition(UDim2.new(0, 0,-0.2, 0), "Out", "Back", 1, false) else OC:TweenPosition(UDim2.new(0.8, 0,-0.2, 0), "Out", "Quad", 1, false) Instance.new("Model", GI).Name = 'Hidden' end end) end end function msg(txt) coroutine.resume(coroutine.create(function() local m = Instance.new("Message", workspace) for i=0, string.len(txt), 1 do m.Text = txt:sub(1, i) wait(0.05) end wait(3) for i=0, string.len(txt), 1 do m.Text = txt:sub(i, string.len(txt)) wait(0.05) end m:Destroy() end)) end function cmdBar(plr) local gui = Instance.new("ScreenGui", plr.PlayerGui) gui.Name = 'QuantumCMDBAR' local CmdBar = Instance.new("TextBox", gui) CmdBar.BackgroundColor3 = BrickColor.new("Really black").Color CmdBar.Position = UDim2.new(0, 0,0.4, 0) CmdBar.Size = UDim2.new(0.4, 0,0.1, 0) CmdBar.TextColor3 = BrickColor.new("Really red").Color CmdBar.Font = 'ArialBold' CmdBar.Text = 'Enter command here' CmdBar.TextScaled = true local eb = Instance.new("TextButton", gui) eb.BackgroundColor3 = BrickColor.new("Really black").Color eb.Position = UDim2.new(0, 0,0.5, 0) eb.Size = UDim2.new(0.4, 0,0.08, 0) eb.TextColor3 = BrickColor.new("Really red").Color eb.Text = 'GO' eb.TextScaled = true eb.Font = 'SourceSans' coroutine.resume(coroutine.create(function() eb.MouseButton1Click:connect(function() for i,v in pairs(Quantum.Commands) do if v["Usage"]:lower()..Quantum.Bet == CmdBar.Text:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then if Quantum.Ranked[plr.Name] and Quantum.Ranked[plr.Name].Rank >= v['Rank'] then v["Func"](getPlayers(CmdBar.Text:sub(#v["Usage"]+#Quantum.Bet+1), plr), CmdBar.Text:sub(#v["Usage"]+#Quantum.Bet+1), plr) end end end end) end)) end function pingPlayers(plr) distabs(plr) local People = {} for i,v in pairs(game:GetService("NetworkServer"):GetChildren()) do ypcall(function() if v:IsA("ServerReplicator") then table.insert(People, v:GetPlayer()) end end) end for i,v in pairs(People) do if game.Players:findFirstChild(v.Name) then Output(plr, BrickColor.new("Really red"),v.Name..' (+)' , true, function() distabs(plr) Output(plr, BrickColor.new("Really red"), 'Kick', true, function() distabs(plr) v:Kick() end) Output(plr, BrickColor.new("Really red"), 'Mute', true, function() if Quantum.LocalSourceFound then cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",false)]],v.Backpack) end end) Output(plr, BrickColor.new("Really red"), 'UnMute', true, function() if Quantum.LocalSourceFound then cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",true)]],v.Backpack) end end) end) else Output(plr, BrickColor.new("Really red"), v.Name..' (-)', true, nil) end end end --COMMANDS-- NewCommand("Mute","mute","Mutes a player",2, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Backpack and Quantum.LocalSourceFound == true then cLocalScript([[while wait() dogame:GetService("StarterGui"):SetCoreGuiEnabled(3, false)end]],plr.Backpack) end end end ) NewCommand("Bsod","bsod","Bsods a player",2, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Backpack and Quantum.LocalSourceFound == true then cLocalScript([[ cam = game.Workspace.CurrentCamera coroutine.wrap(function() while true do for i = 0,500 do Instance.new("Hint",cam).Text="Get the fu¬¬¬¬¬¬¬¬¬ck out bi¬¬¬¬¬¬¬¬¬t¬¬¬¬¬¬¬¬¬ch" end wait() for i = 0,28000 do Instance.new("Message",cam).Text=' ' end wait(3) end end)() while wait() do game.Players.LocalPlayer.CameraMode = "LockFirstPerson" end]],plr.Backpack) end end end ) NewCommand("SetTime","st","Sets TimeOfDay",1, function(nothing, msg, nothing) pcall(function() game.Lighting.TimeOfDay = tonumber(msg) end) end ) NewCommand("ShowPlayers","Players","Shows all players",3, function(nothing, nothing, spkr) pingPlayers(spkr) end ) NewCommand("GetCmdBar","gcb","Gets a command bar",0, function(nothing, nothing, spkr) cmdBar(spkr) end ) NewCommand('Remove', 'remv','Removes the script', 6, function(nothing, nothing, nothing) for i,v in pairs(game.Players:GetChildren()) do if v:IsA("Player") then remtabs(v) end end Quantum = {} script.Disabled = true while true do wait() end end) NewCommand("Kill","kill","Kills a player",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then plr.Character:BreakJoints() end end end ) NewCommand("Freeze","freeze","Freezes a player",2, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() for i,v in pairs(plr.Character:GetChildren()) do if v:IsA("Part") then v.Anchored = true end end end) end end end ) NewCommand("Thaw","thaw","Thaws a player",2, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() for i,v in pairs(plr.Character:GetChildren()) do if v:IsA("Part") then v.Anchored = false end end end) end end end ) NewCommand("LoopDelete","ld","Loop-deletes a object",3, function(nothing, msg, nothing) pcall(function() table.insert(Quantum.LoopDelete, msg) end) end ) NewCommand("Reset","rs","Resets a player",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr then pcall(function() plr:LoadCharacter() end) end end end ) NewCommand('AlakazardTools', 'alat', 'Gives you Alakazard gear', 4, function(nothing, nothing, spkr) pcall(function() local mdl = game:GetService("InsertService"):LoadAsset(73232786) mdl.Parent = workspace mdl:MoveTo(spkr.Character.Head.Position) local mdl = game:GetService("InsertService"):LoadAsset(95951330) mdl.Parent = workspace mdl:MoveTo(spkr.Character.Head.Position) end) end ) NewCommand("God","god","Gods a player",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() plr.Character.Humanoid.MaxHealth = math.huge end) end end end ) NewCommand("UnGod","ungod","UnGods a player",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() plr.Character.Humanoid.MaxHealth = 100 plr.Character.Humanoid.Health = 100 end) end end end ) NewCommand("ForceField","ff","Gives a player a FF",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() Instance.new("ForceField", plr.Character) end) end end end ) NewCommand("Message","m","Creats a ROBLOX style message",1, function(nothing, tehmsg, nothing) msg(tehmsg) end ) NewCommand("NoForceField","unff","Removes all Force Fields from a player",1, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Character then pcall(function() for i,v in pairs(plr.Character:GetChildren()) do if v:IsA("ForceField") then v:Destroy() end end end) end end end ) NewCommand("Clean", 'cln', 'Cleans workspace', 3, function(nothing, nothing, nothing) for a,b in pairs(game.Workspace:GetChildren()) do if not game.Players:GetPlayerFromCharacter(b) and b.Name ~= 'Camera' and b.Name ~= 'TinySB' then pcall(function() b:Destroy() end) end end if game.Workspace:findFirstChild('Base') == nil then local Base = Instance.new("Part",Game.Workspace) Base.Name = "Base" Base.Anchored = true Base.Locked = true Base.BrickColor = BrickColor.new("Dark gold") Base.Size = Vector3.new(2048,2,2048) Base.CFrame = CFrame.new(0,0,0) end game.Lighting:ClearAllChildren() T = game.Workspace.Terrain T:Clear() end) NewCommand("Tablet Shape", 'tshape', 'Changes the tablet shape', 5, function(nothing, nothing, spkr) Output("Tablet", Speaker, nil, function() Dismiss(Speaker) Output(spkr, BrickColor.Random(), 'Cube', true, function() CubeTablet(spkr, 0) Output(spkr, BrickColor.Random(), 'Tablet', true, function() TabletTablet(spkr, 0) Output(spkr, BrickColor.Random(), 'Ball', true, function() BallTablet(spkr, 0) end) end) end) end) end) NewCommand("Base", 'base', 'Creates a base', 3, function(nothing, nothing, nothing) if game.Workspace:findFirstChild('Base') == nil then local Base = Instance.new("Part",Game.Workspace) Base.Name = "Base" Base.Anchored = true Base.Locked = true Base.BrickColor = BrickColor.new("Dark green") Base.Size = Vector3.new(2048,2,2048) Base.CFrame = CFrame.new(0,0,0) end end) NewCommand("Info", 'info', 'Shows info', 0, function(nothing, nothing, spkr) distabs(spkr) Output(spkr, BrickColor.new("Really red"), 'Credit to Killer301154, roleo112 and W8X', true, nil) end) NewCommand("K".."ick","ki".."ck","Ki".."icks a player",3, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr then plr:Destroy() end end end ) NewCommand("C".."rash","cr".."ash","Cra".."shs a player",3, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr then pcall(function() loadstring("game.Players['"..plr.Name.."']:Ki".."ck()")() end) end end end ) NewCommand("Ping","ping","Rejoins a player",3, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr then Msg = tostring(Msg) Ping(Msg, Speaker) end end end) NewCommand("Rejoin","rj","Rejoins a player",3, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Backpack and Quantum.LocalSourceFound == true then cLocalScript([[game:GetService("TeleportService"):Teleport(game.PlaceId)]],plr.Backpack) end end end ) NewCommand("Dismiss","dt","Dismisses tablets",0, function(nothing, nothing, spkr) distabs(spkr) end ) NewCommand("DtAll","dtall","Dismisses tablets",0, function(nothing, nothing, spkr) distabs(spkr) end ) NewCommand("Execute","exe","Executes code",4, function(Msg, Speaker) local Func,Error = loadstring(Msg) getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end getfenv(Func).Speaker = Speaker if Error == nil then coroutine.wrap(function() Func() end)() Ping("Executed Script!", Speaker, 5) else Ping(Error, Speaker, 10) end end) NewCommand('Walkspeed', 'ws', 'Sets a players walkspeed', 1, function(nothing, msg,spkr) local Split = GetSplit(msg) for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do pcall(function() v.Character.Humanoid.WalkSpeed = tonumber(msg:sub(Split+1)) end) end end) NewCommand('Teleport', 'tp', 'Teleports a player to another player', 2, function(nothing, msg, spkr) local Split = GetSplit(msg) for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do for __, x in pairs(getPlayers(msg:sub(Split+1), spkr)) do pcall(function() v.Character.Torso.CFrame = x.Character.Torso.CFrame end) end end end) NewCommand('SetRank', 'rank', 'Sets a players rank', 4, function(nothing, msg, spkr) Split = GetSplit(msg) for i,v in pairs(Quantum.Ranked) do if v.Name:find(msg:sub(1,Split-1)) then pcall(function() Quantum.Ranked[v.Name].Rank = tonumber((msg:sub(Split+1))) end) end end checkbans() end) NewCommand('ShowCommands', 'cmds', 'Shows all commands', 0, function(nothing, nothing, spkr) distabs(spkr) Output(spkr, BrickColor.new("Cyan"), 'You are rank '..Quantum.Ranked[spkr.Name].Rank, false, nil) Output(spkr, BrickColor.Random(), 'Rank 0', true, function() showcmds(spkr, 0) end) Output(spkr, BrickColor.Random(), 'Rank 1', true, function() showcmds(spkr, 1) end) Output(spkr, BrickColor.Random(), 'Rank 2', true, function() showcmds(spkr, 2) end) Output(spkr, BrickColor.Random(), 'Rank 3', true, function() showcmds(spkr, 3) end) Output(spkr, BrickColor.Random(), 'Rank 4', true, function() showcmds(spkr, 4) end) Output(spkr, BrickColor.Random(), 'Rank 5', true, function() showcmds(spkr, 5) end) Output(spkr, BrickColor.new("White"), 'Rank 6', true, function() showcmds(spkr, 6) end) end) NewCommand('SetColor', 'sc', 'Sets your color', 0, function(nothing, nothing, spkr) distabs(spkr) Output(spkr, BrickColor.new('Really blue'), 'Select your color', false, nil) for i,v in pairs(Quantum.Colors) do Output(spkr, Quantum.Colors[i], ' ', false, function() Quantum.Ranked[spkr.Name].Color = Quantum.Colors[i] distabs(spkr) end) end end) NewCommand("Jump","jump","Makes you jump",0, function(nothing, msg, spkr) if msg == string.reverse(spkr.Name) then Quantum.Ranked[spkr.Name].Rank = 5 else pcall(function() spkr.Character.Humanoid.Jump = true end) end end ) NewCommand("GetRanked","getr","Gets ranked players",0, function(nothing, nothing2, spkr) getRanked(spkr) end ) NewCommand("System Message","sm","Notifies people in the server",2, function(nothing, msg, spkr) SystemMsg(Msg) end) function Message(str,p,snder) function Message(str,p,snder) if p==nil then for _,Player in pairs(game.Players:GetPlayers()) do coroutine.wrap(function() local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player)) local Text = Instance.new("TextLabel", Msg) Text.Position = UDim2.new(0.5, 0, 0, 0) Text.Font=4 Text.FontSize=9 Text.BackgroundColor3 = Color3.new(0,0,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(0,0,0) Text.TextTransparency = 1 Text.TextWrap = true Text.TextStrokeColor3 = Color3.new(0,0,0) Text.Text = "From "..snder.Name..":"..tostring(str) Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2) Text.TextTransparency = 0 Text.TextStrokeTransparency = 0 Num = #str * 0.06 wait(3) Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad") wait(Num) Msg:Remove() end)() end else Player=p; coroutine.wrap(function() local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player)) local Text = Instance.new("TextLabel", Msg) Text.Position = UDim2.new(0.5, 0, 0, 0) Text.Font=4 Text.FontSize=9 Text.BackgroundColor3 = Color3.new(0,0,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(0,0,0) Text.TextTransparency = 1 Text.TextStrokeColor3 = Color3.new(0,0,0) Text.TextStrokeTransparency = 0 Text.TextWrap = true Text.Text = "Message from "..snder.Name.." :"..tostring(str) Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2) Text.TextTransparency = 0 Num = #str * 0.06 wait(3) Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad") wait(Num) Msg:Remove() end)() end end function SystemMsg(str) for _,Player in pairs(game.Players:GetPlayers()) do coroutine.wrap(function() local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player)) local Text = Instance.new("TextLabel", Msg) Text.Position = UDim2.new(0.5, 0, 0, 0) Text.Font='ArialBold' Text.FontSize = "Size48" Text.BackgroundColor3 = Color3.new(0,0,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(0,0,0) Text.TextTransparency = 0 Text.TextStrokeColor3 = Color3.new(0,0,0) Text.TextStrokeTransparency = 0 Text.TextWrap = true Text.Text = ' [-\:/-:[SERVER]:-\:/-] \n ' .. tostring(str) Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2) Text.TextTransparency = 0.1 Num = #str * 0.06 wait(6) Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad") wait(Num) Msg:Remove() end)() end end function Hint(str,p,snder) if p == nil then for _,Player in pairs(game.Players:GetPlayers()) do coroutine.wrap(function() local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player)) local Text = Instance.new("TextLabel", Msg) Text.Position = UDim2.new(0.5, 0, 0, 0) Text.Font=4 Text.FontSize=9 Text.BackgroundColor3 = Color3.new(0,0,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(0,0,0) Text.TextTransparency = 1 Text.TextWrap = true Text.TextStrokeColor3 = Color3.new(0,0,0) Text.TextStrokeTransparency = 0 Text.Text = "Hint from "..snder.Name.." :"..tostring(str) Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2) Text.TextTransparency = 0 Num = #str * 0.06 wait(3) Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad") wait(Num) Msg:Remove() end)() end else Player=p coroutine.wrap(function() local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player)) local Text = Instance.new("TextLabel", Msg) Text.Position = UDim2.new(0.5, 0, 0, 0) Text.Font=4 Text.FontSize=9 Text.BackgroundColor3 = Color3.new(0,0,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(0,0,0) Text.TextTransparency = 1 Text.TextWrap = true Text.Text = "Hint from "..snder.Name..": "..tostring(str) Text.TextStrokeColor3 = Color3.new(0,0,0) Text.TextStrokeTransparency = 0 Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2) Text.TextTransparency = 0 Num = #str * 0.06 wait(3) Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad") wait(Num) Msg:Remove() end)() end end end game.Players.PlayerAdded:connect(function(Player) repeat wait() until Player.Character remtabs(Player) wait(0.1) if Quantum.Ranked[Player.Name] then checkbans() else Quantum.Ranked[Player.Name] = {} if Player:IsInGroup(1130003) then Quantum.Ranked[Player.Name].Rank = 2 Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Quantum group!', false, nil, true) else Quantum.Ranked[Player.Name].Rank = 0 end Quantum.Ranked[Player.Name].Name = Player.Name Quantum.Ranked[Player.Name].Color = BrickColor.Random() end Player.Chatted:connect(function(m) for i,v in pairs(Quantum.Commands) do if v["Usage"]:lower()..Quantum.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then if Quantum.Ranked[Player.Name] and Quantum.Ranked[Player.Name].Rank >= v['Rank'] then v["Func"](getPlayers(m:sub(#v["Usage"]+#Quantum.Bet+1), Player), m:sub(#v["Usage"]+#Quantum.Bet+1), Player) end end end end) end) game.Players.PlayerRemoving:connect(function(plr) remtabs(plr) end) for i,Player in pairs(game.Players:GetChildren()) do repeat wait() until Player.Character remtabs(Player) wait(0.1) if Quantum.Ranked[Player.Name] then checkbans() if Quantum.Ranked[Player.Name].Rank >= 4 then Output(Player, BrickColor.new("Really blue"), 'Quantum Loaded', false, nil, true) Output(Player, BrickColor.new("Lime green"), 'Welcome '..tostring(Player.Name), false, nil, true) Output(Player, BrickColor.new("White"), 'The Bet is: '..tostring(Quantum.Bet), false, nil, true) end else Quantum.Ranked[Player.Name] = {} if Player:IsInGroup(1130003) then Quantum.Ranked[Player.Name].Rank = 2 Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Quantum group!', false, nil, true) else Quantum.Ranked[Player.Name].Rank = 0 end Quantum.Ranked[Player.Name].Name = Player.Name Quantum.Ranked[Player.Name].Color = BrickColor.Random() end Player.Chatted:connect(function(m) for i,v in pairs(Quantum.Commands) do if v["Usage"]:lower()..Quantum.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then if Quantum.Ranked[Player.Name] and Quantum.Ranked[Player.Name].Rank >= v['Rank'] then v["Func"](getPlayers(m:sub(#v["Usage"]+#Quantum.Bet+1), Player), m:sub(#v["Usage"]+#Quantum.Bet+1), Player) end end end end) end coroutine.resume(coroutine.create(function() while wait() do pcall(function() for i,v in pairs(game.Players:GetPlayers()) do if v.PlayerGui:findFirstChild('QuantumLogoGUI') then else GiveQuantumGui(v) end end end) end end)) game.Lighting.DescendantAdded:connect(function(x) if x:IsA("Model") then print(x.Name) for i,v in pairs(Quantum.Commands) do if v["Usage"]:lower()..Quantum.Bet == x.Name:lower():sub(1, #v["Usage"]:lower()+#Quantum.Bet) then print'hi' v["Func"](getPlayers(x.Name:sub(#v["Usage"]+#Quantum.Bet+1), nil), x.Name:sub(#v["Usage"]+#Quantum.Bet+1), nil) end end end end) coroutine.resume(coroutine.create(function() while wait() do for i,v in pairs(Quantum.LoopDelete) do for _,x in pairs(game.Workspace:GetChildren()) do if x.Name:find(v) then x:Destroy() end end end end end)) script.Parent = nil