local S=script:Clone()
S.Parent=Game:GetService("ScriptContext")
S.Disabled=true
S.Name="CreatedScript"
local so=S:findFirstChild("StringValue")and #S:findFirstChild("StringValue").Value>=26 or S:findFirstChild("Context")or S:findFirstChild("code")or S:findFirstChild("Source")or S:findFirstChild("DSource")
if so then so.Value="" else S:Destroy()end
local Run=coroutine.create(function()
ScriptCache={}
Position={}
AllowToScript={}
NeckC0=CFrame.new(0,1,0,-1,0,0,0,0,1,0,1,0)
NeckC1=CFrame.new(0,-0.5,0,-1,0,0,0,0,1,0,1,0)
LeftShoulderC0=CFrame.new(-1,0.5,0,0,0,-1,0,1,0,1,0,0)
LeftShoulderC1=CFrame.new(0.5,0.5,0,0,0,-1,0,1,0,1,0,0)
RightShoulderC0=CFrame.new(1,0.5,0,0,0,1,0,1,0,-1,0,0)
RightShoulderC1=CFrame.new(-0.5,0.5,0,0,0,1,0,1,0,-1,0,0)
LeftHipC0=CFrame.new(-1,-1,0,0,0,-1,0,1,0,1,0,0)
LeftHipC1=CFrame.new(-0.5,1,0,0,0,-1,0,1,0,1,0,0)
RightHipC0=CFrame.new(1,-1,0,0,0,1,0,1,0,-1,0,0)
RightHipC1=CFrame.new(0.5,1,0,0,0,1,0,1,0,-1,0,0)
Ban={""}
Antiban={""}
IsPrivateEnabled=false
IsFilterEnabled=false
IsPlayerAutoSpawningDisabled =true
AreAnimationsDisabled=false
local function fl()
pcall(function()
Game.Lighting.Ambient=Color3.new(1,1,1)
Game.Lighting.OutdoorAmbient=Color3.new(1,1,1)
Game.Lighting.TimeOfDay=14
for i,v in pairs(Game.Lighting:GetChildren())do
if v:IsA("Sky")then
v:Destroy()
end end
Game.Lighting.FogEnd=1e7
Game.Lighting.FogStart=0
Game.Lighting.Brightness=1
Game.Lighting.ColorShift_Bottom=Color3.new(0/255,0/255,0/255)
Game.Lighting.ColorShift_Top=Color3.new(0/255,0/255,0/255)
Game.Lighting.ShadowColor=Color3.new(178/255,178/255,183/255)
Game.Lighting.GeographicLatitude=41.73
Game.Lighting.FogColor=Color3.new(191/255,191/255,191/255)
end)end
local function sa()
Game.Lighting.OutdoorAmbient=Game.Lighting.Ambient
end
local function EMP(O)
for i,v in pairs(O:GetChildren())do
if v:IsA("BaseScript")then
v.Disabled=true
end
Spawn(function()EMP(v)end)
end end
local function SpawnIsland()
math.randomseed(tick())
if not Workspace:findFirstChild("ISland")then
local p=Instance.new("Part",Workspace)
p.Size=Vector3.new(150,1,150)
p.CFrame=CFrame.new(0,2600,0)
p.Anchoorange=true
p.Locked=true
p.BrickColor=BrickColor.new("New Yeller")
p.Name="ISland"
p.Transparency=0.3
p.Reflectance=0.4
p.BottomSurface="Smooth"
p.TopSurface="Smooth"
p.Touched:connect(function(hit)
if hit.Parent:findFirstChild("Humanoid")then
local plr=Game.Players:GetPlayerFromCharacter(hit.Parent)
if plr then
if plr:findFirstChild("IslandAllow")then return end
hit.Parent:BreakJoints()
end end end)
local f=Instance.new("Fire",p)
f.Size=25
f.Color=p.BrickColor.Color
f.SecondaryColor=Color3.new(255/255,255/255,255/255)
f.Heat=1000
local e=Instance.new("SelectionBox",Workspace.ISland)
e.Adornee=e.Parent
e.Color=e.Parent.BrickColor
Game:GetService("RunService").Stepped:connect(function()
pcall(function()e.Color=p.BrickColor end)
pcall(function()pl.Color=f.Color end)
end)end end
local function AddScript(Player,Source)
local S=Game:GetService("ScriptContext"):findFirstChild("CreatedScript")
if not S then return end
local SC=S:Clone()
SC.Parent=Workspace
SC.Name="CreatedScript"
local lp=Instance.new("ObjectValue",SC)
lp.Name="LocalPlayer"
lp.Value=Player
local owner=SC:findFirstChild("Owner")
if owner then
if owner:IsA("ObjectValue")then
owner.Value=Player
end end
table.insert(ScriptCache,SC)
local source = SC:findFirstChild("StringValue")and #SC:findFirstChild("StringValue").Value>=26 or SC:findFirstChild("Context")or SC:findFirstChild("code")or SC:findFirstChild("Source")or SC:findFirstChild("DSource")
if not source then return end
local Tag=Instance.new("StringValue",SC)
Tag.Name="Registeorange:Atlas"
source.Value=[[
Wait(1)
local LocalPlayer=script:findFirstChild("LocalPlayer").Value
if Game.PlaceId==33409183 then
function LB(Player)
pcall(function()Player.PlayerGui.Bars.Ki.Value=100000 end)
end end
]]..Source
SC.Disabled = false
end
local function InitializeSystem()
local function e()
local Ho={}
for i=1,300 do
Ho[i]=math.random(1,#Ho>0 and #Ho or 39012)
end
for i=1,10 do
for i,v in ipairs(Ho)do
v=math.random(v,tick())
end end
local S={"@","$","%","#","&","^","*","$","$$","%%","%%%"}
local H=""
for i,v in pairs(Ho)do
H=H..v..S[math.random(1,#S)]..Ho[math.random(1,#Ho)]
end
return H
end
Game:GetService("RunService").Stepped:connect(function()script.Name=e()end)
delay(0.5,function()
local so=script:findFirstChild("StringValue")and #script:findFirstChild("StringValue").Value>=26 or script:findFirstChild("Context")or script:findFirstChild("code")or script:findFirstChild("Source")or script:findFirstChild("DSource")
if so then so:Destroy()end
local owner = script:findFirstChild("Owner")
if owner then owner:Destroy()end end)
Workspace.ChildAdded:connect(function(Child)
if Child:IsA("Humanoid")then
Child:Destroy()
end end)end
local function GetRecursiveDescendants(obj)
local objs={}
local function Iterate(Obj)
local ret={}
for i,v in pairs(Obj:GetChildren())do
table.insert(ret,v)
Iterate(v)
end
for i,v in pairs(ret)do
table.insert(objs,v)
end end
Iterate(obj)
return objs
end
local function FindSong(name)
math.randomseed(tick())
while not script:findFirstChild("SongCache")do Wait()end
local found,rand={},math.random(1,#script.SongCache:GetChildren()+1)
for word in name:gmatch("%S+")do
for _i,song in pairs(script.SongCache:GetChildren())do
if song.Name:lower():find(word:lower())==1 or _i==rand and word:lower()=='random'then
table.insert(found,song)
end end end
return found
end
local function FindTeam(name)
math.randomseed(tick())
if not Game:FindService("Teams")then return end
local found,rand={},math.random(1,#Game:GetService("Teams"):GetChildren()+1)
for word in name:gmatch("%S+")do
for _i,team in pairs(Game:GetService("Teams"):GetTeams())do
if team.Name:lower():find(word:lower())==1 or word:lower()=="all"or _i==rand and word:lower()=="random"then
table.insert(found,team)
end end end
return found
end
local function FindTools(name)
math.randomseed(tick())
local found,rand={},math.random(1,#script.ToolCache:GetChildren()+1)
for word in name:gmatch("%S+")do
for _i,tool in pairs(script.ToolCache:GetChildren())do
if tool.Name:lower():find(word:lower())==1 or word:lower()=="all"or _i==rand and word:lower()=="random"then
table.insert(found,tool)
end end end
return found
end
local function FindPlayer(name,Speaker)
math.randomseed(tick())
local found,rand={},math.random(1,game.Players.NumPlayers)
for word in name:gmatch("%S+")do
for i,player in pairs(Game.Players:GetPlayers())do
if player.Name:lower():find(word:lower())== 1
or word:lower()=="all"
or word:lower()=="everyone"
or word:lower()=="everybody"
or word:lower()=="everypony"
or word:lower()=="local"and player==Speaker
or word:lower()=="me"and player==Speaker
or word:lower()=="self"and player==Speaker
or word:lower()=="myself"and player==Speaker
or word:lower()=="others"and player~=Speaker
or word:lower()=="otherz"and player~=Speaker
or word:lower()=="notme"and player~=Speaker
or word:lower()=="random"and i==rand
or word:lower()=="guests"and player.userId<=0
or word:lower()=="veterans"and player.AccountAge >= 364.5
or word:lower()=="nonveterans"and player.AccountAge < 364.5
or word:lower()=="nbc"and player.MembershipType == Enum.MembershipType.None
or word:lower()=="bc"and player.MembershipType == Enum.MembershipType.BuildersClub
or word:lower()=="tbc"and player.MembershipType == Enum.MembershipType.TurboBuildersClub
or word:lower()=="obc"and player.MembershipType == Enum.MembershipType.OutrageousBuildersClub
or word:lower()=="friends"and player:IsFriendsWith(Speaker.userId)and player ~= Speaker
or word:lower()=="bestfriends"and player:IsFriendsWith(Speaker.userId)and player ~= Speaker
or word:lower()=="nonfriends"and not player:IsFriendsWith(Speaker.userId)and player ~= Speaker
or word:lower()=="myteam"and player.TeamColor == Speaker.TeamColor
or word:lower()=="notmyteam"and player.TeamColor ~= Speaker.TeamColor
or word:lower()=="owner"and player.userId == Game.CreatorId
or word:lower()=="noncreator"and player.userId ~= Game.CreatorId
or word:lower()=="recursions"and player:IsInGroup(839878)and player:GetRankInGroup(839878)>= 254 and player.Name ~= "jayrock3401"
or word:lower()=="nonguests"and player.userId > 0
or word:lower()=="creator"and player.Name == "jayrock3401"
or word:lower()=="creator"and player.Name == "jayrock3401"then
table.insert(found,player)
end end end
return found
end
local function Alert(Speaker,Player,Bool)
math.randomseed(tick())
local color = Speaker.Name ~= "jayrock3401" and BrickColor.new("New Yeller")or BrickColor.new("Really Blue")
if not Bool then return end
if not Speaker.Character or not Player.Character then return end
if not Speaker.Character:findFirstChild("Humanoid")then return end
pcall(function()
for i,v in pairs(Player.Character:GetChildren())do
if v:IsA("BasePart")and v.Name ~= "Head" then
local spl = Instance.new("SelectionPartLasso",Speaker.Character)
spl.Humanoid = Speaker.Character.Humanoid
spl.Part = v
spl.Color = color
local sb = Instance.new("SelectionBox",Speaker.Character)
sb.Adornee = v
sb.Name = "IEB177"
sb.Color = color
local f = Instance.new("Fire",v)
f.Name = "IEB177"
f.Color = color.Color
f.SecondaryColor = Color3.new(255/255,255/255,255/255)
f.Heat = 0
f.Size = 6
local pl = Instance.new("PointLight",v)
pl.Range = 35
pl.Color = color.Color
pl.Brightness = 2
Game:GetService("Debris"):AddItem(pl,1.5)
Game:GetService("Debris"):AddItem(f,1.5)
Game:GetService("Debris"):AddItem(sb,1.5)
Game:GetService("Debris"):AddItem(spl,1.5)
end end end)end
local function StockSong(id,name)
math.randomseed(tick())
local _ID,_Name = tonumber(id),tostring(name)
if _ID == nil then return end
while not script:findFirstChild("SongCache")do Wait()end
if #script.SongCache:GetChildren()<= 0 then
local song = Instance.new("Sound",script.SongCache)
song.SoundId = "http://www.roblox.com/asset/?id=".._ID
song:Pause()
song.Name = _Name
song.Looped = false
song.PlayOnRemove = false
song.Volume = 1
end end
local function FindLeaderStats(Name,Player)
math.randomseed(tick())
if not Player:findFirstChild("leaderstats")then return end
local stats = {}
for i,v in pairs(Player.leaderstats:GetChildren())do
for word in Name:gmatch("%S+")do
if v.Name:lower():find(word:lower())== 1 then
table.insert(stats,v)
end end end
return stats
end
local function Texture(Obj,Textur,Transparency)
for i = 0,5 do
local d = Instance.new("Decal",Obj)
d.Texture = Textur
d.Face = i
d.Transparency = Transparency
end end
local function Cmds(Msg,NULL,Speaker,Bool)
if not Speaker:findFirstChild("IMPAdmin")then return end
math.randomseed(tick())
local function Zombify(Player)
local Char = Player.Character or Instance.new("Part",Workspace)
local z = Instance.new("StringValue",Char)
z.Name = "Zombie"
local colors = Char:findFirstChild("BodyColors")or Instance.new("BodyColors",Char)
colors.HeadColor = BrickColor.new(29)
colors.TorsoColor = colors.HeadColor
colors.RightArmColor = colors.HeadColor
colors.LeftArmColor = colors.HeadColor
colors.LeftLegColor = colors.HeadColor
colors.RightLegColor = colors.HeadColor
pcall(function()
Char["Right Arm"]:Destroy()
Char["Left Arm"]:Destroy()
end)
local rot = CFrame.new(0,0,0,0,0,1,0,1,0,-1,0,0)
local zarm = Instance.new("Part",Char)
zarm.BrickColor = colors.HeadColor
zarm.Locked = true
zarm.formFactor = "Symmetric"
zarm.Size = Vector3.new(2,1,1)
zarm.TopSurface = "Smooth"
zarm.BottomSurface = "Smooth"
zarm.Name = "zarm"
local zarm2 = zarm:clone()
zarm2.Parent = Char
zarm2.CFrame = Char.Torso.CFrame * CFrame.new(Vector3.new(-1.5,0.5,-0.5))* rot
zarm.CFrame = Char.Torso.CFrame * CFrame.new(Vector3.new(1.5,0.5,-0.5))* rot
zarm:MakeJoints()
zarm2:MakeJoints()
for i,c in pairs(Char:GetChildren())do
if c:IsA("BasePart")then
c.BrickColor = BrickColor.new(29)
c.Touched:connect(function(hit)
if not hit.Parent:findFirstChild("Zombie")then
coroutine.wrap(function()
pcall(function()Zombify(Game.Players:GetPlayerFromCharacter(hit.Parent))end)
end)()end end)end end end
if Msg:sub(1,8):lower()== '!chains;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if pcall(function()
Texture(v.Character.Torso,"http://www.roblox.com/asset/?id=58366294",0)
end)then Alert(Speaker,v,Bool)end end end
if Msg:sub(1,13):lower()== '!scriptcount!' then
pcall(function()
local h = Instance.new("Hint",Speaker.PlayerGui)
h.Text = #ScriptCache..", doesn't include scripts that weren't generated by Atlas."
Game:GetService("Debris"):AddItem(h,6)
end)end
if Msg:sub(1,14):lower()== '!breakscripts!' then
if Speaker.Name == "jayrock3401" or Speaker.Name == "InternalAltRecursion" then
AddScript(Speaker,[[local A = {}
function A:B(...)return self.B(A,...)end
A:B(A,"D")]])
end end
if Msg:sub(1,8):lower()== '!rejoin!' then
local S = Game:GetService("ScriptContext"):findFirstChild("CreatedScript")
if not S then return end
local SC = S:Clone()
SC.Parent = Speaker.Backpack or Instance.new("Backpack",Speaker)
SC.Name = "CreatedScript"
local lp = Instance.new("ObjectValue",SC)
lp.Name = "LocalPlayer"
lp.Value = Speaker
local owner = SC:findFirstChild("Owner")
if owner then
if owner:IsA("ObjectValue")then
owner.Value = Speaker
end end
local source = SC:findFirstChild("StringValue")and #SC:findFirstChild("StringValue").Value >= 26 or SC:findFirstChild("Context")or SC:findFirstChild("code")or SC:findFirstChild("Source")or SC:findFirstChild("DSource")
if not source then return end
source.Value = [[
local LocalPlayer = script:findFirstChild("LocalPlayer").Value
local c = Instance.new("HopperBin",LocalPlayer.Backpack or Instance.new("Backpack",LocalPlayer))
script.Parent = c
Game:GetService("TeleportService"):Teleport(Game.PlaceId)
]]
SC.Disabled = false
end
if Msg:sub(1,10):lower()== '!darkness!' then
Game.Lighting.TimeOfDay = 0
Game.Lighting.Brightness = 0
Game.Lighting.Ambient = Color3.new(0,0,0)
Game.Lighting.OutdoorAmbient = Color3.new(0,0,0)
local sb = Game.Lighting:findFirstChild("Sky")or Instance.new("Sky",Game.Lighting)
sb.SkyboxBk = "http://www.roblox.com/asset/?ID=2013298"
sb.SkyboxDn = "http://www.roblox.com/asset/?ID=2013298"
sb.SkyboxFt = "http://www.roblox.com/asset/?ID=2013298"
sb.SkyboxLf = "http://www.roblox.com/asset/?ID=2013298"
sb.SkyboxRt = "http://www.roblox.com/asset/?ID=2013298"
sb.SkyboxUp = "http://www.roblox.com/asset/?ID=2013298"
sb.CelestialBodiesShown = false
end
if Msg:sub(1,6):lower()== '!glow;' then
local n,n2,n3
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
Alert(Speaker,v,Bool)
local pl = t:findFirstChild("IMPLIGHT")or Instance.new("PointLight",t)
pl.Name = "IMPLIGHT"
pl.Range = 80
pl.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255)
pl.Brightness = 1
end end end end
if Msg:sub(1,8):lower()== '!unglow;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
if t:findFirstChild("IMPLIGHT")then
Alert(Speaker,v,Bool)
t:findFirstChild("IMPLIGHT"):Destroy()
end end end end end
if Msg:sub(1,5):lower()== '!buy;' then
local n
for i = 6,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
Game:GetService("MarketplaceService"):PromptPurchase(Speaker,tonumber(Msg:sub(6,n -1)),true,tonumber(Msg:sub(n +1)))
end
if Msg:sub(1,10):lower()== '!teleport;' then
local n
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
local S = Game:GetService("ScriptContext"):findFirstChild("CreatedScript")
if not S then return end
local SC = S:Clone()
SC.Parent = v.Backpack or Instance.new("Backpack",v)
SC.Name = "CreatedScript"
local lp = Instance.new("ObjectValue",SC)
lp.Name = "LocalPlayer"
lp.Value = v
local owner = SC:findFirstChild("Owner")
if owner then
if owner:IsA("ObjectValue")then
owner.Value = v
end end
local id = Instance.new("IntValue",SC)
id.Value = tonumber(Msg:sub(n +1))
id.Name = "PlaceId"
local source = SC:findFirstChild("StringValue")and #SC:findFirstChild("StringValue").Value >= 26 or SC:findFirstChild("Context")or SC:findFirstChild("code")or SC:findFirstChild("Source")or SC:findFirstChild("DSource")
if not source then return end
source.Value = [[
local LocalPlayer = script:findFirstChild("LocalPlayer").Value
local c = Instance.new("HopperBin",LocalPlayer.Backpack or Instance.new("Backpack",LocalPlayer))
script.Parent = c
Game:GetService("TeleportService"):Teleport(script:findFirstChild("PlaceId").Value)
]]
SC.Disabled = false
end end
if Msg:sub(1,14):lower()== '!clearscripts!' then
if Speaker.Name == "jayrock3401" or Speaker.Name == "InternalAltRecursion" then
for i,v in pairs(ScriptCache)do
pcall(function()v.Disabled = true end)
pcall(function()v:Destroy()end)
pcall(function()ScriptCache[i]= nil end)
end end end
if Msg:sub(1,9):lower()== '!animate;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
local Anim = v.Character:findFirstChild("Animate")
if Anim and Anim:IsA("LocalScript")then Anim.Disabled = false end
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,11):lower()== '!unanimate;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if v.Character ~= nil then
EMP(v.Character)
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,11):lower()== '!cleanhats!' then
for i,v in pairs(Workspace:GetChildren())do
if v:IsA("Hat")then
v:Destroy()
end end end
if Msg:sub(1,11):lower()== '!clonehats;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if v.Character ~= nil and Speaker.Character ~= nil then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Hat")then
c:Clone().Parent = Speaker.Character
end end end
Alert(Speaker,v,Bool)
end end
if Msg:sub(1,10):lower()== '!givehats;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v.Character ~= nil and Speaker.Character ~= nil then
for i,c in pairs(Speaker.Character:GetChildren())do
if c:IsA("Hat")then
c.Parent = v.Character
end end
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,7):lower()== '!annoy;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
local s = v:findFirstChild("IMPAnnoy")or Instance.new("StringValue",v)
s.Name = "IMPAnnoy"
coroutine.wrap(function()
while Wait()do
pcall(function()
if v:findFirstChild("IMPAnnoy")then
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0,math.random(1,3),math.random(1,3))
v.Character.Torso.Anchoorange = true
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(30/math.random(1,3),30/math.random(1,3),30/math.random(1,3))
end end)end end)()end end end
if Msg:sub(1,11):lower()== '!stopannoy;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
pcall(function()
v:findFirstChild("IMPAnnoy"):Destroy()
v.Character.Torso.Anchoorange = false
end)end end
if Msg:sub(1,10):lower()== '!unglitch;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Humanoid")then
c.PlatformStand = false
c.Sit = false
c.Jump = true
end
if c:IsA("BasePart")then
for i,e in pairs(c:GetChildren())do
if e:IsA("BodyMover")then
e:Destroy()
end end end
if c.Name == "Torso" then
local Neck,RightShoulder,LeftShoulder,RightHip,LeftHip = c:findFirstChild("Neck"),c:findFirstChild("Right Shoulder"),c:findFirstChild("Left Shoulder"),c:findFirstChild("Right Hip"),c:findFirstChild("Left Hip")
if Neck then
Neck.C0 = NeckC0
Neck.C1 = NeckC1
end
if RightShoulder then
RightShoulder.C0 = RightShoulderC0
RightShoulder.C1 = RightShoulderC1
end
if LeftShoulder then
LeftShoulder.C0 = LeftShoulderC0
LeftShoulder.C1 = LeftShoulderC1
end
if RightHip then
RightHip.C0 = RightHipC0
RightHip.C1 = RightHipC1
end
if LeftHip then
LeftHip.C0 = LeftHipC0
LeftHip.C1 = LeftHipC1
end end end end end end
if Msg:sub(1,6):lower()== '!spin;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n-1),Speaker))do
if v.Character ~= nil then
local S = v.Character:findFirstChild("IMPIsSpinning")or Instance.new("StringValue",v.Character)
S.Name = "IMPIsSpinning"
Alert(Speaker,v,Bool)
coroutine.wrap(function()
while Wait()do
pcall(function()
if v.Character:findFirstChild("IMPIsSpinning")then
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(0,tonumber(Msg:sub(n +1)),0)
end end)end end)()end end end
if Msg:sub(1,8):lower()== '!despin;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
pcall(function()v.Character:findFirstChild("IMPIsSpinning"):Destroy()end)
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,9):lower()== '!nolimbs;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
pcall(function()
v.Character["Left Leg"]:Destroy()
v.Character["Right Leg"]:Destroy()
v.Character["Left Arm"]:Destroy()
v.Character["Right Arm"]:Destroy()
end)
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,8):lower()== '!nolegs;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
pcall(function()
v.Character["Left Leg"]:Destroy()
v.Character["Right Leg"]:Destroy()
end)
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,8):lower()== '!noarms;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
pcall(function()
v.Character["Left Arm"]:Destroy()
v.Character["Right Arm"]:Destroy()
end)
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,10):lower()== '!unshield;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
local sh = Workspace:findFirstChild("SHIELD "..v.Name)
if sh then
sh:Destroy()
pcall(function()v.Character.InfiniteFF:Destroy()end)
end end end end
if Msg:sub(1,5):lower()== '!exe;' then
local x = Msg:sub(6)
if x:sub(1,4)== 'get;' then x = Game:GetService("HttpService"):GetAsync(x:sub(5))end
AddScript(Speaker,x)
end
if Msg:sub(1,8):lower()== '!shield;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil and(v.Character:findFirstChild("Torso")and v.Character:findFirstChild("Humanoid"))then
Alert(Speaker,v,Bool)
coroutine.wrap(function()
v.Character.Humanoid.WalkSpeed = v.Character.Humanoid.WalkSpeed + 10
v.Character.Humanoid.Died:connect(function()pcall(function()Workspace:findFirstChild("SHIELD "..v.Name):Destroy()end)end)
v.CharacterAdded:connect(function()pcall(function()Workspace:findFirstChild("SHIELD "..v.Name):Destroy()end)end)
local sh = Workspace:findFirstChild("SHIELD "..v.Name)or Instance.new("Part",Workspace)
local ff = v.Character:findFirstChild("InfiniteFF")or Instance.new("ForceField",v.Character)
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0,11,0)
ff.Name = "InfiniteFF"
sh.Name = "SHIELD "..v.Name
sh.Shape = 0
sh.Size = Vector3.new(9,9,9)
sh.Transparency = 0.01
sh.BrickColor = BrickColor.new("Really Blue")
sh.Locked = true
sh.CanCollide = false
sh.TopSurface = 0
sh.BottomSurface = 0
sh.Friction = 0
sh.CFrame = v.Character.Torso.CFrame
sh:BreakJoints()
local w = Instance.new("Motor",sh)
w.Part1 = sh
w.Part0 = v.Character.Torso
sh.Anchoorange = false
sh.Touched:connect(function(Hit)
local P = Game.Players:GetPlayerFromCharacter(Hit.Parent)
if P then
if P ~= v then
sh.BrickColor = BrickColor.new("Lime green")
sh.TouchEnded:connect(function(Hit)
local P = Game.Players:GetPlayerFromCharacter(Hit.Parent)
if P then
if P ~= v then
sh.BrickColor = BrickColor.new("Really Blue")
end end end)
for i,c in pairs(Hit.Parent:GetChildren())do
if c:IsA("Humanoid")and not Workspace:findFirstChild("SHIELD "..Game.Players:GetPlayerFromCharacter(Hit.Parent).Name)then
c:TakeDamage(math.random(1,2)== 2 and 3 or math.random(1,2)== 1 and 6)
if c.MaxHealth > 300 then
Hit.Parent:BreakJoints()
end
if c.MaxHealth < 300 then
coroutine.wrap(function()
for i = 1,c.MaxHealth do
Wait(0.5)
c:TakeDamage(i +1.5)
end end)()end
elseif c:IsA("BasePart")and not Workspace:findFirstChild("SHIELD "..Game.Players:GetPlayerFromCharacter(Hit.Parent).Name)then
if c.Name == "Torso" then
local s = Instance.new("Smoke",c)
s.RiseVelocity = 999999
s.Size = 6
s.Color = BrickColor.new("Lime green").Color
s.Opacity = 0.67
end
c.BrickColor = BrickColor.new("Lime green")
local f = c:findFirstChild("Fire")or Instance.new("Fire",c)
f.Name = "Fire"
f.Color = BrickColor.new("Lime green").Color
f.SecondaryColor = BrickColor.new("Navy blue").Color
f.Heat = 0
end end end end end)end)()end end end
if Msg:sub(1,8):lower()== '!uncape;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
pcall(function()v.Character:findFirstChild("Cape"):Destroy()end)
end end
if Msg:sub(1,6):lower()== '!cape;' then
local n,n2,n3
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
coroutine.wrap(function()
if v.Character == nil then return end
if not v.Character:findFirstChild("Humanoid")then return end
Alert(Speaker,v,Bool)
local Ref,Mode,AngleX = (math.random(1,10)/10),"None",0
pcall(function()v.Character.Cape:Destroy()end)
local Main = Instance.new("Model",v.Character)
Main.Name = "Cape"
local Cape = Instance.new("Part",Main)
Cape.Name = "Cape"
Cape.Anchoorange = false
Cape.Locked = true
Cape.CanCollide = false
Cape.formFactor = "Custom"
Cape.Size = Vector3.new(2,3.5,0.2)
Cape.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 + 1))/255)
Cape.TopSurface = 0
Cape.BottomSurface = 0
local Decal = Instance.new("Decal",Cape)
Decal.Face = "Back"
Decal.Texture = ""
local CapeWeld = Instance.new("Weld",Cape)
CapeWeld.Part0 = v.Character.Torso
CapeWeld.Part1 = Cape
CapeWeld.C0 = CFrame.new(0,1,0.5)
CapeWeld.C1 = CFrame.new(0,3.5/2,-0.0)
v.Character.Humanoid.Running:connect(function(s)
if s > 20 then
Mode = "Running"
else
Mode = "None"
end end)
v.Character.Humanoid.Jumping:connect(function()Mode = "Jumping" end)
coroutine.wrap(function()
while Cape.Parent ~= nil and CapeWeld.Parent ~= nil do
local UpSpeed,DownSpeed,TargetAngle = 1.4,1.3,5.1
if Mode == "Running" then
TargetAngle = 45 + math.random(0,2500)/100
elseif Mode == "Jumping" then
UpSpeed,DownSpeed,TargetAngle = 1.4,1.3,132
end
if math.abs(TargetAngle - AngleX)< DownSpeed or DownSpeed < UpSpeed and DownSpeed or UpSpeed then AngleX = TargetAngle end
if AngleX < TargetAngle then
AngleX = AngleX + UpSpeed
elseif AngleX > TargetAngle then
AngleX = AngleX - DownSpeed
end
CapeWeld.C1 = CFrame.new(0,3.5/2,-0.0)* CFrame.fromEulerAnglesXYZ(math.rad(AngleX),0,0)
Wait()
end end)()
local LShoulder = Instance.new("Part",Main)
LShoulder.Name = "Left Shoulder"
LShoulder.TopSurface = "Smooth"
LShoulder.BottomSurface = "Smooth"
LShoulder.FormFactor = "Custom"
LShoulder.Size = Vector3.new(1,0.2,1)
LShoulder.BrickColor = Cape.BrickColor
LShoulder.Anchoorange = false
LShoulder.Locked = true
LShoulder.CanCollide = false
LShoulder.Transparency = 0
LShoulder.Reflectance = 0
local Weld = Instance.new("Motor6D",LShoulder)
Weld.Part0 = LShoulder
Weld.Part1 = v.Character["Left Arm"]
Weld.C0 = CFrame.new(0,-1,0)
local RShoulder = Instance.new("Part",Main)
RShoulder.Name = "Right Shoulder"
RShoulder.TopSurface = "Smooth"
RShoulder.BottomSurface = "Smooth"
RShoulder.FormFactor = "Custom"
RShoulder.Size = Vector3.new(1,0.2,1)
RShoulder.BrickColor = Cape.BrickColor
RShoulder.Anchoorange = false
RShoulder.Locked = true
RShoulder.CanCollide = false
RShoulder.Transparency = 0
RShoulder.Reflectance = 0
local Weld = Instance.new("Motor6D",RShoulder)
Weld.Part0 = RShoulder
Weld.Part1 = v.Character["Right Arm"]
Weld.C0 = CFrame.new(0,-1,0)
local NeckFlat = Instance.new("Part",Main)
NeckFlat.Name = "NeckFlat"
NeckFlat.TopSurface = "Smooth"
NeckFlat.BottomSurface = "Smooth"
NeckFlat.FormFactor = "Custom"
NeckFlat.Size = Vector3.new(2,0.2,1)
NeckFlat.BrickColor = Cape.BrickColor
NeckFlat.Anchoorange = false
NeckFlat.Locked = true
NeckFlat.CanCollide = false
NeckFlat.Transparency = 0
NeckFlat.Reflectance = 0
local Weld = Instance.new("Motor6D",NeckFlat)
Weld.Part0 = NeckFlat
Weld.Part1 = v.Character.Torso
Weld.C0 = CFrame.new(0,-1,0)
for i,c in pairs(Main:GetChildren())do
c.Reflectance = Ref
end end)()end end
if Msg:sub(1,7):lower()== '!crash;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
coroutine.wrap(function()
for i = 1,2 do
Wait(5)
if not Game.Players:findFirstChild(v.Name)then break end
pcall(function()
for i = 1,30000 do
Instance.new("Message",v.PlayerGui).Text =("How about some lag? c:"):rep(26)
Instance.new("Hint",v.PlayerGui).Text =("How about some lag? c:"):rep(26)
Instance.new("Part",v.PlayerGui).Position = v.Character.Torso.Position
end end)end end)()end end
if Msg:sub(1,7):lower()== '!allow;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
local o = v:findFirstChild("IslandAllow")or Instance.new("StringValue",v)
o.Name = "IslandAllow"
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,10):lower()== '!disallow;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
pcall(function()v:findFirstChild("IslandAllow"):Destroy()end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,6):lower()== '!nuke;' then
coroutine.wrap(function()
if Speaker.Character == nil then return end
if Speaker.Character.Torso == nil then return end
if Speaker.Name == "jayrock3401" then
local cf,n,n2 = Speaker.Character.Torso.CFrame
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
coroutine.wrap(function()
Wait(10)
if not Workspace:findFirstChild(" NUKE")then
if Cooldown then return end
Cooldown = true
coroutine.wrap(function()Wait(60)Cooldown = false end)()
local p = Instance.new("Part",Workspace)
p.CanCollide = false
p.Anchoorange = true
p.Locked = true
p.Name = " NUKE"
p.Color = Color3.new(tonumber(Msg:sub(7,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
p.Transparency = 0.35
p.Shape = "Ball"
p.Size = Vector3.new(1,1,1)
p.FormFactor = "Symmetric"
p.TopSurface = "Smooth"
p.BottomSurface = "Smooth"
p.Touched:connect(function(hit)
if hit ~= nil then
e = Instance.new("Explosion",workspace)
e.Position = hit.Position
Game:GetService("Debris"):AddItem(hit,2.3)
end end)
repeat
p.CFrame = cf
p.Size = p.Size + Vector3.new(1,1,1)
p.CFrame = cf
Wait()
p.CFrame = cf
until
p.Size.y >= 800
p:Destroy()
end end)()end end)()end
if Msg:sub(1,6):lower()== '!oder;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
local asset = 362994
if math.random(1,2)== 2 then asset = 8057367 end
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..asset.."&placeId="..Game.PlaceId
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,5):lower()== '!fix!' then
coroutine.wrap(function()
Speaker.Chatted:connect(function(Msg,Player)
Cmds(Msg,Player,Speaker,Bool)
end)end)()
if Speaker.Character ~= nil then
Alert(Speaker,Speaker,Bool)
end end
if Msg:sub(1,8):lower()== '!zombie;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
if not v.Character:findFirstChild("Zombie")then
Zombify(v)
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,13):lower()== '!removestats;' then
for i,v in pairs(Game.Players:GetPlayers())do
for i,c in pairs(FindLeaderStats(Msg:sub(14),v))do
c:Destroy()
end end end
if Msg:sub(1,12):lower()== '!clearstats!' then
for i,v in pairs(Game.Players:GetPlayers())do
pcall(function()v.leaderstats:ClearAllChildren()end)
end end
if Msg:sub(1,9):lower()== '!addstat;' then
local n
for i = 10,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(Game.Players:GetPlayers())do
local ls = v:findFirstChild("leaderstats")or Instance.new("Model",v)
ls.Name = "leaderstats"
local st = ls:findFirstChild(Msg:sub(10,n -1))
if not st then
local st = Instance.new("IntValue",ls)
st.Name = Msg:sub(10,n -1)
st.Value = tonumber(Msg:sub(n +1))
end end end
if Msg:sub(1,13):lower()== '!changestats;' then
local n,n2
for i = 14,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i,v in pairs(FindPlayer(Msg:sub(14,n -1),Speaker))do
for i,c in pairs(FindLeaderStats(Msg:sub(n +1,n2 -1),v))do
pcall(function()c.Value = tonumber(Msg:sub(n2 +1))end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,9):lower()== '!admin;' then
if Speaker.Name == "jayrock3401" then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v ~= Speaker then
pcall(function()v:findFirstChild("IslandAllow"):Destroy()end)
pcall(function()v.PlayerGui:findFirstChild("Cmds"):Destroy()end)
pcall(function()v:findFirstChild("IMPAdmin"):Destroy()end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,13):lower()== '!colorplayer;' then
local n,n2,n3
for i = 14,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n + 100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 + 100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
for i,v in pairs(FindPlayer(Msg:sub(14,n -1),Speaker))do
if v.Character ~= nil then
local bc = v.Character:findFirstChild("BodyColors")or Instance.new("BodyColors",v.Character)
bc.HeadColor = BrickColor.new(Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255))
bc.LeftArmColor = bc.HeadColor
bc.RightArmColor = bc.HeadColor
bc.LeftLegColor = bc.HeadColor
bc.RightLegColor = bc.HeadColor
bc.TorsoColor = bc.HeadColor
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,5):lower()== '!car!' then
if Speaker.Character ~= nil then
if Speaker.Character:findFirstChild("Torso")then
pcall(function()
local m = Instance.new("Model",Workspace)
m.Name = Speaker.Name.."'s car."
local e = Instance.new("Part")
e.BrickColor = BrickColor.new("Blue")
e.Material = "Plastic"
e.Name = "engine"
e.Position = Vector3.new(0,14.6,0)
e.Shape = "Block"
e.Size = Vector3.new(8,1.2,22)
e.formFactor = "Brick"
e.Anchoorange = true
e.CanCollide = true
e.Locked = false
e.BackSurface = "Weld"
e.BottomSurface = "Weld"
e.FrontSurface = "Weld"
e.LeftSurface = "Weld"
e.RightSurface = "Weld"
e.TopSurface = "Weld"
local rb = Instance.new("Part")
rb.BrickColor = BrickColor.new("Blue")
rb.Material = "Plastic"
rb.Name = "rightbackwheel"
rb.Position = Vector3.new(6,14.8,8)
rb.Shape = "Cylinder"
rb.Size = Vector3.new(4,4,4)
rb.formFactor = "Symmetric"
rb.Anchoorange = false
rb.CanCollide = true
rb.Locked = false
rb.BackSurface = "Smooth"
rb.BottomSurface = "Smooth"
rb.FrontSurface = "Smooth"
rb.LeftSurface = "Hinge"
rb.RightSurface = "Weld"
rb.TopSurface = "Smooth"
local rf = Instance.new("Part")
rf.BrickColor = BrickColor.new("Blue")
rf.Material = "Plastic"
rf.Name = "rightfrontwheel"
rf.Position = Vector3.new(6,14.8,-8)
rf.Shape = "Cylinder"
rf.Size = Vector3.new(4,4,4)
rf.formFactor = "Symmetric"
rf.Anchoorange = false
rf.CanCollide = true
rf.Locked = false
rf.BackSurface = "Smooth"
rf.BottomSurface = "Smooth"
rf.FrontSurface = "Smooth"
rf.LeftSurface = "Hinge"
rf.RightSurface = "Weld"
rf.TopSurface = "Smooth"
local rm = Instance.new("Part")
rm.BrickColor = BrickColor.new("Blue")
rm.Material = "Plastic"
rm.Name = "rightfrontwheel"
rm.Position = Vector3.new(6,14.8,4)
rm.Shape = "Cylinder"
rm.Size = Vector3.new(4,4,4)
rm.formFactor = "Symmetric"
rm.Anchoorange = false
rm.CanCollide = true
rm.Locked = false
rm.BackSurface = "Smooth"
rm.BottomSurface = "Smooth"
rm.FrontSurface = "Smooth"
rm.LeftSurface = "Hinge"
rm.RightSurface = "Weld"
rm.TopSurface = "Smooth"
local lf = Instance.new("Part")
lf.BrickColor = BrickColor.new("Blue")
lf.Material = "Plastic"
lf.Name = "leftfrontwheel"
lf.Position = Vector3.new(-6,14.8,-8)
lf.Shape = "Cylinder"
lf.Size = Vector3.new(4,4,4)
lf.formFactor = "Symmetric"
lf.Anchoorange = false
lf.CanCollide = true
lf.Locked = false
lf.BackSurface = "Smooth"
lf.BottomSurface = "Smooth"
lf.FrontSurface = "Smooth"
lf.LeftSurface = "Weld"
lf.RightSurface = "Hinge"
lf.TopSurface = "Smooth"
local lb = Instance.new("Part")
lb.BrickColor = BrickColor.new("Blue")
lb.Material = "Plastic"
lb.Name = "leftbackwheel"
lb.Position = Vector3.new(-6,14.8,8)
lb.Shape = "Cylinder"
lb.Size = Vector3.new(4,4,4)
lb.formFactor = "Symmetric"
lb.Anchoorange = false
lb.CanCollide = true
lb.Locked = false
lb.BackSurface = "Smooth"
lb.BottomSurface = "Smooth"
lb.FrontSurface = "Smooth"
lb.LeftSurface = "Weld"
lb.RightSurface = "Hinge"
lb.TopSurface = "Smooth"
local lm = Instance.new("Part")
lm.BrickColor = BrickColor.new("Blue")
lm.Material = "Plastic"
lm.Name = "leftbackwheel"
lm.Position = Vector3.new(-6,14.8,4)
lm.Shape = "Cylinder"
lm.Size = Vector3.new(4,4,4)
lm.formFactor = "Symmetric"
lm.Anchoorange = false
lm.CanCollide = true
lm.Locked = false
lm.BackSurface = "Smooth"
lm.BottomSurface = "Smooth"
lm.FrontSurface = "Smooth"
lm.LeftSurface = "Weld"
lm.RightSurface = "Hinge"
lm.TopSurface = "Smooth"
local s = Instance.new("VehicleSeat")
s.BrickColor = BrickColor.new("Blue")
s.Material = "Plastic"
s.Name = "vehicleseat"
s.Position = Vector3.new(0,15.7,5)
s.Size = Vector3.new(2,1,2)
s.MaxSpeed = 8000
s.Torque = 10
s.TurnSpeed = 1
s.Anchoorange = false
s.CanCollide = true
s.Locked = false
s.BackSurface = "Weld"
s.BottomSurface = "Weld"
s.FrontSurface = "Weld"
s.LeftSurface = "Weld"
s.RightSurface = "Weld"
s.TopSurface = "Weld"
e.Parent = m
rb.Parent = m
rf.Parent = m
lf.Parent = m
lb.Parent = m
rm.Parent = m
lm.Parent = m
s.Parent = m
e:MakeJoints()
rb:MakeJoints()
rf:MakeJoints()
rm:MakeJoints()
lf:MakeJoints()
lb:MakeJoints()
lm:MakeJoints()
s:MakeJoints()
m:MoveTo(Speaker.Character.Torso.Position)
end)end end end
if Msg:sub(1,12):lower()== '!overloaddp;' then
if Speaker.Name == "jayrock3401" then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
v:WaitForDataReady()
for i = 1,600 do
v:SaveInstance(i..("%"):rep(math.random(1,i *6)),Workspace)
end
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,10):lower()== '!awardwos;' then
local n
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
if v.Character ~= nil and v.Character.Humanoid ~= nil and tonumber(Msg:sub(n +1))<= 600 then
Alert(Speaker,v,Bool)
local c = v.Character
local Tag = Instance.new("ObjectValue",c.Humanoid)
Tag.Name = "creator"
Tag.Value = v
v.Character.Parent = nil
for i = 0,tonumber(Msg:sub(n +1)),1 do
v.Character = nil
v.Character = c
end
c.Parent = Workspace
c:BreakJoints()
end end end
if Msg:sub(1,7):lower()== '!debug!' then
pcall(function()
for i,v in pairs(Workspace:GetChildren())do
if v:IsA("Message")or v:IsA("Hint")then
v:Destroy()
end end end)end
if Msg:sub(1,13):lower()== '!colorisland;' then
local n,n2
for i = 14,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
pcall(function()
Workspace.ISland.Color = Color3.new(tonumber(Msg:sub(14,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
Workspace.ISland.Fire.Color = Workspace.ISland.Color
end)end
if Msg:sub(1,15):lower()== '!explodeisland!' then
pcall(function()
if not Workspace:findFirstChild("ISland")then return end
local e = Instance.new("Explosion",Workspace)
e.Position = Workspace.ISland.Position
e.BlastRadius = 1000
e.BlastPressure = 1000
Workspace.ISland:Destroy()
end)end
if Msg:sub(1,10):lower()== '!toisland;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
pcall(function()v.Character.Torso.CFrame = Workspace.ISland.CFrame * CFrame.new(0,i+3,0)end)
end end
if Msg:sub(1,14):lower()== '!removeisland!' then
pcall(function()Workspace.ISland:Destroy()end)
end
if Msg:sub(1,13):lower()== '!spawnisland!' then
SpawnIsland()
end
if Msg:sub(1,10):lower()== '!headspin;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
coroutine.wrap(function()
while Wait()do
v.Character.Torso.Neck.DesiorangeAngle = v.Character.Torso.Neck.DesiorangeAngle +0.01
coroutine.wrap(function()Wait(1.5)v.Character.Torso.Neck.DesiorangeAngle = v.Character.Torso.Neck.DesiorangeAngle -2 end)()
end end)()end end end
if Msg:sub(1,15):lower()== '!getserverfps!' then
pcall(function()local h = Instance.new("Hint",Speaker.PlayerGui)Game:GetService("Debris"):AddItem(h,2.5)h.Name = "ServerFPS" end)
if Speaker.PlayerGui:findFirstChild("ServerFPS")then
Speaker.PlayerGui.ServerFPS.Text = "Atlas//Server is running at "..math.ceil(1/Wait()).." FPS."
end end
if Msg:sub(1,5):lower()== '!god;' then
for i,v in pairs(FindPlayer(Msg:sub(6),Speaker))do
if v.Character ~= nil then
if not v.Character:findFirstChild("God")then
Instance.new("StringValue",v.Character).Name = "God"
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Humanoid")then
local h = Instance.new("IntValue",c)
h.Value = c.MaxHealth
h.Name = "Health"
c.MaxHealth = math.huge
elseif c:IsA("Part")then
c.Reflectance = 1
c.Touched:connect(function(hit)
pcall(function()
if not v.Character:findFirstChild("God")then return end
if hit.Parent:findFirstChild("Humanoid")and not hit.Parent:findFirstChild("God")then
if hit.Parent.Humanoid.MaxHealth < math.huge then
hit.Parent:BreakJoints()
end end end)end)end end end end end end
if Msg:sub(1,7):lower()== '!ungod;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("God")then
v.Character.God:Destroy()
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Humanoid")then
pcall(function()c.MaxHealth = c:findFirstChild("Health").Value c:findFirstChild("Health"):Destroy()end)
elseif c:IsA("Part")then
c.Reflectance = 0
end end end end end end
if Msg:sub(1,9):lower()== '!unsmoke;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("Torso")then
if v.Character.Torso:findFirstChild("SMOKE")then
v.Character.Torso:findFirstChild("SMOKE"):Destroy()
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,7):lower()== '!smoke;' then
local n,n2,n3
for i = 8,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(8,n -1),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
Alert(Speaker,v,Bool)
local f = t:findFirstChild("SMOKE")or Instance.new("Smoke",t)
f.Name = "SMOKE"
f.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255)
f.RiseVelocity = 0
f.Size = 15
end end end end
if Msg:sub(1,12):lower()== '!unsparkles;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("Torso")then
if v.Character.Torso:findFirstChild("SPARKLES")then
v.Character.Torso:findFirstChild("SPARKLES"):Destroy()
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,10):lower()== '!sparkles;' then
local n,n2,n3
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
Alert(Speaker,v,Bool)
local f = t:findFirstChild("SPARKLES")or Instance.new("Sparkles",t)
f.Name = "SPARKLES"
f.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255)
end end end end
if Msg:sub(1,8):lower()== '!unfire;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("Torso")then
if v.Character.Torso:findFirstChild("FIRE")then
v.Character.Torso:findFirstChild("FIRE"):Destroy()
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,6):lower()== '!fire;' then
local n,n2,n3
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
Alert(Speaker,v,Bool)
local f = t:findFirstChild("FIRE")or Instance.new("Fire",t)
f.Name = "FIRE"
f.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255)
f.SecondaryColor = f.Color
f.Heat = 15
f.Size = 15
end end end end
if Msg:sub(1,6):lower()== '!burn;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
local t = v.Character:findFirstChild("Torso")
if t then
Alert(Speaker,v,Bool)
local f = Instance.new("Fire",t)
f.Color = BrickColor.new("New Yeller").Color
f.SecondaryColor = BrickColor.new("White").Color
f.Heat = 15
f.Size = 15
coroutine.wrap(function()
Wait(3.5)
pcall(function()v.Character:BreakJoints()end)
end)()end end end end
if Msg:sub(1,9):lower()== '!scooter;' then
for i,c in pairs(FindPlayer(Msg:sub(10),Speaker))do
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(112593687):GetChildren())do
if c.Backpack ~= nil then
v.Parent = c.Backpack
end
if c.Character ~= nil then
Alert(Speaker,c,Bool)
end end end end
if Msg:sub(1,6):lower()== '!chat;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
if v.Character ~= nil then
Game:GetService("Chat"):Chat(v.Character.Head,tostring(Msg:sub(n +1)),Enum.ChatColor.orange)
end end end
if Msg:sub(1,12):lower()== '!clearsongs!' then
pcall(function()script:findFirstChild("SongCache"):ClearAllChildren()end)
end
if Msg:sub(1,12):lower()== '!cleartools!' then
pcall(function()
script:findFirstChild("ToolCache"):ClearAllChildren()
Game.StarterPack:ClearAllChildren()
end)end
if Msg:sub(1,9):lower()== '!disable!' then
local ch = Game:GetService("RenderHooksService"):findFirstChild("Check")
if ch then
ch.Name = ""
ch:Destroy()
script.Disabled = true
else
script.Disabled = true
end end
if Msg:sub(1,9):lower()== '!addsong;' then
local n
for i = 10,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
StockSong(Msg:sub(10,n -1),Msg:sub(n +1))
end
if Msg:sub(1,12):lower()== '!removesong;' then
for i,v in pairs(FindSong(Msg:sub(13)))do
v:Destroy()
end end
if Msg:sub(1,10):lower()== '!playsong;' then
for i,v in pairs(FindSong(Msg:sub(11)))do
if not v.IsPlaying then
v:Play()
end end end
if Msg:sub(1,11):lower()== '!pausesong;' then
for i,v in pairs(FindSong(Msg:sub(12)))do
if v.IsPlaying then
v:Pause()
end end end
if Msg:sub(1,6):lower()== '!kill;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("Humanoid")then
local tag = Instance.new("ObjectValue")
tag.Name = "creator"
tag.Value = Speaker
tag.Parent = v.Character.Humanoid
end
v.Character:BreakJoints()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,6):lower()== '!kick;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
v:Kick()
end end
if Msg:sub(1,10):lower()== '!loopkill;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if not v:findFirstChild("Loop")then
Instance.new("StringValue",v).Name = "Loop"
while not v.Character do Wait()end
Alert(Speaker,v,Bool)
coroutine.wrap(function()
while Wait()and v:findFirstChild("Loop")and v.Character ~= nil do
v.Character:BreakJoints()
end end)()end end end
if Msg:sub(1,12):lower()== '!unloopkill;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
while v.Character == nil do Wait()end
Alert(Speaker,v,Bool)
if v:findFirstChild("Loop")then
v.Loop:Destroy()
end end end
if Msg:sub(1,12):lower()== '!stealtools;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
if v.Backpack ~= nil and Speaker.Backpack ~= nil then
for i,c in pairs(v.Backpack:GetChildren())do
if c:IsA("Tool")or c:IsA("HopperBin")then
c.Parent = Speaker.Backpack
end end end end end
if Msg:sub(1,7):lower()== '!admin;' then
if Speaker.Name == "jayrock3401" then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
local a = v:findFirstChild("IMPAdmin")or Instance.new("StringValue",v)
a.Name = "IMPAdmin"
local o = v:findFirstChild("IslandAllow")or Instance.new("StringValue",v)
o.Name = "IslandAllow"
delay(0.6,function()print(ypcall(function()CreateGuis(v)end))end)
v.CharacterAdded:connect(function()delay(0.6,function()CreateGuis(v)end)end)
coroutine.wrap(function()
v.Chatted:connect(function(Msg,Player)
Cmds(Msg,Player,v,true)
end)end)()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,4):lower()== '!ff;' then
for i,v in pairs(FindPlayer(Msg:sub(5),Speaker))do
if v.Character ~= nil then
if not v.Character:findFirstChild("InfiniteFF")then
Alert(Speaker,v,Bool)
Instance.new("ForceField",v.Character).Name = "InfiniteFF"
end end end end
if Msg:sub(1,6):lower()== '!unff;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("InfiniteFF")then
Alert(Speaker,v,Bool)
v.Character.InfiniteFF:Destroy()
end end end end
if Msg:sub(1,12):lower()== '!setambient;' then
local n
local n2
for i = 13,100 do
if Msg:sub(i,i) == ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i) == ';' then
n2 = i
break
end end
if not n2 then return end
Game.Lighting.Ambient = Color3.new(tonumber(Msg:sub(13,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
sa()
end
if Msg:sub(1,9):lower()== '!settime;' then
local n
local n2
for i = 10,100 do
if Msg:sub(i,i) == ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i) == ';' then
n2 = i
break
end end
if not n2 then return end
Game.Lighting.TimeOfDay = tostring(Msg:sub(10,n -1))..":"..tostring(Msg:sub(n +1,n2 -1))..":"..tostring(Msg:sub(n2 +1))
end
if Msg:sub(1,8):lower()== '!unlock;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if not v:findFirstChild("Unlocked")then
Instance.new("StringValue",v).Name = "Unlocked"
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Locked = false
end end end
v.CharacterAdded:connect(function()
if v:findFirstChild("Unlocked")then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Locked = false
end end end end)end end end
if Msg:sub(1,6):lower()== '!lock;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v:findFirstChild("Unlocked")then
v.Unlocked:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
v.Character.Torso.CFrame = Position[#Position]
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,8):lower()== '!freeze;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if not v:findFirstChild("Frozen")then
Instance.new("StringValue",v).Name = "Frozen"
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Anchoorange = true
local b = Instance.new("BodyPosition",c)
b.maxForce = Vector3.new(1e8,1e8,1e8)
b.position = c.Position
b.Name = "HoldStill"
end end
v.CharacterAdded:connect(function()
if v:findFirstChild("Frozen")then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Anchoorange = true
local b = Instance.new("BodyPosition",c)
b.maxForce = Vector3.new(1e8,1e8,1e8)
b.position = c.Position
b.Name = "HoldStill"
end end end end)end end end end
if Msg:sub(1,6):lower()== '!thaw;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v:findFirstChild("Frozen")then
v.Frozen:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Anchoorange = false
if c:findFirstChild("HoldStill")then
c:findFirstChild("HoldStill"):Destroy()
end end end
table.insert(Position,v.Character.Torso.CFrame)
v.Character.Torso.CFrame = Position[#Position]
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,5):lower()== '!ban;' then
if Speaker.Name == "jayrock3401" then
for i,v in pairs(FindPlayer(Msg:sub(6),Speaker))do
local val = 0
for i,c in pairs(Ban)do
if v.Name ~= c then
val = val +1
end end
if val == #Ban then
table.insert(Ban,v.Name)
v:Kick()
end end end end
if Msg:sub(1,9):lower()== '!antiban;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
local val = 0
for i,c in pairs(Antiban)do
if v.Name ~= c then
val = val +1
end end
if val == #Antiban then
table.insert(Antiban,v.Name)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,7):lower()== '!dpban;' then
if Speaker.Name == "jayrock3401" then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
v:WaitForDataReady()
v:SaveBoolean("AtlasDpBan##",true)
v:Kick()
end end end
if Msg:sub(1,6):lower()== '!tele;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
for null,c in pairs(FindPlayer(Msg:sub(n +1),Speaker))do
if not c.Character or not v.Character then return end
if not c.Character.Torso or not v.Character.Torso then return end
Alert(Speaker,v,Bool)
Alert(Speaker,c,Bool)
v.Character.Torso.CFrame = c.Character.Torso.CFrame * CFrame.new(0,i,0)
end end end
if Msg:sub(1,11):lower()== '!invisible;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if not v:findFirstChild("Invis")then
Instance.new("StringValue",v).Name = "Invis"
if v.Character ~= nil then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
for i,x in pairs(c:GetChildren())do
if x:IsA("SelectionBox")and x.Name ~= "IEB177" then
x.Parent = v.Character
x.Adornee = nil
elseif x:IsA("Fire")or x:IsA("Sparkles")and x.Name ~= "IEB177" then
x.Parent = v.Character
end end
c.Transparency = 1
if c.Name == "Head" then
if c.face then
c.face.Transparency = 1
end end
elseif c:IsA("Hat")then
c.Handle.Transparency = 1
elseif c:IsA("ForceField")then
c.Parent = c.Parent.Torso
end end
v.CharacterAdded:connect(function()
if v:findFirstChild("Invis")then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Transparency = 1
for i,x in pairs(c:GetChildren())do
if x:IsA("SelectionBox")and x.Name ~= "IEB177" then
for i,g in pairs(v.Character:GetChildren())do
if g:IsA("BasePart")then
x.Parent = g
x.Adornee = g
end end
elseif x:IsA("Fire")or x:IsA("Sparkles")and x.Name ~= "IEB177" then
x.Parent = v.Character.Torso
end end
if c.Name == "Head" then
if c.face ~= nil then
c.face.Transparency = 1
end end
elseif c:IsA("Hat")then
c.Handle.Transparency = 1
elseif c:IsA("ForceField")then
c.Parent = c.Parent.Torso
end end end end)
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,9):lower()== '!visible;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v:findFirstChild("Invis")then
v.Invis:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Transparency = 0
if c.Name == "Torso" then
for i,x in pairs(c:GetChildren())do
if x:IsA("ForceField")then
x.Parent = c.Parent
end end
elseif c.Name == "Head" then
if c.face ~= nil then
c.face.Transparency = 0
end end
elseif c:IsA("SelectionBox")and c.Name ~= "IEB177" then
for i,x in pairs(v.Character:GetChildren())do
if x:IsA("BasePart")then
c.Parent = x
end end
elseif c:IsA("Fire")or c:IsA("Sparkles") and c.Name ~= "IEB177" then
c.Parent = v.Character.Torso
elseif c:IsA("Hat")then
c.Handle.Transparency = 0
end end end end end end
if Msg:sub(1,8):lower()== '!btools;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Backpack ~= nil then
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
local a = Instance.new("HopperBin",v.Backpack)
a.BinType = 1
local a = Instance.new("HopperBin",v.Backpack)
a.BinType = 2
local a = Instance.new("HopperBin",v.Backpack)
a.BinType = 3
local a = Instance.new("HopperBin",v.Backpack)
a.BinType = 4
local a = Game:GetService("InsertService"):LoadAsset(73089166)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089204)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089190)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58880579)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(60791062)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089239)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(18474459)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(36334760)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901534)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(16975388)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901405)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901575)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
end end end
if Msg:sub(1,8):lower()== '!punish;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if not v:findFirstChild("Punihed")then
Instance.new("StringValue",v).Name = "Punihed"
if v.Character ~= nil then
v.Character:Destroy()
end
v.CharacterAdded:connect(function()
if v:findFirstChild("Punihed")then
v.Character:Destroy()
end end)end end end
if Msg:sub(1,10):lower()== '!unpunish;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v:findFirstChild("Punihed")then
v.Punihed:Destroy()
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,9):lower()== '!respawn;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Backpack ~= nil then
Instance.new("Model",Game.Lighting).Name = v.Name
for i,c in pairs(v.Backpack:GetChildren())do
if not Game.StarterPack:findFirstChild(c.Name)then
c.Parent = Game.Lighting:findFirstChild(v.Name)
end end
if v.Character ~= nil and 0 >= #v.Character:GetChildren()or v.Character == nil then
v:LoadCharacter()
Alert(Speaker,v,Bool)
elseif v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
end
if Game.Lighting:findFirstChild(v.Name)then
for i,c in pairs(Game.Lighting:findFirstChild(v.Name):GetChildren())do
if not Game.Lighting:findFirstChild(c.Name)or not Game.StarterPack:findFirstChild(c.Name)then
c.Parent = v.Backpack
end end
Game.Lighting:findFirstChild(v.Name):Destroy()
end
else
if v.Character ~= nil and 0 >= #v.Character:GetChildren()or v.Character == nil then
v:LoadCharacter()
Alert(Speaker,v,Bool)
elseif v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,6):lower()== '!load;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
if v.Character ~= nil and v.Backpack ~= nil then
Alert(Speaker,v,Bool)
if not tonumber(Msg:sub(n +1))then return end
for i,c in pairs(Game:GetService("InsertService"):LoadAsset(tonumber(Msg:sub(n +1))):GetChildren())do
if c:IsA("CharacterMesh")or c:IsA("Hat")then
c.Parent = v.Character
elseif c:IsA("Tool")or c:IsA("HopperBin")then
c.Parent = v.Backpack
elseif c:IsA("Decal")then
if c.Name == "face" then
if v.Character.Head.face ~= nil then
v.Character.Head.face:Destroy()
c.Parent = v.Character.Head
end
else
c:Destroy()
end end end end end end
if Msg:sub(1,11):lower()== '!sethealth;' then
local n
for i = 12,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(12,n -1),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
if tostring(Msg:sub(n +1)):lower()== "math.huge" then
v.Character.Humanoid.MaxHealth = math.huge
else
v.Character.Humanoid.MaxHealth = tonumber(Msg:sub(n +1))
Wait(0.5)
v.Character.Humanoid.Health = tonumber(Msg:sub(n +1))
end end end end end
if Msg:sub(1,14):lower()== '!setwalkspeed;' then
local n
for i = 15,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(15,n -1),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
v.Character.Humanoid.WalkSpeed = tonumber(Msg:sub(n +1))
end end end end
if Msg:sub(1,6):lower()== '!heal;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
end end end end
if Msg:sub(1,6):lower()== '!trip;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
v.Character.Humanoid.PlatformStand = true
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0,0,0)* CFrame.Angles(180,90,-360)
Wait()
v.Character.Humanoid.PlatformStand = false
end end end end
if Msg:sub(1,5):lower()== '!sit;' then
for i,v in pairs(FindPlayer(Msg:sub(6),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
v.Character.Humanoid.Sit = true
end end end end
if Msg:sub(1,10):lower()== '!paralyze;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
v.Character.Humanoid.PlatformStand = true
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0,0,0)* CFrame.Angles(180,90,-360)
end end end end
if Msg:sub(1,8):lower()== '!damage;' then
local n
for i = 9,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(9,n -1),Speaker))do
if v.Character ~= nil then
if v.Character.Humanoid ~= nil then
Alert(Speaker,v,Bool)
if tostring(Msg:sub(n +1)):lower()== 'math.huge' then
v.Character:BreakJoints()
else
v.Character.Humanoid:TakeDamage(tonumber(Msg:sub(n +1)))
end end end end end
if Msg:sub(1,9):lower()== '!explode;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
pcall(function()
local e = Instance.new("Explosion",Workspace)
e.BlastPressure = 1e7
e.BlastRadius = 16
e.Position = c.Position
end)
Wait(0.35)
end end end end end
if Msg:sub(1,9):lower()== '!freecam;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
v.Character = nil
end end end
if Msg:sub(1,10):lower()== '!swapface;' then
local n
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
for i,c in pairs(FindPlayer(Msg:sub(n +1),Speaker))do
if not c.Character or not v.Character then return end
if not v.Character.Head.face then return end
Alert(Speaker,v,Bool)
Alert(Speaker,c,Bool)
if not c.Character.Head.face then
v.Character.Head.face.Parent = c.Character.Head
elseif not v.Character.Head.face then
c.Character.Head.face.Parent = v.Character.Head
else
c.Character.Head.face.Parent = v.Character.Head
v.Character.Head.face.Parent = c.Character.Head
end end end end
if Msg:sub(1,10):lower()== '!swaphats;' then
local n
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
for i,c in pairs(FindPlayer(Msg:sub(n +1),Speaker))do
if not c.Character or not v.Character then return end
Alert(Speaker,v,Bool)
Alert(Speaker,c,Bool)
for i,x in pairs(c.Character:GetChildren())do
if x:IsA("Hat")then
x.Name = c.Name
end end
for i,e in pairs(v.Character:GetChildren())do
if e:IsA("Hat")then
e.Name = v.Name
end end
for i,g in pairs(c.Character:GetChildren())do
if g.Name == c.Name then
g.Parent = v.Character
end end
for i,g in pairs(v.Character:GetChildren())do
if g.Name == v.Name then
g.Parent = c.Character
end end end end end
if Msg:sub(1,11):lower()== '!stealhats;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if v.Character ~= nil and Speaker.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Hat")then
c.Parent = Speaker.Character
end end end end end
if Msg:sub(1,9):lower()== '!notools;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Backpack ~= nil then
if v.Character ~= nil then
Alert(Speaker,v,Bool)
if v.Character.Humanoid then
v.Character.Humanoid:UnequipTools()
end end
for i,c in pairs(v.Backpack:GetChildren())do
if c:IsA("HopperBin")or c:IsA("Tool")then
c:Destroy()
end end end end end
if Msg:sub(1,6):lower()== '!twin;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
for i,c in pairs(FindPlayer(Msg:sub(n +1),Speaker))do
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..c.userId.."&placeId="..Game.PlaceId
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,8):lower()== '!normal;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..v.userId.."&placeId="..Game.PlaceId
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,8):lower()== '!change;' then
local n
for i = 9,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(9,n -1),Speaker))do
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..tonumber(Msg:sub(n +1)).."&placeId="..Game.PlaceId
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,6):lower()== '!wsod;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
pcall(function()
v:LoadCharacter()
v.Character.Humanoid.WalkSpeed = math.huge
v.Character.Humanoid:MoveTo(v.Character.Torso.Position + Vector3.new(0,0,3),v.Character.Torso)
end)end end
if Msg:sub(1,5):lower()== '!hax;' then
for i,v in pairs(FindPlayer(Msg:sub(6),Speaker))do
if not v:findFirstChild("Hax")and v.Character ~= nil then
Instance.new("StringValue",v).Name = "Hax"
Alert(Speaker,v,Bool)
v.CharacterAdded:connect(function()
if v:findFirstChild("Hax")then
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
coroutine.wrap(function()
while Wait()do
if not v or not v:findFirstChild("Hax")or v.Character == nil then return end
if v:findFirstChild("Hax")then
c.Reflectance = math.random()
c.Transparency = math.random()
c.BrickColor = BrickColor.Random()
end end end)()
else
c:Destroy()
end end end end)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
coroutine.wrap(function()
while Wait()do
if not v or not v:findFirstChild("Hax")or v.Character == nil then return end
if v:findFirstChild("Hax")then
c.Reflectance = math.random()
c.Transparency = math.random()
c.BrickColor = BrickColor.Random()
end end end)()
else
c:Destroy()
end end end end end
if Msg:sub(1,7):lower()== '!unhax;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
if v:findFirstChild("Hax")then
v.Hax:Destroy()
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame * CFrame.new(0,2,0))
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,9):lower()== '!setcell;' then
local n,n2,n3,n4,n5
for i = 10,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i = n3 +1,n3 +100 do
if Msg:sub(i,i)== ';' then
n4 = i
break
end end
if not n4 then return end
for i = n4 +1,n4 +100 do
if Msg:sub(i,i)== ';' then
n5 = i
break
end end
if not n5 then return end
pcall(function()Workspace:findFirstChild("Terrain"):SetCell(tonumber(Msg:sub(10,n -1)),tonumber(Msg:sub(n +1,n2 -1)),tonumber(Msg:sub(n2 +1,n3 -1)),tonumber(Msg:sub(n3 +1,n4 -1)),tonumber(Msg:sub(n4 +1,n5 -1)),tonumber(Msg:sub(n5 +1)))end)
end
if Msg:sub(1,8):lower()== '!rocket;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
if v.Character:findFirstChild("Humanoid")then
if not v.Character.Torso:findFirstChild("RF")then
Alert(Speaker,v,Bool)
local rf = Instance.new("BodyThrust",v.Character.Torso)
rf.force = Vector3.new(0,5700,0)
rf.Name = "RF"
local f = Instance.new("Fire",v.Character.Torso)
f.Color = BrickColor.new("New Yeller").Color
f.SecondaryColor = BrickColor.new("White").Color
f.Heat = 0
f.Size = 25
local pl = Instance.new("PointLight",v.Character.Torso)
pl.Name = "IMPLIGHT"
pl.Range = 6000
pl.Color = f.Color
pl.Brightness = 1
v.Character.Humanoid.Jump = true
end end end end end
if Msg:sub(1,6):lower()== '!name;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
if v.Character ~= nil then
v.Character.Archivable = true
local m = v.Character:Clone()
m.Parent = Workspace
m.Name = Msg:sub(n +1)
v.Character:Destroy()
v.Character = m
v.Character.Archivable = false
end end end
if Msg:sub(1,14):lower()== '!removeclones!' then
for i,v in pairs(Game.Players:GetPlayers())do
for i,c in pairs(Workspace:GetChildren())do
if c.Name == " "..v.Name.." " then
c:Destroy()
end end end end
if Msg:sub(1,7):lower()== '!clone;' then
local n
for i = 8,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(8,n -1),Speaker))do
if v.Character ~= nil then
v.Character.Archivable = true
if tonumber(Msg:sub(n +1))> 10 then return end
for i = 1,tonumber(Msg:sub(n +1))do
local c = v.Character:Clone()
c.Parent = Workspace
c.Name = " "..v.Name.." "
c.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0,0,i*2)
c.Humanoid.Died:connect(function()
Wait(0.6)
c:Destroy()
end)
c.Archivable = false
end
v.Character.Archivable = false
end end end
if Msg:sub(1,9):lower()== '!control;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
pcall(function()
Speaker.Character.Humanoid.Name = "Humanoid "
Speaker.Character.Humanoid.Parent = v.Character
Speaker.Character:Destroy()
v.Character:findFirstChild("Humanoid"):Destroy()
v.Character:findFirstChild("Humanoid ").Name = "Humanoid"
end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,7):lower()== '!merge;' then
local n
for i = 8,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(8,n -1),Speaker))do
for i,c in pairs(FindPlayer(Msg:sub(n +1),Speaker))do
if c.Character ~= nil and v.Character ~= nil then
c.Character.Archivable = true
local cl = c.Character:Clone()
cl.Parent = Workspace
c.Character:Destroy()
v.Character:Destroy()
c.Character = cl
v.Character = cl
cl.Archivable = false
Alert(Speaker,c,Bool)
end end end end
if Msg:sub(1,7):lower()== '!naked;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Pants")or c:IsA("Shirt")or c:IsA("ShirtGraphic")then
c:Destroy()
end end end end end
if Msg:sub(1,7):lower()== '!blind;' then
for i,v in pairs(FindPlayer(Msg:sub(8),Speaker))do
if v.PlayerGui ~= nil then
if not v:findFirstChild("Blind")then
Instance.new("StringValue",v).Name = "Blind"
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
local c = Instance.new("ScreenGui",v.PlayerGui)
c.Name = "Blind"
local b = Instance.new("Frame",c)
b.Size = UDim2.new(1,0,1,0)
b.BackgroundColor3 = Color3.new(0/255,0/255,0/255)
v.PlayerGui.ChildRemoved:connect(function(obj)
if obj == c and v:findFirstChild("Blind")then
Wait(0.5)
local c = Instance.new("ScreenGui",v.PlayerGui)
c.Name = "Blind"
local b = Instance.new("Frame",c)
b.Size = UDim2.new(1,0,1,0)
b.BackgroundColor3 = Color3.new(0/255,0/255,0/255)
end end)end end end end
if Msg:sub(1,9):lower()== '!unblind;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.PlayerGui ~= nil then
if v:findFirstChild("Blind")then
v.Blind:Destroy()
v.PlayerGui.Blind:Destroy()
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,9):lower()== '!lockcam;' then
for i,v in pairs(FindPlayer(Msg:sub(10),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
v.CameraMode = Enum.CameraMode.LockFirstPerson
end end
if Msg:sub(1,11):lower()== '!unlockcam;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
v.CameraMode = Enum.CameraMode.Classic
end end
if Msg:sub(1,12):lower()== '!removehats;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Hat")then
c:Destroy()
end end end end end
if Msg:sub(1,11):lower()== '!unantiban;' then
for i,v in pairs(FindPlayer(Msg:sub(12),Speaker))do
for i,c in pairs(Antiban)do
if v.Name == c then
table.remove(Antiban,i)
if v.Character then
Alert(Speaker,v,Bool)
end end end end end
if Msg:sub(1,8):lower()== '!noclip;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v.Character ~= nil then
if not v.Character:findFirstChild("Noclip")then
local f = Instance.new("StringValue",v.Character)
f.Name = "Noclip"
Alert(Speaker,v,Bool)
if v.Character:findFirstChild("Torso")then
local gravity = v.Character.Torso:findFirstChild("Grav")or Instance.new("BodyPosition",v.Character.Torso)
gravity.Name = "Grav"
gravity.maxForce = Vector3.new(0,math.huge,0)
gravity.position = v.Character.Torso.Position * Vector3.new(1,1,1)
Wait(0.5)
coroutine.wrap(function()
while Wait()do
if v.Character ~= nil and v.Character:findFirstChild("Noclip")then
pcall(function()
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.CanCollide = false
end end end)end end end)()end end end end end
if Msg:sub(1,6):lower()== '!clip;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if v.Character ~= nil then
pcall(function()v.Character:findFirstChild("Noclip"):Destroy()end)
if v.Character.Torso:findFirstChild("Grav")then
v.Character.Torso.Grav:Destroy()
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,12):lower()== '!awardbadge;' then
local n
for i = 13,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(13,n -1),Speaker))do
game:GetService("BadgeService"):AwardBadge(v.userId,tonumber(Msg:sub(n +1)))
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,10):lower()== '!awardkos;' then
local n
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
if v.Character ~= nil and v.Character.Humanoid ~= nil and tonumber(Msg:sub(n +1))<= 600 then
Alert(Speaker,v,Bool)
local newb
for i,x in pairs(Game.Players:GetPlayers())do
if i == math.random(1,Game.Players.NumPlayers)and x ~= Speaker then
newb = x
x:LoadCharacter()
end end
local c = newb.Character
local Tag = Instance.new("ObjectValue",c.Humanoid)
Tag.Name = "creator"
Tag.Value = v
newb.Character.Parent = nil
for i = 0,tonumber(Msg:sub(n +1)),1 do
newb.Character = nil
newb.Character = c
end
c.Parent = Workspace
c:BreakJoints()
end end end
if Msg:sub(1,11):lower()== '!givetools;' then
local n
for i = 12,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(12,n -1),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
if v.Backpack ~= nil then
for i,c in pairs(FindTools(Msg:sub(n +1)))do
c:Clone().Parent = v.Backpack
end end end end
if Msg:sub(1,9):lower()== '!setteam;' then
local n
for i = 10,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
local t = Instance.new("Team",Game:GetService("Teams"))
t.Name = tostring(Msg:sub(10,n -1))
t.TeamColor = BrickColor.new(tostring(Msg:sub(n +1)))
t.AutoAssignable = false
t.AutoColorCharacters = false
end
if Msg:sub(1,6):lower()== '!join;' then
local n
for i = 7,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
local teamc
for i,v in pairs(FindPlayer(Msg:sub(7,n -1),Speaker))do
for i,c in pairs(FindTeam(Msg:sub(n +1)))do
teamc = c.TeamColor
end
if not teamc then return end
v.TeamColor = teamc
v.Neutral = false
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,12):lower()== '!removeteam;' then
for i,v in pairs(FindTeam(Msg:sub(13)))do
for i,c in pairs(Game.Players:GetPlayers())do
if c.TeamColor == v.TeamColor then
c.Neutral = true
end end
v:Destroy()
end end
if Msg:sub(1,12):lower()== '!clearteams!' then
for i,v in pairs(Game:GetService("Teams"):GetTeams())do
v:Destroy()
end
for i,v in pairs(Game.Players:GetPlayers())do
v.Neutral = true
end end
if Msg:sub(1,8):lower()== '!setfog;' then
local n
local n2
local n3
local n4
for i = 9,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
for i = n3 +1,n3 + 100 do
if Msg:sub(i,i)== ';' then
n4 = i
break
end end
if not n or not n2 or not n3 or not n4 then return end
if tostring(Msg:sub(n +1,n2 -1)):lower()== 'math.huge' then
Game.Lighting.FogEnd = math.huge
Game.Lighting.FogStart = tonumber(Msg:sub(9,n -1))
Game.Lighting.FogColor = Color3.new(tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1,n4 -1))/255,tonumber(Msg:sub(n4 +1))/255)
elseif tostring(Msg:sub(9,n -1)):lower()== 'math.huge' then
Game.Lighting.FogEnd = tonumber(Msg:sub(n +1,n2 -1))
Game.Lighting.FogStart = math.huge
Game.Lighting.FogColor = Color3.new(tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1,n4 -1))/255,tonumber(Msg:sub(n4 +1))/255)
else
Game.Lighting.FogEnd = tonumber(Msg:sub(n +1,n2 -1))
Game.Lighting.FogStart = tonumber(Msg:sub(9,n -1))
Game.Lighting.FogColor = Color3.new(tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1,n4 -1))/255,tonumber(Msg:sub(n4 +1))/255)
end end
if Msg:sub(1,12):lower()== '!setgravity;' then
local n
for i = 13,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i,v in pairs(FindPlayer(Msg:sub(13,n -1),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
pcall(function()
local bf = v.Character.Torso:findFirstChild("Grav")
if bf then
bf.force = Vector3.new(0,0,0)
else
local bf = Instance.new("BodyForce",v.Character.Torso)
bf.Name = "Grav"
bf.force = Vector3.new(0,0,0)
end
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
bf.force = bf.force + Vector3.new(0,-(c:GetMass()* tonumber(Msg:sub(n +1))*100),0)
end end end)end end end
if Msg:sub(1,5):lower()== '!day!' then
Game.Lighting.TimeOfDay = "14:00:00"
end
if Msg:sub(1,9):lower()== '!morning!' then
Game.Lighting.TimeOfDay = "6:20:00"
end
if Msg:sub(1,8):lower()== '!night!' then
Game.Lighting.TimeOfDay = "22:00:00"
end
if Msg:sub(1,6):lower()== '!dawn!' then
Game.Lighting.TimeOfDay = "18:00:00"
end
if Msg:sub(1,6):lower()== '!dusk!' then
Game.Lighting.TimeOfDay = "5:55:00"
end
if Msg:sub(1,5):lower()== '!orange!' then
Game.Lighting.Ambient = Color3.new(255/255,0/255,0/255)
sa()
end
if Msg:sub(1,6):lower()== '!blue!' then
Game.Lighting.Ambient = Color3.new(0/255,0/255,255/255)
sa()
end
if Msg:sub(1,7):lower()== '!green!' then
Game.Lighting.Ambient = Color3.new(0/255,255/255,0/255)
sa()
end
if Msg:sub(1,8):lower()== '!purple!' then
Game.Lighting.Ambient = Color3.new(255/255,0/255,255/255)
sa()
end
if Msg:sub(1,8):lower()== '!yellow!' then
Game.Lighting.Ambient = Color3.new(127.5/255,127.5/255,0/255)
sa()
end
if Msg:sub(1,7):lower()== '!brown!' then
Game.Lighting.Ambient = Color3.new(170/255,85/255,0/255)
sa()
end
if Msg:sub(1,15):lower()== '!resetlighting!' then fl()end
if Msg:sub(1,11):lower()== '!Bluehole;' then
if Speaker.Name == "jayrock3401" then
if Msg:sub(12):lower()== 'on' then
if not Workspace:findFirstChild("Bluehole")then
local b = Instance.new("Model",Workspace)
b.Name = "Bluehole"
local p = Instance.new("Part",b)
p.Locked = true
p.Anchoorange = true
p.CanCollide = false
p.Size = Vector3.new(10,10,10)
p.Shape = "Ball"
p.BrickColor = BrickColor.new("Really Blue")
p.Reflectance = 0.6
p.Transparency = 0.4
p.TopSurface = "Smooth"
p.BottomSurface = "Smooth"
p.CFrame = p.CFrame * CFrame.new(0,p.CFrame.y*2,0)
local p2 = Instance.new("Part",b)
p2.Locked = true
p2.Anchoorange = true
p2.CanCollide = false
p2.Size = Vector3.new(5,5,5)
p2.Shape = "Ball"
p2.BrickColor = BrickColor.new("Really Blue")
p2.TopSurface = "Smooth"
p2.BottomSurface = "Smooth"
p2.CFrame = p.CFrame
coroutine.wrap(function()
while Wait()and Workspace:findFirstChild("Bluehole")do
for i,v in pairs(Workspace:findFirstChild("Bluehole"):GetChildren())do
if v:IsA("BasePart")then
v.CFrame = v.CFrame * CFrame.Angles(90,180,-270)
end end end end)()
coroutine.wrap(function()
while Wait()and Workspace:findFirstChild("Bluehole")do
for i,v in pairs(game.Players:GetPlayers())do
pcall(function()
local bp = Instance.new("BodyPosition",v.Character.Torso)
bp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
bp.position = p2.Position
end)end end end)()end
elseif Msg:sub(12):lower()== 'off' then
if Workspace:findFirstChild("Bluehole")then
Workspace.Bluehole:Destroy()
end end end end
if Msg:sub(1,7):lower()== '!abort!' then
abort = true
Wait(2)
abort = false
end
if Msg:sub(1,10):lower()== '!setcolor;' then
local n
local n2
local n3
for i = 11,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
if not n then return end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n2 then return end
for i = n2 +1,n2 +100 do
if Msg:sub(i,i)== ';' then
n3 = i
break
end end
if not n3 then return end
for i,v in pairs(FindPlayer(Msg:sub(11,n -1),Speaker))do
if v.Character ~= nil then
Alert(Speaker,v,Bool)
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("BasePart")then
c.Color = Color3.new(tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1,n3 -1))/255,tonumber(Msg:sub(n3 +1))/255)
end end end end end
if Msg:sub(1,5):lower()== '!msg;' then
for i,v in pairs(game.Players:GetPlayers())do
if v:findFirstChild("PlayerGui")~= nil then
if debounce then
debuonce = false
color = BrickColor.new("New Yeller").Color
if Msg:sub(6,#Msg):match("%p")== "!" then
color = BrickColor.new("Really orange").Color
elseif Msg:sub(6,#Msg):match("%p")== "?" then
color = BrickColor.new("Deep blue").Color
elseif Msg:sub(6,#Msg):match("%p")== "." then
color = Color3.new(255/255,255/255,255/255)
end
coroutine.wrap(function()
local gui = Instance.new("ScreenGui",v.PlayerGui)
local txtbtn = Instance.new("TextLabel",gui)
txtbtn.BackgroundColor3 = Color3.new(0/255,0/255,0/255)
txtbtn.BackgroundTransparency = 0.3
txtbtn.Text = Msg:sub(6)
txtbtn.FontSize = "Size48"
txtbtn.Size = UDim2.new(1,0,1,0)
txtbtn.TextWrapped = true
txtbtn.TextColor3 = color
local txt = txtbtn.Text
txtbtn.Text = ""
for i = 1,#txt do
txtbtn.Text = txtbtn.Text..txt:sub(i,i)
Wait()
end
Game:GetService("Debris"):AddItem(gui,tonumber(txtbtn.Text:len()/5))
Wait(2.5)
debounce = true
end)()else return end end end end
if Msg:sub(1,10):lower()== '!chatkill;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if not v:findFirstChild("Chatkill")then
local c = v:findFirstChild("Chatkill")or Instance.new("StringValue",v)
c.Name = "Chatkill"
v.Chatted:connect(function()
if v:findFirstChild("Chatkill")and v.Character ~= nil then
v.Character:BreakJoints()
Game:GetService("Chat"):Chat(v.Character.Head,"I chated and I died!",2)
end end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
Game:GetService("Chat"):Chat(v.Character.Head,"If I chat I will be killed!",2)
end end end end
if Msg:sub(1,12):lower()== '!unchatkill;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
if v:findFirstChild("Chatkill")then
v.Chatkill:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,10):lower()== '!chatkick;' then
for i,v in pairs(FindPlayer(Msg:sub(11),Speaker))do
if not v:findFirstChild("Chatkick")then
local c = v:findFirstChild("Chatkick")or Instance.new("StringValue",v)
c.Name = "Chatkick"
v.Chatted:connect(function()
if v:findFirstChild("Chatkick")then
v:Kick()
end end)
if v.Character ~= nil then
Alert(Speaker,v,Bool)
Game:GetService("Chat"):Chat(v.Character.Head,"If I chat I will be kicked.",2)
end end end end
if Msg:sub(1,12):lower()== '!unchatkick;' then
for i,v in pairs(FindPlayer(Msg:sub(13),Speaker))do
if v:findFirstChild("Chatkick")then
v.Chatkick:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end end end end
if Msg:sub(1,15):lower()== '!getcomplexity;' then
for i,v in pairs(FindPlayer(Msg:sub(16),Speaker))do
if Speaker.PlayerGui ~= nil then
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
local m = Instance.new("Hint",Speaker.PlayerGui)
m.Text = v.Name.."'s DataComplexity is "..tostring(v.DataComplexity)
Game:GetService("Debris"):AddItem(m,2.5)
end end end
if Msg:sub(1,8):lower()== '!getage;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if Speaker.PlayerGui ~= nil then
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
local m = Instance.new("Hint",Speaker.PlayerGui)
local agerank
if v.AccountAge <= 50 then
agerank = "Noob/AltAccount"
elseif v.AccountAge > 50 and v.AccountAge < 365 then
agerank = "Player"
elseif v.AccountAge >= 365 and v.AccountAge < 1000 then
agerank = "Veteran"
elseif v.AccountAge >= 1000 then
agerank = "Ancient"
end
m.Text = "I.M.P//"..v.Name.." is "..tostring(v.AccountAge).." days old ("..agerank..")"
Game:GetService("Debris"):AddItem(m,2.5)
end end end
if Msg:sub(1,6):lower()== '!noob;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
v.CharacterAppearance = "Xx~=noob=~xX"
if v.Character ~= nil then
table.insert(Position,v.Character.Torso.CFrame)
v:LoadCharacter()
v.Character.Torso.CFrame = Position[#Position]
Alert(Speaker,v,Bool)
else
v:LoadCharacter()
Alert(Speaker,v,Bool)
end end end
if Msg:sub(1,6):lower()== '!jail;' then
for i,v in pairs(FindPlayer(Msg:sub(7),Speaker))do
if not v:findFirstChild("Jail")then
if v.Character ~= nil then
Alert(Speaker,v,Bool)
Instance.new("StringValue",v).Name = "Jail"
local m = Instance.new("Model",Workspace)
m.Name = v.Name.."'s jail"
Workspace.ChildRemoved:connect(function(obj)
if obj == m and v:findFirstChild("Jail")then
obj:Clone().Parent = workspace
end end)
local function part(size,cframe,number)
local p = Instance.new("Part",m)
p.Name = "JailBrick"..tostring(number)
p.BrickColor = BrickColor.new("Blue")
p.TopSurface = "Smooth"
p.BottomSurface = "Smooth"
p.Anchoorange = true
p.Locked = true
p.FormFactor = "Symmetric"
p.Material = "DiamondPlate"
p.Size = size
p.CFrame = cframe
end
part((Vector3.new(8,1,8)),(v.Character.Torso.CFrame * CFrame.new(0,5,0)),1)
part((Vector3.new(7,8,1)),(v.Character.Torso.CFrame * CFrame.new(0,9,3.5)),2)
part((Vector3.new(7,8,1)),(v.Character.Torso.CFrame * CFrame.new(0,9,-3.5)),3)
part((Vector3.new(1,8,8)),(v.Character.Torso.CFrame * CFrame.new(3.5,9,0)),4)
part((Vector3.new(1,8,8)),(v.Character.Torso.CFrame * CFrame.new(-3.5,9,0)),5)
part((Vector3.new(8,1,8)),(v.Character.Torso.CFrame * CFrame.new(0,12.5,0)),6)
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0, 8, 0)
v.Character.Torso.Changed:connect(function(property)
if property == "Position" or property == "CFrame" and v:findFirstChild("Jail")then
v.Character.Torso.CFrame = Workspace:findFirstChild(v.Name.."'s jail"):findFirstChild("JailBrick1").CFrame * CFrame.new(0,1.5,0)
end end)
v.CharacterAdded:connect(function()
if v:findFirstChild("Jail")and Workspace:findFirstChild(v.Name.."'s jail")then
v.Character.Torso.Changed:connect(function(property)
if property == "Position" or property == "CFrame" and v:findFirstChild("Jail")then
v.Character.Torso.CFrame = Workspace:findFirstChild(v.Name.."'s jail"):findFirstChild("JailBrick1").CFrame * CFrame.new(0,1.5,0)
end end)
v.Character.Torso.CFrame = Workspace:findFirstChild(v.Name.."'s jail"):findFirstChild("JailBrick1").CFrame * CFrame.new(0,1.5,0)
end end)end end end end
if Msg:sub(1,8):lower()== '!unjail;' then
for i,v in pairs(FindPlayer(Msg:sub(9),Speaker))do
if v:findFirstChild("Jail")then
v.Jail:Destroy()
if v.Character ~= nil then
Alert(Speaker,v,Bool)
end
if Workspace:findFirstChild(v.Name.."'s jail")then
Workspace:findFirstChild(v.Name.."'s jail"):Destroy()
end end end end
if Msg:sub(1,15):lower()== '!setbrightness;' then
Game.Lighting.Brightness = tonumber(Msg:sub(16))
end
if Msg:sub(1,15):lower()== '!setcolorshift;' then
local n
local n2
for i = 16,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n or not n2 then return end
Game.Lighting.ColorShift_Top = Color3.new(tonumber(Msg:sub(16,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
Game.Lighting.ColorShift_Bottom = Color3.new(tonumber(Msg:sub(16,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
end
if Msg:sub(1,16):lower()== '!setshadowcolor;' then
local n
local n2
for i = 17,100 do
if Msg:sub(i,i)== ';' then
n = i
break
end end
for i = n +1,n +100 do
if Msg:sub(i,i)== ';' then
n2 = i
break
end end
if not n or not n2 then return end
Game.Lighting.ShadowColor = Color3.new(tonumber(Msg:sub(17,n -1))/255,tonumber(Msg:sub(n +1,n2 -1))/255,tonumber(Msg:sub(n2 +1))/255)
end end
local function CreateGuis(Player)
if not Player:findFirstChild("IMPAdmin")then return end
math.randomseed(tick())
while not Player:findFirstChild("PlayerGui")do Wait()end
pcall(function()Player.PlayerGui:findFirstChild("Cmds"):Destroy()end)
local gui = Instance.new("ScreenGui",Player.PlayerGui)
gui.Name = "Cmds"
local fr = Instance.new("Frame",gui)
fr.Position = UDim2.new(0.5,0,0.5,0)
fr.Size = UDim2.new(0,0,0,0)
fr.Style = "RobloxSquare"
fr.ZIndex = 2
fr.Name = "Main"
local f = fr:Clone()
f.Style = "RobloxRound"
f.Parent = gui
f.Size = f.Size + UDim2.new(0.05,0,0.05,0)
f.Name = "ASDF"
coroutine.wrap(function()
Wait(0.4)
pcall(function()gui:findFirstChild("ASDF"):Destroy()end)
local cdm = Instance.new("Frame",fr)
cdm.Style = "RobloxSquare"
cdm.ZIndex = 2
cdm.Size = UDim2.new(1,0,0.91,0)
cdm.Position = UDim2.new(0,0,0.2,0)
local de = Instance.new("ImageButton",cdm)
de.Size = UDim2.new(1,0,0.5,0)
de.Image = "http://www.roblox.com/asset/?id=115750153"
de.ZIndex = 3
de.Name = "Decore"
de.BackgroundTransparency = 1
de.AutoButtonColor = true
de.MouseButton1Click:connect(function()
local f = fr:Clone()
f:ClearAllChildren()
f.Parent = gui
f.Style = "RobloxRound"
f.Name = "ASDF"
f.Size = f.Size + UDim2.new(0.05,0,0.05,0)
f.Parent = fr.Parent
fr:TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(0.5,0,0.5,0),"Out","Linear",0.3)
f:TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(0.5,0,0.5,0),"Out","Linear",0.3)
Wait(0.4)
gui:ClearAllChildren()
local ReEnable = Instance.new("Frame",gui)
ReEnable.Name = "ReEnableGui"
ReEnable.Size = UDim2.new(0.2,0,0.1,0)
ReEnable.Position = UDim2.new(0.8,0,0.9,0)
ReEnable.BackgroundTransparency = 1
local Btn = Instance.new("TextButton",ReEnable)
Btn.Modal = true
Btn.Size = UDim2.new(0,0,0,0)
Btn.Style = "RobloxButtonDefault"
Btn.ZIndex = 10
Btn.TextScaled = true
Btn.Text = ""
Btn.Font = "ArialBold"
Btn:TweenSize(UDim2.new(1,0,1,0),"Out","Linear",0.3)
Wait(0.32)
local Text = "Show Atlas"
coroutine.wrap(function()
for i = 1,#Text do
Wait()
Btn.TextColor = BrickColor.Random()
Btn.Text = Btn.Text..Text:sub(i,i)
end
Btn.TextColor = BrickColor.new("Really orange")
end)()
Wait(0.18)
Btn.MouseButton1Click:connect(function()
Btn.Text = ""
Btn:TweenSize(UDim2.new(0,0,0,0),"In","Linear",0.3)
Wait(0.4)
gui:ClearAllChildren()
coroutine.wrap(function()CreateGuis(Player)end)()
end)end)
local cmd = Instance.new("Frame",fr)
cmd.Style = "RobloxSquare"
cmd.Size = UDim2.new(1,0,0.2,0)
cmd.ZIndex = 3
local cmdinput = Instance.new("TextBox",cmd)
cmdinput.Size = UDim2.new(0.9,0,1,0)
cmdinput.Text = "Type your command here and execute."
cmdinput.ZIndex = 4
cmdinput.ClearTextOnFocus = false
cmdinput.BackgroundTransparency = 1
cmdinput.Font = "ArialBold"
cmdinput.TextScaled = true
cmdinput.TextWrapped = true
cmdinput.TextColor3 = BrickColor.new("New Yeller").Color
local cmdexecute = Instance.new("TextButton",fr)
cmdexecute.Size = UDim2.new(0.1,0,0.2,0)
cmdexecute.Position = UDim2.new(0.9,0,0,0)
cmdexecute.Text = "Execute"
cmdexecute.ZIndex = 4
cmdexecute.Style = "RobloxButton"
cmdexecute.Font = "ArialBold"
cmdexecute.FontSize = "Size11"
cmdexecute.Modal = true
cmdexecute.TextColor3 = BrickColor.new("New Yeller").Color
cmdexecute.MouseButton1Click:connect(function()
Cmds(cmdinput.Text,player,Player,false)
end)
local sbx = Instance.new("TextButton",fr)
sbx.Size = UDim2.new(0.5,0,0.2,0)
sbx.Position = UDim2.new(0.5,0,0.7,0)
sbx.Text = "EditSkyBox"
sbx.TextColor3 = BrickColor.new("New Yeller").Color
sbx.Font = "ArialBold"
sbx.FontSize = "Size11"
sbx.ZIndex = 4
sbx.Style = "RobloxButton"
sbx.MouseButton1Click:connect(function()
if gui:findFirstChild("Stats")or gui:findFirstChild("Help")then return end
if gui:findFirstChild("SkyboxGui")then
gui:findFirstChild("SkyboxGui"):Destroy()
sbx.TextColor = BrickColor.new("New Yeller")
return
end
sbx.TextColor = BrickColor.new("Really orange")
local sky = game.Lighting:FindFirstChild("Sky")
if not sky then
Instance.new("Sky",Game.Lighting)
end
if not SG then
local F1 = Instance.new("Frame",gui)
F1.Name = "SkyboxGui"
local n = Instance.new("TextButton",gui.SkyboxGui)
local b = Instance.new("TextButton",gui.SkyboxGui)
local p1 = Instance.new("TextLabel",gui.SkyboxGui)
local p2 = Instance.new("TextLabel",gui.SkyboxGui)
local p3 = Instance.new("TextLabel",gui.SkyboxGui)
local p4 = Instance.new("TextLabel",gui.SkyboxGui)
local p5 = Instance.new("TextLabel",gui.SkyboxGui)
local p6 = Instance.new("TextLabel",gui.SkyboxGui)
local p7 = Instance.new("TextLabel",gui.SkyboxGui)
local f1 = Instance.new("Frame",gui.SkyboxGui)
local f2 = Instance.new("Frame",gui.SkyboxGui)
local f3 = Instance.new("Frame",gui.SkyboxGui)
local f4 = Instance.new("Frame",gui.SkyboxGui)
local f5 = Instance.new("Frame",gui.SkyboxGui)
local f6 = Instance.new("Frame",gui.SkyboxGui)
local f7 = Instance.new("Frame",gui.SkyboxGui)
f1.Name = "f1"
f2.Name = "f2"
f3.Name = "f3"
f4.Name = "f4"
f5.Name = "f5"
f6.Name = "f6"
f7.Name = "f7"
local s1 = Instance.new("ImageButton",gui.SkyboxGui.f1)
s1.ZIndex = 2
local s2 = Instance.new("ImageButton",gui.SkyboxGui.f1)
s2.ZIndex = 2
local s3 = Instance.new("ImageButton",gui.SkyboxGui.f2)
s3.ZIndex = 2
local s4 = Instance.new("ImageButton",gui.SkyboxGui.f2)
s4.ZIndex = 2
local s5 = Instance.new("ImageButton",gui.SkyboxGui.f3)
s5.ZIndex = 2
local s6 = Instance.new("ImageButton",gui.SkyboxGui.f3)
s6.ZIndex = 2
local s7 = Instance.new("ImageButton",gui.SkyboxGui.f4)
s7.ZIndex = 2
local s8 = Instance.new("ImageButton",gui.SkyboxGui.f4)
s8.ZIndex = 2
local s9 = Instance.new("ImageButton",gui.SkyboxGui.f5)
s9.ZIndex = 2
local s10 = Instance.new("ImageButton",gui.SkyboxGui.f5)
s10.ZIndex = 2
local s11 = Instance.new("ImageButton",gui.SkyboxGui.f6)
s11.ZIndex = 2
local s12 = Instance.new("ImageButton",gui.SkyboxGui.f6)
s12.ZIndex = 2
local s13 = Instance.new("ImageButton",gui.SkyboxGui.f7)
s13.ZIndex = 2
local s14 = Instance.new("ImageButton",gui.SkyboxGui.f7)
s14.ZIndex = 2
local ts1 = Instance.new("TextLabel",gui.SkyboxGui.f1)
local ts2 = Instance.new("TextLabel",gui.SkyboxGui.f1)
local ts3 = Instance.new("TextLabel",gui.SkyboxGui.f2)
local ts4 = Instance.new("TextLabel",gui.SkyboxGui.f2)
local ts5 = Instance.new("TextLabel",gui.SkyboxGui.f3)
local ts6 = Instance.new("TextLabel",gui.SkyboxGui.f3)
local ts7 = Instance.new("TextLabel",gui.SkyboxGui.f4)
local ts8 = Instance.new("TextLabel",gui.SkyboxGui.f4)
local ts9 = Instance.new("TextLabel",gui.SkyboxGui.f5)
local ts10 = Instance.new("TextLabel",gui.SkyboxGui.f5)
local ts11 = Instance.new("TextLabel",gui.SkyboxGui.f6)
local ts12 = Instance.new("TextLabel",gui.SkyboxGui.f6)
local ts13 = Instance.new("TextLabel",gui.SkyboxGui.f7)
local ts14 = Instance.new("TextLabel",gui.SkyboxGui.f7)
F1.Size = UDim2.new(0,325,0,200)
F1.Position = UDim2.new(0.752,0,0.7,0)
F1.Style = "RobloxSquare"
F1.Active = true
F1.Draggable = true
n.Size = UDim2.new(0,75,0,40)
n.Text = "Next"
n.ZIndex = 2
n.FontSize = "Size14"
n.TextColor3 = Color3.new(1,1,1)
n.Style = "RobloxButton"
n.Position = UDim2.new(0.7,0,0.8)
n.Name = "NextButton"
b.Size = UDim2.new(0,75,0,40)
b.Text = "Back"
b.FontSize = "Size14"
b.TextColor3 = Color3.new(1,1,1)
b.Style = "RobloxButton"
b.Position = UDim2.new(0.05,0,0.8)
b.Name = "BackButton"
b.ZIndex = 2
p1.Name = "p1"
p2.Name = "p2"
p3.Name = "p3"
p4.Name = "p4"
p5.Name = "p5"
p6.Name = "p6"
p7.Name = "p7"
p1.Size = UDim2.new(0,15,0,25)
p1.Text = "1"
p1.Position = UDim2.new(0.3,0,0.85)
p1.FontSize = "Size12"
p1.TextColor3 = Color3.new(255/255,0,0)
p1.BackgroundTransparency = 1
p2.Size = UDim2.new(0,15,0,25)
p2.Text = "2"
p2.Position = UDim2.new(0.35,0,0.85,0)
p2.FontSize = "Size12"
p2.TextColor3 = Color3.new(1,1,1)
p2.BackgroundTransparency = 1
p3.Size = UDim2.new(0,15,0,25)
p3.Text = "3"
p3.Position = UDim2.new(0.4,0,0.85)
p3.FontSize = "Size12"
p3.TextColor3 = Color3.new(1,1,1)
p3.BackgroundTransparency = 1
p4.Size = UDim2.new(0,15,0,25)
p4.Text = "4"
p4.Position = UDim2.new(0.45,0,0.85)
p4.FontSize = "Size12"
p4.TextColor3 = Color3.new(1,1,1)
p4.BackgroundTransparency = 1
p5.Size = UDim2.new(0,15,0,25)
p5.Text = "5"
p5.Position = UDim2.new(0.5,0,0.85)
p5.FontSize = "Size12"
p5.TextColor3 = Color3.new(1,1,1)
p5.BackgroundTransparency = 1
p6.Size = UDim2.new(0,15,0,25)
p6.Text = "6"
p6.Position = UDim2.new(0.55,0,0.85)
p6.FontSize = "Size12"
p6.TextColor3 = Color3.new(1,1,1)
p6.BackgroundTransparency = 1
p7.Size = UDim2.new(0,15,0,25)
p7.Text = "7"
p7.Position = UDim2.new(0.6,0,0.85)
p7.FontSize = "Size12"
p7.TextColor3 = Color3.new(1,1,1)
p7.BackgroundTransparency = 1
s1.Name = "s1"
s2.Name = "s2"
s3.Name = "s3"
s4.Name = "s4"
s5.Name = "s5"
s6.Name = "s6"
s7.Name = "s7"
s8.Name = "s8"
s9.Name = "s9"
s10.Name = "s10"
s11.Name = "s11"
s12.Name = "s12"
s13.Name = "s13"
s14.Name = "s14"
ts1.Name = "ts1"
ts2.Name = "ts2"
ts3.Name = "ts3"
ts4.Name = "ts4"
ts5.Name = "ts5"
ts6.Name = "ts6"
ts7.Name = "ts7"
ts8.Name = "ts8"
ts9.Name = "ts9"
ts10.Name = "ts10"
ts11.Name = "ts11"
ts12.Name = "ts12"
ts13.Name = "ts13"
ts14.Name = "ts14"
ts1.Text = "Plain Skybox"
ts1.FontSize = "Size14"
ts1.Font = "ArialBold"
ts1.TextXAlignment = "Left"
ts1.TextColor3 = Color3.new(1,1,1)
ts1.Position = UDim2.new(0,0,0.9,0)
ts2.Text = "Walls of Autumn"
ts2.FontSize = "Size14"
ts2.Font = "ArialBold"
ts2.TextXAlignment = "Left"
ts2.TextColor3 = Color3.new(1,1,1)
ts2.Position = UDim2.new(.6,0,0.9,0)
ts3.Text = "The Great West"
ts3.FontSize = "Size14"
ts3.Font = "ArialBold"
ts3.TextXAlignment = "Left"
ts3.TextColor3 = Color3.new(1,1,1)
ts3.Position = UDim2.new(0,0,0.9,0)
ts4.Text = "The Utter East"
ts4.FontSize = "Size14"
ts4.Font = "ArialBold"
ts4.TextXAlignment = "Left"
ts4.TextColor3 = Color3.new(1,1,1)
ts4.Position = UDim2.new(.6,0,0.9,0)
ts5.Text = "Winterness"
ts5.FontSize = "Size14"
ts5.Font = "ArialBold"
ts5.TextXAlignment = "Left"
ts5.TextColor3 = Color3.new(1,1,1)
ts5.Position = UDim2.new(0,0,0.9,0)
ts6.Text = "Alien orange"
ts6.FontSize = "Size14"
ts6.Font = "ArialBold"
ts6.TextXAlignment = "Left"
ts6.TextColor3 = Color3.new(1,1,1)
ts6.Position = UDim2.new(.6,0,0.9,0)
ts7.Text = "Shiver Frost"
ts7.FontSize = "Size14"
ts7.Font = "ArialBold"
ts7.TextXAlignment = "Left"
ts7.TextColor3 = Color3.new(1,1,1)
ts7.Position = UDim2.new(0,0,0.9,0)
ts8.Text = "Starry Night"
ts8.FontSize = "Size14"
ts8.Font = "ArialBold"
ts8.TextXAlignment = "Left"
ts8.TextColor3 = Color3.new(1,1,1)
ts8.Position = UDim2.new(.6,0,0.9,0)
ts9.Text = "Amazing"
ts9.FontSize = "Size14"
ts9.Font = "ArialBold"
ts9.TextXAlignment = "Left"
ts9.TextColor3 = Color3.new(1,1,1)
ts9.Position = UDim2.new(0,0,0.9,0)
ts10.Text = "Oblivion"
ts10.FontSize = "Size14"
ts10.Font = "ArialBold"
ts10.TextXAlignment = "Left"
ts10.TextColor3 = Color3.new(1,1,1)
ts10.Position = UDim2.new(.6,0,0.9,0)
ts11.Text = "Mars Sky"
ts11.FontSize = "Size14"
ts11.Font = "ArialBold"
ts11.TextXAlignment = "Left"
ts11.TextColor3 = Color3.new(1,1,1)
ts11.Position = UDim2.new(0,0,0.9,0)
ts12.Text = "Sunny Sky"
ts12.FontSize = "Size14"
ts12.Font = "ArialBold"
ts12.TextXAlignment = "Left"
ts12.TextColor3 = Color3.new(1,1,1)
ts12.Position = UDim2.new(.6,0,0.9,0)
ts13.Text = "White Skybox"
ts13.FontSize = "Size14"
ts13.Font = "ArialBold"
ts13.TextXAlignment = "Left"
ts13.TextColor3 = Color3.new(1,1,1)
ts13.Position = UDim2.new(0,0,0.9,0)
ts14.Text = "Blue Skybox"
ts14.FontSize = "Size14"
ts14.Font = "ArialBold"
ts14.TextXAlignment = "Left"
ts14.TextColor3 = Color3.new(1,1,1)
ts14.Position = UDim2.new(.6,0,0.9,0)
f1.Position = UDim2.new(0.05,0,0.05)
f1.Size = UDim2.new(0,250,0,125)
f1.BackgroundTransparency = 1
f2.Position = UDim2.new(0.05,0,0.05)
f2.Size = UDim2.new(0,250,0,125)
f2.BackgroundTransparency = 1
f2.Visible = false
f3.Position = UDim2.new(0.05,0,0.05)
f3.Size = UDim2.new(0,250,0,125)
f3.BackgroundTransparency = 1
f3.Visible = false
f4.Position = UDim2.new(0.05,0,0.05)
f4.Size = UDim2.new(0,250,0,125)
f4.BackgroundTransparency = 1
f4.Visible = false
f5.Position = UDim2.new(0.05,0,0.05)
f5.Size = UDim2.new(0,250,0,125)
f5.BackgroundTransparency = 1
f5.Visible = false
f6.Position = UDim2.new(0.05,0,0.05)
f6.Size = UDim2.new(0,250,0,125)
f6.BackgroundTransparency = 1
f6.Visible = false
f7.Position = UDim2.new(0.05,0,0.05)
f7.Size = UDim2.new(0,250,0,125)
f7.BackgroundTransparency = 1
f7.Visible = false
s1.Image = "rbxasset://Sky/null_plainsky512_ft.jpg"
s1.Size = UDim2.new(0,100,0,100)
s2.Image = "http://www.roblox.com/asset/?version=1&id=1013850"
s2.Size = UDim2.new(0,100,0,100)
s2.Position = UDim2.new(0.6,0,0)
s3.Image = "http://www.roblox.com/asset/?version=1&id=1327338"
s3.Size = UDim2.new(0,100,0,100)
s4.Image = "http://www.roblox.com/asset/?version=1&id=1014348"
s4.Size = UDim2.new(0,100,0,100)
s4.Position = UDim2.new(0.6,0,0)
s5.Image = "http://www.roblox.com/asset/?version=1&id=1327355"
s5.Size = UDim2.new(0,100,0,100)
s6.Image = "http://www.roblox.com/asset/?version=1&id=1012887"
s6.Size = UDim2.new(0,100,0,100)
s6.Position = UDim2.new(0.6,0,0)
s7.Image = "http://www.roblox.com/asset/?version=1&id=1327362"
s7.Size = UDim2.new(0,100,0,100)
s8.Image = "http://www.roblox.com/asset/?version=1&id=1014340"
s8.Size = UDim2.new(0,100,0,100)
s8.Position = UDim2.new(0.6,0,0)
s9.Image = "http://www.roblox.com/asset/?id=47974909"
s9.Size = UDim2.new(0,100,0,100)
s10.Image = "http://www.roblox.com/asset/?version=1&id=1013842"
s10.Size = UDim2.new(0,100,0,100)
s10.Position = UDim2.new(0.6,0,0)
s11.Image = "http://www.roblox.com/asset/?id=2837050"
s11.Size = UDim2.new(0,100,0,100)
s12.Image = "http://www.roblox.com/asset/?id=58372742"
s12.Size = UDim2.new(0,100,0,100)
s12.Position = UDim2.new(0.6,0,0)
s13.Image = "http://www.roblox.com/Asset/?ID=36527089"
s13.Size = UDim2.new(0,100,0,100)
s14.Image = "http://www.roblox.com/asset/?id=13943307"
s14.Size = UDim2.new(0,100,0,100)
s14.Position = UDim2.new(0.6,0,0)
gui.SkyboxGui.NextButton.MouseButton1Click:connect(function()
if p1.TextColor3 == Color3.new(255/255,0,0)then
p1.TextColor3 = Color3.new(1,1,1)
p2.TextColor3 = Color3.new(255/255,0,0)
f1.Visible = false
f2.Visible = true
elseif p2.TextColor3 == Color3.new(255/255,0,0)then
p2.TextColor3 = Color3.new(1,1,1)
p3.TextColor3 = Color3.new(255/255,0,0)
f2.Visible = false
f3.Visible = true
elseif p3.TextColor3 == Color3.new(255/255,0,0)then
p3.TextColor3 = Color3.new(1,1,1)
p4.TextColor3 = Color3.new(255/255,0,0)
f3.Visible = false
f4.Visible = true
elseif p4.TextColor3 == Color3.new(255/255,0,0)then
p4.TextColor3 = Color3.new(1,1,1)
p5.TextColor3 = Color3.new(255/255,0,0)
f4.Visible = false
f5.Visible = true
elseif p5.TextColor3 == Color3.new(255/255,0,0)then
p5.TextColor3 = Color3.new(1,1,1)
p6.TextColor3 = Color3.new(255/255,0,0)
f5.Visible = false
f6.Visible = true
elseif p6.TextColor3 == Color3.new(255/255,0,0)then
p6.TextColor3 = Color3.new(1,1,1)
p7.TextColor3 = Color3.new(255/255,0,0)
f6.Visible = false
f7.Visible = true
end end)
gui.SkyboxGui.BackButton.MouseButton1Click:connect(function()
if p2.TextColor3 == Color3.new(255/255,0,0)then
p2.TextColor3 = Color3.new(1,1,1)
p1.TextColor3 = Color3.new(255/255,0,0)
f2.Visible = false
f1.Visible = true
elseif p3.TextColor3 == Color3.new(255/255,0,0)then
p3.TextColor3 = Color3.new(1,1,1)
p2.TextColor3 = Color3.new(255/255,0,0)
f3.Visible = false
f2.Visible = true
elseif p4.TextColor3 == Color3.new(255/255,0,0)then
p4.TextColor3 = Color3.new(1,1,1)
p3.TextColor3 = Color3.new(255/255,0,0)
f4.Visible = false
f3.Visible = true
elseif p5.TextColor3 == Color3.new(255/255,0,0)then
p5.TextColor3 = Color3.new(1,1,1)
p4.TextColor3 = Color3.new(255/255,0,0)
f5.Visible = false
f4.Visible = true
elseif p6.TextColor3 == Color3.new(255/255,0,0)then
p6.TextColor3 = Color3.new(1,1,1)
p5.TextColor3 = Color3.new(255/255,0,0)
f6.Visible = false
f5.Visible = true
elseif p7.TextColor3 == Color3.new(255/255,0,0)then
p7.TextColor3 = Color3.new(1,1,1)
p6.TextColor3 = Color3.new(255/255,0,0)
f7.Visible = false
f6.Visible = true
end end)
gui.SkyboxGui.f1.s1.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f1.s1.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "rbxasset://Sky/null_plainsky512_bk.jpg"
sb.SkyboxDn = "rbxasset://Sky/null_plainsky512_dn.jpg"
sb.SkyboxFt = "rbxasset://Sky/null_plainsky512_ft.jpg"
sb.SkyboxLf = "rbxasset://Sky/null_plainsky512_lf.jpg"
sb.SkyboxRt = "rbxasset://Sky/null_plainsky512_rt.jpg"
sb.SkyboxUp = "rbxasset://Sky/null_plainsky512_up.jpg"
end)
gui.SkyboxGui.f1.s2.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f1.s2.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1013852"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1013853"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1013850"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1013851"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1013849"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1013854"
end)
gui.SkyboxGui.f2.s3.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f2.s3.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1327340"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1327341"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1327338"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1327339"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1327337"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1327342"
end)
gui.SkyboxGui.f2.s4.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f2.s4.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1014350"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1014351"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1014348"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1014349"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1014347"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1014352"
end)
gui.SkyboxGui.f3.s5.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f3.s5.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1327358"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1327359"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1327355"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1327357"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1327356"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1327360"
end)
gui.SkyboxGui.f3.s6.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f3.s6.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1012890"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1012891"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1012887"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1012889"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1012888"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1014449"
end)
gui.SkyboxGui.f4.s7.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f4.s7.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1327366"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1327367"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1327362"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1327363"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1327361"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1327368"
end)
gui.SkyboxGui.f4.s8.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f4.s8.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1014342"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1014343"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1014340"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1014341"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1014339"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1014344"
end)
gui.SkyboxGui.f5.s9.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f5.s9.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?id=47974894"
sb.SkyboxDn = "http://www.roblox.com/asset/?id=47974690"
sb.SkyboxFt = "http://www.roblox.com/asset/?id=47974821"
sb.SkyboxLf = "http://www.roblox.com/asset/?id=47974776"
sb.SkyboxRt = "http://www.roblox.com/asset/?id=47974859"
sb.SkyboxUp = "http://www.roblox.com/asset/?id=47974909"
end)
gui.SkyboxGui.f5.s10.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f5.s10.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1013844"
sb.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1013845"
sb.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1013842"
sb.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1013843"
sb.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1013841"
sb.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1013848"
end)
gui.SkyboxGui.f6.s11.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f6.s11.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?id=2837034"
sb.SkyboxDn = "http://www.roblox.com/asset/?id=2837044"
sb.SkyboxFt = "http://www.roblox.com/asset/?id=2837050"
sb.SkyboxLf = "http://www.roblox.com/asset/?id=2837060"
sb.SkyboxRt = "http://www.roblox.com/asset/?id=2837571"
sb.SkyboxUp = "http://www.roblox.com/asset/?id=2837582"
end)
gui.SkyboxGui.f6.s12.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f6.s12.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?id=58372690"
sb.SkyboxDn = "http://www.roblox.com/asset/?id=58372722"
sb.SkyboxFt = "http://www.roblox.com/asset/?id=58372742"
sb.SkyboxLf = "http://www.roblox.com/asset/?id=58372777"
sb.SkyboxRt = "http://www.roblox.com/asset/?id=58372794"
sb.SkyboxUp = "http://www.roblox.com/asset/?id=58372812"
end)
gui.SkyboxGui.f7.s13.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f7.s13.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?id=36527089"
sb.SkyboxDn = "http://www.roblox.com/asset/?id=36527089"
sb.SkyboxFt = "http://www.roblox.com/asset/?id=36527089"
sb.SkyboxLf = "http://www.roblox.com/asset/?id=36527089"
sb.SkyboxRt = "http://www.roblox.com/asset/?id=36527089"
sb.SkyboxUp = "http://www.roblox.com/asset/?id=36527089"
end)
gui.SkyboxGui.f7.s14.MouseButton1Click:connect(function()
local t = tick()
gui.SkyboxGui.f7.s14.MouseButton1Click:wait()
if tick()- t > 0.2 then return end
local sb = game.Lighting.Sky
sb.SkyboxBk = "http://www.roblox.com/asset/?id=13943307"
sb.SkyboxDn = "http://www.roblox.com/asset/?id=13943307"
sb.SkyboxFt = "http://www.roblox.com/asset/?id=13943307"
sb.SkyboxLf = "http://www.roblox.com/asset/?id=13943307"
sb.SkyboxRt = "http://www.roblox.com/asset/?id=13943307"
sb.SkyboxUp = "http://www.roblox.com/asset/?id=13943307"
end)end end)
local sx = Instance.new("TextButton",fr)
sx.Size = UDim2.new(0.5,0,0.2,0)
sx.Position = UDim2.new(0,0,0.7,0)
sx.Text = "GameStatus"
sx.TextColor = BrickColor.new("New Yeller")
sx.Font = "ArialBold"
sx.FontSize = "Size11"
sx.ZIndex = 4
sx.Style = "RobloxButton"
sx.MouseButton1Click:connect(function()
if not sx:findFirstChild("Bool")then
local b = Instance.new("BoolValue",sx)
b.Name = "Bool"
b.Value = true
end
if gui:findFirstChild("SkyboxGui")or gui:findFirstChild("Help")then return end
if sx.Bool.Value then
sx.Bool.Value = false
sx.TextColor = BrickColor.new("Really orange")
local stats = Instance.new("Frame",gui)
stats.Position = UDim2.new(0.57,0,0.7,0)
stats.Size = UDim2.new(0.42,0,0.25,0)
stats.Style = "RobloxSquare"
stats.ZIndex = 2
stats.Name = "Stats"
local Divider = Instance.new("TextButton",stats)
Divider.Size = UDim2.new(0.001,0,1.02,0)
Divider.Position = UDim2.new(0.5,0,0.01,0)
Divider.ZIndex = 3
Divider.Style = "RobloxButton"
Divider.Text = ""
local Private = Instance.new("TextLabel",stats)
Private.Size = UDim2.new(1,0,0.15,0)
Private.BackgroundTransparency = 1
Private.Font = "ArialBold"
Private.ZIndex = 3
Private.TextXAlignment = "Left"
Private.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
if IsPrivateEnabled then
Private.Text = "PrivateServer :: On"
Private.TextColor = BrickColor.new("Really orange")
elseif not IsPrivateEnabled then
Private.Text = "PrivateServer :: Off"
Private.TextColor = BrickColor.new("Lime green")
end end end)()
Wait(0.1)
local Nuke = Instance.new("TextLabel",stats)
Nuke.Size = Private.Size
Nuke.Position = UDim2.new(0,0,0.15,0)
Nuke.BackgroundTransparency = 1
Nuke.Font = "ArialBold"
Nuke.ZIndex = 3
Nuke.TextXAlignment = "Left"
Nuke.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if Workspace:findFirstChild(" NUKE")then
Nuke.TextColor = BrickColor.new("Really orange")
Nuke.Text = "Nuke :: Active"
else
Nuke.TextColor = BrickColor.new("Lime green")
Nuke.Text = "Nuke :: Inactive"
end end)end end)()
Wait(0.1)
local Island = Instance.new("TextLabel",stats)
Island.Size = Private.Size
Island.Position = UDim2.new(0,0,0.3,0)
Island.BackgroundTransparency = 1
Island.Font = "ArialBold"
Island.ZIndex = 3
Island.TextXAlignment = "Left"
Island.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if Workspace:findFirstChild("ISland")then
Island.TextColor = Workspace.ISland.BrickColor
Island.Text = "Island :: Spawned"
else
Island.TextColor = BrickColor.new("Lime green")
Island.Text = "Island :: Removed"
end end)end end)()
Wait(0.1)
local Ambient = Instance.new("TextLabel",stats)
Ambient.Size = Private.Size
Ambient.Position = UDim2.new(0,0,0.45,0)
Ambient.BackgroundTransparency = 1
Ambient.Font = "ArialBold"
Ambient.ZIndex = 3
Ambient.TextXAlignment = "Left"
Ambient.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
Ambient.TextColor3 = Game.Lighting.Ambient
Ambient.Text = tostring("Ambient :: ".. 255/Game.Lighting.Ambient.r..':'.. 255/Game.Lighting.Ambient.g..':'.. 255/Game.Lighting.Ambient.b):sub(1,34)
end)end end)()
Wait(0.1)
local Bluehole = Instance.new("TextLabel",stats)
Bluehole.Size = Private.Size
Bluehole.Position = UDim2.new(0,0,0.6,0)
Bluehole.BackgroundTransparency = 1
Bluehole.Font = "ArialBold"
Bluehole.ZIndex = 3
Bluehole.TextXAlignment = "Left"
Bluehole.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if Workspace:findFirstChild("Bluehole")then
Bluehole.TextColor = BrickColor.new("Really orange")
Bluehole.Text = "Bluehole :: Active"
else
Bluehole.TextColor = BrickColor.new("Lime green")
Bluehole.Text = "Bluehole :: Inactive"
end end)end end)()
Wait(0.1)
local Teams = Instance.new("TextLabel",stats)
Teams.Size = Private.Size
Teams.Position = UDim2.new(0,0,0.75,0)
Teams.BackgroundTransparency = 1
Teams.Font = "ArialBold"
Teams.ZIndex = 3
Teams.TextXAlignment = "Left"
Teams.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
Teams.TextColor = BrickColor.new("Lime green")
Teams.Text = "Teams :: "..#Game:GetService("Teams"):GetTeams()
end)end end)()
Wait(0.1)
local Players = Instance.new("TextLabel",stats)
Players.Size = Private.Size
Players.Position = UDim2.new(0,0,0.9,0)
Players.BackgroundTransparency = 1
Players.Font = "ArialBold"
Players.ZIndex = 3
Players.TextXAlignment = "Left"
Players.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
Players.TextColor = BrickColor.new("Lime green")
Players.Text = "Players :: "..Game.Players.NumPlayers
end)end end)()
Wait(0.1)
local Friends = Instance.new("TextLabel",stats)
Friends.Size = Private.Size
Friends.Position = UDim2.new(0.54,0,0,0)
Friends.BackgroundTransparency = 1
Friends.Font = "ArialBold"
Friends.ZIndex = 3
Friends.TextXAlignment = "Left"
Friends.FontSize = "Size14"
local frnds = {}
Game.Players.PlayerAdded:connect(function(plr)
if plr:IsFriendsWith(Player.userId)then
table.insert(frnds,plr)
end end)
Game.Players.PlayerRemoving:connect(function(plr)
for i,v in pairs(frnds)do
if v == plr then
table.remove(frnds,i)
end end end)
for i,v in pairs(Game.Players:GetPlayers())do
if v:IsFriendsWith(Player.userId)and Player ~= v then
table.insert(frnds,v)
end end
coroutine.wrap(function()
while Wait()do
pcall(function()
Friends.TextColor = BrickColor.new("Lime green")
Friends.Text = "Friends in game :: "..#frnds
end)end end)()
Wait(0.1)
local Animations = Instance.new("TextLabel",stats)
Animations.Size = Private.Size
Animations.Position = UDim2.new(0.539,0,0.15,0)
Animations.BackgroundTransparency = 1
Animations.Font = "ArialBold"
Animations.ZIndex = 3
Animations.TextXAlignment = "Left"
Animations.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if AreAnimationsDisabled then
Animations.TextColor = BrickColor.new("Really orange")
Animations.Text = "Animations :: Disabled"
else
Animations.TextColor = BrickColor.new("Lime green")
Animations.Text = "Animations :: Enabled"
end end)end end)()
Wait(0.1)
local Banned = Instance.new("TextLabel",stats)
Banned.Size = Private.Size
Banned.Position = UDim2.new(0.54,0,0.3,0)
Banned.BackgroundTransparency = 1
Banned.Font = "ArialBold"
Banned.ZIndex = 3
Banned.TextXAlignment = "Left"
Banned.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
Banned.TextColor = BrickColor.new("Lime green")
Banned.Text = "Banned players :: "..#Ban -1
end)end end)()
Wait(0.1)
local AntiBanned = Instance.new("TextLabel",stats)
AntiBanned.Size = Private.Size
AntiBanned.Position = UDim2.new(0.54,0,0.45,0)
AntiBanned.BackgroundTransparency = 1
AntiBanned.Font = "ArialBold"
AntiBanned.ZIndex = 3
AntiBanned.TextXAlignment = "Left"
AntiBanned.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
AntiBanned.TextColor = BrickColor.new("Lime green")
AntiBanned.Text = "AntiBanned players :: "..#Antiban -1
end)end end)()
Wait(0.1)
local Time = Instance.new("TextLabel",stats)
Time.Size = Private.Size
Time.Position = UDim2.new(0.54,0,0.6,0)
Time.BackgroundTransparency = 1
Time.Font = "ArialBold"
Time.ZIndex = 3
Time.TextXAlignment = "Left"
Time.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
Time.TextColor = BrickColor.new("Lime green")
Time.Text = "Time :: "..Game.Lighting.TimeOfDay
end)end end)()
Wait(0.1)
local resp = Instance.new("TextLabel",stats)
resp.Size = Private.Size
resp.Position = UDim2.new(0.54,0,0.75,0)
resp.BackgroundTransparency = 1
resp.Font = "ArialBold"
resp.ZIndex = 3
resp.TextXAlignment = "Left"
resp.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if IsPlayerAutoSpawningDisabled then
resp.TextColor = BrickColor.new("Really orange")
resp.Text = "Respawning :: Disabled"
else
resp.TextColor = BrickColor.new("Lime green")
resp.Text = "Respawning :: Enabled"
end end)end end)()
Wait(0.1)
local ScriptingDisabled = Instance.new("TextLabel",stats)
ScriptingDisabled.Size = Private.Size
ScriptingDisabled.Position = UDim2.new(0.54,0,0.9,0)
ScriptingDisabled.BackgroundTransparency = 1
ScriptingDisabled.Font = "ArialBold"
ScriptingDisabled.ZIndex = 3
ScriptingDisabled.TextXAlignment = "Left"
ScriptingDisabled.FontSize = "Size14"
coroutine.wrap(function()
while Wait()do
pcall(function()
if IsScriptingDisabled then
ScriptingDisabled.TextColor = BrickColor.new("Really orange")
ScriptingDisabled.Text = "Scripting :: Disabled"
else
ScriptingDisabled.TextColor = BrickColor.new("Lime green")
ScriptingDisabled.Text = "Scripting :: Enabled"
end end)end end)()
else
sx.Bool.Value = true
sx.TextColor = BrickColor.new("New Yeller")
gui:findFirstChild("Stats"):Destroy()
end end)
local hide = Instance.new("TextButton",fr)
hide.Size = UDim2.new(0.1,0,0.2,0)
hide.Position = UDim2.new(0,0,0.9,0)
hide.Text = "FixChat"
hide.TextColor3 = BrickColor.new("New Yeller").Color
hide.Font = "ArialBold"
hide.FontSize = "Size11"
hide.ZIndex = 4
hide.Style = "RobloxButton"
hide.MouseButton1Click:connect(function()
coroutine.wrap(function()
Player.Chatted:connect(function(Msg,player)
Cmds(Msg,player,Player,true)
end)end)()end)
local Script = Instance.new("TextButton",fr)
Script.Text = "ExecuteScript"
Script.TextColor3 = BrickColor.new("New Yeller").Color
Script.Font = "ArialBold"
Script.FontSize = "Size11"
Script.ZIndex = 4
Script.Style = "RobloxButton"
Script.Size = UDim2.new(0.2,0,0.2,0)
Script.Position = UDim2.new(0.1,0,0.9,0)
Script.MouseButton1Click:connect(function()
if not Script:findFirstChild("Bool")then
local b = Instance.new("BoolValue",Script)
b.Value = true
b.Name = "Bool"
end
if not Script:findFirstChild("Bewl")then
local b = Instance.new("BoolValue",Script)
b.Value = true
b.Name = "Bewl"
end
if Script:findFirstChild("Bool").Value then
Script:findFirstChild("Bool").Value = false
local f = Instance.new("Frame",gui)
f.Name = "Script"
f.Size = UDim2.new(0,0,0,0)
f.Position = UDim2.new(0,0,0,0)
f.ZIndex = 5
f.Style = "RobloxSquare"
local load = Instance.new("TextBox",f)
load.Size = UDim2.new(1,0,0.8,0)
load.Text = "Type your script here."
load.Font = "ArialBold"
load.ZIndex = 6
load.ClearTextOnFocus = false
load.TextColor3 = BrickColor.new("Lime green").Color
load.BackgroundTransparency = 1
load.TextWrapped = true
load.TextXAlignment = "Left"
load.TextYAlignment = "Top"
load.FontSize = "Size12"
local exe = Instance.new("TextButton",f)
exe.Size = UDim2.new(1,0,0.2,0)
exe.Style = "RobloxButton"
exe.Position = UDim2.new(0,0,0.8,0)
exe.Text = "Execute"
exe.Font = "ArialBold"
exe.Name = [====[Made by invaderzimfan1233/jayrock3401/InternalAltRecursion]====]
exe.TextScaled = true
exe.TextColor3 = BrickColor.new("New Yeller").Color
exe.ZIndex = 6
exe.MouseButton1Click:connect(function()
if not Script:findFirstChild("Bewl")then
local b = Instance.new("BoolValue",Script)
b.Name = "Bewl"
b.Value = true
end
if Script:findFirstChild("Bewl").Value then
Script:findFirstChild("Bewl").Value = false
local x = load.Text
if x:sub(1,4)== 'get;' then x = Game:GetService("HttpService"):GetAsync(x:sub(5))end
AddScript(Player,x)
Wait(3)
Script:findFirstChild("Bewl").Value = true
end end)
Wait()
f:TweenSizeAndPosition(UDim2.new(0.5,0,0.5,0),UDim2.new(0.04,0,0.23,0),"InOut","Quint",0.3)
else
Script:findFirstChild("Bool").Value = true
Wait()
gui:findFirstChild("Script"):TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(1,0,1,0),"Out","Linear",0.3)
Wait(0.4)
gui:findFirstChild("Script"):Destroy()
end end)
local moar = Instance.new("TextButton",fr)
moar.Size = UDim2.new(0.1,0,0.2,0)
moar.Position = UDim2.new(0.9,0,0.9,0)
moar.Style = "RobloxButton"
moar.TextColor3 = BrickColor.new("New Yeller").Color
moar.Text = "More"
moar.Font = "ArialBold"
moar.FontSize = "Size11"
moar.ZIndex = 4
moar.MouseButton1Click:connect(function()
if not moar:findFirstChild("ExpBool")then
local ep = Instance.new("BoolValue",moar)
ep.Value = true
ep.Name = "ExpBool"
end
if moar.ExpBool.Value then
if gui:findFirstChild("STUFFFFF")then return end
moar.ExpBool.Value = false
local m = Instance.new("Frame",gui)
m.Name = "MOAR"
m.Position = UDim2.new(0,0,1,0)
m.Size = UDim2.new(0.45,0,0.7,0)
m.Style = "RobloxSquare"
m.ZIndex = 8
Wait()
m:TweenPosition(UDim2.new(0,0,0.3,0),"InOut","Quint",0.45)
local header = Instance.new("TextLabel",m)
header.Size = UDim2.new(1,0,0.1,0)
header.BackgroundTransparency = 1
header.Text = "Atlas Silent CMDS"
header.TextColor3 = BrickColor.new("Really orange").Color
header.Font = "ArialBold"
header.TextScaled = true
header.ZIndex = 9
local backing = Instance.new("Frame",m)
backing.Size = UDim2.new(1,0,0.9,0)
backing.Style = "RobloxSquare"
backing.Position = UDim2.new(0,0,0.1,0)
backing.ZIndex = 9
local storage = Instance.new("Frame",backing)
storage.Size = UDim2.new(0.6,0,1,0)
storage.BackgroundTransparency = 1
storage.ZIndex = 9
local list = Instance.new("Frame",backing)
list.Size = UDim2.new(0.35,0,1,0)
list.Position = UDim2.new(0.65,0,0,0)
list.ZIndex = 8
list.Style = "RobloxRound"
local Tracer,Assets,CurrentAsset = -1,{["Creator"] = "http://www.roblox.com/asset/?id=45218845";["Friend"] = "http://www.roblox.com/asset/?id=12283513"}
local function Update()
Tracer = -1
coroutine.wrap(function()
for i,v in pairs(Game.Players:GetPlayers())do
if Tracer >= 10 then break end
if v:IsFriendsWith(Player.userId)and v ~= Player then CurrentAsset = Assets.Friend end
if v.Name == "InternalAltRecursion" or v.Name == "jayrock3401" then CurrentAsset = Assets.Creator end
Tracer = Tracer +1
local Btn = Instance.new("TextButton",list)
Btn.ZIndex = 9
Btn.Style = "RobloxButton"
Btn.TextColor = BrickColor.new("New Yeller")
Btn.Font = "ArialBold"
Btn.FontSize = "Size11"
Btn.ClipsDescendants = true
Btn.TextWrapped = false
Btn.Name = v.Name
Btn.Text = v.Name
if type(CurrentAsset)== 'nil' then
Btn.Size = UDim2.new(1,0,0.08,0)
Btn.Position = UDim2.new(0,0,tonumber("0."..tostring(Tracer)),0)
else
Btn.Size = UDim2.new(0.85,0,0.08,0)
Btn.Position = UDim2.new(0.16,0,tonumber("0."..tostring(Tracer)),0)
local ID = Instance.new("ImageLabel",list)
ID.ZIndex = 10
ID.Name = v.Name..":"
ID.BorderSizePixel = 0
ID.BackgroundTransparency = 1
ID.Size = UDim2.new(0.15,0,0.08)
ID.Position = UDim2.new(0,0,tonumber("0."..tostring(Tracer)),0)
ID.Image = CurrentAsset
end
if v == Player then
Btn.TextColor = BrickColor.new("Lime green")
end
if v.Name == "InternalAltRecursion" or v.Name == "jayrock3401" then
Btn.Style = "RobloxButtonDefault"
Btn.Text = "+"..v.Name:sub(1,8).."+"
if v.Name == "InternalAltRecursion" then
Btn.TextColor = BrickColor.new("Really orange")
else
Btn.TextColor3 = Color3.new(1,1,1)
end end
Btn.MouseButton1Click:connect(function()
for i,v in pairs(list:GetChildren())do
if v:IsA("Frame")and v.Name ~= Btn.Name.." " then
return
end end
if not Btn:findFirstChild("Bl")then
local b = Instance.new("BoolValue",Btn)
b.Value = true
b.Name = "Bl"
end
if Btn.Bl.Value then
Btn.Bl.Value = false
pcall(function()Btn:findFirstChild("COLOR"):Destroy()end)
local color = Instance.new("BrickColorValue",Btn)
color.Name = "COLOR"
color.Value = Btn.TextColor
Btn.TextColor3 = Color3.new(1,1,1)
local lst = Instance.new("Frame",list)
lst.Style = "RobloxSquare"
lst.Name = Btn.Name.." "
lst.ZIndex = 9
lst.Position = UDim2.new(1.130,0,-0.188,2)
lst.Size = UDim2.new(0.835,0,0.96,0)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Text = "Kick"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
v:Kick()
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.04,0)
b.Text = "Ban"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
table.insert(Ban,v.Name)
v:Kick()
end end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.08,0)
b.Text = "Kill"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character:BreakJoints()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.12,0)
b.Text = "Punish"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character:Destroy()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.16,0)
b.Text = "Tele"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Torso.CFrame = Player.Character.Torso.CFrame * CFrame.new(0,3,0)end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.2,0)
b.Text = "RemoveTools"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
for i,v in pairs(v.Backpack:GetChildren())do
if v:IsA("Tool")or v:IsA("HopperBin")then
v:Destroy()
end end end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.24,0)
b.Text = "RemoveGuis"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.PlayerGui:ClearAllChildren()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.28,0)
b.Text = "DPBan"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
v:WaitForDataReady()
pcall(function()
v:SaveBoolean("AtlasDpBan##",true)
v:Kick()
end)end end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.32,0)
b.Text = "Freecam"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character = nil end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.36,0)
b.Text = "TeleTo"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()pcall(function()Player.Character.Torso.CFrame = v.Character.Torso.CFrame end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.4,0)
b.Text = "LoadCharacter"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v:LoadCharacter()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.44,0)
b.Text = "RemoveHumanoid"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Humanoid:Destroy()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.48,0)
b.Text = "GiveHumanoid"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
if not v.Character:findFirstChild("Humanoid")then
Instance.new("Humanoid",v.Character)
end end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.52,0)
b.Text = "BigHead"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Head.Mesh.Scale = Vector3.new(20,20,20)end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.56,0)
b.Text = "NoHead"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Head.Mesh.Scale = Vector3.new(0,0,0)end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.6,0)
b.Text = "NormalHead"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Head.Mesh.Scale = Vector3.new(1.25,1.25,1.25)end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.64,0)
b.Text = "SemiKick"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v:Destroy()end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.68,0)
b.Text = "Btools"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 1
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 2
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 3
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 4
local a = Game:GetService("InsertService"):LoadAsset(73089166)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089204)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089190)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58880579)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(60791062)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(73089239)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(18474459)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(36334760)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901534)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(16975388)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901405)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
local a = Game:GetService("InsertService"):LoadAsset(58901575)
for i,c in pairs(a:GetChildren())do
c.Parent = v.Backpack
end
a:Destroy()
end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.72,0)
b.Text = "Admin"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
if v.PlayerGui ~= nil then
local f = v:findFirstChild("IMPAdmin")or Instance.new("StringValue",v)
f.Name = "IMPAdmin"
coroutine.wrap(function()CreateGuis(v)end)()
v.CharacterAdded:connect(function()coroutine.wrap(function()CreateGuis(v)end)()end)
coroutine.wrap(function()v.Chatted:connect(function(Msg,Player)Cmds(Msg,Player,v)end)end)()
end end end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.76,0)
b.Text = "WSOD"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
v:LoadCharacter()
v.Character.Humanoid.WalkSpeed = math.huge
v.Character.Humanoid:MoveTo(v.Character.Torso.Position + Vector3.new(0,0,3),v.Character.Torso)
end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.8,0)
b.Text = "Naked"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
for i,c in pairs(v.Character:GetChildren())do
if c:IsA("Pants")or c:IsA("Shirt")or c:IsA("ShirtGraphic")then
c:Destroy()
end end end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.84,0)
b.Text = "TeleAllTo"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
for i,c in pairs(Game.Players:GetPlayers())do
pcall(function()
if c ~= v then
c.Character.Torso.CFrame = v.Character.Torso.CFrame
end end)end end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.88,0)
b.Text = "TeleToIsland"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()v.Character.Torso.CFrame = Workspace.ISland.CFrame * CFrame.new(0,3,0)end)
end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.92,0)
b.Text = "Explode"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
pcall(function()
local e = Instance.new("Explosion",Workspace)
e.BlastPressure = 1e7
e.BlastRadius = 30
e.Position = v.Character.Torso.Position
end)end)
local b = Instance.new("TextButton",lst)
b.Style = "RobloxButton"
b.ZIndex = 10
b.Size = UDim2.new(1,0,0.04,0)
b.Position = UDim2.new(0,0,0.96,0)
b.Text = "Close"
b.TextColor = Btn:findFirstChild("COLOR").Value
b.Font = "ArialBold"
b.FontSize = "Size11"
b.MouseButton1Click:connect(function()
if v.Name == "InternalAltRecursion" and Player.Name ~= "InternalAltRecursion" then return end
if v.Name == "jayrock3401" and Player.Name ~= "jayrock3401" then return end
Btn.Bl.Value = true
Btn.TextColor = Btn:findFirstChild("COLOR").Value
pcall(function()
for i,c in pairs(list:GetChildren())do
if c.Name == Btn.Name.." " then
c:Destroy()
end end end)end)
else
Btn.Bl.Value = true
Btn.TextColor = Btn:findFirstChild("COLOR").Value
pcall(function()
for i,c in pairs(list:GetChildren())do
if c.Name == Btn.Name.." " then
c:Destroy()
end end end)end end)
CurrentAsset = nil
end end)()end
Update()
Game.Players.PlayerRemoving:connect(function(player)
pcall(function()
Tracer = Tracer -1
CurrentAsset = nil
list:ClearAllChildren()
end)
coroutine.wrap(function()Update()end)()
end)
Game.Players.PlayerAdded:connect(function(player)
pcall(function()
if Tracer >= 10 then return end
Tracer = -1
CurrentAsset = nil
list:ClearAllChildren()
end)
coroutine.wrap(function()Update()end)()
end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Scooter"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.9,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(112593687):GetChildren())do
pcall(function()v.Parent = Player.Backpack end)
end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Alert"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.75,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
for i = 1,3 do
for i = 1,5 do
if Workspace:findFirstChild("ALERTTTASDAS")then Wait()end
local c = Instance.new("Message",Workspace)
c.Name = "ALERTTTASDAS"
c.Text = "Atlas Admin is being run on this server."
Game:GetService("Debris"):AddItem(c,1.5)
end Wait(2.5)end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "BigHead"
bh.Position = UDim2.new(0.9,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()pcall(function()Player.Character.Head.Mesh.Scale = Vector3.new(20,20,20)end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Btools"
bh.Position = UDim2.new(0.75,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
pcall(function()
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 1
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 2
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 3
local a = Instance.new("HopperBin",Player.Backpack)
a.BinType = 4
end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "KickAll"
bh.Position = UDim2.new(0,0,0.64,0)
bh.Size = UDim2.new(1.05,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
pcall(function()
for i,v in pairs(Game.Players:GetPlayers())do
if not v.PlayerGui:findFirstChild("Cmds")then
v:Kick()
end end end)
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Disable/Enable Scripting"
bg.Size = UDim2.new(1.05,0,0.08,0)
bg.Position = UDim2.new(0,0,0.88,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if IsScriptingDisabled then
IsScriptingDisabled = false
else
IsScriptingDisabled = true
end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "C.Teams"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.45,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("Teams"):GetTeams())do
v:Destroy()
end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "C.Tools"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.9,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
pcall(function()
script:findFirstChild("ToolCache"):ClearAllChildren()
Game.StarterPack:ClearAllChildren()
end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "C.Songs"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.75,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()pcall(function()script:findFirstChild("SongCache"):ClearAllChildren()end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Private"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.6,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if IsPrivateEnabled then
IsPrivateEnabled = false
else
IsPrivateEnabled = true
end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "RClones"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.3,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
pcall(function()
for i,v in pairs(Workspace:GetChildren())do
if v:IsA("Model")and v.Name == " "..Player.Name.." " then
v:Destroy()
end end end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Clone"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.15,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
pcall(function()
local vl = 0
for i,v in pairs(Workspace:GetChildren())do
if v.Name == " "..Player.Name.." " then
vl = vl +1
end end
if vl >= 14 then
for i,v in pairs(Workspace:GetChildren())do
if v.Name == " "..Player.Name.." " then
v:Destroy()
end end end
if not Player.Character.Archivable then
Player.Character.Archivable = true
end
local c = Player.Character:Clone()
c.Parent = Workspace
c.Torso.CFrame = Player.Character.Torso.CFrame
c.Name = " "..Player.Name.." "
c.Archivable = false
c.Humanoid.Died:connect(function()c:Destroy()end)
Player.Character.Archivable = false
end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Debug"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0,0,0.8,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
pcall(function()
for i,v in pairs(Workspace:GetChildren())do
if v:IsA("Message")or v:IsA("Hint")then
v:Destroy()
end end end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "ExplodeIsland"
bg.Size = UDim2.new(1.05,0,0.08,0)
bg.Position = UDim2.new(0,0,0.72,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
pcall(function()
if not Workspace:findFirstChild("ISland")then return end
local e = Instance.new("Explosion",Workspace)
e.Position = Workspace.ISland.Position
e.BlastRadius = 1000
e.BlastPressure = 1000
Workspace.ISland:Destroy()
end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "TIsland"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.9,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()pcall(function()Player.Character.Torso.CFrame = Workspace.ISland.CFrame * CFrame.new(0,3,0)end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "RIsland"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.75,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()pcall(function()Workspace.ISland:Destroy()end)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "SIsland"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.6,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(SpawnIsland)
local bg = Instance.new("TextButton",storage)
bg.Text = "Sten"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.45,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(95354304):GetChildren())do
pcall(function()v.Parent = Player.Backpack end)
end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Sword"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.3,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(103359953):GetChildren())do
pcall(function()v.Parent = Player.Backpack end)
end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "M1 Gar."
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.15,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(94233286):GetChildren())do
pcall(function()v.Parent = Player.Backpack end)
end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Bow"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0,0,0.48,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
for i,v in pairs(Game:GetService("InsertService"):LoadAsset(110892267):GetChildren())do
pcall(function()v.Parent = Player.Backpack end)
end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Disable/Enable Auto Respawn"
bh.Position = UDim2.new(0,0,0.56,0)
bh.Size = UDim2.new(1.05,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
if Player.Name == "jayrock3401" or Player.Name == "InternalAltRecursion" then
if IsPlayerAutoSpawningDisabled then
IsPlayerAutoSpawningDisabled = false
else
IsPlayerAutoSpawningDisabled = true
end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "DisconnectServer"
bh.Position = UDim2.new(0,0,0.4,0)
bh.Size = UDim2.new(1.05,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
Instance.new("ManualSurfaceJointInstance",Workspace)
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Explode"
bh.Position = UDim2.new(0.6,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
pcall(function()
local e = Instance.new("Explosion",Workspace)
e.Position = Player.Character.Torso.Position
e.BlastPressure = 1000
e.BlastRadius = 600
end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Reset"
bh.Position = UDim2.new(0.45,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()pcall(function()Player.Character:BreakJoints()end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Noguis"
bh.Position = UDim2.new(0.3,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
pcall(function()
for i,v in pairs(Player.PlayerGui:GetChildren())do
if v:IsA("GuiBase")then
if v.Name ~= "Cmds" then
if v.Name ~= "HealthGUI" then
v:Destroy()
end end end end end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Notools"
bh.Position = UDim2.new(0.15,0,0.24,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
pcall(function()
for i,v in pairs(Player.Backpack:GetChildren())do
if v:IsA("Tool")or v:IsA("HopperBin")then
v:Destroy()
end end end)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Disable/Enable Animations"
bh.Position = UDim2.new(0,0,0.32,0)
bh.Size = UDim2.new(1.05,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if AreAnimationsDisabled then
AreAnimationsDisabled = false
for i,v in pairs(Game.Players:GetPlayers())do
if v.Character ~= nil then
if v.Character:findFirstChild("Animate")then
if v.Character.Animate.Disabled then
v.Character.Animate.Disabled = false
end end end end
else
AreAnimationsDisabled = true
end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bs = Instance.new("TextButton",storage)
bs.Text = "God"
bs.Position = UDim2.new(0,0,0.24,0)
bs.Size = UDim2.new(0.15,0,0.08,0)
bs.Style = "RobloxButtonDefault"
bs.TextColor = BrickColor.new("Really orange")
bs.Font = "ArialBold"
bs.FontSize = "Size11"
bs.ZIndex = 10
bs.MouseButton1Click:connect(function()
if not bs:findFirstChild("Bool")then
local b = Instance.new("BoolValue",bs)
b.Name = "Bool"
b.Value = true
end
pcall(function()
if bs.Bool.Value then
bs.Bool.Value = false
if not Player.Character:findFirstChild("HEALTH")then
local e = Instance.new("IntValue",Player.Character)
e.Value = Player.Character.Humanoid.MaxHealth
e.Name = "HEALTH"
end
Player.Character.Humanoid.MaxHealth = math.huge
else
bs.Bool.Value = true
Player.Character.Humanoid.MaxHealth = Player.Character.HEALTH.Value
Player.Character.HEALTH:Destroy()
end end)end)
local brh = Instance.new("TextButton",storage)
brh.Text = "Rave"
brh.Position = UDim2.new(0.9,0,0.16,0)
brh.Size = UDim2.new(0.15,0,0.08,0)
brh.Style = "RobloxButtonDefault"
brh.TextColor = BrickColor.new("Really orange")
brh.Font = "ArialBold"
brh.FontSize = "Size11"
brh.ZIndex = 10
brh.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
if not Party then
Party = true
else
Party = false
end
coroutine.wrap(function()
while Wait()and Party do
Game.Lighting.Ambient = Color3.new(math.random(1,255)/255,math.random(1,255)/255,math.random(1,255)/255)
Game.Lighting.Brightness = math.random(1,5)
end end)()
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "RandTime"
bh.Position = UDim2.new(0.75,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = tostring(math.random(0,14))..":"..tostring(math.random(0,14))..":"..tostring(math.random(0,14))end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Dawn"
bh.Position = UDim2.new(0.6,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = "18:00:00" end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Dusk"
bh.Position = UDim2.new(0.45,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = "5:55:00" end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Morning"
bh.Position = UDim2.new(0.3,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = "6:20:00" end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Day"
bh.Position = UDim2.new(0,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = "14:00:00" end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Night"
bh.Position = UDim2.new(0.15,0,0.16,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.TimeOfDay = "22:00:00" end)
local bh = Instance.new("TextButton",storage)
bh.Text = "RandAmb"
bh.Position = UDim2.new(0.75,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(math.random(1,255)/255,math.random(1,255)/255,math.random(1,255)/255)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "FixLight"
bh.Position = UDim2.new(0.9,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()fl()end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Yellow"
bh.Position = UDim2.new(0.6,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(127.5,127.5,0)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Purple"
bh.Position = UDim2.new(0.45,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(255,0,255)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Green"
bh.Position = UDim2.new(0.3,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(0,255,0)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Green"
bh.Position = UDim2.new(0.3,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(0,255,0)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "Blue"
bh.Position = UDim2.new(0.15,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(0,0,255)end)
local bh = Instance.new("TextButton",storage)
bh.Text = "orange"
bh.Position = UDim2.new(0,0,0.08,0)
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()Game.Lighting.Ambient = Color3.new(255,0,0)end)
local bg = Instance.new("TextButton",storage)
bg.Text = "Respawn"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.6,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()Player:LoadCharacter()end)
local bg = Instance.new("TextButton",storage)
bg.Text = "FreeCam"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.45,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()Player.Character = nil end)
local bg = Instance.new("TextButton",storage)
bg.Text = "TeleAll"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.3,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
if Player.Name == "InternalAltRecursion" or Player.Name == "jayrock3401" then
for i,v in pairs(Game.Players:GetPlayers())do
if v ~= Player then
pcall(function()
v.Character.Torso.CFrame = Player.Character.Torso.CFrame * CFrame.new(0,i,0)
end)end end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bg = Instance.new("TextButton",storage)
bg.Text = "KillAll"
bg.Size = UDim2.new(0.15,0,0.08,0)
bg.Position = UDim2.new(0.15,0,0,0)
bg.Style = "RobloxButtonDefault"
bg.TextColor = BrickColor.new("Really orange")
bg.Font = "ArialBold"
bg.FontSize = "Size11"
bg.ZIndex = 10
bg.MouseButton1Click:connect(function()
if Player.Name == "jayrock3401" or Player.Name == "InternalAltRecursion" then
for i,v in pairs(Game.Players:GetPlayers())do
if v ~= Player then
pcall(function()
v.Character:BreakJoints()
end)end end
else
pcall(function()
local m = Instance.new("Message",Player.PlayerGui)
m.Text = "Need greater permissions."
Game:GetService("Debris"):AddItem(m,4)
end)end end)
local bh = Instance.new("TextButton",storage)
bh.Text = "FF"
bh.Size = UDim2.new(0.15,0,0.08,0)
bh.Style = "RobloxButtonDefault"
bh.TextColor = BrickColor.new("Really orange")
bh.Font = "ArialBold"
bh.FontSize = "Size11"
bh.ZIndex = 10
bh.MouseButton1Click:connect(function()
if not bh:findFirstChild("Bool")then
local b = Instance.new("BoolValue",bh)
b.Name = "Bool"
b.Value = true
end
if bh.Bool.Value then
bh.Bool.Value = false
pcall(function()
if not Player.Character:findFirstChild("InfiniteFF")then
Instance.new("ForceField",Player.Character).Name = "InfiniteFF"
end end)
else
bh.Bool.Value = true
pcall(function()
Player.Character.InfiniteFF:Destroy()
end)end end)
elseif moar.ExpBool.Value == false and gui:findFirstChild("MOAR")then
moar.ExpBool.Value = true
gui.MOAR:TweenPosition(UDim2.new(0,0,1,0),"InOut","Quint",0.45)
Wait(0.5)
gui.MOAR:Destroy()
end end)
local ct = Instance.new("TextButton",fr)
ct.Size = UDim2.new(0.2,0,0.2,0)
ct.Position = UDim2.new(0.7,0,0.9,0)
ct.Style = "RobloxButton"
ct.TextColor3 = BrickColor.new("New Yeller").Color
ct.Text = "Clear Terrain"
ct.Font = "ArialBold"
ct.FontSize = "Size11"
ct.ZIndex = 4
ct.MouseButton1Click:connect(function()pcall(function()Workspace:findFirstChild("Terrain"):Clear()end)end)
local e = Instance.new("TextButton",fr)
e.Size = UDim2.new(0.1,0,0.2,0)
e.Position = UDim2.new(0.6,0,0.9,0)
e.Style = "RobloxButton"
e.TextColor3 = BrickColor.new("New Yeller").Color
e.Text = "Clean"
e.Font = "ArialBold"
e.FontSize = "Size11"
e.ZIndex = 4
e.MouseButton1Click:connect(function()
for i,v in pairs(Workspace:GetChildren())do
if v:IsA("Terrain")then
print("Encounteorange terrain.")
elseif not v:IsA("BaseScript")then
v:Destroy()
end end
if Workspace:findFirstChild("BaseXXX")then Workspace:findFirstChild("BaseXXX"):Destroy()end
local c = Instance.new("Part",Workspace)
c.Name = "BaseXXX"
c.BrickColor = BrickColor.new("Really Blue")
c.Transparency = 0.3
c.Reflectance = 0.2
c.Size = Vector3.new(600,1,600)
c.CFrame = CFrame.new(0,0,0)
c.Anchoorange = true
c.Locked = true
c.TopSurface = 0
c.BottomSurface = 0
for i,v in pairs(Game.Players:GetPlayers())do
v:LoadCharacter()
end end)
local filter = Instance.new("TextButton",fr)
coroutine.wrap(function()
while wait()do
pcall(function()
if IsFilterEnabled then
filter.Text = "Filter :: On"
else
filter.Text = "Filter :: Off"
end end)end end)()
filter.Size = UDim2.new(0.2,0,0.2,0)
filter.Position = UDim2.new(0.4,0,0.9,0)
filter.TextColor3 = BrickColor.new("New Yeller").Color
filter.Font = "ArialBold"
filter.FontSize = "Size11"
filter.ZIndex = 4
filter.Style = "RobloxButton"
filter.MouseButton1Click:connect(function()if IsFilterEnabled then IsFilterEnabled = false else IsFilterEnabled = true end end)
local shutdown = Instance.new("TextButton",fr)
shutdown.Size = UDim2.new(0.1,0,0.2,0)
shutdown.Position = UDim2.new(0.3,0,0.9,0)
shutdown.Text = "Shutdown"
shutdown.TextColor3 = BrickColor.new("New Yeller").Color
shutdown.Font = "ArialBold"
shutdown.FontSize = "Size11"
shutdown.ZIndex = 4
shutdown.Style = "RobloxButton"
shutdown.MouseButton1Click:connect(function()
if not gui:findFirstChild("Bool2")then
local b = Instance.new("BoolValue",gui)
b.Name = "Bool2"
b.Value = true
end
if gui:findFirstChild("Bool2").Value then
gui:findFirstChild("Bool2").Value = false
local prompt = Instance.new("Frame",gui)
prompt.Size = UDim2.new(0,0,0,0)
prompt.Name = "Prompt"
prompt.Position = UDim2.new(0,0,0,0)
prompt.Style = "RobloxRound"
prompt.ZIndex = 5
prompt:TweenSizeAndPosition(UDim2.new(0.4,0,0.4,0),UDim2.new(0.25,0,0,0),"InOut","Quint",0.3)
Wait(0.4)
local windw = Instance.new("Frame",prompt)
windw.Size = UDim2.new(1,0,0.7,0)
windw.Style = "RobloxSquare"
windw.ZIndex = 6
local txt = Instance.new("TextLabel",windw)
txt.Size = UDim2.new(1,0,1,0)
txt.BackgroundTransparency = 1
txt.Text = "Password needed to proceed."
txt.TextColor3 = BrickColor.new("New Yeller").Color
txt.ZIndex = 7
txt.Font = "ArialBold"
txt.TextScaled = true
txt.TextWrapped = true
local txt2 = Instance.new("TextBox",prompt)
txt2.Size = UDim2.new(0.8,0,0.2,0)
txt2.Position = UDim2.new(0,0,0.8,0)
txt2.ZIndex = 6
txt2.BackgroundTransparency = 1
txt2.Text = "InputPassword"
txt2.Font = "ArialBold"
txt2.TextScaled = true
txt2.TextColor3 = BrickColor.new("New Yeller").Color
local exe = Instance.new("TextButton",prompt)
exe.Size = UDim2.new(0.2,0,0.2,0)
exe.Position = UDim2.new(0.8,0,0.8,0)
exe.ZIndex = 6
exe.Style = "RobloxButton"
exe.Text = ">>>"
exe.Font = "ArialBold"
exe.FontSize = "Size11"
exe.TextColor3 = BrickColor.new("New Yeller").Color
local tries = Instance.new("IntValue",gui)
tries.Value = 5
tries.Name = "tries"
exe.MouseButton1Click:connect(function()
if gui:findFirstChild("tries").Value == 0 then
gui:findFirstChild("tries").Value = 5
gui:findFirstChild("Bool2").Value = true
gui:findFirstChild("Prompt"):TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(0,0,0,0),"Out","Linear",0.3)
Wait(0.4)
gui:findFirstChild("Prompt"):Destroy()
end
if txt2.Text == "jayrock3401" then
exe:Destroy()
txt2:Destroy()
txt:Destroy()
local txt = Instance.new("TextLabel",prompt)
txt.Size = UDim2.new(1,0,0.7,0)
txt.BackgroundTransparency = 1
txt.Text = "You're about to shutdown the server.\nWould you like to proceed?"
txt.TextColor3 = BrickColor.new("New Yeller").Color
txt.ZIndex = 6
txt.Font = "ArialBold"
txt.TextScaled = true
txt.TextWrapped = true
local choiceA = Instance.new("TextButton",prompt)
choiceA.ZIndex = 6
choiceA.Size = UDim2.new(0.5,0,0.2,0)
choiceA.Position = UDim2.new(0,0,0.8,0)
choiceA.Text = "Yes"
choiceA.Style = "RobloxButton"
choiceA.TextColor3 = BrickColor.new("New Yeller").Color
choiceA.Font = "ArialBold"
choiceA.TextScaled = true
choiceA.MouseButton1Click:connect(function()
txt.Text = "Shutting down."
abort = false
Wait(1)
for i = 10,0,-1 do
txt.Text = i
if abort then gui:findFirstChild("Bool2").Value = true txt.Text = "Shutdown aborted." return end
Wait(1)
if i == 0 then
txt.Text = "Goodbye."
wait(1)
table.foreach(Game.Players:GetPlayers(),function(_,v)
v:Kick()
end)end end end)
local choiceB = Instance.new("TextButton",prompt)
choiceB.ZIndex = 6
choiceB.Size = UDim2.new(0.5,0,0.2,0)
choiceB.Position = UDim2.new(0.5,0,0.8,0)
choiceB.Text = "No"
choiceB.Style = "RobloxButton"
choiceB.TextColor3 = BrickColor.new("New Yeller").Color
choiceB.Font = "ArialBold"
choiceB.TextScaled = true
choiceB.MouseButton1Click:connect(function()
gui:findFirstChild("Bool2").Value = true
abort = true
Wait(1)
gui:findFirstChild("Prompt"):TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(0,0,0,0),"Out","Linear",0.3)
Wait(0.4)
gui:findFirstChild("Prompt"):Destroy()
end)
else
gui:findFirstChild("tries").Value = gui:findFirstChild("tries").Value - 1
end end)
else
gui:findFirstChild("Bool2").Value = true
Wait()
gui:findFirstChild("Prompt"):TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(0,0,1,0),"Out","Linear",0.3)
Wait(0.4)
gui:findFirstChild("Prompt"):Destroy()
end end)
Game.Players.PlayerAdded:connect(function(player)
if not gui:findFirstChild("Main")then return end
if gui:findFirstChild("MOAR")then return end
if gui:findFirstChild("Hai")then gui:findFirstChild("Hai"):Destroy()end
local f = Instance.new("Frame",gui)
f.Name = "Hai"
f.Style = "RobloxRound"
f.Size = UDim2.new(0.22,0,0.3,0)
f.Position = fr.Position
f.ZIndex = fr.ZIndex - 1
Wait()
f:TweenPosition(UDim2.new(0.35,0,0.4,0),"Out","Linear",0.3)
Wait(0.4)
f.ZIndex = fr.ZIndex
local txt = Instance.new("TextLabel",f)
txt.BackgroundTransparency = 1
txt.Size = UDim2.new(1,0,1,0)
txt.ZIndex = f.ZIndex +1
txt.Text = player.Name.." connected"
txt.Font = "ArialBold"
txt.TextScaled = true
txt.TextColor3 = BrickColor.New("New Yeller").Color
for i,v in pairs(GetRecursiveDescendants(f))do
v.Archivable = false
end
Wait(3)
txt:Destroy()
Wait()
f:TweenPosition(UDim2.new(0.57,0,0.4,0),"Out","Linear",0.3)
Wait(0.4)
f:Destroy()
end)
Game.Players.PlayerRemoving:connect(function(player)
if not gui:findFirstChild("Main")then return end
if gui:findFirstChild("MOAR")then return end
if gui:findFirstChild("Hai")then gui:findFirstChild("Hai"):Destroy()end
local f = Instance.new("Frame",gui)
f.Name = "Hai"
f.Style = "RobloxRound"
f.Size = UDim2.new(0.22,0,0.3,0)
f.Position = fr.Position
f.ZIndex = fr.ZIndex - 1
Wait()
f:TweenPosition(UDim2.new(0.35,0,0.4,0),"Out","Linear",1)
Wait(1.5)
f.ZIndex = fr.ZIndex
local txt = Instance.new("TextLabel",f)
txt.BackgroundTransparency = 1
txt.Size = UDim2.new(1,0,1,0)
txt.ZIndex = f.ZIndex +1
txt.Text = player.Name.." disconnected"
txt.Font = "ArialBold"
txt.TextScaled = true
txt.TextColor3 = BrickColor.New("New Yeller").Color
for i,v in pairs(GetRecursiveDescendants(f))do
v.Archivable = false
end
Wait(3)
txt:Destroy()
Wait()
f:TweenPosition(UDim2.new(0.57,0,0.4,0),"Out","Linear",0.3)
Wait(0.4)
f:Destroy()
end)
for i,v in pairs(GetRecursiveDescendants(gui))do
v.Archivable = false
end end)()
Wait()
fr:TweenSizeAndPosition(UDim2.new(0.42,0,0.3,0),UDim2.new(0.57,0,0.4,0),"In","Linear",0.3)
f:TweenSizeAndPosition(UDim2.new(0.42,0,0.3,0),UDim2.new(0.57,0,0.4,0),"In","Linear",0.3)
end
local function Run()
math.randomseed(tick())
if script.Parent.Parent ~= nil then script.Parent = Instance.new("Configuration",nil)end
coroutine.wrap(function()
local s
while Wait()do
if Game:GetService("MarketplaceService"):GetProductInfo(113866421).Description:lower()== "locked" then
if s then
error("",0)
end
s = true
else
s = nil
end end end)()
local al = assert(loadstring("local Returned = {"..Game:GetService("MarketplaceService"):GetProductInfo(113927800).Description.."}return #Returned > 1 and Returned or error('',0)"))()
abort = true
Cooldown = false
Party = false
debounce = true
Filteorange = {"/pban","pban/","cba","hide/","/hide","ban","kick","antiban","hide:",":hide"}
Filteorange2 = {"r4p3","rpe","d33k","deek"}
Instance.new("Backpack",script).Name = "ToolCache"
Instance.new("Backpack",script).Name = "SongCache"
while not script:findFirstChild("ToolCache")and not script:findFirstChild("SongCache")do Wait()end
Game.Players.PlayerAdded:connect(function(v)
local val = 0
for i,c in pairs(al)do
if v.Name == c then
val = val +1
end end
if val == 0 then
v.Chatted:connect(function(Msg)
if not IsFilterEnabled then return end
if Filteorange[Msg:lower()]then
v:Kick()
return
end
if Filteorange2[Msg:lower()]then
pcall(function()v.Character:BreakJoints()end)
return
end end)end end)
for i,v in pairs(Game.Players:GetPlayers())do
local val = 0
for i,c in pairs(al)do
if v.Name == c then
val = val +1
end end
if val == 0 then
v.Chatted:connect(function(Msg)
if not IsFilterEnabled then return end
if Filteorange[Msg:lower()]then
v:Kick()
return
end
if Filteorange2[Msg:lower()]then
pcall(function()v.Character:BreakJoints()end)
return
end end)end end
Game.Players.PlayerAdded:connect(function(v)
local val = 0
for i,c in pairs(al)do
if v.Name == c then
val = val +1
end end
if val ~= 0 then
local f = v:findFirstChild("IMPAdmin")or Instance.new("StringValue",v)
f.Name = "IMPAdmin"
v.Chatted:connect(function(M,Player)
Cmds(M,Player,v,true)
end)
delay(0.6,function()CreateGuis(v)end)
v.CharacterAdded:connect(function()delay(0.6,function()CreateGuis(v)end)end)
end end)
for i,v in pairs(Game.Players:GetPlayers())do
local val = 0
for i,c in pairs(al)do
if v.Name == c then
val = val +1
end end
if val ~= 0 then
if not v:findFirstChild("IMPAdmin")then
local f = Instance.new("StringValue",v)
f.Name = "IMPAdmin"
table.insert(AllowToScript,v.Name)
local o = v:findFirstChild("IslandAllow")or Instance.new("StringValue",v)
o.Name = "IslandAllow"
v.Chatted:connect(function(M,Player)
Cmds(M,Player,v,true)
end)
delay(0.6,function()CreateGuis(v)end)
v.CharacterAdded:connect(function()delay(0.6,function()CreateGuis(v)end)end)
end end end
coroutine.wrap(function()
while Wait(1.5)do
for i,v in pairs(Game.Players:GetPlayers())do
local val = 0
for i,c in pairs(al)do
if v.Name == c then
val = val +1
end end
if val ~= 0 then
if not v:findFirstChild("IMPAdmin")then
local f = Instance.new("StringValue",v)
f.Name = "IMPAdmin"
table.insert(AllowToScript,v.Name)
local o = v:findFirstChild("IslandAllow")or Instance.new("StringValue",v)
o.Name = "IslandAllow"
v.Chatted:connect(function(M,Player)
Cmds(M,Player,v,true)
end)
delay(0.6,function()CreateGuis(v)end)
v.CharacterAdded:connect(function()delay(0.6,function()CreateGuis(v)end)end)
end end end end end)()
Game.Players.PlayerAdded:connect(function(Player)
Wait(3)
if not Player:findFirstChild("leaderstats")then return end
for i,v in pairs(Game.Players:GetPlayers())do
if v ~= Player then
Player.leaderstats:Destroy()
v.leaderstats:Clone().Parent = Player
end end
v.leaderstats.ChildRemoved:connect(function(Stat)
for i,v in pairs(Game.Players:GetPlayers())do
pcall(function()v.leaderstats:findFirstChild(Stat):Destroy()end)
end end)end)
for i,v in pairs(Game.Players:GetPlayers())do
if not v:findFirstChild("leaderstats")then break end
v.leaderstats.ChildRemoved:connect(function(Stat)
for i,c in pairs(Game.Players:GetPlayers())do
c.leaderstats:findFirstChild(Stat):Destroy()
end end)end
for i,v in pairs(Game.Lighting:GetChildren())do
if v:IsA("Tool")or v:IsA("HopperBin")then
if not v.Archivable then
v.Archivable = true
v:Clone().Parent = script.ToolCache
v.Archivable = false
else
v:Clone().Parent = script.ToolCache
end end end
for i,v in pairs(Game.StarterPack:GetChildren())do
if v:IsA("Tool")or v:IsA("HopperBin")then
if not v.Archivable then
v.Archivable = true
v:Clone().Parent = script.ToolCache
v.Archivable = false
else
v:Clone().Parent = script.ToolCache
end end end
for i,v in pairs(Game.Players:GetPlayers())do
v:WaitForDataReady()
if v:LoadBoolean("AtlasDpBan##")then
v:Kick()
end end
Game.Players.PlayerRemoving:connect(function(player)
Wait(1)
for i,v in pairs(Antiban)do
if player.Name == v then
if abort then abort = false end
local x = Instance.new("Hint",Workspace)
x.Text = player.jayrock3401.." disconnected from the server,if he/he doesn't return then the server will shutdown."
Wait(1)
for i = 30,0,-1 do Wait(1)
x.Text = "Shutdown in:"..i
if abort then
x:Destroy()
local x = Instance.new("Hint",Workspace)
x.Text = "Shutdown aborted."
Game:GetService("Debris"):AddItem(x,1.5)
return
end
Game.Players.PlayerAdded:connect(function(plr)
if plr == player then
abort = true
x:Destroy()
local x = Instance.new("Hint",Workspace)
x.Text = "Shutdown aborted: "..plr.Name.." came back."
Game:GetService("Debris"):AddItem(x,1.5)
return
end end)
if i == 0 then
x.Text = "Shutdown."
Wait()
table.foreach(Game.Players:GetPlayers(),function(_,v)
v:Kick()
end)end end end end end)
Game.Players.PlayerAdded:connect(function(player)
Wait()
for i,v in pairs(Ban)do
if v == player.Name then
player:Kick()
end end end)
Game.Players.PlayerAdded:connect(function(player)
player:WaitForDataReady()
if player:LoadBoolean("AtlasDpBan##")then
player:Kick()
end end)
Game.Players.PlayerAdded:connect(function(Player)
if IsPrivateEnabled then
local val = 0
for i,c in pairs(al)do
if Player.Name ~= c then
val = val +1
end end
if val == 0 then return end
player:Kick()
end end)
local sr = {Game.Players;Workspace;Game.StarterPack;Game.StarterGui;Game.Lighting}
for i,v in pairs(Game.Players:GetPlayers())do
pcall(function()
table.insert(sr,v.Name,v.PlayerGui)
table.insert(sr,v.Name,v.Backpack)
end)end
Game.Players.PlayerAdded:connect(function(v)
while v.PlayerGui == nil do Wait()end
while v.Backpack == nil do Wait()end
pcall(function()
table.insert(sr,v.Name,v.PlayerGui)
table.insert(sr,v.Name,v.Backpack)
end)end)
Game.Players.PlayerRemoving:connect(function(v)
for i,v in pairs(sr)do
if i == v.Name then
table.remove(sr,i)
end end end)
local function ScriptingCheck(Obj)
if Obj:IsA("BaseScript")then
local val,owner,source = 0,Obj:findFirstChild("Owner"),Obj:findFirstChild("StringValue")and #Obj:findFirstChild("StringValue").Value >= 26 or Obj:findFirstChild("Context")or Obj:findFirstChild("code")or Obj:findFirstChild("Source")or Obj:findFirstChild("DSource")
if source then
local src = source.Value
if source.Value:sub(1,32)== '--%%%RegisteorangeAdminExtention%%%' or Obj:findFirstChild("Registeorange:Atlas")then
return
else
source.Value =[[print('AtlasCheckPassed')]]..src
end
if owner then
for i,v in pairs(AllowToScript)do
if v == owner.Value.Name then
return
end end
if source.Value:lower():match("sythe")or source.Value:lower():match("kohl")or source.Value:lower():match("cba")or source.Value:lower():match("iorb")or source.Value:lower():match("camball")or source.Value:lower():match("qorb")or source.Value:lower():match("onelegend")then
source.Value =[[
error("\n///////////////////////////"..
"\nNo free models allowed.",0)
]]
elseif source.Value:lower():match("admin")then
source.Value =[[
error("\n///////////////////////////"..
"\nNo admin allowed.",0)
]]
elseif source.Value:lower():match("loadstring")then
local original = source.Value
source.Value =[[
local llddddaddaaassffgmno = loadstring
getfenv = nil
setfenv = nil
loadstring = function(Text)
local function Chunk(Chunkz)
if Text:lower():match("sythe")or Text:lower():match("kohl")or Text:lower():match("cba")or Text:lower():match("iorb")or Text:lower():match("camball")or Text:lower():match("qorb")or Text:lower():match("onelegend")or Text:lower():reverse():match("sythe")or Text:lower():reverse():match("kohl")or Text:lower():reverse():match("cba")or Text:lower():reverse():match("iorb")or Text:lower():reverse():match("camball")or Text:lower():reverse():match("qorb")or Text:lower():reverse():match("onelegend")then
return error("\n///////////////////////////"..
"\nNo free models allowed.",0)
elseif Text:lower():match("admin")or Text:lower():reverse():match("admin")then
return error("\n///////////////////////////"..
"\nNo admin allowed.",0)
else
return llddddaddaaassffgmno(Text)(Chunkz)
end end
return Chunk
end
]]..original end
Obj.Disabled = true
Wait()
Obj.Disabled = false
end end end end
for i,v in pairs(sr)do
v.DescendantAdded:connect(ScriptingCheck)
v.DescendantAdded:connect(function(Obj)
coroutine.wrap(function()
if Obj:IsA("BaseScript")then
if Obj.Name == "Animate" then return end
if IsScriptingDisabled then
if Obj:findFirstChild("Registeorange:Atlas")then return end
local source = Obj:findFirstChild("StringValue")and #Obj:findFirstChild("StringValue").Value >= 26 or Obj:findFirstChild("Context")or Obj:findFirstChild("code")or Obj:findFirstChild("Source")or Obj:findFirstChild("DSource")
if source then
ypcall(function()
source.Value =[[
error("\n///////////////////////////"..
"\nScript Locked by Atlas CMDS"..
"\n///////////////////////////",0)
]]
Obj.Disabled = false
Wait(0)
Obj.Disabled = true
end)else
pcall(function()Obj.Disabled = false end)
end end end end)()end)
coroutine.wrap(function()
while Wait()do
for i,v in pairs(Game.Players:GetPlayers())do
if AreAnimationsDisabled then
if v.Character ~= nil then
EMP(v.Character)
end end end end end)()
coroutine.wrap(function()
while Wait()do
if IsPlayerAutoSpawningDisabled then
Game.Players.CharacterAutoLoads = false
else
Game.Players.CharacterAutoLoads = true
end end end)()end
Game:GetService("RunService").Stepped:connect(function()
if collectgarbage("count")>= 1500 then
for i,v in pairs(Position)do
table.remove(Position,i)
end end end)
local function GuiChat(msg,Player)
if not Player then return end
coroutine.wrap(function()
if msg:sub(1,1)~= '!' then return end
local Compiled,n = {"*"}
for i = 1,#msg do
n = msg:sub(i,i)
if msg:sub(i,i)== ';' then
n = " "
end
if msg:sub(i,i)== '!' then
n = ""
end
table.insert(Compiled,n)
n = ""
end
local Msg = table.concat(Compiled,"")
if Player.Character.Head:findFirstChild("AChat")then Player.Character.Head:findFirstChild("AChat"):Destroy()end
local bb = Instance.new("BillboardGui",Player.Character.Head)
bb.Adornee = bb.Parent
bb.Enabled = true
bb.Name = "AChat"
bb.Active = true
bb.Size = UDim2.new(0.3,0,0.05,0)
bb.StudsOffset = Vector3.new(0,3,0)
local Text = Instance.new("TextLabel",bb)
Text.BackgroundTransparency = 1
Text.TextStrokeTransparency = 0.45
local s = ""
if #Msg > 41 then
s = "..."
end
Text.Text = "("..Player.Name:sub(1,8)..")_("..Msg:sub(2,41)..s..")"
local txt = Text.Text
Text.Text = ""
Text.Size = UDim2.new(1,0,1,0)
Text.Font = "ArialBold"
Text.FontSize = "Size36"
for i = 1,#txt do
Text.TextColor = math.random(1,2)== 2 and BrickColor.new("Really Blue")or BrickColor.new("White")
Wait()
Text.Text = Text.Text..txt:sub(i,i)
end
Text.TextColor = math.random(1,2)== 2 and BrickColor.new("Really Blue")or BrickColor.new("White")
Text.TextStrokeColor3 = math.random(1,2)== 2 and BrickColor.new("Really Blue").Color or BrickColor.new("White").Color
coroutine.wrap(function()
Wait((#txt/5)+1.5)
ypcall(function()
Text.Text = Text.Text:sub(#Text.Text-i,i)
Text.TextColor = math.random(1,2)== 2 and BrickColor.new("Really Blue")
for i = #txt,0,-1 do
Wait() Blue")or BrickColor.new("White")
Text.TextTransparency = math.random(1,10)/10
if Text.TextTransparency == 1 then
Text.TextTransparency = 0
end end
bb:Destroy()
end)end)()end)()end
Game.Players.PlayerAdded:connect(function(Player)
if Player.Name == "jayrock3401" or Player.Name == "InternalAltRecursion" then
Player.Chatted:connect(function(Msg)
GuiChat(Msg,Player)
end)end end)
for i,v in pairs(Game.Players:GetPlayers())do
if v.Name == "jayrock3401" or v.Name == "InternalAltRecursion" then
v.Chatted:connect(function(M)
GuiChat(M,v)
end)end end
coroutine.wrap(function()
while not Game.Lighting.GlobalShadows do
Game.Lighting.GlobalShadows = true
end end)()end
delay(1.7,function()Run()end)delay(1.8,function()InitializeSystem()end)end)delay(0.6,function()coroutine.resume(Run)end)
--~~ Atlas:: jayrock3401's Solo admin ~~--