Advertisement
ToxicTheBoss

lol

May 30th, 2019
150
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.95 KB | None | 0 0
  1. -- // Variables: // --
  2.  
  3. local Players = {}
  4.  
  5. local Admins = {}
  6.  
  7. local Bans = {}
  8.  
  9. local Anti = {"likeajumpingpro","BeyondPlayzMC","altaccounttesting21"}
  10.  
  11. local Prefix = ":"
  12.  
  13. local Slocked = false
  14.  
  15. -- // Short Functions: // --
  16.  
  17. local GetRank = function(player)
  18. local f = false
  19.  
  20. for i,v in pairs(Admins) do
  21. if v == player then
  22. f = true
  23. end
  24. end
  25.  
  26. if f == false then
  27. return("None")
  28. else
  29. return("Admin")
  30. end
  31. end
  32.  
  33. local Kick = function(plr)
  34. local suc, err = pcall(function()
  35. if plr.Name == game.Players.LocalPlayer.Name then
  36. warn("Lmao, someone tried kicking you.")
  37. else
  38. local f = false
  39. for k,n in pairs(Anti) do
  40. if plr.Name == n then
  41. f = true
  42. end
  43. end
  44.  
  45. if f == true then
  46. if game.Players.LocalPlayer.Name == "likeajumpingpro" then
  47. else
  48. game.Players.LocalPlayer:Kick("Stop kicking invincible admins, lmao.")
  49. end
  50. else
  51. game.Players.LocalPlayer.Backpack.Delete.delete:FireServer(plr)
  52. end
  53. end
  54. end)
  55.  
  56. if suc then
  57. else
  58. warn("Your btools must no longer exist.")
  59. end
  60. end
  61.  
  62. local Find = function(input)
  63. local find = ""
  64. for i,v in pairs(game.Players:GetPlayers()) do
  65. local str = v.Name:lower()
  66.  
  67. local length = #input
  68.  
  69. if str:sub(1,length) == input then
  70. find = v.Name
  71. end
  72. end
  73.  
  74. if find == "" then
  75. return("None")
  76. else
  77. return(game.Players[find])
  78. end
  79. end
  80.  
  81. local Delete = function(item)
  82. local suc, err = pcall(function()
  83. game.Players.LocalPlayer.Backpack.Delete.delete:FireServer(item)
  84. end)
  85.  
  86. if suc then
  87. else
  88. warn("Your btools must no longer exist.")
  89. end
  90. end
  91.  
  92. local Input = function(msg,plr)
  93. local Rank = GetRank(plr)
  94.  
  95. if Rank == "Admin" then
  96. local Command = msg:lower()
  97.  
  98. if Command:sub(1,6) == ""..Prefix.."kick " then
  99. local Result = Find(Command:sub(7,#Command))
  100.  
  101. if Result == "None" then
  102. else
  103. Kick(Result)
  104. end
  105. else
  106.  
  107. if Command:sub(1,5) == ""..Prefix.."ban " then
  108. local Result = Find(Command:sub(7,#Command))
  109.  
  110. table.insert(Bans, Result.Name)
  111. if Result == "None" then
  112. else
  113. Kick(Result)
  114. end
  115.  
  116. else
  117.  
  118.  
  119. if Command:sub(1,4) == ""..Prefix.."get" then
  120. for i,v in pairs(game.Players:GetPlayers()) do
  121. if v.Backpack:FindFirstChild("Delete") then
  122. if v.Name == game.Players.LocalPlayer.Name then
  123. else
  124. Kick(v)
  125. warn("Possible threat: "..v.Name.."")
  126. end
  127. end
  128. end
  129. else
  130. if Command:sub(1,6) == ""..Prefix.."speed" then
  131. game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 85
  132. else
  133. if Command:sub(1,6) == ""..Prefix.."slock" then
  134. Slocked = true
  135. else
  136. if Command:sub(1,8) == ""..Prefix.."unslock" then
  137. Slocked = false
  138. else
  139. if Command:sub(1,7) == ""..Prefix.."admin " then
  140. local Result = Find(Command:sub(8,#Command))
  141.  
  142. if Result == "None" then
  143. else
  144. table.insert(Admins, Result.Name)
  145. end
  146. else
  147. if Command:sub(1,7) == ""..Prefix.."unlock" then
  148. for i,v in pairs(game.Workspace:GetDescendants()) do
  149. local suc, err = pcall(function()
  150. v.Locked = false
  151. end)
  152. end
  153. else
  154. if Command:sub(1,4) == ""..Prefix.."des" then
  155. Delete(workspace.Terrain.GameFolder.Admin.Pads)
  156. Delete(workspace.Terrain.GameFolder.Admin.Regen)
  157. Delete(workspace.Terrain.GameFolder.Folder)
  158. Delete(workspace.Terrain.GameFolder.Workspace.Obby)
  159. else
  160.  
  161. end
  162. end
  163. end
  164. end
  165. end
  166. end
  167. end
  168. end
  169. end
  170. end
  171. end
  172.  
  173.  
  174. -- // Set-up: // --
  175.  
  176. table.insert(Admins, game.Players.LocalPlayer.Name)
  177.  
  178.  
  179. -- // Command Input: // --
  180.  
  181. while wait(0.1) do
  182. for i,v in pairs(game.Players:GetPlayers()) do
  183. local f = false
  184. for k,c in pairs(Players) do
  185. if v.Name == c then
  186. f = true
  187. end
  188. end
  189.  
  190. if f == true then
  191. else
  192. table.insert(Players,v.Name)
  193.  
  194. v.Chatted:Connect(function(msg)
  195. Input(msg,v.Name)
  196. end)
  197.  
  198. end
  199.  
  200. for i,n in pairs(Bans) do
  201. if v.Name == n then
  202. Kick(v)
  203. end
  204. end
  205.  
  206. if Slocked == true then
  207. if v.Name == game.Players.LocalPlayer.Name then
  208. else
  209. Kick(v)
  210. end
  211. end
  212. end
  213. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement