Advertisement
Demonlord27

Apex V4 VENGANCE

Apr 24th, 2016
184
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 28.63 KB | None | 0 0
  1. -- Apex Administration V4 by awesomedude739
  2. -- Vengance update
  3.  
  4. --edits done by coloredtext
  5.  
  6.  
  7. Kick = function(plr)
  8. local h=Instance.new('RemoteEvent',workspace):FireClient(plr,{string.rep("umad?",2e5+5)})
  9. delay(1,function()
  10. pcall(function()
  11. h:remove()
  12. end)
  13. end)
  14. end
  15.  
  16. wait()
  17. script.Parent = Instance.new('Glue') -- Anti h4x0rz
  18.  
  19. Rot1 = math.rad(0)*math.pi*2
  20. Rot2 = math.rad(0)*math.pi*2
  21. Lerp_Rot = .1
  22.  
  23. Apex = {
  24. Tablets = {};
  25. Commands = {};
  26. Rot_1 = math.rad(0)*math.pi*2;
  27. Rot_2 = math.rad(0)*math.pi*2;
  28. Prefix = ".";
  29. Suffix = "/";
  30. Functions = {};
  31. Version = "[VENGANCE]";
  32. Logs = {
  33. ScriptLogs = {};
  34. ChatLogs = {};
  35. ErrorLogs = {};
  36. OtherPlayerLogs = {};
  37. },
  38. Fake = {
  39. _G = {};
  40. shared = {};
  41. Functions = {};
  42. },
  43. Settings = {
  44. Tablet = false;
  45. AgeEnabled = false;
  46. ScriptEnabled = false;
  47. HttpEnabled = false;
  48. LoadstringEnabled = false;
  49. PrivateServerEnabled = false;
  50. Scripts = false;
  51. HttpCommands = true;
  52. },
  53. _Ranked = {
  54. {Nme="stxdios",Rank=1337,Description="Boss.",Color="Really red"};
  55. {Nme="GuestsAreIntelligent",Rank=1337,Description="Boss.",Color="Really red"};
  56. {Nme="Chillarz",Rank=1337,Description="For Studio testing.",Color="Really red"};
  57. {Nme="RomyAouad",Rank=1337,Description="Good friend and a good scripter.",Color="White"};
  58. {Nme="",Rank=3,Description="Good friend and a good scripter.",Color="White"};
  59. {Nme="Euonix",Rank=-1,Description="Really annoying.",Color="Really black"};
  60. {Nme="",Rank=-1,Description="Abuser, REALLY annoying.",Color="Really black"};
  61. {Nme="nmoom1",Rank=-1,Description="Abuser, REALLY annoying.",Color="Really black"};
  62. {Nme="",Rank=-1,Description="Started insulting me the second he saw me.",Color="Really black"};
  63. },
  64. Get = {};
  65. Set = {};
  66. Updates = {
  67. "This was made by awesomedude739.";
  68. "This was edited by coloredtext.";
  69. };
  70. };
  71. Notify = function(plr,msg)
  72. if msg==nil then msg = "Nil message." end
  73. local pg = plr.PlayerGui;
  74. local Gui = Instance.new("ScreenGui", pg);
  75. local frame = Instance.new("Frame", pg);
  76. frame.Size = UDim2.new(1,0,0.5,0);
  77. frame.Position = UDim2.new(0,0,0);
  78. frame.Draggable = true;
  79. frame.Active = true;
  80. local text = Instance.new("TextLabel", frame);
  81. text.Size = UDim2.new(.99,0,0,2.5);
  82. text.Position = UDim2.new(.005,0,0,2.5);
  83. text.Text = "-=[ Apex Vengance ]=- "..msg;
  84. text.Font = "Arial";
  85. text.FontSize = "Size18";
  86. text.TextScaled = true;
  87. text.TextWrapped = false;
  88. end;
  89.  
  90. Update = function(plr,msg)
  91. if msg==nil then msg = "Nil message." end
  92. local pg=plr.PlayerGui;
  93. if plr and pg:FindFirstChild("PlayerGui") then
  94. coroutine.resume(coroutine.create(function()
  95. local Gui=Instance.new("ScreenGui",pg);
  96. local Frame=Instance.new("Frame",Gui);
  97. Frame.Size = UDim2.new(1,0,1,0);
  98. Frame.BackgroundTransparency = 1;
  99. Frame.BorderColor3=Color3.new(0,0,0);
  100. Frame.Style = "Custom";
  101. Frame.BorderSizePixel = 0;
  102. local Text = Instance.new("TextLabel",Frame);
  103. Text.BackgroundTransparency=1;
  104. Text.Size=UDim2.new(1,0,1,0);
  105. Text.Text='-=[ Apex Vengance ]=- '..msg;
  106. Text.Font='Arial';
  107. Text.FontSize='Size12';
  108. Text.BorderColor3=Color3.new(0,0,0);
  109. Text.BackgroundColor3=Color3.new(255,255,255);
  110. Text.TextScaled=true;
  111. Text.TextWrapped=false;
  112. Text.TextStrokeColor3=Color3.new(1,1,1);
  113. Text.TextStrokeTransparency=0;
  114. Text.TextTransparency=0;
  115. end));
  116. end;
  117. end;
  118.  
  119. GetTablets = function(plr)
  120. local Table = {};
  121. pcall(function() plr = plr.Name end);
  122. for _,Tablet in next,Apex.Tablets do
  123. if(Tablet.Owner==plr.Name) then
  124. table.insert(Table,plr.Name);
  125. end;
  126. return Table;
  127. end;
  128. end;
  129. GetScript = function(plr)
  130. local Scripts = {};
  131. pcall(function() plr = plr.Name end);
  132. for _,Script in next,Apex.Settings.Scripts do
  133. if(Script.Disabled == true or Script.Disabled == false) then
  134. table.remove(Scripts,script);
  135. end;
  136. return Scripts;
  137. end;
  138. end;
  139. Output = function(time,Player,Text,Color,Func)
  140. wait()
  141. if Color == nil then Color = "Institutional white" end;
  142. if Func == nil then Func=function() end; end;
  143. if Text == nil then Text="Nil text." end;
  144. local Part = Instance.new("Part", game.Workspace);
  145. Part.FormFactor = "Custom";
  146. Part.CFrame = CFrame.new(0,80,0);
  147. Part.CanCollide = false;
  148. Part.Locked = true;
  149. Part.Anchored = true;
  150. Part.Name = "Apex V4 VENGANCE Tablet";
  151. Part.Transparency = 0.3;
  152. Part.BrickColor = BrickColor.new(Color);
  153. Part.Size = Vector3.new(2,2,2);
  154. Part.TopSurface = "Smooth";
  155. Part.BottomSurface = "Smooth";
  156. local Box = Instance.new("SelectionBox",Part);
  157. Box.Adornee = Part;
  158. Box.Color = BrickColor.new("Really black");
  159. Box.Transparency = 0.3;
  160. local Gui = Instance.new("BillboardGui",Part);
  161. wait()
  162. Gui.Adornee = Part;
  163. Gui.StudsOffset = Vector3.new(0,3,0);
  164. Gui.Size = UDim2.new(1,0,1,0);
  165. Gui.Name = "Gui";
  166. local Gyro = Instance.new("BodyGyro",Part);
  167. local TextLabel = Instance.new("TextLabel",Gui);
  168. wait()
  169. TextLabel.Text = Text;
  170. TextLabel.BackgroundTransparency = 1;
  171. TextLabel.Size = UDim2.new(1,0,1,0);
  172. TextLabel.FontSize = "Size18";
  173. TextLabel.Font = "ArialBold";
  174. TextLabel.TextColor3 = BrickColor.new(Color).Color;
  175. local Click = Instance.new("ClickDetector",Part);
  176. wait()
  177. Click.MouseClick:connect(function(plr)
  178. if plr.userId == Player.userId then
  179. pcall(function() time=0 end)
  180. coroutine.wrap(function()
  181. spawn(function()
  182. for _ = 0.5,1,0.05 do
  183. pcall(function()
  184. TextLabel.TextStrokeTransparency = TextLabel.TextStrokeTransparency+0.1
  185. Part.Size = Part.Size-Vector3.new(0.4,0.4,0.4)
  186. Box.Transparency = Box.Transparency+0.1
  187. Part.Transparency = Part.Transparency+0.05
  188. end)
  189. wait()
  190. end
  191. pcall(function()
  192. Part:Destroy()
  193. end)
  194. end)
  195. end)()
  196. Func=Func Func()
  197. end
  198. end)
  199. Click.MouseHoverEnter:connect(function(plr)
  200. if plr.userId == Player.userId then
  201. Box.Transparency = 0.1
  202. Part.Size = Vector3.new(1.6,1.6,1.6)
  203. end
  204. end)
  205. Click.MouseHoverLeave:connect(function(plr)
  206. if plr.userId == Player.userId then
  207. Box.Transparency = 0.3
  208. Part.Size = Vector3.new(2,2,2)
  209. end
  210. end)
  211. table.insert(Apex.Tablets,{Tab=Part,Player=Player.userId,Box=Box,Gyro=Gyro,Text=TextLabel})
  212. Part.Parent=script;
  213. GetRank = function(plr)
  214. local Rk=0;
  215. for _,data in pairs(Apex["_Ranked"]) do
  216. if plr.Name == data.Nme then
  217. Rk = data.Rank
  218. end;
  219. end;
  220. return Rk;
  221. end;
  222. GetColor = function(plr)
  223. local Color = "Really black";
  224. for _,data in pairs(Apex["_Ranked"]) do
  225. if plr.Name == data.Name then
  226. Color = data.Color
  227. end;
  228. end;
  229. return Color;
  230. end;
  231. Broadcast_All = function(time,Player,Text,Color,Func)
  232. table.insert(Apex.Tablets,{Tab=Part,Player=Player.userId,Box=Box,Gyro=Gyro,Text=TextLabel})
  233. Part.Parent=script;
  234. end;
  235. end;
  236.  
  237. function findPlayer(str, spkr)
  238. local result = {}
  239. for _, person in pairs(game.Players:GetChildren()) do
  240. if person.Name:lower():find(str) == 1 then
  241. result[person] = person
  242. end
  243. end
  244. if str == "me" then result = {spkr} end
  245. if str == "all" then
  246. for _, person in pairs(game.Players:GetChildren()) do
  247. result[person] = person
  248. end
  249. end
  250. if str == "others" then
  251. for _, person in pairs(game.Players:GetChildren()) do
  252. if person.userId ~= spkr.userId then
  253. result[person] = person
  254. end
  255. end
  256. end
  257. return result
  258. end
  259.  
  260. function UpdateTabPos()
  261. Rot1=Rot1+Rot2
  262. for _,Player in pairs(game:service'Players':GetPlayers()) do
  263. local CollectionTabs = {}
  264. local Player_Pos = nil
  265. for i,v in pairs(Apex.Tablets) do
  266. if v.Tab.Parent ~= nil and v.Player == Player.userId then
  267. table.insert(CollectionTabs,v)
  268. end
  269. end
  270. pcall(function()
  271. if Player.Character ~= nil and Player.Character.Torso ~= nil then
  272. pcall(function()
  273. Player_Pos = Player.Character.Torso.CFrame
  274. end)
  275. end
  276. end)
  277. for i,v in pairs(CollectionTabs) do
  278. if v.Tab.Parent == nil then
  279. v.Tab:remove()
  280. table.remove(CollectionTabs, i)
  281. end
  282. if v.Tab.Parent ~= nil and v.Player == Player.userId then
  283. pcall(function()
  284. if v.Tab.Parent ~= game.Workspace then v.Tab.Parent = game.Workspace end
  285. local Radius1=CFrame.new(0,0,-4.5-#CollectionTabs)
  286. local Radius2=Radius1*CFrame.Angles(math.rad(25),0,0)
  287. local cfr = Player_Pos*CFrame.Angles(.001,math.rad((i*360/#CollectionTabs)+Rot1),0)*Radius2
  288. local Pos = v.Tab.CFrame.p
  289. Pos = Pos:Lerp(cfr.p,Lerp_Rot)
  290. v.Tab.CFrame=CFrame.new(Pos)*v.Gyro.cframe
  291. v.Gyro.cframe=v.Gyro.cframe*CFrame.Angles(math.rad(1),math.rad(1),math.rad(1))
  292. end)
  293. end
  294. end
  295. end
  296. end;
  297.  
  298. AddCommand = function(Name,Usage,Desc,Rank,Func)
  299. table.insert(Apex.Commands,{Name=Name,Usage=Usage,Desc=Desc,Rank=Rank,Func=Func})
  300. end;
  301.  
  302. Chat = function(plr,msg)
  303. local Ran,Error=ypcall(function()
  304. for _,data in pairs(Apex["Commands"]) do
  305. if msg:sub(1,#(data["Usage"]:lower()..Apex.Suffix))==(data["Usage"]:lower()..Apex.Prefix) then
  306. if GetRank(plr) >= data.Rank then
  307. msg = msg:sub(#data["Usage"]+#Apex.Suffix+1);
  308. local a,b=ypcall(function()
  309. data["Func"](plr,msg)
  310. end);
  311. if not a then
  312. Output(5,plr,"ERROR: "..b,"Really red",function() end);
  313. end;
  314. else
  315. Output(10,plr,"Your rank is too low for that command.","Really red",function() end);
  316. end;
  317. end;
  318. end;
  319. end);
  320. if not Ran then print(Error) end;
  321. end;
  322.  
  323. for _,plr in pairs(game.Players:GetPlayers()) do
  324. plr.Chatted:connect(function(msg)
  325. Chat(plr,msg);
  326. end);
  327. Output(5,plr,"Apex V4 VENGANCE loaded.","Really red")
  328. wait()
  329. Output(5,plr,"Your rank is "..GetRank(plr)..'/4.',"Really black")
  330. end
  331.  
  332. Dismiss = function(plr)
  333. wait()
  334. for i=1,4 do
  335. for _,v in pairs(Apex.Tablets) do
  336. if v.Tab and v.Tab.Parent and v.Player == plr.userId then
  337. v.Tab.Size = v.Tab.Size-Vector3.new(0.2,0.2,0.2)
  338. end
  339. end
  340. wait(0.01)
  341. end
  342. wait(0.01)
  343. for _,v in pairs(Apex.Tablets) do
  344. if v.Player == plr.userId then
  345. v.Tab:Destroy();
  346. end
  347. end
  348. end
  349.  
  350. ShowCommands = function(plr)
  351. Dismiss(plr);
  352. for _,v in pairs(Apex.Commands) do
  353. Output(30,plr,v["Name"],"White",function()
  354. Dismiss(plr);
  355. Output(30,plr,'Name: '..v.Name,'White',function() end);
  356. Output(30,plr,'Usage: '..v.Usage,'White',function() end);
  357. Output(30,plr,'Description: '..v.Desc,'White',function() end);
  358. Output(30,plr,'Rank needed: '..v.Rank,'Lime green',function() end);
  359. Output(30,plr,'Back','Lime green',function() ShowCommands(plr); end);
  360. Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);
  361. end);
  362. end;
  363. if GetRank(plr)<4 then
  364. Output(30,plr,"Commands for rank "..GetRank(plr),'Lime green',function()
  365. Dismiss(plr);
  366. for _,v in pairs(Apex.Commands) do
  367. if GetRank(plr) >= v.Rank then
  368. Output(30,plr,v["Name"],"White",function()
  369. Dismiss(plr);
  370. Output(30,plr,'Name: '..v.Name,'White',function() end);
  371. Output(30,plr,'Usage: '..v.Usage,'White',function() end);
  372. Output(30,plr,'Description: '..v.Desc,'White',function() end);
  373. Output(30,plr,'Rank needed: '..v.Rank,'Lime green',function() end);
  374. Output(30,plr,'Back','Lime green',function() ShowCommands(plr); end);
  375. Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);
  376. end);
  377. end;
  378. end;
  379. end);
  380. Output(30,plr,"Dismiss","Really red",function() Dismiss(plr) end)
  381. end;
  382. end;
  383.  
  384. KickBannedPlayers = function()
  385. for _,plr in pairs(game.Players:GetChildren()) do
  386. for _,v in pairs(Apex['_Ranked']) do
  387. if plr.Name == v.Nme and v.Rank == -1 then
  388. Kick(game:service'Players'[plr.Name])
  389. end
  390. end
  391. end
  392. end
  393.  
  394. GetRankd = function(plr)
  395. Dismiss(plr);
  396. for _,v in pairs(Apex["_Ranked"]) do
  397. Output(30,plr,v["Nme"],"White",function()
  398. Dismiss(plr);
  399. Output(30,plr,'Name: '..v.Nme,v.Color,function() end);
  400. Output(30,plr,'Rank: '..v.Rank,v.Color,function() end);
  401. Output(30,plr,'Description: '..v.Description,v.Color,function() end);
  402. Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);
  403. Output(30,plr,'Back','Lime green',function() GetRankd(plr) end);
  404. end);
  405. end;
  406. end
  407.  
  408. AddCommand('Commands','cmds','Show all commands.',0,function(Speaker,Message)
  409. ShowCommands(Speaker);
  410. end)
  411.  
  412. AddCommand('Ping','ping','Output a message.',0,function(Speaker,Message)
  413. if Message == nil then Message = "" end
  414. Output(10,Speaker,Message)
  415. end)
  416.  
  417. AddCommand('Touch Kick','touchkick','Kick any player you touch.',3,function(Speaker,Message)
  418. Speaker.Character.Torso.Touched:connect(function(thing)
  419. if game.Players[thing.Parent.Name] then
  420. Kick(game:service'Players'[thing.Parent.Name])
  421. end
  422. end)
  423. end)
  424.  
  425. AddCommand('Touch Ban','touchban','Ban any player you touch.',3,function(Speaker,Message)
  426. Speaker.Character.Torso.Touched:connect(function(thing)
  427. if game.Players[thing.Parent.Name] then
  428. Kick(game:service'Players'[thing.Parent.Name])
  429. table.insert(Apex['_Ranked'],{Nme=thing.Parent.Name,Rank=-1,Description="Touch Banned",'Really black'})
  430. end
  431. end)
  432. end)
  433.  
  434. AddCommand('Dismiss','dt','Dismiss tablets.',0,function(Speaker,Message)
  435. Dismiss(Speaker);
  436. end)
  437.  
  438. AddCommand('Dismiss all','dtall',"Dismiss every player's tablets.",3,function(Speaker,Message)
  439. for _,Player in next,game.Players:children() do
  440. Dismiss(Player);
  441. end;
  442. end)
  443.  
  444. AddCommand('Get ranked','granked','Show all ranked players.',1,function(Speaker,Message)
  445. GetRankd(Speaker)
  446. end)
  447.  
  448. AddCommand('Kill','kill','Kill a player.',2,function(Speaker,Message)
  449. local p = findPlayer(Message, Speaker)
  450. for _,plr in pairs(p) do
  451. plr.Character:BreakJoints()
  452. Output(5,Speaker,'Killed '..plr.Name)
  453. end
  454. end)
  455.  
  456. AddCommand('ForceField','ff','Give a player a ForceField.',2,function(Speaker,Message)
  457. local p = findPlayer(Message, Speaker)
  458. for _,plr in pairs(p) do
  459. Instance.new("ForceField", plr.Character)
  460. Output(5,Speaker,'Gave '..plr.Name..' a ForceField.')
  461. end
  462. end)
  463.  
  464. AddCommand('UnForceField','unff',"Remove a player's ForceField.",2,function(Speaker,Message)
  465. local p = findPlayer(Message, Speaker)
  466. for _,plr in pairs(p) do
  467. if plr.Character:FindFirstChild("ForceField") then
  468. plr.Character.ForceField:Destroy()
  469. Output(5,Speaker,'Removed '..plr.Name.."'s ForceField.")
  470. end
  471. end
  472. end)
  473.  
  474. AddCommand('God','god','Gives a player a huge amount of health.',2,function(Speaker,Message)
  475. local p = findPlayer(Message, Speaker)
  476. for _,plr in pairs(p) do
  477. plr.Character.Humanoid.MaxHealth = math.huge
  478. plr.Character.Humanoid.Health = 9e9
  479. Output(5,Speaker,'Made '..plr.Name..' a god.')
  480. end
  481. end)
  482.  
  483. AddCommand('Ungod','ungod','Returns a player to their normal health.',2,function(Speaker,Message)
  484. local p = findPlayer(Message, Speaker)
  485. for _,plr in pairs(p) do
  486. plr.Character.Humanoid.Health = 100
  487. plr.Character.Humanoid.MaxHealth = 100
  488. Output(5,Speaker,'Ungodded '..plr.Name..'.')
  489. end
  490. end)
  491.  
  492. AddCommand('Kick','kick','Kick a player from the game.',3,function(Speaker,Message)
  493. local p = findPlayer(Message, Speaker)
  494. for _,plr in pairs(p) do
  495. Output(5,Speaker,'Kicking '..plr.Name..'.')
  496. Kick(game:service'Players'[plr.Name])
  497. end
  498. end)
  499.  
  500. AddCommand('Ban','ban','Bans a player from the game.',3,function(Speaker,Message)
  501. local p = findPlayer(Message, Speaker)
  502. for _,plr in pairs(p) do
  503. table.insert(Apex['_Ranked'],{Nme=plr.Name,Rank=-1,Description="Banned",'Really black'})
  504. Output(5,Speaker,'Banned '..plr.Name..'.')
  505. end
  506. end)
  507.  
  508. AddCommand('UnBan','unban','Un-Bans a player.',3,function(Speaker,Message)
  509. for _,plr in pairs(Apex['_Ranked']) do
  510. if plr.Nme == Message and plr.Rank < 0 then
  511. plr.Rank = 0
  512. Output(5,'Speaker','Unbanned '..plr.Nme..'.')
  513. end
  514. end
  515. end)
  516.  
  517. AddCommand('NoCopyrightSounds','ncs','Play some great music.',2,function(Speaker,Message)
  518. pcall(function()
  519. if sound then sound:Stop() sound:Destroy() end
  520. sound = Instance.new("Sound",script);
  521. sound.Looped = true
  522. local url = "http://www.roblox.com/asset/?id="
  523. local ready = false
  524. Dismiss(Speaker)
  525. Output(30,Speaker,"NoCopyrightSounds","Really black");
  526. Output(30,Speaker,"Alan Walker - Fade","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."227475817" sound.Volume = 0.5 ready = true end)
  527. Output(30,Speaker,"Alan Walker - Spectre","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."219506834" sound.Volume = 0.5 ready = true end);
  528. Output(30,Speaker,"Codeko - Crest","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."186496535" sound.Volume = 0.2 ready = true end);
  529. Output(30,Speaker,"Itro - Panda","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."201573748" sound.Volume = 0.5 ready = true end);
  530. Output(30,Speaker,"Distrion and Electro-Light - Rubik","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."222338678" sound.Volume = 0.5 ready = true end);
  531. Output(30,Speaker,"Itro & Tobu - Cloud 9","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."181065299" sound.Volume = 0.5 ready = true end);
  532. while not ready do
  533. wait(2)
  534. end
  535. sound.Parent = Speaker.Character.Torso
  536. wait()
  537. Output(5,Speaker,"Playing music.")
  538. sound:Play()
  539. end)
  540. end)
  541.  
  542. AddCommand('Music','music','Play music of your choice.',3,function(Speaker,Message)
  543. pcall(function()
  544. if sound then sound:Stop() sound:Destroy() end
  545. sound = Instance.new("Sound",script)
  546. sound.Looped = true
  547. local url = "http://www.roblox.com/asset/?id="..Message
  548. sound.SoundId = url
  549. sound.Parent = Speaker.Character.Torso
  550. Dismiss(Speaker)
  551. wait(2)
  552. Output(5,Speaker,"Click to play song "..Message,"New Yeller",function() sound:Play() end)
  553. end)
  554. end)
  555.  
  556. AddCommand('Players','net','View people connected to the game (even nils).',4,function(Speaker,Message)
  557. for _,v in pairs(game.NetworkServer:GetChildren()) do
  558. if v.Parent == nil then
  559. Output(30,Speaker,v.Name.." <NIL>","Really red")
  560. else
  561. Output(30,Speaker,v.Name,"Lime green")
  562. end
  563. end
  564. end)
  565.  
  566. AddCommand('Stop Music','stopmusic','Stop playing music.',2,function()
  567. pcall(function()
  568. if sound then sound:Stop() end
  569. sound:Destroy()
  570. end)
  571. end)
  572.  
  573. AddCommand('Information','i','Get information about a player.',2,function(Speaker,Message)
  574. local p = findPlayer(Message, Speaker)
  575. for _,plr in pairs(p) do
  576. Output(30,Speaker,'Info on '..plr.Name,'Really black',function()
  577. Dismiss(Speaker)
  578. Output(30,Speaker,plr.Name)
  579. Output(30,Speaker,plr.AccountAge..' days old')
  580. Output(30,Speaker,'Rank '..GetRank(plr)..'/4')
  581. Output(30,Speaker,'Kick','Really red',function() Kick(game:service'Players'[plr.Name]) end)
  582. end)
  583. end
  584. end)
  585.  
  586. AddCommand('Set Rank','setrank',"Sets a player's rank.",1,function(Speaker,Message)
  587. local p = findPlayer(Message, Speaker)
  588. Dismiss(Speaker)
  589. for _,otherp in pairs(p) do
  590. Output(30,Speaker,'Set '..otherp.Name.."'s rank",nil,function()
  591. Dismiss(Speaker)
  592. isrkd = false
  593. for _,ppl in pairs(Apex['_Ranked']) do
  594. if otherp.Name == ppl.Name then isrkd = true end
  595. end
  596. if isrkd == false then
  597. table.insert(Apex['_Ranked'],{Nme=otherp.Name,Rank=0,Description="User",'White'})
  598. end
  599. Output(30,Speaker,'Change '..otherp.Name.."'s rank to...",'Black',function() Dismiss(Speaker) end)
  600. Output(30,Speaker,0,nil,function() if GetRank(Speaker)>GetRank(otherp) then
  601. for _,plr in pairs(Apex['_Ranked']) do
  602. if plr.Name == otherp.Name then plr.Rank = 0; end
  603. end
  604. Output(5,p,'You are now rank 0/4.','New Yeller');
  605. end Dismiss(Speaker) end)
  606. Output(30,Speaker,1,nil,function() if GetRank(Speaker)>GetRank(otherp) then
  607. for _,plr in pairs(Apex['_Ranked']) do
  608. if plr.Name == otherp.Name then plr.Rank = 1; end
  609. end
  610. Output(5,p,'You are now rank 1/4.','New Yeller');
  611. end Dismiss(Speaker) end)
  612. Output(30,Speaker,2,nil,function() if GetRank(Speaker)>GetRank(otherp) then
  613. for _,plr in pairs(Apex['_Ranked']) do
  614. if plr.Name == otherp.Name then plr.Rank = 2; end
  615. end
  616. Output(5,p,'You are now rank 2/4.','New Yeller');
  617. end Dismiss(Speaker) end)
  618. Output(30,Speaker,3,nil,function() if GetRank(Speaker)>GetRank(otherp) then
  619. for _,plr in pairs(Apex['_Ranked']) do
  620. if plr.Name == otherp.Name then plr.Rank = 3; end
  621. end
  622. Output(5,p,'You are now rank 3/4.','New Yeller');
  623. end Dismiss(Speaker) end)
  624. Output(30,Speaker,4,nil,function() if GetRank(Speaker)>GetRank(otherp) then
  625. for _,plr in pairs(Apex['_Ranked']) do
  626. if plr.Name == otherp.Name then plr.Rank = 4; end
  627. end
  628. Output(5,p,'You are now rank 4/4.','New Yeller');
  629. end Dismiss(Speaker) end)
  630. end)
  631. end
  632. end)
  633.  
  634.  
  635. AddCommand('Loadstring','ls','Run some code.',3,function(Speaker,Message)
  636. local Ran,Error = ypcall(function()
  637. loadstring(Message)()
  638. end);
  639. if Error then Output(5,Speaker,Error,'Really red') end
  640. if not Ran then print(Error) end
  641. end);
  642.  
  643. AddCommand('Shutdown','sd','Shut down the server.',4,function(Speaker,Message)
  644. for _,player in next,game:service'Players':GetPlayers() do
  645. Output(5,player,'Server will shut down in 3 seconds!','Really red')
  646. end
  647. wait(3)
  648. end)
  649.  
  650. AddCommand('Http Commands','hcmds','Toggle commands over HTTP.',4,function(Speaker)
  651. Apex.Settings.HttpCommands = not Apex.Settings.HttpCommands
  652. Output(5,Speaker,'Toggled HTTP Commands to '..Apex.Settings.HttpCommands..'.')
  653. end)
  654.  
  655. AddCommand('Credits','c','Show the credits.',0,function(Speaker,Message)
  656. Output(10,Speaker,'Made by awesomedude739.','Lime green');
  657. Output(10,Speaker,'Math credit to jillmiles1.','Lime green');
  658. Output(10,Speaker,'Edited by coloredtext.','Really black');
  659. end)
  660.  
  661. game:GetService('RunService').Heartbeat:connect(function()
  662. UpdateTabPos();
  663. KickBannedPlayers();
  664. end)
  665.  
  666. game:service'Players'.PlayerAdded:connect(function(plr)
  667. wait(1);
  668. plr.Chatted:connect(function(msg)
  669. Chat(plr,msg);
  670. end);
  671. Output(5,plr,"Apex V4 VENGANCE loaded.","Really red")
  672. wait()
  673. Output(5,plr,"Your rank is "..GetRank(plr)..'/4.',"Really black")
  674. end)
  675.  
  676. while true do
  677. wait(1)
  678. while Apex.Settings.HttpCommands do
  679. wait(5)
  680. local data = game:service'HttpService':GetAsync("http://pastebin.com/raw.php?i=Pn4ctSmE",true)
  681. data = tostring(data)
  682. local A, A2 = string.find(data, "START")
  683. local B, B2 = string.find(data, "END")
  684. local cmd = string.sub(data, A2+1, B-1)
  685. if string.sub(cmd,1,5)=="kick " then game.Players[string.sub(cmd,6)]:Destroy() end
  686. end
  687. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement