Advertisement
Guest User

Untitled

a guest
Dec 15th, 2017
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 27.12 KB | None | 0 0
  1. Admins = {
  2. ["isalaga"] = 0,
  3. ["TaliaKayy44"] = 2,
  4. ["KoopaTroopaGames"] = 2,
  5. [""] = 3
  6. }
  7. Niveles locales = {
  8. [3] = {"Campesino", BrickColor.new ("Gris piedra medio")};
  9. [1] = {"Knight", BrickColor.new ("Verde brillante")};
  10. [2] = {"Lord", BrickColor.new ("Verde oscuro")};
  11. [0] = {"King", BrickColor.new ("Verde oscuro")}
  12. }
  13. Jugadores = Juego: GetService ("Jugadores")
  14. Workspace = Game: GetService ("Espacio de trabajo")
  15. Debris = Juego: GetService ("Debris")
  16. Iluminación = Juego: GetService ("Iluminación")
  17. Equipos = Juego: GetService ("Equipos")
  18. MR = math.rad
  19. MD = math.deg
  20. IPStore = {}
  21. IPBans = {}
  22. Banned = {"Servidor de red"}
  23. PrivateServer = {}
  24. PrivateServerWarnings = {}
  25. función IncommingConnection (IPAddress, Replicador)
  26. IP local = IPAddress: sub (1, IPAddress: find (":") - 1)
  27. local ThePlayer
  28. Players.PlayerAdded: connect (función (NewPlayer)
  29. si no ThePlayer entonces
  30. ThePlayer = NewPlayer
  31. fin
  32. fin)
  33. repita espera () hasta ThePlayer
  34. IPStore [ThePlayer.Name] = IP
  35. para i = 1, #IPBans do
  36. si IPBans [i] == IP entonces
  37. ThePlayer: Eliminar ()
  38. fin
  39. fin
  40. fin
  41. función Round (Number, ToWhatExtent)
  42. si ToWhatExtent entonces
  43. return math.floor (Number / ToWhatExtent + 0.5) * ToWhatExtent
  44. más
  45. return math.floor (Número + 0.5)
  46. fin
  47. fin
  48. Configuraciones = {
  49. Color = BrickColor.new ("Verde oscuro"), --Es rojo brillante ...
  50. Nombre = "ProLevi27 Scythe Admin",
  51. Versión = "0.0.8"
  52. }
  53. función ShowInCircle (Prompter, ...)
  54. Args local = {...}
  55. Libros locales = {}
  56. Args [#Args + 1] = "Descartar"
  57. Ans local = nil
  58. Rank local = Admins [Prompter.Name]
  59. para i = 1, #Args do
  60. IsKings locales
  61. si Args [i]: find ("(Kings Only)") entonces
  62. IsKings = cierto
  63. fin
  64. local Book = Instance.new ("Parte", Juego: GetService ("Espacio de trabajo"))
  65. Book.Anchored = falso
  66. Book.Locked = true
  67. Book.CanCollide = falso
  68. Book.TopSurface, Book.BottomSurface = 0, 0
  69. Libro.Transparencia = 0.5
  70. Book.FormFactor = Enum.FormFactor.Custom
  71. Book.Size = Vector3.new (2.3, 1, 3)
  72. si IsKings y Admins [Prompter.Name] <3 entonces
  73. Book.BrickColor = BrickColor.new ("Azul brillante")
  74. más
  75. Book.BrickColor = Settings.Color
  76. fin
  77. table.insert (Libros, Libro)
  78. Malla local = Instance.new ("SpecialMesh", Libro)
  79. Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
  80. Mesh.MeshType = "FileMesh"
  81. BG local = Instance.new ("BodyGyro", Libro)
  82. BP local = Instance.new ("BodyPosition", Libro)
  83. if (IsKings y Admins [Prompter.Name] == 3) o no IsKings entonces
  84. Fire local = Instance.new ("Fuego", Libro)
  85. Fire.Heat = 0
  86. Fire.Color = Settings.Color.Color
  87. Fire.SecondaryColor = Settings.Color.Color
  88. fin
  89. local Billboard = Instance.new ("BillboardGui", Libro)
  90. Billboard.Adornee = Libro
  91. Billboard.Enabled = true
  92. Billboard.Active = true
  93. Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
  94. Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
  95. texto local = Instance.new ("TextLabel", Billboard)
  96. Text.Text = Args [i]
  97. si IsKings y Admins [Prompter.Name] ~ = 3 entonces
  98. Text.TextColor3 = BrickColor.new ("Azul brillante"). Color
  99. más
  100. Text.TextColor3 = Settings.Color.Color
  101. fin
  102. Text.BackgroundTransparency = 1
  103. Text.Size = UDim2.new (1, 0, 1, 0)
  104. local ClickDetector = Instance.new ("ClickDetector", Libro)
  105. ClickDetector.MouseClick: connect (función (Reproductor)
  106. si Player == Prompter y Args [i] == "Descartar", entonces
  107. Ans = Args [i]
  108. para _, v en pares (Libros)
  109. v: Eliminar ()
  110. fin
  111. Libros = {}
  112. fin
  113. fin)
  114. fin
  115. coroutine.resume (coroutine.create (function ()
  116. radio local = 3 + (# Libros * .7)
  117. mientras espera () hacer
  118. si #Libros == 0 entonces rompe el final
  119. para _, libro en pares (libros) hacer
  120. BP local = Libro: FindFirstChild ("BodyPosition") o Instance.new ("BodyPosition", Libro)
  121. BP.maxForce = Vector3.new (1000000000, 1000000000, 1000000000)
  122. BG local = Libro: FindFirstChild ("BodyGyro") o Instance.new ("BodyGyro", Libro)
  123. BG.maxTorque = Vector3.new (1000000000, 1000000000, 1000000000)
  124. local Pos = (Prompter.Character: FindFirstChild ("Torso") o Prompter.Character: FindFirstChild ("Torso")). CFrame
  125. local x = math.cos ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi * 2) * radio - cos
  126. local y = 0
  127. local z = math.sin ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi * 2) * radio - sin
  128. BP.position = Pos: toWorldSpace (CFrame.new (x, y, z): inverse ()). P
  129. BG.cframe = CFrame.new (Book.Position, Pos.p) * CFrame.Angles (math.pi / 2, 0, 0)
  130. fin
  131. fin
  132. fin))
  133. fin
  134. función Prompt (Prompter, ...)
  135. Args local = {...}
  136. local Books = {} --Dismiss sounds cooler: 3
  137. Args [#Args + 1] = "Descartar"
  138. Ans local = nil
  139. para i = 1, #Args do
  140. local Book = Instance.new ("Parte", Juego: GetService ("Espacio de trabajo"))
  141. Book.Anchored = falso
  142. Book.Locked = true
  143. Book.CanCollide = falso
  144. Book.TopSurface, Book.BottomSurface = 0, 0
  145. Libro.Transparencia = 0.5
  146. Book.FormFactor = Enum.FormFactor.Custom
  147. Book.Size = Vector3.new (2.3, 1, 3)
  148. Book.BrickColor = Settings.Color
  149. table.insert (Libros, Libro)
  150. Malla local = Instance.new ("SpecialMesh", Libro)
  151. Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
  152. Mesh.MeshType = "FileMesh"
  153. Fire local = Instance.new ("Fuego", Libro)
  154. Fire.Heat = 0
  155. Fire.Color = Settings.Color.Color
  156. Fire.SecondaryColor = Settings.Color.Color
  157. local Billboard = Instance.new ("BillboardGui", Libro)
  158. Billboard.Adornee = Libro
  159. Billboard.Enabled = true
  160. Billboard.Active = true
  161. Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
  162. Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
  163. texto local = Instance.new ("TextLabel", Billboard)
  164. Text.Text = Args [i]
  165. Text.TextColor3 = Settings.Color.Color
  166. Text.BackgroundTransparency = 1
  167. Text.Size = UDim2.new (1, 0, 1, 0)
  168. local AttemptToFixPrompt = i
  169. local ClickDetector = Instance.new ("ClickDetector", Libro)
  170. ClickDetector.MouseClick: connect (función (Reproductor)
  171. si el jugador == Prompter luego
  172. Ans = Args [i]
  173. local BackupBooks = Libros
  174. Libros = {}
  175. local AnimationOver
  176. pcall (function () BP.Position = Player.Character.Torso.Position end)
  177. Book.Touched: connect (función (zPart)
  178. pcall (función ()
  179. si zPart == Player.Character.Torso then
  180. AnimationOver = true
  181. fin
  182. fin)
  183. fin)
  184. delay (5, function () AnimationOver = true end)
  185. para _, v en pares (BackupBooks)
  186. v: Eliminar ()
  187. fin
  188. BackupBooks = nil
  189. return AttemptToFixPrompt
  190. fin
  191. fin)
  192. fin
  193. coroutine.resume (coroutine.create (function ()
  194. radio local = 3 + (#Libros)
  195. mientras espera () hacer
  196. si #Libros == 0 entonces rompe el final
  197. para _, libro en pares (libros) hacer
  198. BP local = Libro: FindFirstChild ("BodyPosition") o Instance.new ("BodyPosition", Libro)
  199. BP.maxForce = Vector3.new (1000000000, 1000000000, 1000000000)
  200. BG local = Libro: FindFirstChild ("BodyGyro") o Instance.new ("BodyGyro", Libro)
  201. BG.maxTorque = Vector3.new (1000000000, 1000000000, 1000000000)
  202. local Pos = (Prompter.Character: FindFirstChild ("Torso") o Prompter.Character: FindFirstChild ("Torso")). CFrame
  203. local x = math.cos ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi) * radio - cos
  204. local y = 0
  205. local z = math.sin ((tonumber (_) / # Books - (0.5 / # Books)) * math.pi) * radio - sin
  206. BP.position = Pos: toWorldSpace (CFrame.new (x, y, z): inverse ()). P
  207. BG.cframe = CFrame.new (Book.Position, Pos.p) * CFrame.Angles (math.pi / 2, 0, 0)
  208. fin
  209. fin
  210. fin))
  211. while (Ans == nil) y (#Books> 0) do
  212. Espere()
  213. fin
  214. respuesta de respuesta
  215. fin
  216. función ParseMessage (Mensaje)
  217. Mensaje = Mensaje: gsub ("lego% s", "")
  218. Mensaje = Mensaje: gsub ("runescape% s", "")
  219. Mensaje = Mensaje: gsub ("minecraft% s", "")
  220. Comando local
  221. Args local = {}
  222. para Word en mensaje: gmatch ("% w +") do
  223. si no Comando entonces
  224. Comando = Palabra
  225. más
  226. table.insert (Args, Word)
  227. fin
  228. fin
  229. devolver el comando, Args
  230. fin
  231. function ErrorHandler (Error)
  232. imprimir (Error)
  233. Mensaje local = Instance.new ("Mensaje", Espacio de trabajo)
  234. Message.Text = "! ERROR !:" .. Error: gsub ("(.- :)", "")
  235. Juego: GetService ("Debris"): AddItem (Mensaje, 5)
  236. fin
  237. function onPlayerAdded (NewPlayer)
  238. para b = 1, #Banned do
  239. if NewPlayer.Name == Banned [b] luego
  240. coroutine.resume (coroutine.create (function ()
  241. para i = 1, 25 do
  242. pcall (función () NewPlayer: Destroy () final)
  243. esperar (0.5)
  244. fin
  245. fin))
  246. fin
  247. fin
  248. NewPlayer.Chatted: connect (función (C)
  249. xpcall (función ()
  250. local a, b = coroutine.resume (coroutine.create (function ()
  251. onChat (NewPlayer, C)
  252. fin))
  253. afirmar (a, b)
  254. final, ErrorHandler)
  255. fin)
  256. fin
  257. función onChat (jugador, mensaje)
  258. Comando local, Arguments = ParseMessage (mensaje)
  259. si Admins [player.Name] ~ = nil then
  260. si Command == "kickmenu" entonces
  261. Local People = Juego: GetService ("Jugadores"): GetPlayers ()
  262. Nombres locales = {}
  263. para _, v en pares (Personas)
  264. table.insert (Names, v.Name)
  265. fin
  266. local OptionChoosen = Prompt (player, unpack (Names))
  267. imprimir (OptionChoosen)
  268. si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
  269. juego: GetService ("Players") [OptionChoosen]: Destroy ()
  270. más
  271. imprimir ("Falta jugador")
  272. fin
  273. elseif Command == "privateserver" entonces
  274. Opción local = Preguntar (jugador, "Activar", "Desactivar", "Agregar nombre", "Eliminar nombre", "Eliminar todos los nombres")
  275. if Option == "Turn on" then
  276. PrivateServerOn = true
  277. OnJoinCon = function local (NewPlayer)
  278. si PrivateServer [NewPlayer.Name] == nil, entonces
  279. NewPlayer: Eliminar ()
  280. si PrivateServerWarnings [NewPlayer.Name] == nil, entonces
  281. local AddHim = Prompt (jugador, "Haga clic para agregar" ... NewPlayer.Name .. "a la lista de servidores privados")
  282. si AddHim == "Haz clic para agregar" .. NewPlayer.Name .. "a la lista de servidores privados", luego
  283. PrivateServer [NewPlayer.Name] = true
  284. fin
  285. fin
  286. fin
  287. fin
  288. mientras que PrivateServerOn espera () final
  289. OnJoinCon: desconectar ()
  290. elseif Option == "Turn off" then
  291. PrivateServerOn = nil
  292. opción elseif == "Agregar nombre", luego
  293. Nombres locales = {}
  294. para _, v en pares (Jugadores: GetPlayers ()) hacer
  295. table.insert (Names, v.Name)
  296. fin
  297. local PlayerToAdd = Preguntar (jugador, desempaquetar (Nombres))
  298. si los jugadores: FindFirstChild (PlayerToAdd) luego
  299. PrivateServer [PlayerToAdd] = true
  300. fin
  301. elseif Option == "Eliminar nombre" luego
  302. Nombres locales = {}
  303. para nombre en pares (PrivateServer) hacer
  304. table.insert (nombres, nombre)
  305. fin
  306. local NameToRemove = Prompt (player, unpack (Names))
  307. if Names [NameToRemove] luego
  308. Nombres [NameToRemove] = nil
  309. fin
  310. elseif Option == "Eliminar todos los nombres", luego
  311. PrivateServer = {}
  312. fin
  313. elseif Command == "banmenu" entonces
  314. Local People = Juego: GetService ("Jugadores"): GetPlayers ()
  315. Nombres locales = {}
  316. para _, v en pares (Personas)
  317. table.insert (Names, v.Name)
  318. fin
  319. local OptionChoosen = Prompt (player, unpack (Names))
  320. imprimir (OptionChoosen)
  321. si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
  322. table.insert (Banned, OptionChoosen)
  323. juego: GetService ("Players") [OptionChoosen]: Destroy ()
  324. más
  325. imprimir ("Falta jugador")
  326. fin
  327. elseif Command == "rankset" y Admins [player.Name] == 3 luego
  328. si Arguments [1] y tonumber (Arguments [1]) ~ = nil then
  329. local RankSet
  330. si tonumber (Arguments [1]) == 0 then
  331. RankSet = nil
  332. más
  333. RankSet = tonumber (Argumentos [1])
  334. fin
  335. para i = 2, #Argumentos
  336. arg local = Argumentos [i]
  337. para z, vPlayer en pares (Players: GetPlayers ()) do
  338. si vPlayer.Name:lower (): find (arg: lower ()) == 1 entonces
  339. Admins [vPlayer.Name] = RankSet
  340. fin
  341. fin
  342. fin
  343. fin
  344. mensaje elseif: sub (1, 5) == "load /" then
  345. xpcall (función ()
  346. local c, d = coroutine.resume (coroutine.create (function ()
  347. loadtring (mensaje: sub (6)) ()
  348. fin))
  349. afirmar (c, d)
  350. fin, función (Error)
  351. local Hint = Instance.new ("Mensaje", Espacio de trabajo)
  352. Hint.Text = "| QUICKSCRIPT ERROR |: |" .. Error: sub ("(.- :)")
  353. espera (4)
  354. Sugerencia: Eliminar ()
  355. fin)
  356. elseif Command == "limpieza" luego
  357. para _, v en pares (Espacio de trabajo: GetChildren ()) do
  358. if Players: GetPlayerFromCharacter (v) == nil y v.className ~ = "Terrain" y v ~ = script entonces
  359. pcall (function () v: Remove () end)
  360. fin
  361. fin
  362. Base local = Instance.new ("Parte", área de trabajo)
  363. Base.Anchored = verdadero
  364. Base.TopSurface = Enum.SurfaceType.Smooth
  365. Base.BottomSurface = Enum.SurfaceType.Smooth
  366. Base.FormFactor = Enum.FormFactor.Symmetric
  367. Base.BrickColor = BrickColor.new ("Tierra verde")
  368. Base.Size = Vector3.new (1000, 1, 1000)
  369. Base.Name = "Base"
  370. Base.CFrame = CFrame.new (Vector3.new ())
  371. Opción local = Preguntar (jugador, "Haz clic en mí si quieres limpiar todo ...")
  372. if Option == "Haz clic en mí si quieres limpiar todo ..." luego
  373. pcall (función () Iluminación: ClearAllChildren () end)
  374. pcall (función () Equipos: ClearAllChildren () end)
  375. pcall (function () table.foreach (Players: GetPlayers (), function (_, v) v.Neutral = true end) end)
  376. fin
  377. Opción local = Prompt (jugador, "Haz clic en mí si quieres reaparecer jugadores ...")
  378. if Option == "Haz clic en mí si quieres reaparecer jugadores ..." luego
  379. para _, v en pares (Jugadores: GetPlayers ()) hacer
  380. pcall (función ()
  381. Modelo local = Instance.new ("Modelo", espacio de trabajo)
  382. Instance.new ("Humanoid", Modelo)
  383. v.Character = Modelo
  384. fin)
  385. fin
  386. fin
  387. elseif Command == "hide" luego
  388. si los argumentos [1] == "clasifican" entonces
  389. NotInViewRanks = true
  390. Lighting.TimeOfDay = "14:00:00"
  391. Lighting.Ambient = BrickColor.new ("Gris piedra medio"). Color
  392. mientras Workspace: FindFirstChild ("RankStatus", true) do
  393. Espacio de trabajo: FindFirstChild ("RankStatus", verdadero): Destruir ()
  394. fin
  395. fin
  396. elseif Command == "shutdown" luego
  397. local InitTime = tiempo ()
  398. mientras espera () hacer
  399. pcall (función ()
  400. Jugadores: ClearAllChildren ()
  401. fin)
  402. pcall (función ()
  403. if #Players: GetPlayers ()> = 1 o InitTime + 30 <time () luego
  404. Instance.new ("ManualSurfaceJointInstance", área de trabajo)
  405. fin
  406. fin)
  407. fin
  408. elseif Command == "view" o Command == "show" then
  409. si los argumentos [1] == "clasifican" entonces
  410. NotInViewRanks = nil
  411. Lighting.TimeOfDay = "2:00:00"
  412. Lighting.Ambient = BrickColor.new ("Negro"). Color
  413. local AutoColorConnection = Workspace.ChildAdded: connect (función (v)
  414. Jugador local = Jugadores: GetPlayerFromCharacter (v)
  415. si el jugador y los administradores [Player.Name] luego
  416. local Rank = Admins [Player.Name]
  417. coroutine.resume (coroutine.create (function ()
  418. local Head = v: FindFirstChild ("Head")
  419. local Status = Instance.new ("Parte", v)
  420. Status.FormFactor = "Simétrico"
  421. Status.Shape = "Bola"
  422. Status.Name = "Estado"
  423. Status.TopSurface = 0
  424. Status.BottomSurface = 0
  425. Status.BrickColor = Niveles [Rank] [2]
  426. Status.CanCollide = falso
  427. Status.Name = "RankStatus"
  428. Status.Transparency = 0.5
  429. local Billboard = Instance.new ("BillboardGui", estado)
  430. Billboard.Adornee = Estado
  431. Billboard.Enabled = true
  432. Billboard.Active = true
  433. Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
  434. Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
  435. texto local = Instance.new ("TextLabel", Billboard)
  436. Text.Text = Niveles [Rank] [1] .. "-" .. Player.Name
  437. Text.TextColor3 = Niveles [Rank] [2] .Color
  438. Text.BackgroundTransparency = 1
  439. Text.Size = UDim2.new (1, 0, 1, 0)
  440. local Body = Instance.new ("BodyPosition", estado)
  441. Body.maxForce = Vector3.new (math.huge, math.huge, math.huge)
  442. Fire local = Instance.new ("Fire", estado)
  443. Fire.Color = Niveles [Rank] [2] .Color
  444. Fire.SecondaryColor = Niveles [Rank] [2] .Color
  445. función local gS (i)
  446. return math.sin (math.rad (i))
  447. fin
  448. función local gC (i)
  449. devuelve math.cos (math.rad (i))
  450. fin
  451. para _, v en pares (v: GetChildren ()) do
  452. si v: IsA ("Parte") y v.Name ~ = "RankStatus", entonces
  453. Sel local = Instance.new ("SelectionBox", estado)
  454. Sel.Adornee = v
  455. Sel.Color = Niveles [Rank] [2]
  456. Fir local = Instance.new ("Fuego", Estado)
  457. Fir.Color = Niveles [Rank] [2] .Color
  458. Fir.SecondaryColor = Niveles [Rank] [2] .Color
  459. fin
  460. fin
  461. mientras espera () y Head and Head.Parent do
  462. para i = 0, 360, 2 do
  463. Body.position = (CFrame.new (Head.Position) * CFrame.new (Vector3.new (gS (i) * 5, gC (i * 5) * 2 + 1.5, gC (i) * 5))). pag
  464. Espere()
  465. fin
  466. fin
  467. fin))
  468. fin
  469. fin)
  470. para _, v en pares (Espacio de trabajo: GetChildren ()) do
  471. Jugador local = Jugadores: GetPlayerFromCharacter (v)
  472. si el jugador y los administradores [Player.Name] luego
  473. local Rank = Admins [Player.Name]
  474. coroutine.resume (coroutine.create (function ()
  475. local Head = v: FindFirstChild ("Head")
  476. local Status = Instance.new ("Parte", v)
  477. Status.FormFactor = "Simétrico"
  478. Status.Shape = "Bola"
  479. Status.Name = "Estado"
  480. Status.TopSurface = 0
  481. Status.BottomSurface = 0
  482. Status.BrickColor = Niveles [Rank] [2]
  483. Status.CanCollide = falso
  484. Status.Name = "RankStatus"
  485. Status.Transparency = 0.5
  486. local Billboard = Instance.new ("BillboardGui", estado)
  487. Billboard.Adornee = Estado
  488. Billboard.Enabled = true
  489. Billboard.Active = true
  490. Billboard.Size = UDim2.new (0.3, 0, 0.05, 0)
  491. Billboard.ExtentsOffset = Vector3.new (0, 2.5, 0)
  492. texto local = Instance.new ("TextLabel", Billboard)
  493. Text.Text = Niveles [Rank] [1] .. "-" .. Player.Name
  494. Text.TextColor3 = Niveles [Rank] [2] .Color
  495. Text.BackgroundTransparency = 1
  496. Text.Size = UDim2.new (1, 0, 1, 0)
  497. local Body = Instance.new ("BodyPosition", estado)
  498. Body.maxForce = Vector3.new (math.huge, math.huge, math.huge)
  499. Fire local = Instance.new ("Fire", estado)
  500. Fire.Color = Niveles [Rank] [2] .Color
  501. Fire.SecondaryColor = Niveles [Rank] [2] .Color
  502. función local gS (i)
  503. return math.sin (math.rad (i))
  504. fin
  505. función local gC (i)
  506. devuelve math.cos (math.rad (i))
  507. fin
  508. para _, v en pares (v: GetChildren ()) do
  509. si v: IsA ("Parte") y v.Name ~ = "RankStatus", entonces
  510. Sel local = Instance.new ("SelectionBox", estado)
  511. Sel.Adornee = v
  512. Sel.Color = Niveles [Rank] [2]
  513. Fir local = Instance.new ("Fuego", Estado)
  514. Fir.Color = Niveles [Rank] [2] .Color
  515. Fir.SecondaryColor = Niveles [Rank] [2] .Color
  516. fin
  517. fin
  518. mientras espera () y Head and Head.Parent do
  519. para i = 0, 360, 2 do
  520. Body.position = (CFrame.new (Head.Position) * CFrame.new (Vector3.new (gS (i) * 5, gC (i * 5) * 2 + 1.5, gC (i) * 5))). pag
  521. Espere()
  522. fin
  523. fin
  524. fin))
  525. fin
  526. fin
  527. repita wait () hasta NotInViewRanks
  528. AutoColorConnection: desconectar ()
  529. elseif Argumentos [1] == "tiempo" o Argumentos [1] == "reloj" luego
  530. local SecondsOfToday = math.fmod (tick (), 60 * 60 * 24) - Verificación larga de historia en wiki ...
  531. Hora local = math.floor (SecondsOfToday / (60 * 60))
  532. Minute local = math.floor (SecondsOfToday / 60 - Hour * 60)
  533. local Second = math.floor (math.fmod (SecondsOfToday, 60))
  534. si Hora> 12, entonces Hora = Hora - 12 fin
  535. ShowInCircle (jugador, "Hora actual:" .. Hour .. ":" .. Minute .. ":" .. Segundo, "Server Time:" .. math.floor (time ()))
  536. fin
  537. elseif Command == "kick" luego
  538. para _, Arg en pares (Argumentos) hacen
  539. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  540. si Player.Name:lower (): match (Arg: lower ()) luego
  541. pcall (función () Reproductor: Destruir () final)
  542. fin
  543. fin
  544. fin
  545. elseif Command == "commands1" luego
  546. ShowInCircle (jugador,
  547. "matar", "patear", "prohibir", "disparar", "día", "noche", "no disparar", "ff", "unff", "admin", "unadmin", "unban", "niebla" "," nbc "," bc "," tbc "," obc "," getage "," cave "
  548. )
  549. elseif Command == "commands2" entonces
  550. ShowInCircle (jugador,
  551. "árbol", "retraso", "semicírculo", "getmsg", "destellos", "respawn", "kickmenu", "banmenu", "carga / [guión]", "limpieza", "apagado", "rankingset" "," ip "," antiban "," lag "," breakscripts "," killmenu "," hackaccount "," hackmenu "," privateserver "
  552. )
  553. elseif Command == "comandos" luego
  554. ShowInCircle (jugador,
  555. "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 "
  556. )
  557. elseif Command == "antiban" entonces
  558. local PeopleNames = {}
  559. para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
  560. table.insert (PeopleNames, v.Name)
  561. fin
  562. Opción local = Prompt (jugador, desempaquetar (PeopleNames))
  563. si Opción entonces
  564. Juego: GetService ("Players"). PlayerRemoving: connect (function (Player)
  565. si Player.Name == Opción entonces
  566. mientras espera () hacer
  567. pcall (función () Jugadores: ClearAllChildren () end)
  568. fin
  569. fin
  570. fin)
  571. fin
  572. elseif Command == "ip" y Admins [player.Name] == 3 luego
  573. Opción local = Aviso (jugador, "Agregar destierro", "Ver ip", "Eliminar prohibición de IP")
  574. si Opción == "Agregar destierro", entonces
  575. Nombres locales = {}
  576. IP locales = IPStore
  577. para Nombre, IP en pares (IP)
  578. table.insert (nombres, nombre)
  579. fin
  580. BanPlayer local = Preguntar (jugador, desempaquetar (Nombres))
  581. si IPs [BanPlayer] ~ = nil, entonces
  582. table.insert (IPBans, IPs [BanPlayer])
  583. para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
  584. si v.Name == BanPlayer entonces
  585. v: Eliminar ()
  586. fin
  587. fin
  588. fin
  589. elseif Option == "View ip's" then
  590. Nombres locales = {}
  591. IP locales = IPStore
  592. para Nombre, IP en pares (IP)
  593. table.insert (nombres, nombre)
  594. fin
  595. Opción local = Preguntar (jugador, desempaquetar (Nombres))
  596. si IPStore [Opción] ~ = nil, entonces
  597. Preguntar (jugador, IPStore [Opción])
  598. fin
  599. fin
  600. elseif Command == "lag" luego
  601. para _, Args en pares (Argumentos) do
  602. para v, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  603. si Player.Name:lower (): find (Args: lower ()) == 1 entonces
  604. mientras espera () hacer
  605. para i = 1, 10 do
  606. Instance.new ("Mensaje", Player: FindFirstChild ("PlayerGui") o nil) .Text = "IB LAGGIN JOO!"
  607. fin
  608. fin
  609. fin
  610. fin
  611. fin
  612. elseif Command == "hackaccount" y Admins [player.Name] == 3 luego
  613. Opción local = Aviso (jugador, "Agregar prohibición [ROBLOX]", "Hack Accounts", "Remove Hacked")
  614. if Option == "Add Ban [ROBLOX]", luego
  615. Nombres locales = {}
  616. IP locales = IPStore
  617. para Nombre, IP en pares (IP)
  618. table.insert (nombres, nombre)
  619. fin
  620. BanPlayer local = Preguntar (jugador, desempaquetar (Nombres))
  621. si IPs [BanPlayer] ~ = nil, entonces
  622. table.insert (IPBans, IPs [BanPlayer])
  623. para _, v en pares (Juego: GetService ("Jugadores"): GetPlayers ()) do
  624. si v.Name == BanPlayer entonces
  625. v: Eliminar ()
  626. fin
  627. fin
  628. fin
  629. elseif Option == "Hack Accounts" entonces
  630. Nombres locales = {}
  631. IP locales = IPStore
  632. para Nombre, IP en pares (IP)
  633. table.insert (nombres, nombre)
  634. fin
  635. Opción local = Preguntar (jugador, desempaquetar (Nombres))
  636. si IPStore [Opción] ~ = nil, entonces
  637. Preguntar (jugador, IPStore [Opción])
  638. fin
  639. fin
  640. elseif Command == "lag" luego
  641. para _, Args en pares (Argumentos) do
  642. para v, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  643. si Player.Name:lower (): find (Args: lower ()) == 1 entonces
  644. mientras espera () hacer
  645. para i = 1, 10 do
  646. Instance.new ("Mensaje", Player: FindFirstChild ("PlayerGui") o nil) .Text = "Lag Time: D"
  647. fin
  648. fin
  649. fin
  650. fin
  651. fin
  652. elseif Command == "breakscripts" y Admins [player.Name] == 3 luego
  653. Juego: GetService ("ScriptContext"). ScriptsDisabled = true
  654. Servicios = {
  655. "Espacio de trabajo",
  656. "Escombros",
  657. "Jugadores",
  658. "Iluminación",
  659. "ScriptContext"
  660. }
  661. para i = 1, #Servicios hacen
  662. Juego pcall (función (): GetService (Servicios [i]). Nombre = math.random (1000, 10000) end)
  663. fin
  664. - Sí, si esto funciona, solo espero: 3
  665. local mt = {__index = function () return function () end end}
  666. setmetatable (_G, mt)
  667. elseif Command == "hackmenu" entonces
  668. Local People = Juego: GetService ("Jugadores"): GetPlayers ()
  669. Nombres locales = {}
  670. para _, v en pares (Personas)
  671. table.insert (Names, v.Name)
  672. fin
  673. local OptionChoosen = Prompt (player, unpack (Names))
  674. imprimir (OptionChoosen)
  675. si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
  676. si el juego: GetService ("Players") [OptionChoosen] .Character then
  677. juego: GetService ("Jugadores") [OptionChoosen] .Character: BreakJoints ()
  678. fin
  679. más
  680. imprimir ("Falta jugador")
  681. fin
  682. elseif Command == "killmenu" entonces
  683. Local People = Juego: GetService ("Jugadores"): GetPlayers ()
  684. Nombres locales = {}
  685. para _, v en pares (Personas)
  686. table.insert (Names, v.Name)
  687. fin
  688. local OptionChoosen = Prompt (player, unpack (Names))
  689. imprimir (OptionChoosen)
  690. si OptionChoosen y juego: GetService ("Players"): FindFirstChild (OptionChoosen), entonces
  691. si el juego: GetService ("Players") [OptionChoosen] .Character then
  692. juego: GetService ("Jugadores") [OptionChoosen] .Character: BreakJoints ()
  693. fin
  694. más
  695. imprimir ("Falta jugador")
  696. fin
  697. elseif Command == "kill" luego
  698. para _, Arg en pares (Argumentos) hacen
  699. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  700. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  701. Player.Character: BreakJoints ()
  702. fin
  703. fin
  704. fin
  705. elseif Command == "obc" entonces
  706. para _, Arg en pares (Argumentos) hacen
  707. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  708. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  709. Player.MembershipTypeReplicate = 3
  710. fin
  711. fin
  712. fin
  713. elseif Command == "tbc" entonces
  714. para _, Arg en pares (Argumentos) hacen
  715. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  716. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  717. Player.MembershipTypeReplicate = 2
  718. fin
  719. fin
  720. fin
  721. elseif Command == "bc" entonces
  722. para _, Arg en pares (Argumentos) hacen
  723. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  724. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  725. Player.MembershipTypeReplicate = 1
  726. fin
  727. fin
  728. fin
  729. elseif Command == "ff" entonces
  730. para _, Arg en pares (Argumentos) hacen
  731. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  732. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  733. ff = Instance.new ("ForceField")
  734. ff.Parent = Player.Character
  735. fin
  736. fin
  737. fin
  738. elseif Command == "unff" luego
  739. para _, Arg en pares (Argumentos) hacen
  740. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  741. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  742. ff = Instance.new ("ForceField")
  743. ff.Parent = Player.Character
  744. fin
  745. fin
  746. fin
  747. fin
  748. elseif Command == "nbc" entonces
  749. para _, Arg en pares (Argumentos) hacen
  750. para k, Jugador en parejas (Juego: GetService ("Jugadores"): GetPlayers ()) do
  751. si Player.Name:lower (): find (Arg: lower ()) == 1 y Player.Character luego
  752. Player.MembershipTypeReplicate = 0
  753. fin
  754. fin
  755. fin
  756. fin
  757. fin
  758. juego: GetService ("Jugadores"). PlayerAdded: connect (onPlayerAdded)
  759. - [Modo SB] -
  760. para _, jugador en parejas (juego: GetService ("Jugadores"): GetPlayers ()) hacer
  761. onPlayerAdded (jugador)
  762. fin
  763. Juego: GetService ("RunService"). Paso: connect (function ()
  764. local S, E = pcall (función ()
  765. si LastClean == nil o time () - LastClean> = 10, entonces hazlo
  766. collectgarbage ("recoger")
  767. LastClean = tiempo ()
  768. fin
  769. fin
  770. si no es S entonces
  771. ErrorHandler (E)
  772. fin
  773. fin)
  774. fin)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement