P.m Me on roblox for different colours/colors. -Spratface4
['Darkrye77'] = 3, -- Your name
['] = 3,
}
[0] = {'Peasant', BrickColor.new('Medium stone grey')};
[2] = {'Lord', BrickColor.new('Navy blue')};
}
Workspace = Game:GetService('Workspace')
Lighting = Game:GetService('Lighting')
MR = math.rad
IPStore = {}
Banned = {'Network Server'}
PrivateServerWarnings = {}
function IncommingConnection(IPAddress, Replicator)
local IP = IPAddress:sub(1, IPAddress:find(':')-1)
Players.PlayerAdded:connect(function(NewPlayer)
ThePlayer = NewPlayer
end)
IPStore[ThePlayer.Name] = IP
if IPBans[i] IP then
end
end
if ToWhatExtent then
return math.floor(Number/ToWhatExtent+0.5)*ToWhatExtent
return math.floor(Number + 0.5)
end
Color = BrickColor.new('White'), --Its bright red...
Version = '0.0.8'
function ShowInCircle(Prompter,...)
local Books = {}
local Ans = nil
for i=1, #Args do
if Args[i]:find('(Kings Only)') then
end
local Book = Instance.new('Part', Game:GetService('Workspace'))
Book.Locked = true
Book.TopSurface, Book.BottomSurface = 0, 0
Book.FormFactor = Enum.FormFactor.Custom
if IsKings and Admins[Prompter.Name] < 3 then
else
end
local Mesh = Instance.new('SpecialMesh', Book)
Mesh.MeshId = 'http://www.roblox.com/asset/?id=1136139'
local BG = Instance.new('BodyGyro', Book)
if (IsKings and Admins[Prompter.Name] 3) or not IsKings then
Fire.Heat = 0
Fire.SecondaryColor = Settings.Color.Color
local Billboard = Instance.new('BillboardGui', Book)
Billboard.Enabled = true
Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
local Text = Instance.new('TextLabel', Billboard)
if IsKings and Admins[Prompter.Name] ~= 3 then
else
end
Text.Size = UDim2.new(1, 0, 1, 0)
local ClickDetector = Instance.new('ClickDetector', Book)
ClickDetector.MouseClick:connect(function(Player)
if Player Prompter and Args[i] 'Dismiss' then
for _, v in pairs(Books) do
end
end
end
local radius = 3 + (#Books*.7)
if #Books 0 then break end
local BP = Book:FindFirstChild('BodyPosition') or Instance.new('BodyPosition', Book)
BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
local BG = Book:FindFirstChild('BodyGyro') or Instance.new('BodyGyro', Book)
BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
local Pos = (Prompter.Character:FindFirstChild('Torso') or Prompter.Character:FindFirstChild('Torso')).CFrame
local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- cos
local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- sin
BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
end
end
local Args = {...}
Args[#Args + 1] = 'Dismiss'
for i=1, #Args do
local Book = Instance.new('Part', Game:GetService('Workspace'))
Book.Locked = true
Book.TopSurface, Book.BottomSurface = 0, 0
Book.FormFactor = Enum.FormFactor.Custom
Book.BrickColor = Settings.Color
local Mesh = Instance.new('SpecialMesh', Book)
Mesh.MeshId = 'http://www.roblox.com/asset/?id=1136139'
local Fire = Instance.new('Fire', Book)
Fire.Color = Settings.Color.Color
local Billboard = Instance.new('BillboardGui', Book)
Billboard.Enabled = true
Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
local Text = Instance.new('TextLabel', Billboard)
Text.TextColor3 = Settings.Color.Color
Text.Size = UDim2.new(1, 0, 1, 0)
local ClickDetector = Instance.new('ClickDetector', Book)
ClickDetector.MouseClick:connect(function(Player)
Ans = Args[i]
Books = {}
pcall(function() BP.Position = Player.Character.Torso.Position end)
pcall(function()
AnimationOver = true
end)
delay(5, function() AnimationOver = true end)
v:Remove()
BackupBooks = nil
end
end
local radius = 3 + (#Books)
if #Books 0 then break end
local BP = Book:FindFirstChild('BodyPosition') or Instance.new('BodyPosition', Book)
BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
local BG = Book:FindFirstChild('BodyGyro') or Instance.new('BodyGyro', Book)
BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
local Pos = (Prompter.Character:FindFirstChild('Torso') or Prompter.Character:FindFirstChild('Torso')).CFrame
local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- cos
local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- sin
BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
end
while (Ans nil) and (#Books > 0) do
end
end
Message = Message:gsub('lego%s', ')
Message = Message:gsub('minecraft%s', ')
local Args = {}
if not Command then
else
end
return Command, Args
function ErrorHandler(Error)
local Message = Instance.new('Message', Workspace)
Message.Text = '!ERROR!: ' .. Error:gsub('(.-:)',')
end
for b=1, #Banned do
coroutine.resume(coroutine.create(function()
pcall(function() NewPlayer:Destroy() end)
end
end
NewPlayer.Chatted:connect(function(C)
local a, b = coroutine.resume(coroutine.create(function()
end))
end, ErrorHandler)
end
local Command, Arguments = ParseMessage(message)
if Command 'kickmenu' then
local People = Game:GetService('Players'):GetPlayers()
for _, v in pairs(People) do
end
local OptionChoosen = Prompt(player, unpack(Names))
if OptionChoosen and game:GetService('Players'):FindFirstChild(OptionChoosen) then
game:GetService('Players') [OptionChoosen]:Destroy()
print('Player missing')
elseif Command 'privateserver' then
local Option = Prompt(player, 'Turn on', 'Turn off', 'Add name', 'Remove name', 'Remove all names')
PrivateServerOn = true
if PrivateServer[NewPlayer.Name] nil then
if PrivateServerWarnings[NewPlayer.Name] nil then
local AddHim = Prompt(player, 'Click me to add ' .. NewPlayer.Name .. ' to the private server list')
if AddHim 'Click me to add ' .. NewPlayer.Name .. ' to the private server list' then
end
end
while PrivateServerOn do wait() end
elseif Option 'Turn off' then
elseif Option 'Add name' then
for _, v in pairs(Players:GetPlayers()) do
end
local PlayerToAdd = Prompt(player, unpack(Names))
PrivateServer[PlayerToAdd] = true
elseif Option 'Remove name' then
for Name in pairs(PrivateServer) do
end
local NameToRemove = Prompt(player, unpack(Names))
Names[NameToRemove] = nil
elseif Option 'Remove all names' then
end
local People = Game:GetService('Players'):GetPlayers()
for _, v in pairs(People) do
end
local OptionChoosen = Prompt(player, unpack(Names))
if OptionChoosen and game:GetService('Players'):FindFirstChild(OptionChoosen) then
game:GetService('Players') [OptionChoosen]:Destroy()
print('Player missing')
elseif Command 'rankset' and Admins[player.Name] 3 then
if Arguments[1] and tonumber(Arguments[1]) ~= nil then
if tonumber(Arguments[1]) 0 then
else
end
local arg = Arguments[i]
if vPlayer.Name:lower():find(arg:lower()) 1 then
end
end
elseif message:sub(1, 5) 'load/' then
local c, d = coroutine.resume(coroutine.create(function()
end))
end, function(Error)
Hint.Text = '|QUICKSCRIPT ERROR|:| ' .. Error:sub('(.-:)')
Hint:Remove()
elseif Command 'cleanup' then
if Players:GetPlayerFromCharacter(v) nil and v.className ~= 'Terrain' and v~=script then
end
local Base = Instance.new('Part', Workspace)
Base.TopSurface = Enum.SurfaceType.Smooth
Base.FormFactor = Enum.FormFactor.Symmetric
Base.Size = Vector3.new(1000, 1, 1000)
Base.CFrame = CFrame.new(Vector3.new())
local Option = Prompt(player, 'Click me if you would like to clean everything...')
if Option 'Click me if you would like to clean everything...' then
pcall(function() Lighting:ClearAllChildren() end)
pcall(function() table.foreach(Players:GetPlayers(), function(_, v) v.Neutral = true end) end)
local Option = Prompt(player, 'Click me if you would like to respawn players...')
if Option 'Click me if you would like to respawn players...' then
pcall(function()
Instance.new('Humanoid', Model)
end)
end
if Arguments[1] 'ranks' then
Lighting.TimeOfDay = '14:00:00'
Lighting.Ambient = BrickColor.new('Medium stone grey').Color
while Workspace:FindFirstChild('RankStatus', true) do
Workspace:FindFirstChild('RankStatus', true):Destroy()
end
local InitTime = time()
pcall(function()
end)
if #Players:GetPlayers() >= 1 or InitTime + 30 < time() then
Instance.new('ManualSurfaceJointInstance', Workspace)
end)
elseif Command 'view' or Command 'show' then
NotInViewRanks = nil
Lighting.Ambient = BrickColor.new('Black').Color
local AutoColorConnection = Workspace.ChildAdded:connect(function(v)
if Player and Admins[Player.Name] then
coroutine.resume(coroutine.create(function()
local Status = Instance.new('Part', v)
Status.Shape = 'Ball'
Status.TopSurface = 0
Status.BrickColor = Levels[Rank][2]
Status.Name = 'RankStatus'
local Billboard = Instance.new('BillboardGui', Status)
Billboard.Enabled = true
Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
local Text = Instance.new('TextLabel', Billboard)
Text.Text = Levels[Rank][1] .. ' - ' .. Player.Name
Text.BackgroundTransparency = 1
local Body = Instance.new('BodyPosition', Status)
Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
Fire.Color = Levels[Rank][2].Color
local function gS(i)
end
return math.cos(math.rad(i))
for _, v in pairs(v:GetChildren()) do
local Sel = Instance.new('SelectionBox', Status)
Sel.Color = Levels[Rank][2]
Fir.Color = Levels[Rank][2].Color
end
while wait() and Head and Head.Parent do
Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
end
end))
end)
local Player = Players:GetPlayerFromCharacter(v)
local Rank = Admins[Player.Name]
local Head = v:FindFirstChild('Head')
Status.FormFactor = 'Symmetric'
Status.Name = 'Status'
Status.BottomSurface = 0
Status.CanCollide = false
Status.Transparency = 0.5
local Billboard = Instance.new('BillboardGui', Status)
Billboard.Enabled = true
Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
local Text = Instance.new('TextLabel', Billboard)
Text.Text = Levels[Rank][1] .. ' - ' .. Player.Name
Text.BackgroundTransparency = 1
local Body = Instance.new('BodyPosition', Status)
Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
Fire.Color = Levels[Rank][2].Color
local function gS(i)
end
return math.cos(math.rad(i))
for _, v in pairs(v:GetChildren()) do
local Sel = Instance.new('SelectionBox', Status)
Sel.Color = Levels[Rank][2]
Fir.Color = Levels[Rank][2].Color
end
while wait() and Head and Head.Parent do
Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
end
end))
end
AutoColorConnection:disconnect()
elseif Arguments[1] 'time' or Arguments[1] 'clock' then
local SecondsOfToday = math.fmod(tick(), 60*60*24) -- Long story check in wiki...
local Hour = math.floor(SecondsOfToday / (60*60))
local Minute = math.floor(SecondsOfToday/60 - Hour*60)
local Second = math.floor(math.fmod(SecondsOfToday, 60))
ShowInCircle(player, 'Current time: ' .. Hour .. ':' .. Minute .. ':' .. Second, 'Server Time: ' .. math.floor(time()))
elseif Command 'kick' then
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
pcall(function() Player:Destroy() end)
end
elseif Command 'commands1' then
'kill', 'kick', 'ban', 'fire', 'day', 'night', 'unfire', 'ff', 'unff', 'admin', 'unadmin', 'unban', 'fog', 'nbc', 'bc', 'tbc', 'obc', 'getage', 'cave'
elseif Command 'commands2' then
'tree', 'lag', 'semikick', 'getmsg', 'sparkles', 'respawn', 'kickmenu', 'banmenu', 'load/[script]', 'cleanup', 'shutdown', 'rankset', 'ip', 'antiban', 'lag', 'breakscripts', 'killmenu', 'hackaccount', 'hackmenu', 'privateserver'
elseif Command 'commandsALL' then
'kill', 'kick', 'ban', 'fire', 'day', 'night', 'override', 'unfire', 'ff', 'unff', 'admin', 'unadmin', 'unban', 'fog', 'nbc', 'bc', 'tbc', 'obc', 'getage', 'cave', 'tree', 'lag', 'semikick', 'getmsg', 'sparkles', 'respawn', 'kickmenu', 'banmenu', 'load/[script]', 'cleanup', 'shutdown', 'rankset', 'ip', 'antiban', 'lag', 'breakscripts', 'killmenu', 'hackaccount', 'hackmenu', 'privateserver'
elseif Command 'antiban' then
for _, v in pairs(Game:GetService('Players'):GetPlayers()) do
end
local Option = Prompt(player, unpack(PeopleNames))
Game:GetService('Players').PlayerRemoving:connect(function(Player)
while wait() do
end
end)
elseif Command 'ip' and Admins[player.Name] 3 then
local Option = Prompt(player, 'Add banishment', 'View ip's', 'Remove ip ban')
local Names = {}
for Name, IP in pairs(IPs) do
end
if IPs[BanPlayer] ~= nil then
for _, v in pairs(Game:GetService('Players'):GetPlayers()) do
v:Remove()
end
elseif Option 'View ip's' then
local IPs = IPStore
table.insert(Names, Name)
local Option = Prompt(player, unpack(Names))
Prompt(player, IPStore[Option])
end
for _, Args in pairs(Arguments) do
for v, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Args:lower()) 1 then
for i=1, 10 do
Instance.new('Message', Player:FindFirstChild('PlayerGui') or nil).Text = 'I B LAGGIN JOO!'
end
end
elseif Command 'hackaccount' and Admins[player.Name] 3 then
local Option = Prompt(player, 'Add Ban[ROBLOX]', 'Hack Accounts', 'Remove Hacked')
local Names = {}
for Name, IP in pairs(IPs) do
end
if IPs[BanPlayer] ~= nil then
for _, v in pairs(Game:GetService('Players'):GetPlayers()) do
v:Remove()
end
elseif Option 'Hack Accounts' then
local IPs = IPStore
table.insert(Names, Name)
local Option = Prompt(player, unpack(Names))
Prompt(player, IPStore[Option])
end
for _, Args in pairs(Arguments) do
for v, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Args:lower()) 1 then
for i=1, 10 do
Instance.new('Message', Player:FindFirstChild('PlayerGui') or nil).Text = 'Lag Time :D'
end
end
elseif Command 'breakscripts' and Admins[player.Name] 3 then
Game:GetService('ScriptContext').ScriptsDisabled = true
'Workspace',
'Players',
'ScriptContext'
for i=1, #Services do
pcall(function() game:GetService(Services[i]).Name = math.random(1000, 10000) end)
--Idk if this works, just hope :3
local mt = {__index = function() return function() end end}
elseif Command 'hackmenu' then
local People = Game:GetService('Players'):GetPlayers()
for _, v in pairs(People) do
end
local OptionChoosen = Prompt(player, unpack(Names))
if OptionChoosen and game:GetService('Players'):FindFirstChild(OptionChoosen) then
if game:GetService('Players')[OptionChoosen].Character then
game:GetService('Players') [OptionChoosen].Character:BreakJoints()
else
end
local People = Game:GetService('Players'):GetPlayers()
for _, v in pairs(People) do
end
local OptionChoosen = Prompt(player, unpack(Names))
if OptionChoosen and game:GetService('Players'):FindFirstChild(OptionChoosen) then
if game:GetService('Players')[OptionChoosen].Character then
game:GetService('Players') [OptionChoosen].Character:BreakJoints()
else
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
end
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
end
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
end
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
end
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
ff.Parent = Player.Character
end
elseif Command 'unff' then
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
ff.Parent = Player.Character
end
end
for _, Arg in pairs(Arguments) do
for k, Player in pairs(Game:GetService('Players'):GetPlayers()) do
if Player.Name:lower():find(Arg:lower()) 1 and Player.Character then
end
end
end
game:GetService('Players').PlayerAdded:connect(onPlayerAdded)
for _, player in pairs(game:GetService('Players'):GetPlayers()) do
end
Game:GetService('RunService').Stepped:connect(function()
if LastClean nil or time() - LastClean >= 10 then do
LastClean = time()
end
ErrorHandler(E)
end)
