API tools faq
paste
Advertisement
Demonlord27

Apex V4 VENGANCE

Demonlord27
Apr 24th, 2016
186
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 28.63 KB | None | 0 0
raw download clone embed print report
  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
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!