FusedCore

--[[
Editing this script is prohibited, please close out of this script.
]]--
masterregistry = {
--Registered is the unified ranking list, setting someone to -1 bans them(you may copy and paste items)--
["Registered"] = {
--You can remove everything between here--
{["Name"] = "PenguinAnonymous",["Rank"] = 7,["Reason"] = "Creator"},
{["Name"] = "djdjdj",["Rank"] = 7,["Reason"] = "Alt"},
{["Name"] = "ttyyuu12345alt",["Rank"] = 7,["Reason"] = "Alt"},
{["Name"] = "ShutdownScript",["Rank"] = 7,["Reason"] = "Alt"},
{["Name"] = "randomnoobplayer",["Rank"] = 7,["Reason"] = "Alt"},
--You can remove everything between here--
},

["prefix"] = "", -- This is where you add a command prefix, so you dont confuse any other admin(s)(ex. "fc/")
["seperator"] = "/", -- This is to change what seperates the command from the player
["publicrank"] = 0, -- This is the rank a new player gets on enter
 -- These are codes for the forcerank command(you remove all items in this table but dont remove the table) --
["rankcodes"] = {
--You can remove everything between here--
{["Code"] = "reset", ["Rank"] = 0},
{["Code"] = "BottomFeeder", ["Rank"] = 1},
{["Code"] = "Eminem", ["Rank"] = 2},
{["Code"] = "August", ["Rank"] = 3},
{["Code"] = "July", ["Rank"] = 4},
{["Code"] = "CodeDuck", ["Rank"] = 5},
{["Code"] = "gizmo",["Rank"] = 6},
{["Code"] = "ruby123",["Rank"] = 7},
--You can remove everything between here--
},
--This is the list of songs you want to be avaliable in your game (you can remove everything in the list, but not the list)--
["musics"] = {
--You can remove everything between here--
{["Name"] = "radioactive - imagine dragons",["Id"] = 131111368},
{["Name"] = "demons - imagine dragons",["Id"] = 131261480},
{["Name"] = "gangnam style - psy",["Id"] = 130844430},
{["Name"] = "gentleman - psy",["Id"] = 131326102},
{["Name"] = "dark horse - katy perry",["Id"] = 143204341},
{["Name"] = "im not afraid - eminem",["Id"] = 131149175},
{["Name"] = "survival - eminem",["Id"] = 142289291},
{["Name"] = "bezerk - eminem",["Id"] = 136234242},
{["Name"] = "legacy - eminem",["Id"] = 135994449},
{["Name"] = "like toy soldiers - eminem",["Id"] = 142363151},
{["Name"] = "rabbit run - eminem",["Id"] = 150915667},
{["Name"] = "mockingbird - eminem",["Id"] = 143697568},
{["Name"] = "lose yourself - eminem",["Id"] = 153480949},
{["Name"] = "when im gone - eminem",["Id"] = 145904902},
{["Name"] = "the monster - eminem & rihanna",["Id"] = 142562463},
{["Name"] = "i need a doctor - eminem, skylar grey,& dr.dre",["Id"] = 150070669},
{["Name"] = "ridin dirty - chamillionaire",["Id"] = 143735700},
{["Name"] = "turn down for what - lil jon & dj snake",["Id"] = 143959455},
{["Name"] = "gas pedal - sage the germini",["Id"] = 142489916},
{["Name"] = "fun - plankton",["Id"] = 130783719},
{["Name"] = "breath - breaking benjamin",["Id"] = 146560049},
{["Name"] = "diary of jane - breaking benjamin",["Id"] = 142629195},
{["Name"] = "blow me away - breaking benjamin",["Id"] = 151357800},
{["Name"] = "final masquerade - linkin park",["Id"] = 161294056},
{["Name"] = "numb - linkin park",["Id"] = 145999367},
{["Name"] = "in the end - linkin park",["Id"] = 151673488},
{["Name"] = "what ive done - linkin park",["Id"] = 135932638},
{["Name"] = "papercut - linkin park",["Id"] = 139285763},
{["Name"] = "given up - linkin park",["Id"] = 156201446},
{["Name"] = "crawling - linkin park",["Id"] = 161097115},
{["Name"] = "faint - linkin park",["Id"] = 145997041},
{["Name"] = "monster - skillet",["Id"] = 143685579},
{["Name"] = "rebirthing - skillet",["Id"] = 143685579},
{["Name"] = "not gonna die - skillet",["Id"] = 157389309},
{["Name"] = "sick of it - skillet",["Id"] = 149736903},
{["Name"] = "phenomenon - thousand foot krutch",["Id"] = 147937794},
{["Name"] = "take it out on me - thousand foot krutch",["Id"] = 155780677},
{["Name"] = "the end is where we begin - thousand foot krutch",["Id"] = 157276054},
{["Name"] = "courtesy call - thousand foot krutch",["Id"] = 148510835},
--You can remove everything between here--
},
}
registered = masterregistry["Registered"] or {}
prefix = masterregistry["prefix"] or ""
seperator = masterregistry["seperator"] or "/"
publicrank = masterregistry["publicrank"] or 0
badwords = true
blockedwords = { }
rankcodes = masterregistry["rankcodes"] or {}
musics = masterregistry["musics"] or {}


playerfilters = { "all" , "others" , "me" , "noobs" , "mediumage" , "veterans" , "rank-(rank numer)"}
if script:findFirstChild("Sourcing") then
q=script:GetChildren()
for i=1,#q do
if q[i].className=="LocalScript" then
q[i]:Remove()
end
end
loadstring(script.Sourcing.Value)()
else
credits = {
"ttyyuu12345: Creator of admin script",
"FusedCore is based off of(not made from) person299's admin",
}
commands = {
{["Command"] = "exit",["Rank"] = 3},
{["Command"] = "ff/(player)",["Rank"] = 3},
{["Command"] = "unff/(player)",["Rank"] = 3},
{["Command"] = "sparkles/(player)",["Rank"] = 3},
{["Command"] = "unsparkles/(player)",["Rank"] = 3},
{["Command"] = "kill/(player)",["Rank"] = 4},
{["Command"] = "explode/(player)",["Rank"] = 5},
{["Command"] = "music/list",["Rank"] = 5},
{["Command"] = "music/stop",["Rank"] = 5},
{["Command"] = "music/(song name)",["Rank"] = 5},
{["Command"] = "invisible/(player)",["Rank"] = 3},
{["Command"] = "visible/(player)",["Rank"] = 3},
{["Command"] = "unlock/(player)",["Rank"] = 3},
{["Command"] = "lock/(player)",["Rank"] = 3},
{["Command"] = "freeze/(player)",["Rank"] = 4},
{["Command"] = "thaw/(player)",["Rank"] = 4},
{["Command"] = "removetools/(player)",["Rank"] = 5},
{["Command"] = "givebtools/(player)",["Rank"] = 2},
{["Command"] = "punish/(player)",["Rank"] = 5},
{["Command"] = "unpunish/(player)",["Rank"] = 5},
{["Command"] = "loopkill/(player)",["Rank"] = 5},
{["Command"] = "unloopkill/(player)",["Rank"] = 5},
{["Command"] = "heal/(player)",["Rank"] = 3},
{["Command"] = "sit/(player)",["Rank"] = 3},
{["Command"] = "jump/(player)",["Rank"] = 3},
{["Command"] = "trip/(player)",["Rank"] = 3},
{["Command"] = "jail/(player)",["Rank"] = 4},
{["Command"] = "unjail/(player)",["Rank"] = 4},
{["Command"] = "clearjail",["Rank"] = 4},
{["Command"] = "clone/(player)",["Rank"] = 3},
{["Command"] = "god/(player)",["Rank"] = 5},
{["Command"] = "ungod/(player)",["Rank"] = 5},
{["Command"] = "time/(number:TimeOfDay)",["Rank"] = 2},
{["Command"] = "teleport/(player1)/(player2)",["Rank"] = 5},
{["Command"] = "damage/(player)/(number:integer)",["Rank"] = 4},
{["Command"] = "rank/(player)/(number:integer)",["Rank"] = 6},
{["Command"] = "health/(player)/(number:integer)",["Rank"] = 4},
{["Command"] = "walkspeed/(player)/(number:integer)",["Rank"] = 3},
{["Command"] = "pm/(player)/(text)",["Rank"] = 1},
{["Command"] = "respawn/(player)",["Rank"] = 4},
{["Command"] = "kick/(player)",["Rank"] = 6},
{["Command"] = "ban/(player)",["Rank"] = 7},
{["Command"] = "unban/(player)",["Rank"] = 7},
{["Command"] = "m/(text)",["Rank"] = 2},
{["Command"] = "wordfilter/(on:off)",["Rank"] = 5},
{["Command"] = "get/registered",["Rank"] = 1},
{["Command"] = "get/playerfilters",["Rank"] = 1},
{["Command"] = "clear",["Rank"] = 6},
{["Command"] = "clearlight",["Rank"] = 6},
{["Command"] = "plon/(player)",["Rank"] = 5},
{["Command"] = "ploff/(player)",["Rank"] = 5},
{["Command"] = "mute/(player)",["Rank"] = 6},
{["Command"] = "demute/(player)",["Rank"] = 6},
{["Command"] = "crash/(player)",["Rank"] = 6},
}
if #seperator>=2 then
seperator = string.sub((seperator),1,1)
elseif #seperator==0 then
seperator = "/"
end
lscript = nil
lsourceval = nil
if script:findFirstChild("LocalSource") then
lscript = script:findFirstChild("LocalSource")
lsourceval = lscript:FindFirstChild("Source")
else
end
--Script Starts Here--
ver = "1.0.2b"
function Convert(str)
ival=Instance.new("IntValue",game.Workspace)
ival.Value = str
tt=ival.Value
ival:Remove()
return tt
end
adminscriptname = "FusedCore"
jails = {}
loopkilllist = {}
coroutine.resume(coroutine.create(function()
while wait() do
for i=1,#jails do
if jails[i]==nil then
table.remove(jails[i])
end
end
for i=1,#loopkilllist do
loopkilllist[i].Character:BreakJoints()
end
end
end))
function IsSource(val)
reportedsources = { "DSource" , "Source" }
trd=false
for i=1,#reportedsources do
if val.Name==reportedsources[i] then
trd = true
end
end
return trd
end
function CaptureSource()
going = true
if lscript == nil then
if lsourceval == nil then
local q=game:GetService("Players"):GetChildren()
for i=1,#q do
if going==true then
local r=q[i].Backpack:GetChildren()
for j=1,#r do
if going==true then
if r[j].className=="LocalScript" then
local s=r[j]:GetChildren()
if #s~=0 then
for k=1,#s do
if s[k].className=="StringValue" then
if not script:FindFirstChild("LocalSource") then
if IsSource(s[k])==true then
local t=r[j]:Clone()
t.Disabled = true
t.Parent = script
t.Name = "LocalSource"
lscript = t
lsourceval = lscript:findFirstChild(s[k].Name)
going = false
end
end
end
end
end
end
end
end
local r=q[i].Character:GetChildren()
for j=1,#r do
if going==true then
if r[j].className=="LocalScript" then
local s=r[j]:GetChildren()
if #s~=0 then
for k=1,#s do
if s[k].className=="StringValue" then
if not script:FindFirstChild("LocalSource") then
if IsSource(s[k])==true then
local t=r[j]:Clone()
t.Disabled = true
t.Parent = script
t.Name = "LocalSource"
lscript = t
lsourceval = lscript:findFirstChild(s[k].Name)
going = false
end
end
end
end
end
end
end
end
end
end
end
end
end
coroutine.resume(coroutine.create(function()
while wait() do
if lscript == nil then
if lsourceval==nil then
CaptureSource()
end
else
break
end
end
end))
function cls(player, scri)
if lscript~=nil then
if lsourceval~=nil then
local d=lscript:Clone()
d.Disabled = true
if player.Backpack~=nil then
d.Parent = player.Backpack
elseif player.Character~=nil then
d.Parent = player.Character
elseif player.PlayerGui~=nil then
d.Parent = player.PlayerGui
end
local e=d:findFirstChild(lsourceval.Name)
e.Value = scri
if d.Parent~=nil then
d.Disabled = false
end
end
end
end
playerlist = {}
chatconnectlist = {}
ambient = game:GetService("Lighting").Ambient
timeofday = game:GetService("Lighting").TimeOfDay
function cs(par,scri)
local scri1=script:Clone()
scri1.Disabled = true
scri1.Parent = par
local scri2=Instance.new("StringValue",scri1)
scri2.Name = "Sourcing"
scri2.Value = scri
scri1.Disabled = false
end
function SplitMessageC(mess, char)
num=nil
if char==nil then
char = seperator
end
for i=1,#mess do
if string.sub((mess),i,i)==char then
num = i
end
end
return num
end
function SplitMessage(mess, char)
local n1 = nil
local n2 = nil
if char==nil then
char = seperator
end
for i=1,#mess do
if string.sub((mess),i,i)==char then
n1 = string.sub((mess),1,i-1)
n2 = string.sub((mess),i+1)
end
end
return n1,n2
end
function Jail(player)
local a=Instance.new("Model",game:GetService("Lighting"))
a.Name = player.Name .. "'s Jail"
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,0.5900000333786,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = true
b.Archivable = true
b.CanCollide = true
b.Locked = true
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,13)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,1.7900000810623,151.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,1.7900000810623,139.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-29.5,1.7900000810623,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,1.2000000476837,11)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-15.5,1.7900000810623,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,1.2000000476837,11)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-15.5,5.3899998664856,151.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-15.5,5.3899998664856,139.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-29.5,5.3899998664856,139.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-29.5,5.3899998664856,151.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-29.5,8.9899997711182,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,1.2000000476837,11)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,8.9899997711182,139.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-15.5,8.9899997711182,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(1,1.2000000476837,11)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,8.9899997711182,151.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Part"
b.Position = Vector3.new(-22.5,10.189999580383,145.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(15,1.2000000476837,13)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.63921570777893,0.63529413938522,0.64705884456635))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0
b.Name = "Telep"
b.Position = Vector3.new(-22,1.7900000810623,145)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(4,1.2000000476837,2)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.050980396568775,0.41176474094391,0.6745098233223))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0.5
b.Name = "Part"
b.Position = Vector3.new(-22.5,5.3899998664856,139.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(13,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.050980396568775,0.41176474094391,0.6745098233223))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0.5
b.Name = "Part"
b.Position = Vector3.new(-22.5,5.3899998664856,151.5)
b.Rotation = Vector3.new(-0,0,-0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(13,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.050980396568775,0.41176474094391,0.6745098233223))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0.5
b.Name = "Part"
b.Position = Vector3.new(-15.5,5.3899998664856,145.5)
b.Rotation = Vector3.new(0,90,0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(11,6,1)
b:MakeJoints()
local b=Instance.new("Part",a)
b.BrickColor = BrickColor.new(Color3.new(0.050980396568775,0.41176474094391,0.6745098233223))
b.Material = Enum.Material.Plastic
b.Reflectance = 0
b.Transparency = 0.5
b.Name = "Part"
b.Position = Vector3.new(-29.5,5.3899998664856,145.5)
b.Rotation = Vector3.new(0,90,0)
b.Anchored = false
b.Archivable = true
b.CanCollide = true
b.Locked = false
b.Elasticity = 0.5
b.FormFactor = Enum.FormFactor.Brick
b.Friction = 0.30000001192093
b.Shape = Enum.PartType.Block
b.Size = Vector3.new(11,6,1)
b:MakeJoints()
a.Parent = game.Workspace
a:MakeJoints()
a:MoveTo(player.Character:WaitForChild("Torso").Position)
player.Character:MoveTo(Vector3.new(a.Telep.Position.X,a.Telep.Position.Y+4, a.Telep.Position.Z))
table.insert(jails,a)
end
function CMessage(player, title, text)
local sgui = Instance.new("ScreenGui",player.PlayerGui)
sgui.Name = "Message"
local frame = Instance.new("Frame",sgui)
frame.BackgroundColor3 = Color3.new ( 109/255, 109/255, 109/255)
frame.Position = UDim2.new ( 0.5, -200, 0.5, -75)
frame.Size = UDim2.new ( 0, 400, 0, 150)
local title1 = Instance.new("TextLabel",frame)
title1.BackgroundColor3 = Color3.new ( 0, 0, 140/255)
title1.Size = UDim2.new ( 1, 0, 0.15, 0)
title1.Text = adminscriptname .. ".v" .. ver .. ".alert:" .. title
title1.TextColor3 = Color3.new ( 1, 1, 1)
title1.FontSize = "Size10"
title1.TextXAlignment = Enum.TextXAlignment.Left
local text1 = Instance.new("TextLabel",frame)
text1.BackgroundColor3 = Color3.new ( 0, 0, 140/255)
text1.BackgroundTransparency = 1
text1.Size = UDim2.new ( 0.9, 0, 0.5, 0)
text1.TextWrapped = true
text1.Position = UDim2.new ( 0, 0, 0.15, 0)
text1.Text = text
text1.TextColor3 = Color3.new ( 0, 0, 0)
text1.TextXAlignment = Enum.TextXAlignment.Left
text1.TextYAlignment = Enum.TextYAlignment.Top
text1.FontSize = "Size14"
local ok = Instance.new("TextButton",frame)
ok.BackgroundColor3 = Color3.new ( 109/255, 109/255, 109/255)
ok.Size = UDim2.new ( 0.5, 0, 0.3, 0)
ok.Position = UDim2.new ( 0.25, 0, 0.65, 0)
ok.Text = "OK"
ok.FontSize = Enum.FontSize.Size18
ok.TextColor3 = Color3.new ( 0, 0, 0)
ok.MouseButton1Click:connect(function()
ok.Parent.Parent:Remove()
end)
end
function CloneChar(player)
local Character = Instance.new("Model")
Character.Name = player.Name
Character.Parent = workspace
local Head = Instance.new("Part")
Head.Name = "Head"
Head.formFactor = 0
Head.Size = Vector3.new(2, 1, 1)
Head.TopSurface = 0
Head.BottomSurface = "Weld"
Head.BrickColor = BrickColor.new("White")
Head.Parent = Character
local Mesh = Instance.new("SpecialMesh")
Mesh.MeshType = "Head"
Mesh.Scale = Vector3.new(1.25, 1.25, 1.25)
Mesh.Parent = Head
local Face = Instance.new("Decal")
Face.Name = "face"
Face.Face = "Front"
Face.Texture = player.Character:WaitForChild("Head"):WaitForChild("face").Texture
Face.Parent = Head
local Torso = Instance.new("Part")
Torso.Name = "Torso"
Torso.formFactor = 0
Torso.Size = Vector3.new(2, 2, 1)
Torso.TopSurface = "Studs"
Torso.BottomSurface = "Inlet"
Torso.LeftSurface = "Weld"
Torso.RightSurface = "Weld"
Torso.BrickColor = BrickColor.new("Really black")
Torso.Parent = Character
local TShirt = Instance.new("Decal")
TShirt.Name = "roblox"
TShirt.Face = "Front"
TShirt.Texture = ""
TShirt.Parent = Torso
local Limb = Instance.new("Part")
Limb.formFactor = 0
Limb.Size = Vector3.new(1, 2, 1)
Limb.TopSurface = "Studs"
Limb.BottomSurface = "Inlet"
Limb.BrickColor = BrickColor.new("White")
local LeftArm = Limb:Clone()
LeftArm.Name = "Left Arm"
LeftArm.Parent = Character
local RightArm = Limb:Clone()
RightArm.Name = "Right Arm"
RightArm.Parent = Character
local LeftLeg = Limb:Clone()
LeftLeg.Name = "Left Leg"
LeftLeg.Parent = Character
local RightLeg = Limb:Clone()
RightLeg.Name = "Right Leg"
RightLeg.Parent = Character
Character:BreakJoints()
local Neck = Instance.new("Motor6D")
Neck.Name = "Neck"
Neck.Part0 = Torso
Neck.Part1 = Head
Neck.C0 = CFrame.new(0, 2, 0)
Neck.C1 = CFrame.new(0, 0.5, 0)
Neck.MaxVelocity = 0
Neck.Parent = Torso
local LeftShoulder = Instance.new("Motor6D")
LeftShoulder.Name = "Left Shoulder"
LeftShoulder.Part0 = Torso
LeftShoulder.Part1 = LeftArm
LeftShoulder.C0 = CFrame.new(-1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
LeftShoulder.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
LeftShoulder.MaxVelocity = 0.5
LeftShoulder.Parent = Torso
local RightShoulder = Instance.new("Motor6D")
RightShoulder.Name = "Right Shoulder"
RightShoulder.Part0 = Torso
RightShoulder.Part1 = RightArm
RightShoulder.C0 = CFrame.new(1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
RightShoulder.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
RightShoulder.MaxVelocity = 0.5
RightShoulder.Parent = Torso
local LeftHip = Instance.new("Motor6D")
LeftHip.Name = "Left Hip"
LeftHip.Part0 = Torso
LeftHip.Part1 = LeftLeg
LeftHip.C0 = CFrame.new(-0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
LeftHip.C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
LeftHip.MaxVelocity = 0.1
LeftHip.Parent = Torso
local RightHip = Instance.new("Motor6D")
RightHip.Name = "Right Hip"
RightHip.Part0 = Torso
RightHip.Part1 = RightLeg
RightHip.C0 = CFrame.new(0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
RightHip.C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
RightHip.MaxVelocity = 0.1
RightHip.Parent = Torso
local Humanoid = Instance.new("Humanoid")
Humanoid.Parent = Character
Humanoid.WalkSpeed = 30
Character:MakeJoints()
Character:MoveTo(player.Character:WaitForChild("Torso").Position)
local PlCh=player.Character:GetChildren()
for i=1,#PlCh do
if PlCh[i].className=="BodyColors" then
PlCh[i]:clone().Parent = Character
end
if PlCh[i].className=="Shirt" then
PlCh[i]:clone().Parent = Character
end
if PlCh[i].className=="Pants" then
PlCh[i]:clone().Parent = Character
end
if PlCh[i].className=="Hat" then
PlCh[i]:clone().Parent = Character
end
if PlCh[i].className=="CharacterMesh" then
PlCh[i]:clone().Parent = Character
end
if PlCh[i].className=="ShirtGraphic" then
PlCh[i]:clone().Parent = Character
end
end
end
function GetRank(player,str)
if type(player)=="userdata" then
player = player.Name
elseif type(player)=="string" then
player = player
else
player = tostring(player)
end
rank=false
for _,rans in pairs(registered) do
if string.lower(rans["Name"])==string.lower(player) then
rank = rans["Rank"]
end
end
if str==nil then
return rank
elseif str==true then
return tostring(rank)
end
end
function SetRank(player, number, reason)
if reason==nil then
reason = "Unknown"
end
if type(player)=="userdata" then
player = player.Name
elseif type(player)=="string" then
player = player
else
player = tostring(player)
end
if tonumber(number)~=nil then
number = tonumber(number)
end
if GetRank(player)==false then
table.insert(registered, {["Name"] = player, ["Rank"] = number,["Reason"] = reason})
else
for _,rans in pairs(registered) do
if string.lower(rans["Name"])==string.lower(player) then
rans["Rank"] = number
rans["Reason"] = reason
ranked = true
end
end
end
end
function ForceRank(player)
local sguiname = "oitsn593035"
local ogui = player.PlayerGui:findFirstChild(sguiname)
if ogui==nil then
local sgui = Instance.new("ScreenGui",player.PlayerGui)
sgui.Name = sguiname
local frame = Instance.new("Frame",sgui)
frame.BackgroundColor3 = Color3.new ( 109/255, 109/255, 109/255)
frame.Position = UDim2.new ( 0.5, -200, 0.5, -75)
frame.Size = UDim2.new ( 0, 400, 0, 150)
local title = Instance.new("TextLabel",frame)
title.BackgroundColor3 = Color3.new ( 0, 0, 140/255)
title.Size = UDim2.new ( 1, 0, 0.15, 0)
title.Text = "Enter your Rank's code."
title.TextColor3 = Color3.new ( 1, 1, 1)
title.TextXAlignment = Enum.TextXAlignment.Left
local code = Instance.new("TextBox",frame)
code.Name = "code"
code.BackgroundColor3 = Color3.new ( 1, 1, 1)
code.Position = UDim2.new (0.05, 0, 0.425, 0)
code.Size = UDim2.new ( 0.9, 0, 0.15, 0)
code.Text = "Enter your code in this box"
code.TextColor3 = Color3.new ( 0, 0, 0)
code.TextXAlignment = Enum.TextXAlignment.Left
local accept = Instance.new("TextButton",frame)
accept.BackgroundColor3 = Color3.new ( 1, 1, 1)
accept.Position = UDim2.new ( 0.05, 0, 0.8, 0)
accept.Size = UDim2.new ( 0.45, 0, 0.15, 0)
accept.TextColor3 = Color3.new ( 0, 0, 0)
accept.Text = "Submit Code"
accept.MouseButton1Click:connect(function()
for i,v in pairs(rankcodes) do
if accept.Parent.code.Text == v["Code"] then
SetRank(player,v["Rank"],"Code Entered")
CMessage(player,"System", "Your rank is set to " .. v["Rank"])
accept.Parent.Parent:Remove()
end
end
end)
local cancel = Instance.new("TextButton",frame)
cancel.BackgroundColor3 = Color3.new ( 1, 1, 1)
cancel.Position = UDim2.new ( 0.5, 0, 0.8, 0)
cancel.Size = UDim2.new ( 0.45, 0, 0.15, 0)
cancel.TextColor3 = Color3.new ( 0, 0, 0)
cancel.Text = "Cancel"
cancel.MouseButton1Click:connect(function()
cancel.Parent.Parent:Remove()
end)
end
end
function FindPlayer(string,speaker)
play = {}
if string=="me" then
table.insert(play,speaker)
elseif string=="all" then
play = game:GetService("Players"):GetChildren()
elseif string=="others" then
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if playerfinder[i]~=speaker then
table.insert(play,playerfinder[i])
end
end
elseif string.sub((string),1,5)=="rank-" then
num12 = string.sub((string),6)
playerfinder = game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
num1=tonumber(num12)
num2=tonumber(GetRank(playerfinder[i]))
if num1==num2 then
table.insert(play,playerfinder[i])
end
end
elseif string=="others" then
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if playerfinder[i]~=speaker then
table.insert(play,playerfinder[i])
end
end
elseif string=="noobs" then
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if playerfinder[i].AccountAge<=99 then
table.insert(play,playerfinder[i])
end
end
elseif string=="mediumage" then
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if playerfinder[i].AccountAge>=100 then
if playerfinder[i].AccountAge<=364 then
table.insert(play,playerfinder[i])
end
end
end
elseif string=="veterans" then
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if playerfinder[i].AccountAge>=365 then
table.insert(play,playerfinder[i])
end
end
else
playerfinder=game:GetService("Players"):GetChildren()
for i=1,#playerfinder do
if (string.find(string.lower(playerfinder[i].Name), string.lower(string))==1) then
table.insert(play,playerfinder[i])
end
end
for i=1,#play do
if play[i].className~="Player" then
table.remove(play,i)
end
end
if #play==0 then
CMessage(speaker,"System","That selection was not found")
end
if #play>=2 then
play = {}
CMessage(speaker,"System","That selection was ambigious")
end
end
return play
end
function GetList(player,title,tabl)
if player~=nil then
gue=player:WaitForChild("PlayerGui"):findFirstChild("EDuckGui")
if gue~=nil then
gue:Remove()
end
local gui=Instance.new("ScreenGui",player:WaitForChild("PlayerGui"))
gui.Name = "EDuckGui"
local frame=Instance.new("Frame",gui)
frame.BackgroundColor3 = Color3.new ( 109/255, 109/155, 109/155)
frame.Position = UDim2.new ( 0.5, -320, 0.5, -240)
frame.Size = UDim2.new ( 0, 640, 0, 480)
local scframe = Instance.new("ScrollingFrame",frame)
scframe.Position = UDim2.new (0, 0, 0.05, 0)
scframe.Size = UDim2.new ( 1, 0, 0.9, 0)
scframe.CanvasSize = UDim2.new ( 0, 0, 10, 0)
scframe.BackgroundColor3 = Color3.new ( 1, 1, 1)
local tl=Instance.new("TextLabel",frame)
tl.BackgroundColor3 = Color3.new ( 0, 0, 140/255)
tl.Position = UDim2.new ( 0, 0, 0, 0)
tl.Size = UDim2.new ( 1, 0, .05, 0)
tl.FontSize = "Size18"
tl.Text = title
tl.TextColor3 = Color3.new ( 1, 1, 1)
tl.TextXAlignment = "Left"
if #tabl==0 then
local tl=Instance.new("TextLabel",scframe)
tl.BackgroundTransparency = 1
tl.Position = UDim2.new ( 0, 0, 0, 0)
tl.Size = UDim2.new ( 1, -13, .0075, 0)
tl.FontSize = "Size14"
tl.Text = "No items in this list"
tl.TextColor3 = Color3.new ( 0, 0, 0)
tl.TextXAlignment = "Left"
else
for i=1,#tabl do
j=i-1
local tl=Instance.new("TextLabel",scframe)
tl.BackgroundTransparency = 1
tl.Position = UDim2.new ( 0, 0, j*.0075, 0)
tl.Size = UDim2.new ( 1, -13, .0075, 0)
tl.FontSize = "Size14"
tl.Text = tabl[i]
tl.TextColor3 = Color3.new ( 0, 0, 0)
tl.TextXAlignment = "Left"
end
end
local tb=Instance.new("TextButton",frame)
tb.BackgroundColor3 = Color3.new ( 109/255, 109/255, 109/255)
tb.BackgroundTransparency = 0
tb.Position = UDim2.new ( 0, 0, 0.95, 0)
tb.Size = UDim2.new ( 1, 0, .05, 0)
tb.FontSize = "Size18"
tb.Text = "Close"
tb.TextColor3 = Color3.new ( 0, 0, 0)
tb.MouseButton1Click:connect(function()
tb.Parent.Parent:Remove()
end)
end
end
function GetMenu(player,tabl, title)
if title==nil then
title = "Untitled menu"
end
if player~=nil then
gue=player:WaitForChild("PlayerGui"):findFirstChild("EDuckGui")
if gue~=nil then
gue:Remove()
end
local gui=Instance.new("ScreenGui",player:WaitForChild("PlayerGui"))
gui.Name = "EDuckGui"
local frame=Instance.new("Frame",gui)
frame.BackgroundColor3 = Color3.new ( 109/255, 109/155, 109/155)
frame.Position = UDim2.new ( 0.5, -320, 0.5, -240)
frame.Size = UDim2.new ( 0, 640, 0, 480)
local scframe = Instance.new("ScrollingFrame",frame)
scframe.Position = UDim2.new (0, 0, 0.05, 0)
scframe.Size = UDim2.new ( 1, 0, 0.9, 0)
scframe.CanvasSize = UDim2.new ( 0, 0, 10, 0)
scframe.BackgroundColor3 = Color3.new ( 1, 1, 1)
local tl=Instance.new("TextLabel",frame)
tl.BackgroundColor3 = Color3.new ( 0, 0, 140/255)
tl.Position = UDim2.new ( 0, 0, 0, 0)
tl.Size = UDim2.new ( 1, 0, .05, 0)
tl.FontSize = "Size18"
tl.Text = title
tl.TextColor3 = Color3.new ( 1, 1, 1)
tl.TextXAlignment = "Left"
if #tabl==0 then
local tl=Instance.new("TextLabel",scframe)
tl.BackgroundTransparency = 1
tl.Position = UDim2.new ( 0, 0, 0, 0)
tl.Size = UDim2.new ( 1, -13, .0075, 0)
tl.FontSize = "Size14"
tl.Text = "No items in this list"
tl.TextColor3 = Color3.new ( 0, 0, 0)
tl.TextXAlignment = "Left"
else
for i,v in pairs(tabl) do
j=i-1
local tl=Instance.new("TextButton",scframe)
tl.BackgroundColor3 = Color3.new ( 128/255, 128/255, 128/255)
tl.BackgroundTransparency = 0
tl.Position = UDim2.new ( 0, 0, j*.0075, 0)
tl.Size = UDim2.new ( 1, -13, .0075, 0)
tl.FontSize = "Size14"
tl.BorderSizePixel = 0
tl.Text = v["Name"]
tl.TextColor3 = Color3.new ( 0, 0, 0)
tl.TextXAlignment = "Center"
tl.MouseButton1Click:connect(function()
if v["Execute"]~=nil then
pcall(function()
loadstring([[local playe = game.Players:findFirstChild("]] .. player.Name .. [[")
]] .. v["Execute"])()
end)
end
end)
end
end
local tb=Instance.new("TextButton",frame)
tb.BackgroundColor3 = Color3.new ( 109/255, 109/255, 109/255)
tb.BackgroundTransparency = 0
tb.Position = UDim2.new ( 0, 0, 0.95, 0)
tb.Size = UDim2.new ( 1, 0, .05, 0)
tb.FontSize = "Size18"
tb.Text = "Close"
tb.TextColor3 = Color3.new ( 0, 0, 0)
tb.MouseButton1Click:connect(function()
tb.Parent.Parent:Remove()
end)
end
end
function GetTabs(player,tabl)
pcall(function()
tab = tabl
--[[
rank = GetRank(player)
]]--
rdf = false
for _,oi in pairs(tab) do
if oi["Name"]=="Exit" then
rdf = true
end
end
if rdf==false then
table.insert(tab,{["Name"] = "Exit", ["Execute"] = [[game.Workspace:findFirstChild(playe.Name .. "FusedAdminNameMenuHandler"):Remove() for i=1,#playermenus do if playermenus[i]==playe then table.remove(playermenus,i) end end]]})
end
local modbrick = game.Workspace:findFirstChild(player.Name .. "FusedAdminNameMenuHandler") or Instance.new("Model",game.Workspace)
modbrick.Name = player.Name .. "FusedAdminNameMenuHandler"
modbrick:ClearAllChildren()
for _,v in pairs(tab) do
local brick = Instance.new("Part",modbrick)
brick.Anchored = false
brick.Locked = true
brick.CanCollide = false
brick.TopSurface = 0
brick.BottomSurface = 0
brick.FormFactor = Enum.FormFactor.Custom
brick.Transparency = 0
brick.Size = Vector3.new( 1, 1, 1)
brick.BrickColor = BrickColor.new "Navy blue"
brick.Shape = "Ball"
local fire = Instance.new("Fire",brick)
fire.Color = Color3.new ( 85/255, 0, 1)
fire.SecondaryColor = Color3.new ( 1, 0, 0)
fire.Heat = 9
fire.Size = 3
local bgui = Instance.new("BillboardGui", brick)
bgui.Adornee = brick
bgui.Active = true
bgui.Enabled = true
bgui.Size = UDim2.new ( 0.3, 0, 0.1, 0)
bgui.ExtentsOffset = Vector3.new(0, 2, 0)
local tl = Instance.new("TextLabel",bgui)
tl.Text = v["Name"]
tl.TextColor3 = Color3.new ( 1, 1, 1)
tl.BackgroundTransparency = 1
tl.Size = UDim2.new ( 1, 0, 1, 0)
tl.Position = UDim2.new( 0, 0, 0, 0)
tl.FontSize = Enum.FontSize.Size10
local cd = Instance.new("ClickDetector",brick)
cd.MaxActivationDistance = 64
cd.MouseClick:connect(function(playe)
if playe.Name==player.Name then
if v["Execute"]~=nil then
loadstring([[
playe = game:GetService("Players"):findFirstChild("]] .. playe.Name .. [[")
]] .. v["Execute"])()
else
brick:Remove()
end
end
end)
end
end)
end
function IncrimentTabs(player,str)
local modbrick = game.Workspace:findFirstChild(player.Name .. "FusedAdminNameMenuHandler") or Instance.new("Model",game.Workspace)
modbrick.Name = player.Name .. "FusedAdminNameMenuHandler"
local brick = Instance.new("Part",modbrick)
brick.Anchored = false
brick.Locked = true
brick.CanCollide = false
brick.TopSurface = 0
brick.BottomSurface = 0
brick.FormFactor = Enum.FormFactor.Custom
brick.Transparency = 0
brick.Size = Vector3.new( 1, 1, 1)
brick.BrickColor = BrickColor.new "Navy blue"
brick.Shape = "Ball"
local fire = Instance.new("Fire",brick)
fire.Color = Color3.new ( 85/255, 0, 1)
fire.SecondaryColor = Color3.new ( 1, 0, 0)
fire.Heat = 9
fire.Size = 3
local bgui = Instance.new("BillboardGui", brick)
bgui.Adornee = brick
bgui.Active = true
bgui.Enabled = true
bgui.Size = UDim2.new ( 0.3, 0, 0.1, 0)
bgui.ExtentsOffset = Vector3.new(0, 2, 0)
local tl = Instance.new("TextLabel",bgui)
tl.Text = str
tl.TextColor3 = Color3.new ( 1, 1, 1)
tl.BackgroundTransparency = 1
tl.Size = UDim2.new ( 1, 0, 1, 0)
tl.Position = UDim2.new( 0, 0, 0, 0)
tl.FontSize = Enum.FontSize.Size10
local cd = Instance.new("ClickDetector",brick)
cd.MaxActivationDistance = 64
cd.MouseClick:connect(function(playe)
if playe.Name==player.Name then
brick:Remove()
end
end)
end
debvar = coroutine.create(function()
while wait() do
pcall(function()
local playermenus = game:GetService("Players"):GetChildren()
for j=1,#playermenus do
if game.Workspace:findFirstChild(playermenus[j].Name .. "FusedAdminNameMenuHandler")~=nil then
local allmodbrick = game.Workspace:findFirstChild(playermenus[j].Name .. "FusedAdminNameMenuHandler"):GetChildren()
for i=1,#allmodbrick do
local radius = 5 + (#allmodbrick*7)
if #allmodbrick>=10 then
radius = 1 + (#allmodbrick*.7)
elseif #allmodbrick>=2 then
radius = 3 + (#allmodbrick*.7)
else
radius = 5 + (#allmodbrick*7)
end
local tor = playermenus[j].Character:FindFirstChild("Torso")
if tor~=nil then
local pos = tor.CFrame
local x=math.cos(((i/#allmodbrick)-(0.5/#allmodbrick))*(math.pi*2))*radius
local y=0
local z=math.sin(((i/#allmodbrick)-(0.5/#allmodbrick))*(math.pi*2))*radius
local bp=allmodbrick[i]:FindFirstChild("BodyPosition") or Instance.new("BodyPosition",allmodbrick[i])
bp.position = pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
bp.maxForce = Vector3.new(math.huge, math.huge, math.huge)
end
end
end
end
end)
end
end)
coroutine.resume(debvar)
function IncrimentMenu(player,str)
local gui = player.PlayerGui:FindFirstChild("d0f9j234f092jf029j4f234f")
if gui==nil then
gui = Instance.new("ScreenGui",player.PlayerGui)
gui.Name = "d0f9j234f092jf029j4f234f"
end
local k = gui:GetChildren()
local hy = nil
if #k==0 then
hy = 1
else
hy = tonumber(k[#k].Name)+1
end
local tl = Instance.new("TextLabel",gui)
tl.BackgroundColor3 = Color3.new ( 1, 1, 1)
tl.BackgroundTransparency = 0.5
tl.BorderSizePixel = 0
tl.Name = tostring(hy)
local tlp = ((tonumber(hy)-1)*25)+5
tl.Position = UDim2.new ( 0, 0, 0, tlp)
tl.Size = UDim2.new ( 1, 0, 0, 25)
tl.Font = "SourceSans"
tl.FontSize = "Size24"
tl.Text = str
tl.TextColor3 = Color3.new ( 0, 0, 0)
game:GetService("Debris"):AddItem(tl,5)
end
function PlayMusic(name,speaker)
local soundd = game.Workspace:FindFirstChild("FusedCoreMusic")
if soundd~=nil then
soundd:Stop()
wait()
soundd:Remove()
end
sound = Instance.new("Sound",game.Workspace)
sound.Name = "FusedCoreMusic"
sound.PlayOnRemove = false
for _,mus in pairs(musics) do
if (string.find(string.lower(mus["Name"]), string.lower(name))==1) then
sound.SoundId = "http://www.roblox.com/asset/?id=" .. mus["Id"]
local pls = FindPlayer("all",speaker)
for i=1,#pls do
cls(pls[i],[[
game:GetService("ContentProvider"):Preload("http://www.roblox.com/asset/?id="]] .. mus["Id"] .. [[")
]])
end
sound:Play()
end
end
end
function GetCommandsFromRank(speaker, rank)
local num1 = 0+rank
local rants = {
}
for _,gr in pairs(commands) do
local rade = gr["Rank"] + 0
if rade==num1 then
table.insert(rants,{["Name"] = gr["Command"]})
end
end
table.insert(rants,{["Name"] = "Go back",["Execute"] = [[ GetMenu(playe, helpmenu)]]})
GetMenu(speaker, rants)
end
helpmenu = {
{["Name"] = "Say exit to dismiss"},
{["Name"] = "Say credits for creator information."},
{["Name"] = "Rank 1 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 1)]]},
{["Name"] = "Rank 2 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 2)]]},
{["Name"] = "Rank 3 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 3)]]},
{["Name"] = "Rank 4 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 4)]]},
{["Name"] = "Rank 5 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 5)]]},
{["Name"] = "Rank 6 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 6)]]},
{["Name"] = "Rank 7 Commands", ["Execute"] = [[GetCommandsFromRank(playe, 7)]]},
}
function PrefixCheck(str)
local bool = false
local endstring = ""
if (prefix=="")or(prefix==nil) then
bool = true
endstring = str
elseif string.sub((str),1,#prefix)==prefix then
bool = true
endstring = string.sub((str),#prefix+1)
end
return bool,endstring
end
function chat(msg, speaker)
if string.sub((msg),1,3)=="/e " then
msg = string.sub((msg),4)
end
boch,nmsg = PrefixCheck(msg)
if boch then
msg = nmsg
msgcase = msg
msg=string.lower(msg)
rank = GetRank(speaker)
if rank~=false then
if msg=="forcerank" then
ForceRank(speaker)
end
if msg=="about" then
local mess = { "About " .. adminscriptname, "Version " .. ver, "Created by ttyyuu12345", "Intergrated Functions" , "CMessage v4.2(ttyyuu12345)" , "ListView v3(ttyyuu12345)" , "Jail v1(ttyyuu12345)" , "PlayMusic v1(ttyyuu12345)" , "FCTabs v1(ttyyuu12345)" , "CharacterClone v1(ttyyuu12345)" , "RankForce v1(ttyyuu12345)" , "SourceAutoCapture v1(ttyyuu12345)" , "LSB v1(ttyyuu12345)" , "ISB v2(ttyyuu12345)"}
GetList(speaker, "About " .. adminscriptname, mess)
end
if string.sub((msg),1,6)=="music" .. seperator then
if rank>=5 then
if string.sub((msg),7)=="list" then
local musi = {
}
for _,md in pairs(musics) do
table.insert(musi,md["Name"])
end
GetList(speaker,"Song List",musi)
elseif string.sub((msg),7)=="stop" then
local mus = game.Workspace:GetChildren()
for i=1,#mus do
if mus[i].className=="Sound" then
print("Attempt")
mus[i]:Stop()
print("Attempt Over")
end
end
else
PlayMusic(string.sub((msg),7),speaker)
end
end
end
if string.sub((msg),1,3)=="ff" .. seperator then
if rank>=3 then
local player = string.sub((msg),4)
local pls=FindPlayer(player,speaker)
for i=1,#pls do
local f=Instance.new("ForceField",pls[i].Character)
end
end
end
if string.sub((msg),1,5)=="menu" .. seperator then
msg = string.sub((msg),6)
if msg=="kill" then
if rank>=5 then
local menu = {}
local p = game.Players:GetChildren()
for i=1,#p do
table.insert(menu,{["Name"] = p[i].Name,["Execute"] = [[local pl = game.Players:findFirstChild("]] .. p[i].Name .. [[") if pl~=nil then pl.Character:BreakJoints() end]]})
end
GetMenu(speaker,menu)
end
end
if msg=="respawn" then
if rank>=5 then
local menu = {}
local p = game.Players:GetChildren()
for i=1,#p do
table.insert(menu,{["Name"] = p[i].Name,["Execute"] = [[local pl = game.Players:findFirstChild("]] .. p[i].Name .. [[") if pl~=nil then pl:LoadCharacter() end]]})
end
GetMenu(speaker,menu)
end
end
end
if string.sub((msg),1,3)=="ft" .. seperator then
if rank>=7 then
local kr = string.sub((msgcase),4)
print(ypcall(function() loadstring(kr)() end))
end
end
if string.sub((msg),1,9)=="sparkles" .. seperator then
if rank>=3 then
local player = string.sub((msg),10)
local pls=FindPlayer(player,speaker)
for i=1,#pls do
if pls[i].Character:FindFirstChild("Torso") then
local f=Instance.new("Sparkles",pls[i].Character.Torso)
f.Enabled = true
f.SparkleColor = Color3.new(math.random(1,255)/255,math.random(1,255)/255,math.random(1,255)/255)
end
end
end
end
if string.sub((msg),1,11)=="unsparkles" .. seperator then
if rank>=3 then
local player = string.sub((msg),12)
local pls=FindPlayer(player,speaker)
for i=1,#pls do
if pls[i].Character:FindFirstChild("Torso") then
local f=pls[i].Character.Torso:GetChildren()
for j=1,#f do
if f[j].className=="Sparkles" then
f[j]:Remove()
end
end
end
end
end
end
if string.sub((msg),1,5)=="kill" .. seperator then
if rank>=4 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
pls[i].Character:BreakJoints()
end
end
end
if string.sub((msg),1,8)=="explode" .. seperator then
if rank>=5 then
local player = string.sub((msg),9)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local e=Instance.new("Explosion",pls[i].Character)
if pls[i].Character.Torso~=nil then
e.Position = pls[i].Character.Torso.Position
end
e.BlastRadius = 8
e.BlastPressure = 100000
end
end
end
if string.sub((msg),1,10)=="invisible" .. seperator then
if rank>=3 then
local player = string.sub((msg),11)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
pars[j].Transparency = 1
end
if pars[j].className=="Hat" then
if pars[j]:findFirstChild("Handle") then
pars[j].Handle.Transparency = 1
end
end
end
end
end
end
if string.sub((msg),1,7)=="unlock" .. seperator then
if rank>=3 then
local player = string.sub((msg),8)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
pars[j].Locked = false
end
if pars[j].className=="Hat" then
if pars[j]:findFirstChild("Handle") then
pars[j].Handle.Locked = false
end
end
end
end
end
end
if string.sub((msg),1,5)=="lock" .. seperator then
if rank>=3 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
pars[j].Locked = true
end
if pars[j].className=="Hat" then
if pars[j]:findFirstChild("Handle") then
pars[j].Handle.Locked = true
end
end
end
end
end
end
if string.sub((msg),1,5)=="unff" .. seperator then
if rank>=3 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="ForceField" then
pars[j]:Remove()
end
end
end
end
end
if string.sub((msg),1,7)=="freeze" .. seperator then
if rank>=4 then
local player = string.sub((msg),8)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
pars[j].Anchored = true
pars[j].Material = Enum.Material.Ice
end
if pars[j].className=="Humanoid" then
pars[j].WalkSpeed = 0
end
end
end
end
end
if string.sub((msg),1,5)=="thaw" .. seperator then
if rank>=4 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
pars[j].Anchored = false
pars[j].Reflectance = 0
pars[j].Material = Enum.Material.Plastic
end
if pars[j].className=="Humanoid" then
pars[j].WalkSpeed = 16
end
end
end
end
end
if string.sub((msg),1,8)=="visible" .. seperator then
if rank>=3 then
local player = string.sub((msg),9)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local pars = pls[i].Character:GetChildren()
for j=1,#pars do
if pars[j].className=="Part" then
if pars[j].Name~="HumanoidRootPart" then
pars[j].Transparency = 0
end
end
if pars[j].className=="Hat" then
if pars[j]:findFirstChild("Handle") then
pars[j].Handle.Transparency = 0
end
end
end
end
end
end
if string.sub((msg),1,12)=="removetools" .. seperator then
if rank>=5 then
local player = string.sub((msg),13)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
pls[i].Backpack:ClearAllChildren()
end
end
end
if string.sub((msg),1,11)=="givebtools" .. seperator then
if rank>=2 then
local player = string.sub((msg),12)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local hop=Instance.new("HopperBin",pls[i].Backpack)
hop.Name = "Copy"
hop.BinType = Enum.BinType.Clone
local hop=Instance.new("HopperBin",pls[i].Backpack)
hop.Name = "Move"
hop.BinType = Enum.BinType.GameTool
local hop=Instance.new("HopperBin",pls[i].Backpack)
hop.Name = "Delete"
hop.BinType = Enum.BinType.Hammer
local to=game:GetService("InsertService"):LoadAsset(16969792):GetChildren()
to[1].Parent = pls[i].Backpack
end
end
end
if string.sub((msg),1,7)=="punish" .. seperator then
if rank>=5 then
local player = string.sub((msg),8)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
pls[i].Character.Parent = game:GetService("Lighting")
end
end
end
if string.sub((msg),1,9)=="unpunish" .. seperator then
if rank>=5 then
local player = string.sub((msg),10)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
pls[i]:LoadCharacter()
end
end
end
if string.sub((msg),1,9)=="loopkill" .. seperator then
if rank>=5 then
local player = string.sub((msg),10)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
table.insert(loopkilllist,pls[i])
end
end
end
if string.sub((msg),1,11)=="unloopkill" .. seperator then
if rank>=5 then
local player = string.sub((msg),12)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
for j=1,#loopkilllist do
if pls[i]==loopkilllist[j] then
table.remove(loopkilllist,j)
end
end
end
end
end
if string.sub((msg),1,5)=="heal" .. seperator then
if rank>=3 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local hu=pls[i].Character:findFirstChild("Humanoid")
if hu~=nil then
hu.Health = hu.MaxHealth
end
end
end
end
if string.sub((msg),1,4)=="sit" .. seperator then
if rank>=3 then
local player = string.sub((msg),5)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local hu=pls[i].Character:findFirstChild("Humanoid")
if hu~=nil then
hu.Sit = true
end
end
end
end
if string.sub((msg),1,5)=="jump" .. seperator then
if rank>=3 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local hu=pls[i].Character:findFirstChild("Humanoid")
if hu~=nil then
hu.Jump = true
end
end
end
end
if string.sub((msg),1,5)=="trip" .. seperator then
if rank>=3 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local hu=pls[i].Character:findFirstChild("Humanoid")
if hu~=nil then
hu.PlatformStand = true
end
end
end
end
if string.sub((msg),1,5)=="jail" .. seperator then
if rank>=4 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
Jail(pls[i])
end
end
end
if string.sub((msg),1,7)=="unjail" .. seperator then
if rank>=4 then
local player = string.sub((msg),8)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
for j=1,#jails do
if jails[j].Name==pls[i].Name .. "'s Jail" then
jails[j]:Remove()
end
end
end
end
end
if msg=="clearjail" then
if rank>=4 then
for i=1,#jails do
if jails[i]~=nil then
jails[i]:Remove()
end
table.remove(jails,i)
end
end
end
if string.sub((msg),1,6)=="clone" .. seperator then
if rank>=3 then
local player = string.sub((msg),7)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
CloneChar(pls[i])
end
end
end
if string.sub((msg),1,4)=="god" .. seperator then
if rank>=5 then
local player = string.sub((msg),5)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local f=Instance.new("ForceField",pls[i].Character)
cs(pls[i].Character,[[
script.Name = "GodScript"
function touch(hit)
if game:GetService("Players"):GetPlayerFromCharacter(hit.Parent) then
if hit.Parent~=script.Parent then
hit.Parent:BreakJoints()
end
end
end
b=script.Parent:GetChildren()
for i=1,#b do
if b[i].className=="Part" then
b[i].Touched:connect(touch)
end
end
]])
local h=pls[i].Character:findFirstChild("Humanoid")
if h~=nil then
h.MaxHealth = math.huge
end
end
end
end
if string.sub((msg),1,6)=="ungod" .. seperator then
if rank>=5 then
local player = string.sub((msg),7)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
local f=pls[i].Character:GetChildren()
for i=1,#f do
if f[i].className=="ForceField" then
f[i]:Remove()
end
if f[i].Name=="GodScript" then
f[i]:Remove()
end
if f[i].ClassName=="Humanoid" then
f[i].MaxHealth = 100
end
end
end
end
end
if string.sub((msg),1,5)=="time" .. seperator then
if rank>=2 then
local time = string.sub((msg),6)
if pcall(function() game:GetService("Lighting").TimeOfDay = time end) then
else
CMessage(speaker,"System","You must use a valid TimeOfDay value")
end
end
end
if string.sub((msg),1,9)=="teleport" .. seperator then
if rank>=5 then
local msg1=string.sub((msg),10)
local play1,play2 = SplitMessage(msg1)
local player1 = FindPlayer(play1,speaker)
local player2 = FindPlayer(play2,speaker)[1]
for i=1,#player1 do
if player2~=nil then
local tor = player2.Character:findFirstChild("Torso")
if tor~=nil then
player1[i].Character:MoveTo(tor.Position)
end
end
end
end
end
if string.sub((msg),1,7)=="damage" .. seperator then
if rank>=4 then
local msg1=string.sub((msg),8)
local player,damage = SplitMessage(msg1)
damage = tonumber(damage)
pls = FindPlayer(player,speaker)
for i=1,#pls do
local hum = pls[i].Character:findFirstChild("Humanoid")
if hum~=nil then
if damage~=nil then
hum.Health = hum.Health - damage
end
end
end
end
end
if string.sub((msg),1,5)=="rank" .. seperator then
if rank>=6 then
local msg1=string.sub((msg),6)
local num=SplitMessageC(msg1)
if num==nil then
else
local n1 = num-1
local pl1 = string.sub((msg1),1,n1)
local n2=num+1
local num12 = string.sub((msg1),n2)
if num12~=nil then
local num1 = tonumber(num12)
local num2 = tonumber(rank-1)
local pls = FindPlayer(pl1,speaker)
if #pls==1 then
for i=1,#pls do
if (rank-1)>=GetRank(pls[i]) then
if num1<=num2 then
SetRank(pls[i],num1,"Admin ranked")
end
end
end
else
CMessage(speaker,"System", "This command only supports one player at a time")
end
end
end
end
end
if string.sub((msg),1,7)=="health" .. seperator then
if rank>=4 then
local msg1=string.sub((msg),8)
local num=SplitMessageC(msg1)
if num==nil then
else
local n1 = num-1
local pl1 = string.sub((msg1),1,n1)
local n2=num+1
local num1 = tonumber(string.sub((msg1),n2))
local pls = FindPlayer(pl1,speaker)
for i=1,#pls do
local h=pls[i].Character:findFirstChild("Humanoid")
if h~=nil then
if num1~=nil then
h.MaxHealth = num1
h.Health = h.MaxHealth
end
end
end
end
end
end
if string.sub((msg),1,10)=="walkspeed" .. seperator then
if rank>=3 then
local msg1=string.sub((msg),11)
local num=SplitMessageC(msg1)
if num==nil then
else
local n1 = num-1
local pl1 = string.sub((msg1),1,n1)
local n2=num+1
local num1 = tonumber(string.sub((msg1),n2))
local pls = FindPlayer(pl1,speaker)
for i=1,#pls do
local h=pls[i].Character:findFirstChild("Humanoid")
if h~=nil then
if num1~=nil then
h.WalkSpeed = num1
end
end
end
end
end
end
if string.sub((msg),1,3)=="pm" .. seperator then
if rank>=1 then
local msg1=string.sub((msg),4)
local msg1c=string.sub((msgcase),4)
local num=SplitMessageC(msg1)
if num==nil then
else
local n1 = num-1
local pl1 = string.sub((msg1),1,n1)
local n2=num+1
local mess = string.sub((msg1c),n2)
local pls = FindPlayer(pl1,speaker)
for i=1,#pls do
CMessage(pls[i],"Message." .. speaker.Name, mess)
end
end
end
end
if string.sub((msg),1,8)=="respawn" .. seperator then
if rank>=4 then
local player = string.sub((msg),9)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
pls[i]:LoadCharacter()
end
end
end
if msg=="exit" then
local rffde=game.Workspace:findFirstChild(speaker.Name ..  "FusedAdminNameMenuHandler")
if rffde~=nil then
rffde:Remove()
end
end
if string.sub((msg),1,5)=="kick" .. seperator then
if rank>=6 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
if (rank-1)>=GetRank(pls[i]) then
pls[i]:Kick()
end
end
end
end
if string.sub((msg),1,4)=="ban" .. seperator then
if rank>=7 then
local player = string.sub((msg),5)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
if (rank-1)>=GetRank(pls[i]) then
SetRank(pls[i],-1,"Admin banned")
pls[i]:Kick()
else
CMessage(speaker,"System", "You cannot do that!")
end
end
end
end
if msg=="clearmenu" then
if rank>=5 then
local pls = game:GetService("Players"):GetChildren()
for i=1,#pls do
local gdf = game.Workspace:FindFirstChild(pls[i].Name .. "FusedAdminNameMenuHandler")
if gdf~=nil then
gdf:Remove()
end
end
end
end
if string.sub((msg),1,6)=="unban" .. seperator then
if rank>=7 then
local player = string.sub((msg),7)
SetRank(player,0,"Unbanned")
end
end
if string.sub((msg),1,2)=="m" .. seperator then
if rank>=2 then
local mess=string.sub((msgcase),3)
local pls = FindPlayer("all",speaker)
for i=1,#pls do
CMessage(pls[i],"Message." .. speaker.Name, mess)
end
end
end
if msg=="help" then
if rank>=1 then
GetMenu(speaker,helpmenu)
end
end
if msg=="credits" then
GetList(speaker,"Credits",credits)
end
if msg=="wordfilter/on" then
if rank>=5 then
badwords = true
end
end
if msg=="wordfilter/off" then
if rank>=5 then
badwords = false
end
end
if string.sub((msg),1,4)=="get" .. seperator then
if rank>=1 then
local msg1=string.sub((msg),5)
if msg1=="playerfilters" then
GetList(speaker,"List of player filters", playerfilters)
end
if msg1=="registered" then
Regist = {
}
for _,rans in pairs(registered) do
table.insert(Regist,{["Name"] = rans["Name"], ["Execute"] = [[GetMenu(playe,{
{["Name"] = "Rank: " .. ]] .. rans["Rank"] .. [[},
{["Name"] = "Name: " .. "]] .. rans["Name"] ..[["},
{["Name"] = "Reasoning: " .. "]] .. rans["Reason"] ..[["},
{["Name"] = "Go Back", ["Execute"] = "GetMenu(playe, Regist)"}
})
]]})
end
GetMenu(speaker,Regist)
end
end
end
if msg=="clear" then
if rank>=6 then
local w=game.Workspace:GetChildren()
for i=1,#w do
if (w[i].Name~="TinySB") and (w[i]~=game.Workspace.CurrentCamera)and(w[i].className~="Terrain")and(w[i]~=script) then
if w[i].className=="Script" then
w[i].Disabled = true
end
w[i]:Remove()
end
end
local rr32=game:GetService("Players"):GetChildren()
for tt5=1,#rr32 do
rr32[tt5]:LoadCharacter()
end
local Base=Instance.new("Part",game.Workspace)
Base.Name="Base"
Base.Size=Vector3.new(600,1,600)
Base.BrickColor=BrickColor.new("Earth green")
Base.Anchored=true
Base.Locked=true
Base.TopSurface="Universal"
Base.CFrame=CFrame.new(Vector3.new(0,0,0))
end
end
if msg=="clearlight" then
if rank>=6 then
local light = game:GetService("Lighting"):GetChildren()
for i=1,#light do
light[i]:Remove()
end
end
end
if lscript~=nil then
if lsourceval~=nil then
if string.sub((msg),1,6)=="ploff" .. seperator then
if rank>=5 then
local player = string.sub((msg),7)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
cls(pls[i],[[
game:GetService("StarterGui"):SetCoreGuiEnabled(Enum.CoreGuiType.PlayerList,false)
]])
end
end
end
if string.sub((msg),1,5)=="plon" .. seperator then
if rank>=5 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
cls(pls[i],[[
game:GetService("StarterGui"):SetCoreGuiEnabled(Enum.CoreGuiType.PlayerList,true)
]])
end
end
end
if string.sub((msg),1,5)=="mute" .. seperator then
if rank>=6 then
local player = string.sub((msg),6)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
if (rank-1)>=GetRank(pls[i]) then
cls(pls[i],[[
game:GetService("StarterGui"):SetCoreGuiEnabled(Enum.CoreGuiType.Chat,false)
]])
end
end
end
end
if string.sub((msg),1,7)=="demute" .. seperator then
if rank>=6 then
local player = string.sub((msg),8)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
cls(pls[i],[[
game:GetService("StarterGui"):SetCoreGuiEnabled(Enum.CoreGuiType.Chat,true)
]])
end
end
end
if string.sub((msg),1,6)=="crash" .. seperator then
if rank>=6 then
local player = string.sub((msg),7)
local pls = FindPlayer(player,speaker)
for i=1,#pls do
if (rank-1)>=GetRank(pls[i]) then
cls(pls[i],[[
function NM()
m=Instance.new("ScreenGui",game:GetService("Players").LocalPlayer.PlayerGui)
m.Name = "BlueScreen"
f=Instance.new("Frame",m)
f.Size = UDim2.new ( 1, 0, 1, 0)
f.BackgroundColor3 = Color3.new ( 0, 0, 100/255)
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.05, 0)
t.FontSize = "Size18"
t.Text = "Your ROBLOX Client has encounted a major error and had to be shut down"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.1, 0)
t.FontSize = "Size18"
t.Text = "Here are some possible reasons for this:"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.15, 0)
t.FontSize = "Size18"
t.Text = "1.) You are some skid that came in and abused everybody!"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.2, 0)
t.FontSize = "Size18"
t.Text = "2.) You came in and brought your silly Free Models to the wrong SB!"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.25, 0)
t.FontSize = "Size18"
t.Text = "3.) A FusedCore admin doesn't like you!"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
t=Instance.new("TextLabel",f)
t.BackgroundTransparency = 1
t.Size = UDim2.new ( 0.98, 0, 0.05, 0)
t.Position = UDim2.new ( 0.01, 0, 0.3, 0)
t.FontSize = "Size18"
t.Text = "4.) Someone is abusing FusedCore"
t.TextColor3 = Color3.new ( 1, 1, 1)
t.TextXAlignment = "Left"
end
NM()
game:GetService("StarterGui"):SetCoreGuiEnabled(Enum.CoreGuiType.All, false)
wait(0.3)
repeat until pigsfly
]])
end
end
end
end
end
end
end
end
end
coroutine.resume(coroutine.create(function()
while wait() do
local fg=game:GetService("Players"):GetChildren()
for i=1,#fg do
if GetRank(fg[i])==-1 then
fg[i]:Kick()
end
end
end
end))
function chat2(msg, speaker)
if msg=="fix" then
local ffdr=game.Workspace:findFirstChild(speaker.Name .. "FusedAdminNameMenuHandler")
if ffdr~=nil then
ffdr:Remove()
end
fix(speaker)
end
end
function fix(player)
for i=1,#playerlist do
if playerlist[i]==player then
chatconnectlist[i]:disconnect()
table.remove(chatconnectlist,i)
table.remove(playerlist,i)
local connect1=player.Chatted:connect(function(msg) chat(msg, player) end)
k=#chatconnectlist+1
table.insert(chatconnectlist,k,connect1)
table.insert(playerlist,k,player)
end
end
end
function ChatEdit(player)
local connect1=player.Chatted:connect(function(msg) chat(msg, player) end)
local k=#chatconnectlist+1
table.insert(chatconnectlist,k,connect1)
table.insert(playerlist,k,player)
local connect2=player.Chatted:connect(function(msg) chat2(msg, player) end)
end
function OnEnter(player,note)
ChatEdit(player)
local RanK=GetRank(player)
if RanK==false then
SetRank(player,publicrank,"Public Rank")
end
local text4 = "Connected: " .. player.Name
if RanK==-1 then
text4 = "Failed attempt to connect: " .. player.Name
player:Kick()
end
if note==true then
local prd = FindPlayer("all",game:GetService("Players"):GetChildren()[1])
for i=1,#prd do
IncrimentMenu(prd[i],text4)
end
elseif note==false then
IncrimentMenu(player,"FusedCore v" .. ver .. " has loaded")
elseif note==nil then
end
if GetRank(player)>=1 then
CMessage(player,"System","Your rank is " .. GetRank(player) .. " say help for commands")
end
end
game:GetService("Players").PlayerAdded:connect(function(player) OnEnter(player, true) end)
local pl=game:GetService("Players"):GetChildren()
for i=1,#pl do
if pl[i].className=="Player" then
OnEnter(pl[i],false)
end
end
game:GetService("Players").PlayerRemoving:connect(function(player)
for i=1,#playerlist do
if playerlist[i]==player then
chatconnectlist[i]:disconnect()
table.remove(chatconnectlist, i)
table.remove(playerlist,i)
end
end
end)
--Script Ends Here--
end