Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Admins = {
- ["isalaga"] = 0,
- ["TaliaKayy44"] = 2,
- ["KoopaTroopaGames"] = 2,
- [""] = 3
- }
- Niveles locales = {
- [3] = {"Campesino", BrickColor.new ("Gris piedra medio")};
- [1] = {"Knight", BrickColor.new ("Verde brillante")};
- [2] = {"Lord", BrickColor.new ("Verde oscuro")};
- [0] = {"King", BrickColor.new ("Verde oscuro")}
- }
- Jugadores = Juego: GetService ("Jugadores")
- Workspace = Game: GetService ("Espacio de trabajo")
- Debris = Juego: GetService ("Debris")
- Iluminación = Juego: GetService ("Iluminación")
- Equipos = Juego: GetService ("Equipos")
- MR = math.rad
- MD = math.deg
- IPStore = {}
- IPBans = {}
- Banned = {"Servidor de red"}
- PrivateServer = {}
- PrivateServerWarnings = {}
- función IncommingConnection (IPAddress, Replicador)
- IP local = IPAddress: sub (1, IPAddress: find (":") - 1)
- local ThePlayer
- Players.PlayerAdded: connect (función (NewPlayer)
- si no ThePlayer entonces
- ThePlayer = NewPlayer
- fin
- fin)
- repita espera () hasta ThePlayer
- IPStore [ThePlayer.Name] = IP
- para i = 1, #IPBans do
- si IPBans [i] == IP entonces
- ThePlayer: Eliminar ()
- fin
- fin
- fin
- función Round (Number, ToWhatExtent)
- si ToWhatExtent entonces
- return math.floor (Number / ToWhatExtent + 0.5) * ToWhatExtent
- más
- return math.floor (Número + 0.5)
- fin
- fin
- Configuraciones = {
- Color = BrickColor.new ("Verde oscuro"), --Es rojo brillante ...
- Nombre = "ProLevi27 Scythe Admin",
- Versión = "0.0.8"
- }
- función ShowInCircle (Prompter, ...)
- Args local = {...}
- Libros locales = {}
- Args [#Args + 1] = "Descartar"
- Ans local = nil
- Rank local = Admins [Prompter.Name]
- para i = 1, #Args do
- IsKings locales
- si Args [i]: find ("(Kings Only)") entonces
- IsKings = cierto
- fin
- local Book = Instance.new ("Parte", Juego: GetService ("Espacio de trabajo"))
- Book.Anchored = falso
- Book.Locked = true
- Book.CanCollide = falso
- Book.TopSurface, Book.BottomSurface = 0, 0
- Libro.Transparencia = 0.5
- Book.FormFactor = Enum.FormFactor.Custom
- Book.Size = Vector3.new (2.3, 1, 3)
- si IsKings y Admins [Prompter.Name] <3 entonces
- Book.BrickColor = BrickColor.new ("Azul brillante")
- más
- Book.BrickColor = Settings.Color
- fin
- table.insert (Libros, Libro)
- Malla local = Instance.new ("SpecialMesh", Libro)
- Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
- Mesh.MeshType = "FileMesh"
- BG local = Instance.new ("BodyGyro", Libro)
- BP local = Instance.new ("BodyPosition", Libro)
- if (IsKings y Admins [Prompter.Name] == 3) o no IsKings entonces
- Fire local = Instance.new ("Fuego", Libro)
- Fire.Heat = 0
- Fire.Color = Settings.Color.Color
- Fire.SecondaryColor = Settings.Color.Color
- fin
- local Billboard = Instance.new ("BillboardGui", Libro)
- Billboard.Adornee = Libro
- Billboard.Enabled = true
- Billboard.Active = true
- Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
- Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
- texto local = Instance.new ("TextLabel", Billboard)
- Text.Text = Args [i]
- si IsKings y Admins [Prompter.Name] ~ = 3 entonces
- Text.TextColor3 = BrickColor.new ("Azul brillante"). Color
- más
- Text.TextColor3 = Settings.Color.Color
- fin
- Text.BackgroundTransparency = 1
- Text.Size = UDim2.new (1, 0, 1, 0)
- local ClickDetector = Instance.new ("ClickDetector", Libro)
- ClickDetector.MouseClick: connect (función (Reproductor)
- si Player == Prompter y Args [i] == "Descartar", entonces
- Ans = Args [i]
- para _, v en pares (Libros)
- v: Eliminar ()
- fin
- Libros = {}
- fin
- fin)
- fin
- coroutine.resume (coroutine.create (function ()
- radio local = 3 + (# Libros * .7)
- mientras espera () hacer
- si #Libros == 0 entonces rompe el final
- para _, libro en pares (libros) hacer
- BP local = Libro: FindFirstChild ("BodyPosition") o Instance.new ("BodyPosition", Libro)
- BP.maxForce = Vector3.new (1000000000, 1000000000, 1000000000)
- BG local = Libro: FindFirstChild ("BodyGyro") o Instance.new ("BodyGyro", Libro)
- BG.maxTorque = Vector3.new (1000000000, 1000000000, 1000000000)
- local Pos = (Prompter.Character: FindFirstChild ("Torso") o Prompter.Character: FindFirstChild ("Torso")). CFrame
- local x = math.cos ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi * 2) * radio - cos
- local y = 0
- local z = math.sin ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi * 2) * radio - 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)
- fin
- fin
- fin))
- fin
- función Prompt (Prompter, ...)
- Args local = {...}
- local Books = {} --Dismiss sounds cooler: 3
- Args [#Args + 1] = "Descartar"
- Ans local = nil
- para i = 1, #Args do
- local Book = Instance.new ("Parte", Juego: GetService ("Espacio de trabajo"))
- Book.Anchored = falso
- Book.Locked = true
- Book.CanCollide = falso
- Book.TopSurface, Book.BottomSurface = 0, 0
- Libro.Transparencia = 0.5
- Book.FormFactor = Enum.FormFactor.Custom
- Book.Size = Vector3.new (2.3, 1, 3)
- Book.BrickColor = Settings.Color
- table.insert (Libros, Libro)
- Malla local = Instance.new ("SpecialMesh", Libro)
- Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
- Mesh.MeshType = "FileMesh"
- Fire local = Instance.new ("Fuego", Libro)
- Fire.Heat = 0
- Fire.Color = Settings.Color.Color
- Fire.SecondaryColor = Settings.Color.Color
- local Billboard = Instance.new ("BillboardGui", Libro)
- Billboard.Adornee = Libro
- Billboard.Enabled = true
- Billboard.Active = true
- Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
- Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
- texto local = Instance.new ("TextLabel", Billboard)
- Text.Text = Args [i]
- Text.TextColor3 = Settings.Color.Color
- Text.BackgroundTransparency = 1
- Text.Size = UDim2.new (1, 0, 1, 0)
- local AttemptToFixPrompt = i
- local ClickDetector = Instance.new ("ClickDetector", Libro)
- ClickDetector.MouseClick: connect (función (Reproductor)
- si el jugador == Prompter luego
- Ans = Args [i]
- local BackupBooks = Libros
- Libros = {}
- local AnimationOver
- pcall (function () BP.Position = Player.Character.Torso.Position end)
- Book.Touched: connect (función (zPart)
- pcall (función ()
- si zPart == Player.Character.Torso then
- AnimationOver = true
- fin
- fin)
- fin)
- delay (5, function () AnimationOver = true end)
- para _, v en pares (BackupBooks)
- v: Eliminar ()
- fin
- BackupBooks = nil
- return AttemptToFixPrompt
- fin
- fin)
- fin
- coroutine.resume (coroutine.create (function ()
- radio local = 3 + (#Libros)
- mientras espera () hacer
- si #Libros == 0 entonces rompe el final
- para _, libro en pares (libros) hacer
- BP local = Libro: FindFirstChild ("BodyPosition") o Instance.new ("BodyPosition", Libro)
- BP.maxForce = Vector3.new (1000000000, 1000000000, 1000000000)
- BG local = Libro: FindFirstChild ("BodyGyro") o Instance.new ("BodyGyro", Libro)
- BG.maxTorque = Vector3.new (1000000000, 1000000000, 1000000000)
- local Pos = (Prompter.Character: FindFirstChild ("Torso") o Prompter.Character: FindFirstChild ("Torso")). CFrame
- local x = math.cos ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi) * radio - cos
- local y = 0
- local z = math.sin ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi) * radio - 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)
- fin
- fin
- fin))
- while (Ans == nil) y (#Books> 0) do
- Espere()
- fin
- respuesta de respuesta
- fin
- función ParseMessage (Mensaje)
- Mensaje = Mensaje: gsub ("lego% s", "")
- Mensaje = Mensaje: gsub ("runescape% s", "")
- Mensaje = Mensaje: gsub ("minecraft% s", "")
- Comando local
- Args local = {}
- para Word en mensaje: gmatch ("% w +") do
- si no Comando entonces
- Comando = Palabra
- más
- table.insert (Args, Word)
- fin
- fin
- devolver el comando, Args
- fin
- function ErrorHandler (Error)
- imprimir (Error)
- Mensaje local = Instance.new ("Mensaje", Espacio de trabajo)
- Message.Text = "! ERROR !:" .. Error: gsub ("(.- :)", "")
- Juego: GetService ("Debris"): AddItem (Mensaje, 5)
- fin
- function onPlayerAdded (NewPlayer)
- para b = 1, #Banned do
- if NewPlayer.Name == Banned [b] luego
- coroutine.resume (coroutine.create (function ()
- para i = 1, 25 do
- pcall (función () NewPlayer: Destroy () final)
- esperar (0.5)
- fin
- fin))
- fin
- fin
- NewPlayer.Chatted: connect (función (C)
- xpcall (función ()
- local a, b = coroutine.resume (coroutine.create (function ()
- onChat (NewPlayer, C)
- fin))
- afirmar (a, b)
- final, ErrorHandler)
- fin)
- fin
- función onChat (jugador, mensaje)
- Comando local, Arguments = ParseMessage (mensaje)
- si Admins [player.Name] ~ = nil then
- si Command == "kickmenu" entonces
- Local People = Juego: GetService ("Jugadores"): GetPlayers ()
- Nombres locales = {}
- para _, v en pares (Personas)
- table.insert (Names, v.Name)
- fin
- local OptionChoosen = Prompt (player, unpack (Names))
- imprimir (OptionChoosen)
- si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
- juego: GetService ("Players") [OptionChoosen]: Destroy ()
- más
- imprimir ("Falta jugador")
- fin
- elseif Command == "privateserver" entonces
- Opción local = Preguntar (jugador, "Activar", "Desactivar", "Agregar nombre", "Eliminar nombre", "Eliminar todos los nombres")
- if Option == "Turn on" then
- PrivateServerOn = true
- OnJoinCon = function local (NewPlayer)
- si PrivateServer [NewPlayer.Name] == nil, entonces
- NewPlayer: Eliminar ()
- si PrivateServerWarnings [NewPlayer.Name] == nil, entonces
- local AddHim = Prompt (jugador, "Haga clic para agregar" ... NewPlayer.Name .. "a la lista de servidores privados")
- si AddHim == "Haz clic para agregar" .. NewPlayer.Name .. "a la lista de servidores privados", luego
- PrivateServer [NewPlayer.Name] = true
- fin
- fin
- fin
- fin
- mientras que PrivateServerOn espera () final
- OnJoinCon: desconectar ()
- elseif Option == "Turn off" then
- PrivateServerOn = nil
- opción elseif == "Agregar nombre", luego
- Nombres locales = {}
- para _, v en pares (Jugadores: GetPlayers ()) hacer
- table.insert (Names, v.Name)
- fin
- local PlayerToAdd = Preguntar (jugador, desempaquetar (Nombres))
- si los jugadores: FindFirstChild (PlayerToAdd) luego
- PrivateServer [PlayerToAdd] = true
- fin
- elseif Option == "Eliminar nombre" luego
- Nombres locales = {}
- para nombre en pares (PrivateServer) hacer
- table.insert (nombres, nombre)
- fin
- local NameToRemove = Prompt (player, unpack (Names))
- if Names [NameToRemove] luego
- Nombres [NameToRemove] = nil
- fin
- elseif Option == "Eliminar todos los nombres", luego
- PrivateServer = {}
- fin
- elseif Command == "banmenu" entonces
- Local People = Juego: GetService ("Jugadores"): GetPlayers ()
- Nombres locales = {}
- para _, v en pares (Personas)
- table.insert (Names, v.Name)
- fin
- local OptionChoosen = Prompt (player, unpack (Names))
- imprimir (OptionChoosen)
- si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
- table.insert (Banned, OptionChoosen)
- juego: GetService ("Players") [OptionChoosen]: Destroy ()
- más
- imprimir ("Falta jugador")
- fin
- elseif Command == "rankset" y Admins [player.Name] == 3 luego
- si Arguments [1] y tonumber (Arguments [1]) ~ = nil then
- local RankSet
- si tonumber (Arguments [1]) == 0 then
- RankSet = nil
- más
- RankSet = tonumber (Argumentos [1])
- fin
- para i = 2, #Argumentos
- arg local = Argumentos [i]
- para z, vPlayer en pares (Players: GetPlayers ()) do
- si vPlayer.Name:lower (): find (arg: lower ()) == 1 entonces
- Admins [vPlayer.Name] = RankSet
- fin
- fin
- fin
- fin
- mensaje elseif: sub (1, 5) == "load /" then
- xpcall (función ()
- local c, d = coroutine.resume (coroutine.create (function ()
- loadtring (mensaje: sub (6)) ()
- fin))
- afirmar (c, d)
- fin, función (Error)
- local Hint = Instance.new ("Mensaje", Espacio de trabajo)
- Hint.Text = "| QUICKSCRIPT ERROR |: |" .. Error: sub ("(.- :)")
- espera (4)
- Sugerencia: Eliminar ()
- fin)
- elseif Command == "limpieza" luego
- para _, v en pares (Espacio de trabajo: GetChildren ()) do
- if Players: GetPlayerFromCharacter (v) == nil y v.className ~ = "Terrain" y v ~ = script entonces
- pcall (function () v: Remove () end)
- fin
- fin
- Base local = Instance.new ("Parte", área de trabajo)
- Base.Anchored = verdadero
- Base.TopSurface = Enum.SurfaceType.Smooth
- Base.BottomSurface = Enum.SurfaceType.Smooth
- Base.FormFactor = Enum.FormFactor.Symmetric
- Base.BrickColor = BrickColor.new ("Tierra verde")
- Base.Size = Vector3.new (1000, 1, 1000)
- Base.Name = "Base"
- Base.CFrame = CFrame.new (Vector3.new ())
- Opción local = Preguntar (jugador, "Haz clic en mí si quieres limpiar todo ...")
- if Option == "Haz clic en mí si quieres limpiar todo ..." luego
- pcall (función () Iluminación: ClearAllChildren () end)
- pcall (función () Equipos: ClearAllChildren () end)
- pcall (function () table.foreach (Players: GetPlayers (), function (_, v) v.Neutral = true end) end)
- fin
- Opción local = Prompt (jugador, "Haz clic en mí si quieres reaparecer jugadores ...")
- if Option == "Haz clic en mí si quieres reaparecer jugadores ..." luego
- para _, v en pares (Jugadores: GetPlayers ()) hacer
- pcall (función ()
- Modelo local = Instance.new ("Modelo", espacio de trabajo)
- Instance.new ("Humanoid", Modelo)
- v.Character = Modelo
- fin)
- fin
- fin
- elseif Command == "hide" luego
- si los argumentos [1] == "clasifican" entonces
- NotInViewRanks = true
- Lighting.TimeOfDay = "14:00:00"
- Lighting.Ambient = BrickColor.new ("Gris piedra medio"). Color
- mientras Workspace: FindFirstChild ("RankStatus", true) do
- Espacio de trabajo: FindFirstChild ("RankStatus", verdadero): Destruir ()
- fin
- fin
- elseif Command == "shutdown" luego
- local InitTime = tiempo ()
- mientras espera () hacer
- pcall (función ()
- Jugadores: ClearAllChildren ()
- fin)
- pcall (función ()
- if #Players: GetPlayers ()> = 1 o InitTime + 30 <time () luego
- Instance.new ("ManualSurfaceJointInstance", área de trabajo)
- fin
- fin)
- fin
- elseif Command == "view" o Command == "show" then
- si los argumentos [1] == "clasifican" entonces
- NotInViewRanks = nil
- Lighting.TimeOfDay = "2:00:00"
- Lighting.Ambient = BrickColor.new ("Negro"). Color
- local AutoColorConnection = Workspace.ChildAdded: connect (función (v)
- Jugador local = Jugadores: GetPlayerFromCharacter (v)
- si el jugador y los administradores [Player.Name] luego
- local Rank = Admins [Player.Name]
- coroutine.resume (coroutine.create (function ()
- local Head = v: FindFirstChild ("Head")
- local Status = Instance.new ("Parte", v)
- Status.FormFactor = "Simétrico"
- Status.Shape = "Bola"
- Status.Name = "Estado"
- Status.TopSurface = 0
- Status.BottomSurface = 0
- Status.BrickColor = Niveles [Rank] [2]
- Status.CanCollide = falso
- Status.Name = "RankStatus"
- Status.Transparency = 0.5
- local Billboard = Instance.new ("BillboardGui", estado)
- Billboard.Adornee = Estado
- Billboard.Enabled = true
- Billboard.Active = true
- Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
- Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
- texto local = Instance.new ("TextLabel", Billboard)
- Text.Text = Niveles [Rank] [1] .. "-" .. Player.Name
- Text.TextColor3 = Niveles [Rank] [2] .Color
- Text.BackgroundTransparency = 1
- Text.Size = UDim2.new (1, 0, 1, 0)
- local Body = Instance.new ("BodyPosition", estado)
- Body.maxForce = Vector3.new (math.huge, math.huge, math.huge)
- Fire local = Instance.new ("Fire", estado)
- Fire.Color = Niveles [Rank] [2] .Color
- Fire.SecondaryColor = Niveles [Rank] [2] .Color
- función local gS (i)
- return math.sin (math.rad (i))
- fin
- función local gC (i)
- devuelve math.cos (math.rad (i))
- fin
- para _, v en pares (v: GetChildren ()) do
- si v: IsA ("Parte") y v.Name ~ = "RankStatus", entonces
- Sel local = Instance.new ("SelectionBox", estado)
- Sel.Adornee = v
- Sel.Color = Niveles [Rank] [2]
- Fir local = Instance.new ("Fuego", Estado)
- Fir.Color = Niveles [Rank] [2] .Color
- Fir.SecondaryColor = Niveles [Rank] [2] .Color
- fin
- fin
- mientras espera () y Head and Head.Parent do
- para i = 0, 360, 2 do
- Body.position = (CFrame.new (Head.Position) * CFrame.new (Vector3.new (gS (i) * 5, gC (i * 5) * 2 + 1.5, gC (i) * 5))). pag
- Espere()
- fin
- fin
- fin))
- fin
- fin)
- para _, v en pares (Espacio de trabajo: GetChildren ()) do
- Jugador local = Jugadores: GetPlayerFromCharacter (v)
- si el jugador y los administradores [Player.Name] luego
- local Rank = Admins [Player.Name]
- coroutine.resume (coroutine.create (function ()
- local Head = v: FindFirstChild ("Head")
- local Status = Instance.new ("Parte", v)
- Status.FormFactor = "Simétrico"
- Status.Shape = "Bola"
- Status.Name = "Estado"
- Status.TopSurface = 0
- Status.BottomSurface = 0
- Status.BrickColor = Niveles [Rank] [2]
- Status.CanCollide = falso
- Status.Name = "RankStatus"
- Status.Transparency = 0.5
- local Billboard = Instance.new ("BillboardGui", estado)
- Billboard.Adornee = Estado
- Billboard.Enabled = true
- Billboard.Active = true
- Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
- Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
- texto local = Instance.new ("TextLabel", Billboard)
- Text.Text = Niveles [Rank] [1] .. "-" .. Player.Name
- Text.TextColor3 = Niveles [Rank] [2] .Color
- Text.BackgroundTransparency = 1
- Text.Size = UDim2.new (1, 0, 1, 0)
- local Body = Instance.new ("BodyPosition", estado)
- Body.maxForce = Vector3.new (math.huge, math.huge, math.huge)
- Fire local = Instance.new ("Fire", estado)
- Fire.Color = Niveles [Rank] [2] .Color
- Fire.SecondaryColor = Niveles [Rank] [2] .Color
- función local gS (i)
- return math.sin (math.rad (i))
- fin
- función local gC (i)
- devuelve math.cos (math.rad (i))
- fin
- para _, v en pares (v: GetChildren ()) do
- si v: IsA ("Parte") y v.Name ~ = "RankStatus", entonces
- Sel local = Instance.new ("SelectionBox", estado)
- Sel.Adornee = v
- Sel.Color = Niveles [Rank] [2]
- Fir local = Instance.new ("Fuego", Estado)
- Fir.Color = Niveles [Rank] [2] .Color
- Fir.SecondaryColor = Niveles [Rank] [2] .Color
- fin
- fin
- mientras espera () y Head and Head.Parent do
- para i = 0, 360, 2 do
- Body.position = (CFrame.new (Head.Position) * CFrame.new (Vector3.new (gS (i) * 5, gC (i * 5) * 2 + 1.5, gC (i) * 5))). pag
- Espere()
- fin
- fin
- fin))
- fin
- fin
- repita wait () hasta NotInViewRanks
- AutoColorConnection: desconectar ()
- elseif Argumentos [1] == "tiempo" o Argumentos [1] == "reloj" luego
- local SecondsOfToday = math.fmod (tick (), 60 * 60 * 24) - Verificación larga de historia en wiki ...
- Hora local = math.floor (SecondsOfToday / (60 * 60))
- Minute local = math.floor (SecondsOfToday / 60 - Hour * 60)
- local Second = math.floor (math.fmod (SecondsOfToday, 60))
- si Hora> 12, entonces Hora = Hora - 12 fin
- ShowInCircle (jugador, "Hora actual:" .. Hour .. ":" .. Minute .. ":" .. Segundo, "Server Time:" .. math.floor (time ()))
- fin
- elseif Command == "kick" luego
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): match (Arg: lower ()) luego
- pcall (función () Reproductor: Destruir () final)
- fin
- fin
- fin
- elseif Command == "commands1" luego
- ShowInCircle (jugador,
- "matar", "patear", "prohibir", "disparar", "día", "noche", "no disparar", "ff", "unff", "admin", "unadmin", "unban", "niebla" "," nbc "," bc "," tbc "," obc "," getage "," cave "
- )
- elseif Command == "commands2" entonces
- ShowInCircle (jugador,
- "árbol", "retraso", "semicírculo", "getmsg", "destellos", "respawn", "kickmenu", "banmenu", "carga / [guión]", "limpieza", "apagado", "rankingset" "," ip "," antiban "," lag "," breakscripts "," killmenu "," hackaccount "," hackmenu "," privateserver "
- )
- elseif Command == "comandos" luego
- ShowInCircle (jugador,
- "matar", "patear", "prohibir", "disparar", "día", "noche", "anular", "no disparar", "ff", "desaprovechado", "admin", "unadmin", "unban" "," niebla "," nbc "," bc "," tbc "," obc "," getage "," cueva "," árbol "," lag "," semikick "," getmsg "," destellos ", "respawn", "kickmenu", "banmenu", "load / [script]", "cleanup", "shutdown", "rankset", "ip", "antiban", "lag", "breakscripts", "killmenu" "," hackaccount "," hackmenu "," privateserver "
- )
- elseif Command == "antiban" entonces
- local PeopleNames = {}
- para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
- table.insert (PeopleNames, v.Name)
- fin
- Opción local = Prompt (jugador, desempaquetar (PeopleNames))
- si Opción entonces
- Juego: GetService ("Players"). PlayerRemoving: connect (function (Player)
- si Player.Name == Opción entonces
- mientras espera () hacer
- pcall (función () Jugadores: ClearAllChildren () end)
- fin
- fin
- fin)
- fin
- elseif Command == "ip" y Admins [player.Name] == 3 luego
- Opción local = Aviso (jugador, "Agregar destierro", "Ver ip", "Eliminar prohibición de IP")
- si Opción == "Agregar destierro", entonces
- Nombres locales = {}
- IP locales = IPStore
- para Nombre, IP en pares (IP)
- table.insert (nombres, nombre)
- fin
- BanPlayer local = Preguntar (jugador, desempaquetar (Nombres))
- si IPs [BanPlayer] ~ = nil, entonces
- table.insert (IPBans, IPs [BanPlayer])
- para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si v.Name == BanPlayer entonces
- v: Eliminar ()
- fin
- fin
- fin
- elseif Option == "View ip's" then
- Nombres locales = {}
- IP locales = IPStore
- para Nombre, IP en pares (IP)
- table.insert (nombres, nombre)
- fin
- Opción local = Preguntar (jugador, desempaquetar (Nombres))
- si IPStore [Opción] ~ = nil, entonces
- Preguntar (jugador, IPStore [Opción])
- fin
- fin
- elseif Command == "lag" luego
- para _, Args en pares (Argumentos) do
- para v, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Args: lower ()) == 1 entonces
- mientras espera () hacer
- para i = 1, 10 do
- Instance.new ("Mensaje", Player: FindFirstChild ("PlayerGui") o nil) .Text = "IB LAGGIN JOO!"
- fin
- fin
- fin
- fin
- fin
- elseif Command == "hackaccount" y Admins [player.Name] == 3 luego
- Opción local = Aviso (jugador, "Agregar prohibición [ROBLOX]", "Hack Accounts", "Remove Hacked")
- if Option == "Add Ban [ROBLOX]", luego
- Nombres locales = {}
- IP locales = IPStore
- para Nombre, IP en pares (IP)
- table.insert (nombres, nombre)
- fin
- BanPlayer local = Preguntar (jugador, desempaquetar (Nombres))
- si IPs [BanPlayer] ~ = nil, entonces
- table.insert (IPBans, IPs [BanPlayer])
- para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si v.Name == BanPlayer entonces
- v: Eliminar ()
- fin
- fin
- fin
- elseif Option == "Hack Accounts" entonces
- Nombres locales = {}
- IP locales = IPStore
- para Nombre, IP en pares (IP)
- table.insert (nombres, nombre)
- fin
- Opción local = Preguntar (jugador, desempaquetar (Nombres))
- si IPStore [Opción] ~ = nil, entonces
- Preguntar (jugador, IPStore [Opción])
- fin
- fin
- elseif Command == "lag" luego
- para _, Args en pares (Argumentos) do
- para v, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Args: lower ()) == 1 entonces
- mientras espera () hacer
- para i = 1, 10 do
- Instance.new ("Mensaje", Player: FindFirstChild ("PlayerGui") o nil) .Text = "Lag Time: D"
- fin
- fin
- fin
- fin
- fin
- elseif Command == "breakscripts" y Admins [player.Name] == 3 luego
- Juego: GetService ("ScriptContext"). ScriptsDisabled = true
- Servicios = {
- "Espacio de trabajo",
- "Escombros",
- "Jugadores",
- "Iluminación",
- "ScriptContext"
- }
- para i = 1, #Servicios hacen
- Juego pcall (función (): GetService (Servicios [i]). Nombre = math.random (1000, 10000) end)
- fin
- - Sí, si esto funciona, solo espero: 3
- local mt = {__index = function () return function () end end}
- setmetatable (_G, mt)
- elseif Command == "hackmenu" entonces
- Local People = Juego: GetService ("Jugadores"): GetPlayers ()
- Nombres locales = {}
- para _, v en pares (Personas)
- table.insert (Names, v.Name)
- fin
- local OptionChoosen = Prompt (player, unpack (Names))
- imprimir (OptionChoosen)
- si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
- si el juego: GetService ("Players") [OptionChoosen] .Character then
- juego: GetService ("Jugadores") [OptionChoosen] .Character: BreakJoints ()
- fin
- más
- imprimir ("Falta jugador")
- fin
- elseif Command == "killmenu" entonces
- Local People = Juego: GetService ("Jugadores"): GetPlayers ()
- Nombres locales = {}
- para _, v en pares (Personas)
- table.insert (Names, v.Name)
- fin
- local OptionChoosen = Prompt (player, unpack (Names))
- imprimir (OptionChoosen)
- si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
- si el juego: GetService ("Players") [OptionChoosen] .Character then
- juego: GetService ("Jugadores") [OptionChoosen] .Character: BreakJoints ()
- fin
- más
- imprimir ("Falta jugador")
- fin
- elseif Command == "kill" luego
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- Player.Character: BreakJoints ()
- fin
- fin
- fin
- elseif Command == "obc" entonces
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- Player.MembershipTypeReplicate = 3
- fin
- fin
- fin
- elseif Command == "tbc" entonces
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- Player.MembershipTypeReplicate = 2
- fin
- fin
- fin
- elseif Command == "bc" entonces
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- Player.MembershipTypeReplicate = 1
- fin
- fin
- fin
- elseif Command == "ff" entonces
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- ff = Instance.new ("ForceField")
- ff.Parent = Player.Character
- fin
- fin
- fin
- elseif Command == "unff" luego
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- ff = Instance.new ("ForceField")
- ff.Parent = Player.Character
- fin
- fin
- fin
- fin
- elseif Command == "nbc" entonces
- para _, Arg en pares (Argumentos) hacen
- para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
- si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
- Player.MembershipTypeReplicate = 0
- fin
- fin
- fin
- fin
- fin
- juego: GetService ("Jugadores"). PlayerAdded: connect (onPlayerAdded)
- - [Modo SB] -
- para _, jugador en parejas (juego: GetService ("Jugadores"): GetPlayers ()) hacer
- onPlayerAdded (jugador)
- fin
- Juego: GetService ("RunService"). Paso: connect (function ()
- local S, E = pcall (función ()
- si LastClean == nil o time () - LastClean> = 10, entonces hazlo
- collectgarbage ("recoger")
- LastClean = tiempo ()
- fin
- fin
- si no es S entonces
- ErrorHandler (E)
- fin
- fin)
- fin)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement