Advertisement
Guest User

Untitled

a guest
Aug 21st, 2018
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.58 KB | None | 0 0
  1. wait(1)
  2. local Players = game:GetService("Players")
  3. local Player = Players.LocalPlayer
  4. local Mouse = Player:GetMouse()
  5. local Crashed = false
  6. local AntiHak = false
  7. local Innos = {}
  8. local Murds = {}
  9. local Sherr = {}
  10. local Lobby = {}
  11. local LKill = {}
  12. local ClickEnabled = false
  13. local ClickMethod = ""
  14.  
  15. local function GetPlayerFromShortName(ShortName)
  16. local Plr = nil
  17. for i, v in ipairs(game.Players:GetPlayers()) do
  18. if string.find(string.lower(v.Name),string.lower(ShortName)) ~= nil then
  19. Plr = v
  20. end
  21. end
  22. return Plr
  23. end
  24.  
  25. local LateCmds = {
  26. SingleCommands = {
  27. Kawaii = {
  28. Text = ":Kawaii",
  29. Apply = function()
  30. for i, v in ipairs(game.Players:GetPlayers()) do
  31. print("aye")
  32. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 924357545)
  33. end
  34. end
  35. },
  36. Oof = {
  37. Text = ":Oof",
  38. Apply = function()
  39. for i, v in ipairs(game.Players:GetPlayers()) do
  40. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 1104397785)
  41. end
  42. wait(4)
  43. for i, v in ipairs(game.Players:GetPlayers()) do
  44. game.ReplicatedStorage.Event:FireServer("TPD", 20000, v.Character.Humanoid)
  45. end
  46. end
  47. },
  48. Senpai = {
  49. Text = ":Senpai",
  50. Apply = function()
  51. for i, v in ipairs(game.Players:GetPlayers()) do
  52. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 1351745359)
  53. end
  54. end
  55. },
  56. MrCrabs = {
  57. Text = ":MrCrabs",
  58. Apply = function()
  59. for i, v in ipairs(game.Players:GetPlayers()) do
  60. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 477888998)
  61. end
  62. end
  63. },
  64. Earape = {
  65. Text = ":ERaep",
  66. Apply = function()
  67. for i, v in ipairs(game.Players:GetPlayers()) do
  68. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 1442863922)
  69. end
  70. end
  71. },
  72. Crash = {
  73. Text = ":Crash",
  74. Apply = function()
  75. Crashed = true
  76. end
  77. },
  78. Uncrash = {
  79. Text = ":Uncrash",
  80. Apply = function()
  81. Crashed = false
  82. end
  83. },
  84. AntiHack = {
  85. Text = ":AntiHack",
  86. Apply = function()
  87. AntiHak = true
  88. end
  89. },
  90. UnAntiHack = {
  91. Text = ":UnAntiHack",
  92. Apply = function()
  93. AntiHak = false
  94. end
  95. },
  96. SaveTools = {
  97. Text = ":SaveTools",
  98. Apply = function(Args)
  99. for i,v in pairs(Player.Character:GetDescendants()) do
  100. if v:IsA("Tool") then
  101. v.Parent = Player
  102. end
  103. end
  104. end
  105. },
  106. LoadTools = {
  107. Text = ":LoadTools",
  108. Apply = function(Args)
  109. for i,v in pairs(Player:GetChildren()) do
  110. if v:IsA("Tool") then
  111. v.Parent = Player.Backpack
  112. end
  113. end
  114. end
  115. }
  116. },
  117. Commands = {
  118. Kill = {
  119. Text = ":Kill",
  120. Apply = function(Args)
  121. local Target = GetPlayerFromShortName(Args[2])
  122. if Target ~= nil then
  123. game.ReplicatedStorage.Event:FireServer("TPD", 20000, Target.Character.Humanoid)
  124. end
  125. end
  126. },
  127. ClickCmd = {
  128. Text = ":ClickCmd",
  129. Apply = function(Args)
  130. ClickMethod = Args[3]
  131. end
  132. },
  133. Invis = {
  134. Text = ":Invis",
  135. Apply = function(Args)
  136. local Target = GetPlayerFromShortName(Args[2])
  137. if Target ~= nil then
  138. game.ReplicatedStorage.Event:FireServer("Cloak", Target.Character)
  139. end
  140. end
  141. },
  142. Play = {
  143. Text = ":ForcePlay",
  144. Apply = function(Args)
  145. local Target = GetPlayerFromShortName(Args[2])
  146. local ID = Args[3]
  147. if Target ~= nil and ID ~= "" and ID ~= " " then
  148. game.ReplicatedStorage.Event:FireServer("PlayRadio", Target, ID)
  149. end
  150. end
  151. },
  152. Music = {
  153. Text = ":Music",
  154. Apply = function(Args)
  155. local Target = GetPlayerFromShortName(Args[2])
  156. local ID = Args[3]
  157. if Target ~= nil and ID ~= "" and ID ~= " " then
  158. for i, v in ipairs(game.Players:GetPlayers()) do
  159. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, ID)
  160. end
  161. end
  162. end
  163. },
  164. LoopKill = {
  165. Text = ":lk",
  166. Apply = function(Args)
  167. print("Fia")
  168. local Target = GetPlayerFromShortName(Args[2])
  169. if Target ~= nil then
  170. table.insert(LKill,Target)
  171. end
  172. end
  173. },
  174. UnLoopKill = {
  175. Text = ":unlk",
  176. Apply = function(Args)
  177. print("Fia")
  178. local Target = GetPlayerFromShortName(Args[2])
  179. if Target ~= nil then
  180. local TIndex = 1
  181. for i, v in pairs(LKill) do
  182. if v == Target then
  183. LKill[i] = nil
  184. end
  185. end
  186. for i, v in pairs(LKill) do
  187. if v ~= nil then
  188. LKill[TIndex] = v
  189. TIndex = TIndex + 1
  190. end
  191. end
  192. end
  193. end
  194. },
  195. CountedKill = {
  196. Text = ":ck",
  197. Apply = function(Args)
  198. print("Fia")
  199. local Target = GetPlayerFromShortName(Args[2])
  200. if Target ~= nil then
  201. for i = 0,tonumber(Args[3]) do
  202. wait(1.5)
  203. game.ReplicatedStorage.Event:FireServer("TPD", 20000, Target.Character.Humanoid)
  204. end
  205. end
  206. end
  207. },
  208. God = {
  209. Text = ":God",
  210. Apply = function(Args)
  211. local Target = GetPlayerFromShortName(Args[2])
  212. if Target ~= nil then
  213. game.ReplicatedStorage.Event:FireServer("TPD", -888888888899999, game.Workspace.Ignore.Players[Target.Character].Humanoid)
  214. end
  215. end
  216. }
  217. }
  218. }
  219.  
  220. local function UpdateRoles()
  221. for i,v in pairs(game.Players:GetChildren()) do
  222. if game.Players[v.Name].Character:FindFirstChild("Role") then
  223. local role = game.Players[v.Name].Character:FindFirstChild("Role")
  224. print(v.Name)
  225. print(role.Value)
  226. if role.Value == "Murderer" then
  227. table.insert(Murds,v)
  228. elseif role.Value == "Sheriff" then
  229. table.insert(Sherr,v)
  230. elseif role.Value == "Innocent" then
  231. table.insert(Innos,v)
  232. else
  233. table.insert(Lobby,v)
  234. end
  235. else
  236. table.insert(Lobby,v)
  237. end
  238. end
  239. end
  240.  
  241. local function StringToArray(String,Separator)
  242. local Array = {}
  243. local ExtStr = String
  244. for i = 0,10 do
  245. if ExtStr == "" or ExtStr == " " then
  246.  
  247. else
  248. local Start = string.find(ExtStr,Separator)
  249. if Start ~= nil then
  250. local Arg = string.sub(ExtStr,0,Start-1)
  251. table.insert(Array,Arg)
  252. ExtStr = string.sub(ExtStr,Start+1)
  253. else
  254. table.insert(Array,ExtStr)
  255. ExtStr = ""
  256. end
  257. end
  258. end
  259. if string.lower(Array[1]) == "/e" then
  260. Array[1] = nil
  261. for i, v in pairs(Array) do
  262. if i == 1 then
  263.  
  264. else
  265. Array[i-1] = v
  266. end
  267. end
  268. end
  269. return Array
  270. end
  271.  
  272. local function Admin(Plr)
  273. local v = Plr
  274. v.Chatted:Connect(function(Msg)
  275. local Args = StringToArray(Msg," ")
  276. local Executed = false
  277. for i, v in pairs(LateCmds.SingleCommands) do
  278. if string.lower(Msg) == string.lower(v.Text) or string.lower(Msg) == "/e ".. string.lower(v.Text) then
  279. v.Apply()
  280. end
  281. end
  282. if Args[2] ~= nil then
  283. if string.lower(Args[2]) == "others" then
  284. for i, v in pairs(LateCmds.Commands) do
  285. if string.lower(Args[1]) == string.lower(v.Text) then
  286. for e, p in ipairs(game.Players:GetPlayers()) do
  287. if p.Name ~= Player.Name then
  288. Executed = true
  289. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  290. v.Apply(Args)
  291. end
  292. end
  293. end
  294. end
  295. elseif string.lower(Args[2]) == "all" then
  296. for i, v in pairs(LateCmds.Commands) do
  297. if string.lower(Args[1]) == string.lower(v.Text) then
  298. for e, p in ipairs(game.Players:GetPlayers()) do
  299. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  300. v.Apply(Args)
  301. end
  302. end
  303. end
  304. elseif string.lower(Args[2]) == "murds" then
  305. UpdateRoles()
  306. for i, v in pairs(LateCmds.Commands) do
  307. if string.lower(Args[1]) == string.lower(v.Text) then
  308. for e, p in pairs(Murds) do
  309. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  310. v.Apply(Args)
  311. end
  312. end
  313. end
  314. elseif string.lower(Args[2]) == "innos" then
  315. UpdateRoles()
  316. for i, v in pairs(LateCmds.Commands) do
  317. if string.lower(Args[1]) == string.lower(v.Text) then
  318. for e, p in pairs(Innos) do
  319. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  320. v.Apply(Args)
  321. end
  322. end
  323. end
  324. elseif string.lower(Args[2]) == "sherr" then
  325. UpdateRoles()
  326. for i, v in pairs(LateCmds.Commands) do
  327. if string.lower(Args[1]) == string.lower(v.Text) then
  328. for e, p in pairs(Sherr) do
  329. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  330. v.Apply(Args)
  331. end
  332. end
  333. end
  334. elseif string.lower(Args[2]) == "lobby" then
  335. UpdateRoles()
  336. for i, v in pairs(LateCmds.Commands) do
  337. if string.lower(Args[1]) == string.lower(v.Text) then
  338. for e, p in pairs(Lobby) do
  339. Args[2] = string.sub(p.Name,0,string.len(p.Name)-2)
  340. v.Apply(Args)
  341. end
  342. end
  343. end
  344. elseif string.lower(Args[2]) == "me" then
  345. for i, v in pairs(LateCmds.Commands) do
  346. if string.lower(Args[1]) == string.lower(v.Text) then
  347. Args[2] = string.sub(Player.Name,0,string.len(Player.Name)-2)
  348. v.Apply(Args)
  349. end
  350. end
  351. else
  352. for i, v in pairs(LateCmds.Commands) do
  353. if string.lower(Args[1]) == string.lower(v.Text) then
  354. v.Apply(Args)
  355. end
  356. end
  357. end
  358. end
  359. end)
  360. end
  361.  
  362. Admin(Player)
  363.  
  364. Mouse.KeyDown:Connect(function(Key)
  365. if Key == "r" then
  366. if ClickEnabled == true then
  367. ClickEnabled = false
  368. else
  369. ClickEnabled = true
  370. end
  371. elseif Key == "z" then
  372. for i,v in pairs(Player.Character:GetDescendants()) do
  373. if v:IsA("Tool") then
  374. v.Parent = Player
  375. end
  376. end
  377. elseif Key == "x" then
  378. for i,v in pairs(Player:GetChildren()) do
  379. if v:IsA("Tool") then
  380. v.Parent = Player.Backpack
  381. end
  382. end
  383. end
  384. end)
  385.  
  386. Mouse.Button1Down:Connect(function()
  387. if ClickEnabled == true then
  388. if ClickMethod == "dst" then
  389. Mouse.Target:Destroy()
  390. elseif ClickMethod == "tp" then
  391. Player.Character.HumanoidRootPart.CFrame = Mouse.Hit + Vector3.new(0,2.5,0)
  392. end
  393. end
  394. end)
  395.  
  396. LateCmds.Commands.Admin = {
  397. Text = ":Admin",
  398. Apply = function(Args)
  399. local Target = GetPlayerFromShortName(Args[2])
  400. if Target ~= nil then
  401. Admin(Player)
  402. end
  403. end
  404. }
  405.  
  406. while true do
  407. wait(0.1)
  408. if Crashed == true then
  409. for i,v in pairs(game.Players:GetChildren()) do
  410. if v.Character ~= nil and v.Name ~= Player.Name and v.Character:FindFirstChild("Torso") ~= nil then
  411. v.Character.Torso:Destroy()
  412. end
  413. game.ReplicatedStorage.Event:FireServer("PlayRadio", v, 491150071)
  414. end
  415. end
  416. if AntiHak == true then
  417. antiKek={'AntiSpeedHack','AntiDataTheft','UI','NO FF','NO FF'}
  418. local Player = game.Players.LocalPlayer
  419. local Gui = Player.PlayerGui
  420. for i,v in pairs(antiKek) do
  421. if Gui:FindFirstChild(v) then
  422. Gui:FindFirstChild(v):Remove()
  423. end
  424. end
  425. end
  426. for i,v in pairs(game.Players:GetChildren()) do
  427. if game.Players[v.Name].Character:FindFirstChild("Role") then
  428. local role = game.Players[v.Name].Character:FindFirstChild("Role")
  429. if role.Value == "Murderer" then
  430. game.CoreGui.RobloxGui.PlayerListContainer.ScrollList[v.Name].BGFrame.PlayerName.TextColor3 = Color3.new(1, 0, 0)
  431. elseif role.Value == "Sheriff" then
  432. game.CoreGui.RobloxGui.PlayerListContainer.ScrollList[v.Name].BGFrame.PlayerName.TextColor3 = Color3.new(1, 170/255, 0)
  433. elseif role.Value == "Innocent" then
  434. game.CoreGui.RobloxGui.PlayerListContainer.ScrollList[v.Name].BGFrame.PlayerName.TextColor3 = Color3.new(0, 1, 0)
  435. else
  436. game.CoreGui.RobloxGui.PlayerListContainer.ScrollList[v.Name].BGFrame.PlayerName.TextColor3 = Color3.new(1, 1, 1)
  437. end
  438. else
  439. game.CoreGui.RobloxGui.PlayerListContainer.ScrollList[v.Name].BGFrame.PlayerName.TextColor3 = Color3.new(1, 1, 1)
  440. end
  441. end
  442. for i, v in pairs(LKill) do
  443. if v ~= nil and v.Character ~= nil then
  444. game.ReplicatedStorage.Event:FireServer("TPD", 20000, v.Character:FindFirstChild("Humanoid"))
  445. end
  446. end
  447. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement