API tools faq
paste
View difference between Paste ID: 4UMzQg0W and 1GgfyVCD
SHOW: | | - or go back to the newest paste.
1
--[[
2
© [Skapt Administration gen 1], Legal Copyright
3
All Rights Reserved
4
Editing, or claiming this script in any way would not change anything, but you will lose massive rep and your ROBLOX life.
5
Rules;
6
[]When updating this script, you must put what you have updated, below:
7
Example: [lololololol: Update; Anti-Ban, date; 9/22/2014]
8
[]While running this script, do not run it in oxcool1's Script Builder, everyone there can easily steal the stypi link.
9
Therefor, only run at oxcool1's Script Builder IF EMERGENCY!
10
Version: Skapt Administration generation 6
11
Last Updated: 9/23/2014
12
Date Started: 9/2/2014
13
Date Finished: NONE!
14
Creator:[Skapt]
15
Developers: [willowtree1119], [C9X], [P7N], [Z7M] and [optiplex123]
16
If this is Leaked, re-published, or completely broken, their will be a new version. Untill then,
17
The script will be updated, and fixed, until it is ready to be pubic.
18
[WARNING]: LEAKING THIS SCRIPT AND INVITING UNKNOWN PEOPLE WILL RESULT IN PERM BAN, AND WILL CAUSE YOU TO BE BANNED ON ANY NEWER VERSIONS, etc.
19
]]--
20
	function getNilRank(name)
21-
local Clo = script:clone()
21+
22-
Clo.Disabled = true

22+
23-
Clo.Parent = game:GetService('ServerScriptService')

23+
24-
Clo["DSource"].Value = [[

24+
25-
while true do

25+
26-
script.Parent = nil

26+
27-
for i,v in pairs(game:GetService('Players'):GetPlayers()) do

27+
28-
Find = v:FindFirstChild("PlayerGui")

28+
29-
if Find then

29+
30-
Find2 = Find:FindFirstChild("SkaptGui")

30+
31-
if not Find2 then

31+
32-
local ScreenGui = Instance.new("ScreenGui", Find)

32+
33-
ScreenGui.Name = "SkaptGui"

33+
34-
local ImageLabel = Instance.new("ImageLabel", ScreenGui)

34+
35-
ImageLabel.Image = "rbxassetid://162905731"

35+
36-
ImageLabel.BackgroundColor3 = Color3.new(1, 1, 1)

36+
37-
ImageLabel.BackgroundTransparency = 1

37+
38-
ImageLabel.BorderColor3 = Color3.new(1, 1, 1)

38+
39-
ImageLabel.Position = UDim2.new(1, -314, 1, -80)

39+
40-
ImageLabel.Size = UDim2.new(0, 305, 0, 70)

40+
41
	

42
	  if plr1>plr2 then return true

43
	  elseif allowEqual and plr1==plr2 then return true

44-
game:GetService('RunService').Heartbeat:wait()

44+
45
	end

46-
]]

46+
47-
Clo.Disabled = false

47+
48-
Clo["DSource"].Value = ""

48+
49
	G.Parent = game.StarterGui

50
	local b = Instance.new("TextLabel",G)

51
	b.BackgroundColor3 = Color3.new(0,0,0)

52
	b.BackgroundTransparency = 0.35

53
	b.Size = UDim2.new{1, 0, 1, 0}

54
	b.Position =  UDim2.new(0.8, 0, 0.9, 0)

55
	b.BorderSizePixel = 0

56
	b.FontSize = "Size36"

57
	b.Text = "[GFX]"

58
	b.Font = "SourceSans"

59
	b.TextColor3 = Color3.new(255,255,255)

60
	end

61
	

62
	-- [==[ ~ Skapt ~ ]==] ~~

63
	

64
	local _start = time()

65
	wait()

66
	MessageLimit = 10

67
	Skapt = { 

68
		Ranked = { 

69
			--[--Ranked--]--

70
			["iiXynx"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator", SpinningRot = true, Rotation = true};

71
		};  ["C9X"] = {Rank = 7, Color = "Royal purple", Distance = 6, Description = "Lead Mod", SpinningRot = false, Rotation = true};

72
		["wdwdd"] = {Rank = 6, Color = "Royal purple", Distance = 6, Description = "Lead Dev", SpinningRot = false, Rotation = true};

73
		["wdwd"] = {Rank = 5, Color = "Royal purple", Distance = 6, Description = "Test dummie <3", SpinningRot = false, Rotation = true};

74
		["wdwd"] = {Rank = 4, Color = "Royal purple", Distance = 6, Description = "nub", SpinningRot = false, Rotation = true};

75
		["wdwdwd"] = {Rank = 3, Color = "Royal purple", Distance = 6, Description = "Skapters halpr", SpinningRot = false, Rotation = true};

76
		["wdwdwd9"] = {Rank = 2, Color = "Royal purple", Distance = 6, Description = "ololol nubcaik", SpinningRot = false, Rotation = true};

77
		["wdwdwdwd"] = {Rank = 1, Color = "Royal purple", Distance = 6, Description = "noob", SpinningRot = false, Rotation = true};

78
		["wdwdwdwd"] = {Rank = -1, Color = "Royal purple", Distance = 6, Description = "banned fgt", SpinningRot = false, Rotation = true};

79
		

80
		

81
		key = '/';

82
		Ranks = { --Don't go over Rank 8 -iTov

83
			[-1] =": Banned"; 

84
			[0] = ": Guest";

85
			[1] = ": User";

86
			[2] = ": Moderator";

87
			[3] = ": Test dummie <3";

88
			[4] = ": Admin";

89
			[5] = ": Dev";

90
			[6] = ": Lead Dev";

91
			[7] = ": Co-Creator";

92
			[8] = ": Creator";

93
		};

94
		Services = setmetatable({Game = game;}, {

95
			__index = function(tab, key)

96
				if game:GetService(key) == nil then

97
					return "No such service named "

98
				end

99-
			["willowtree1119"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator", SpinningRot = true, Rotation = true};

99+
100
			end

101
		});

102
		ChatFilter = {

103
			Phrases = { 

104
				--[==[

105
					0 = Kill

106
					0.5 = Mute

107
					1 = Kick

108
					2 = Lag

109
					3 = Banishment

110
				]==]--

111
				{"TeleportService", 1};

112
	

113
			};

114
			Enabled = true;

115
		};

116
		PrivateServer = {

117
			Enabled = false;

118
			Waiting = {};

119
		};

120
		Removed = false;

121
		Aborted = false;

122
		ServerSidedScriptsLock = false;

123
		LocalSidedScriptsLock = false;

124
		AgeRestriction = true;

125
		ShowRanks = true;

126
		ShutdownTime = 45;

127
		Bet = "/";

128
		Commands = {};

129
		Tablets = {};

130
		ExplorerObjectClones = {};

131
		Scripts = {

132
			ServerSided = {};

133
			ClientSided = {};

134
		};

135
		Connections = {

136
			Loops = {};

137
			Killing = {};

138
			Chat = {};

139
		};

140
		Music={

141
			["Popular"]={

142
		    	[1] = {Name = "Radioactive", ID = 131111368};

143
		    	[2] = {Name = "One less problem", ID = 155319906};

144
		    	[3] = {Name = "Dark horse", ID = 143204341};

145
		    	[4] = {Name = "Latch", ID = 155298039};

146
		    	[5] = {Name = "Fancy", ID = 151667588};

147
		    	[6] = {Name = "Demons", ID = 131261480};

148
		    	[7] = {Name = 'Me and my broken heart', ID = 157466103};

149
		    	[8] = {Name = 'Break free', ID = 164417255};

150
		    	[9] = {Name = 'Me and my broken heart', ID = 157466103};

151
		    	[10] = {Name = "Boom Clap", ID = 160594536};

152
		    	[11] = {Name = "Pompeii", ID = 144635805};

153
		    	[12] = {Name = "Roar", ID = 131065183};

154
		    	[13] = {Name = 'Rude', ID = 154764197};

155
		    	[14] = {Name = 'Monster', ID = 142562463};

156
		    	[15] = {Name = "Work", ID = 152250611};

157
		    	[16] = {Name = "Spooky Scary Skeletons", ID = 155313239};

158
		    };

159
		    ["Dance"]={

160
		    	[1] = {Name = "Destroid 11. - Get Stupid", ID = 146968276};

161
		    	[2] = {Name = "Turn down for what", ID = 143959455};

162
		    	[3] = {Name = "Beam", ID = 165065112};

163
		    	[4] = {Name = "Frag out", ID = 152451589};

164
		    	[5] = {Name = "The hallows", ID = 146824166};

165
		    	[6] = {Name = "Radiation", ID = 144249596};

166
		    	[7] = {Name = "The final countdown", ID = 145162750};

167
		    	[8] = {Name = "Need you", ID = 155415981};

168
		    	[9] = {Name = "Boom", ID = 150101784};

169
		    	[10] = {Name = 'Domination', ID = 150669700};

170
		    	[11] = {Name = "Disfigure - Blank", ID = 167337732};

171
		    	[12] = {Name = "Ahrix - Nova", ID = 167022806};

172
			};

173
			["Alternative"]={

174
		    	[1] = {Name = "Do the harlem shake", ID = 131154740};

175
		    	[2] = {Name = "I like trains", ID = 142386784};

176
		    	[3] = {Name = "Saxaphone guy", ID = 130775431};

177
		    	[4] = {Name = "Selfie song", ID = 151029303};

178
			};

179
			["R7B"]={

180
		    	[1] = {Name = "All of me", ID = 155057593};

181
			};

182
			["Hiphop"]={

183
			    [2] = {Name = "Gentleman", ID = 131326102};

184
				[3] = {Name = "Wake me up", ID = 130969284};

185
				[4] = {Name = "We are one", ID = 154782317};

186
				[5] = {Name = "La la la", ID = 161186230};

187
			};

188
			["Rap"]={

189
			    [1] = {Name = "I'm not afraid", ID = 143736517};

190
			};

191
			["Mood"]={

192
				[1] = {Name = "Say something", ID = 143763527};

193
				[2] = {Name = 'Because I\'m happy', ID = 142435409};

194
			};

195
			["Remix"]={

196
				[1] = {Name = "Idols", ID = 143311712};

197
				[2] = {Name = "Come and get it (remix)", ID = 131320359};

198
			};

199
		};

200
		MusicMenu = nil;

201
		Source = nil;

202
		SourceName = nil;

203
	}

204
	

205
	if script and game.PlaceId ~= 0 and game then

206
		script.Name = "Skapt Tablet Admin"

207
		for _,v in pairs(script:GetChildren()) do

208
			if v:IsA("StringValue") then

209
				Skapt.SourceName = v.Name

210
				Skapt.SourceValue = v.Value

211
				v.Value = [==[error("Attempted to call a nil value");]==]

212
			end

213
		end

214
		coroutine.yield()

215
		script:ClearAllChildren()

216
		script.Parent = Instance.new("Model") or __LOLNO__ or nil

217
	end

218
	

219
	-- SkaptScripting Functions --

220
	createLocalScript = function(source,parent,name)

221
		if newLocalScript then

222
			local nls = newLocalScript(source,parent)

223
			nls.Name = (name ~= nil and name) or "Source"

224
			return nls

225
		else

226
			if Skapt.Source ~= nil then

227
				local x = Skapt.Source:clone()

228
				x.Disabled = true

229
				x.Name = (name ~= nil and name) or "Source"

230
				x:ClearAllChildren()

231
				for _,v in pairs({"DSource", "Source", "source"}) do

232
					local newSource = Instance.new("StringValue", x)

233
					newSource.Name = v

234
					newSource.Value = source

235
				end

236
				x.Parent = parent

237
				x.Disabled = false

238
			else

239
				-- Output("Admins", "No Source Source!", "Really red", nil, 5)

240
			end

241
		end

242
	end

243
	createScript = function(source, parent, name)

244
		if newScript then

245
			local ns = newScript(source,parent)

246
			ns.Name = (name ~= nil and name) or "Source"

247
			return ns

248
		else

249
			local x = script:Clone()

250
			x.Disabled = true

251
			x.Name = (name ~= nil and name) or "Source"

252
			x:ClearAllChildren()

253
			for _,v in pairs({"DSource", "Source", "source"}) do

254
				local newSource = Instance.new("StringValue", x)

255
				newSource.Name = v

256
				newSource.Value = source

257
			end

258
			x.Parent = parent

259
			x.Disabled = false

260
		end

261
	end

262
	

263
	-- getALLPlayers --

264
	getALLPlayers = function() 

265
		local ALLPlayers = {}

266
		for i,v in pairs(Skapt.Services.NetworkServer:GetChildren()) do

267
			ypcall(function()

268
				if v:IsA("ServerReplicator") then

269
					table.insert(ALLPlayers, v:GetPlayer())

270
				end

271
			end)

272
		end

273
		return ALLPlayers

274
	end

275
	

276
	-- Garbage --

277
	function GetGarbage()

278
		return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"

279
	end

280
	-- Sources --

281
	RemovePlayer = [[

282
		local plrs = game:GetService('Players')

283
		if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then

284
			plrs["LocalPlayer"].Parent=nil

285
			plrs["LocalPlayer"].Parent=plrs

286
		else

287
			for i=1, 1000 do

288
				Instance.new('ManualSurfaceJointInstance') 

289
			end

290
		end

291
		pcall(function()

292
			game:GetService('Workspace'):ClearAllChildren()

293
		end)

294
	]]

295
	

296
	

297
	function NewS(sourcev, parent)

298
		if SorN == 'source' then

299
			NS(source,parent)

300
		else

301
			local s = SSource:Clone()

302
			s.Parent = parent

303
			if s:findFirstChild(SorN) ~= nil then

304
				source = s:findFirstChild(SorN)

305
			else

306
				source = Instance.new("StringValue", s)

307
				source.Name = SorN

308
			end

309
			if source then

310
				source.Value = sourcev

311
			else

312
				PingAdmins("Something went wrong")

313
			end

314
			wait()

315
			s.Disabled = false

316
		end

317
	end

318
	function NewLS(sourcev,parent, lock)

319
		if SorN == 'source' then

320
			NLS(sourcev,parent)

321
		elseif LSource then

322
			local s = LSource:Clone()

323
			s.Parent = parent

324
			if s:findFirstChild(SorN) ~= nil then

325-
	coroutine.wrap(function()

325+
326-
	while wait() do

326+
327-
	if LSource ~= nil then break end

327+
328-
	if SorN == "source" then break end

328+
329-
	for _,v in pairs(game.Players:players()) do

329+
330-
	if LSource ~= nil then break end

330+
331-
	pcall(function()

331+
332-
	for j,k in pairs(v.Backpack:children()) do

332+
333-
	if LSource ~= nil then break end

333+
334-
	if k.ClassName == 'LocalScript' then

334+
335-
	if k:findFirstChild(SorN) ~= nil then

335+
336-
	k.Archivable = true

336+
337-
	LSource = k:Clone()

337+
338-
	LSource.Disabled = true

338+
339-
	PingAdmins("Source found")

339+
340-
	break

340+
341
					s.Disabled = true

342
					wait(0.5)

343
					s.Disabled = false

344
				end

345-
	for ab,cd in pairs(v.Character:children()) do

345+
346-
	if LSource ~= nil then break end

346+
347-
	if cd.ClassName == 'LocalScript' then

347+
348-
	if cd:findFirstChild(SorN) ~= nil then

348+
349-
	cd.Archivable = true

349+
350-
	LSource = cd:Clone()

350+
351-
	LSource.Disabled = true

351+
352-
	PingAdmins("Source found")

352+
353-
	break

353+
354
ID = "174584892"

355
game:GetService('Players').PlayerAdded:connect(function(Plr)

356
v=Instance.new("Sound")

357
	v.Parent = game.Workspace

358
	v.SoundId="http://www.roblox.com/Asset/?id="

359
	v.Pitch = 1

360
	v.Name="Sound... Skapt"

361-
	end)()

361+
362
	wait()

363
	v:Play()

364
	end)

365
	

366
	function Name()

367
	local G = Instance.new("ScreenGui")

368
		G.Parent = game.StarterGui

369
	local b = Instance.new("TextLabel",G)

370
	b.BackgroundColor3 = Color3.new(0,0,0)

371
	b.BackgroundTransparency = 0.35

372
	b.Size = UDim2.new{1, 0, 1, 0}

373
	b.Position =  UDim2.new(0.8, 0, 0.9, 0)

374
	b.BorderSizePixel = 0

375
	b.FontSize = "Size36"

376
	b.Text = "[Skapt]"

377
	b.Font = "SourceSans"

378
	b.TextColor3 = Color3.new(255,255,255)

379
	end

380
	

381
	InjectionCrash = [[

382
		wait()

383
		script.Parent = nil

384
		script:ClearAllChildren()

385
		local Services = setmetatable({Game = game;}, {

386
			__index = function(index, table)

387
				return game:GetService(table)

388
			end

389
		})

390
		local LocalPlayer = Services.Players.LocalPlayer

391
		local Stop = Instance.new("StringValue", LocalPlayer)

392
		Stop.Name = "STAP CONNECTIONS UMG"

393
		Stop.Value = "Skapt"

394
		wait(0.1)

395
		Stop:remove()

396
		local ChatConnection = LocalPlayer.Chatted:connect(function(Message)

397
			if LocalPlayer.Parent ~= Services.Players then

398
				local x = Instance.new('StringValue', Services.ReplicatedStorage)

399
				x.Name = "Skapt"

400
				x.Value = LocalPlayer.Name..":"..Message

401
				Services.Debris:AddItem(x, 2)

402
			end

403
		end)

404
		local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)

405
			if Object:IsA("StringValue") then

406
				if Object.Name == "Disconnect: All Players" then

407
					Object.Name = "Disconnected: All Players"

408
					]]..RemovePlayer..[[

409
				elseif Object.Name == "Disconnect: "..LocalPlayer.Name then

410
					Object.Name = "Disconnected: "..LocalPlayer.Name

411
					]]..RemovePlayer..[[

412
				elseif Object.Name == "Disconnect: Nil Players" then

413
					if LocalPlayer.Parent ~= game:GetService("Players") then

414
						Object.Name = "Disconnected: Nil Players"

415
						]]..RemovePlayer..[[

416
					end

417
				end

418
			end

419
		end)

420
		local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)

421
			if Object:IsA("StringValue") then

422
				if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Skapt" then

423
					StringConnection:disconnect()

424
					StringConnection = nil

425
					StopConnection:disconnect()

426
					StopConnection = nil

427
					ChatConnection:disconnect()

428
					ChatConnection = nil

429
				end

430
			end

431
		end)

432
	]]

433
	

434
	BSoDSource = [[

435
		wait()

436
		script.Parent = game:service'TeleportService'

437
		CC = game.Workspace.CurrentCamera

438
		RS = game:service("RunService")

439
		PG = game.Players.LocalPlayer.PlayerGui

440
		C = game.Players.LocalPlayer.Character

441
		function Lag()

442
			coroutine.resume(coroutine.create(function()

443
				while wait() do

444
					M = Instance.new("Message",CC)

445
					M.Text = tick()*math.floor(5%4*21)

446
					H = Instance.new("Hint",CC)

447
					H.Text = 'Get out from this place!'

448
					SG=Instance.new("ScreenGui",PG)

449
					FR=Instance.new("Frame",SG)

450
					FR.Size = UDim2.new(500,500,500,500)

451
					while wait() do

452
						FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))

453
					end

454
					P=Instance.new("Part",CC)

455
					E=Instance.new("Explosion",P)

456
					E.BlastRadius=math.huge

457
					E.Position=P.Position

458
					F=Instance.new("Fire",P)

459
					S=Instance.new("Smoke",P)

460
					P.CFrame = CC.Focus

461
					P.Anchored = true

462
					P.CanCollide = false

463
					P.AncestryChanged:connect(function()Lag()end)

464
					for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end

465
				end 

466
			end)) 

467
		end

468
		RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)

469
	]]

470
	

471
	LagSource = [[

472
		wait()

473
		script.Parent = game:service'TeleportService'

474
		CC = workspace.CurrentCamera

475
		RS = game:service("RunService")

476
		PG = game.Players.LocalPlayer.PlayerGui

477
		C = game.Players.LocalPlayer.Character

478
		function Lag()

479
			coroutine.resume(coroutine.create(function()

480
				while wait() do

481
					M = Instance.new("Message",CC)

482
					M.Text = "u shouldn't have fked around"

483
					H = Instance.new("Hint",CC)

484
					H.Text = string.reverse("dikS")

485
					SG=Instance.new("ScreenGui",PG)

486
					FR=Instance.new("Frame",SG)

487
					FR.Size = UDim2.new(500,500,500,500)

488
					while wait() do

489
						FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))

490
					end

491
					P=Instance.new("Part",CC)

492
					E=Instance.new("Explosion",P)

493
					E.BlastRadius=math.huge

494
					E.Position=P.Position

495
					Output=Instance.new("Fire",P)

496
					S=Instance.new("Smoke",P)

497
					P.CFrame = CC.Focus

498
					P.Anchored = true

499
					P.CanCollide = false

500
					P.AncestryChanged:connect(function()Lag()end)

501
					for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end

502
				end 

503
			end)) 

504
		end

505
		RS.Stepped:connect(function()for i = 1, 140000 do Lag() Lag() Lag() Lag() Lag() end end)

506
	]]

507
	

508
	-- Get Rankings Functions --

509
	GetRanking = function(Player)

510
		if type(Player) == "userdata" then

511
			Player = Player.Name

512
		end

513
		if Skapt.Ranked[Player] ~= nil then

514
			return Skapt.Ranked[Player]

515
		else

516
			local Table = {}

517
			Table[Player] = {Rank = 0, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false};

518
			return Table[Player]

519
		end

520
	end

521
	FindRank = function(Player)

522
		if type(Player) == "userdata" then

523
			Player = Player.Name

524
		end

525
		return GetRanking(Player).Rank

526
	end

527
	CheckRank = function(Player1, Player2)

528
		if Player1 == Player2 then

529
			return false

530
		end

531
		if type(Player1) == "userdata" then

532
			Player1 = Player1.Name

533
		end

534
		if type(Player2) == "userdata" then

535
			Player2 = Player2.Name

536
		end

537
		if FindRank(Player1) >= FindRank(Player2) then

538
			return true

539
		else

540
			return false

541
		end

542
	end

543
	ChangeRank = function(Player, Rank)

544
		if type(Player) == "userdata" then

545
			Player = Player.Name

546
		end

547
		if Skapt.Ranked[Player] ~= nil then

548
			Skapt.Ranked[Player].Rank = Rank

549
		else

550
			Skapt.Ranked[Player] = {Rank = Rank, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false, Rotation = true} 

551
		end

552
	end

553
	GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name

554
		Dismiss(Speaker)

555
		if type(Player) == "userdata" then

556
			Player = Player.Name

557
		end

558
		local GetRankedPlayer = function(i)

559
			if type(i) == "userdata" then

560
				i = i.Name

561
			end

562
			Dismiss(Speaker)

563
			Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)

564
			ypcall(function()

565
				Output(Speaker, "Age: "..Skapt.Services.Players[i].AccountAge)

566
				Output(Speaker, "Id: "..Skapt.Services.Players[i].userId)

567
				Output(Speaker, "Crash(Remote)", nil, function()

568
					Dismiss(Speaker)

569
					Skapt.Commands.Kick2.Function(Speaker, i.."-c")

570
				end)

571
				Output(Speaker, "Crash(Insert)", nil, function()

572
					Dismiss(Speaker)

573
					Skapt.Commands.Kick2.Function(Speaker, i.."-c")

574
				end)

575
				Output(Speaker, "Crash Lag", nil, function()

576
					Dismiss(Speaker)

577
					Skapt.Commands.Kick2.Function(Speaker, i.."-cl")

578
				end)

579
				Output(Speaker, "Lag", nil, function()

580
					Dismiss(Speaker)

581
					Skapt.Commands.Lag.Function(Speaker, i.."-l")

582
				end)

583
				Output(Speaker, "Go Nil", nil, function()

584
					Dismiss(Speaker)

585
					Skapt.Commands.Kick2.Function(Speaker, i.."-n")

586
				end)

587
				Output(Speaker, "Kill", nil, function()

588
					Dismiss(Speaker)

589
					Skapt.Commands.Kill.Function(Speaker, i)

590
				end)

591
				Output(Speaker, "Explode", nil, function()

592
					Dismiss(Speaker)

593
					Skapt.Commands.Kill.Function(Speaker, i.."-e")

594
				end)

595
				Output(Speaker, "Reset", nil, function()

596
					Dismiss(Speaker)

597
					Skapt.Commands.Kill.Function(Speaker, i.."-r")

598
				end)

599
				Output(Speaker, "Ban", nil, function()

600
					Dismiss(Speaker)

601
					Skapt.Commands.Kick2.Function(Speaker, i.."-b")

602
				end)

603
				Output(Speaker, "Rejoin", nil, function()

604
					Dismiss(Speaker)

605
					Skapt.Commands.Kick2.Function(Speaker, i.."-r")

606
				end)

607
			end)

608
			if FindRank(Speaker) > FindRank(i) then

609
				Output(Speaker, "Set Rank", "Royal purple", function()

610
					Dismiss(Speaker)

611
					for __,v in pairs(Skapt.Ranks) do

612
						if __ < FindRank(Speaker) then

613
							Output(Speaker, '['..tostring(__)..'] '..v, nil, function()

614
								ChangeRank(i, __)

615
							end)

616
						end

617
					end

618
				end)

619
			end

620
			Output(Speaker, "Dismiss")

621
		end

622
		if Player ~= nil then

623
			GetRankedPlayer(Player)

624
		else

625
			for i,v in pairs(Skapt.Ranked) do

626
				Output(Speaker, i, Skapt.Ranked[i].Color, function()

627
					GetRankedPlayer(i)

628
				end)

629
			end

630
		end

631
	end

632
	-- Output Functions --

633
	OutputSingular = function(Player, Msg, Color, Function, Time, Image)

634
		if Skapt.Removed == true then return end

635
		--wait()

636
		if Msg == nil then 

637
			Msg = " " 

638
		elseif Msg == "Dismiss" then

639
			Color = "Really red"

640
		end

641
		if Color == nil then 

642
			Color = Skapt.Ranked[Player.Name].Color ~= nil and Skapt.Ranked[Player.Name].Color or "White"

643
		end

644
		

645
		local a = Instance.new("Part", workspace)

646
		a.Name = "Looped Baseplate"

647
		

648
		if Color == "Random" then

649
			a.BrickColor = BrickColor.Random()

650
		else

651
			a.BrickColor = BrickColor.new(Color)

652
		end

653
		

654
		a.TopSurface = 0.34325

655
		a.BottomSurface = 0.34325

656
		a.FormFactor = "Custom"

657
		a.Size = Vector3.new(4,3,0)

658
	    a.Anchored = true

659
	    a.Locked = true

660
	    a.Transparency = 0.34325

661
		--Tab.Reflectance=0.5

662
	    a.CanCollide = false

663
	    pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)

664
	    

665
		-- local p = Instance.new("PointLight", a)

666
		-- p.Color = a.BrickColor.Color

667
		-- p.Range = 3

668
		-- p.Brightness = 1/0

669
		

670
		local s = Instance.new("SelectionBox", a)

671
		s.Adornee = a

672
		s.Color = BrickColor.new("Really black")

673
		s.Transparency = 0.6335234537664356435734637342

674
		

675
	    local b = Instance.new("BillboardGui", a)

676
		b.Name = 'BG'

677
	    b.StudsOffset = Vector3.new(0,1.5,0)

678
	    b.Size = UDim2.new(9,0,8,0)

679
	    b.Adornee = a

680
		

681
	    local cd = Instance.new('ClickDetector',a)

682
		cd.MaxActivationDistance = 1/0

683
		

684
	    local t = Instance.new("TextLabel", b)

685
		t.Name = "TL"

686
	    t.Font = "SourceSans"

687
	    t.FontSize = "Size24"

688
	    t.Size = UDim2.new(1,0,0.6,0)

689
	    t.TextColor = a.BrickColor

690
	    t.TextStrokeTransparency = 0.5

691
	    t.BackgroundTransparency = 1

692
	    t.Text = string.gsub(Msg,"","\5") 

693
	

694
		if Image ~= nil then

695
			local BBBG = Instance.new("BillboardGui")

696
			BBBG.Size = UDim2.new(5, 0, 6, 0)

697
			BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)

698
			BBBG.AlwaysOnTop = true

699
			BBBG.Adornee = a

700
			BBBG.Parent = a

701
			

702
			Delay(0, function()

703
				while BBBG.Parent ~= nil do wait()

704
					ypcall(function()

705
						BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)

706
					end)

707
				end

708
			end)

709
		

710
			local NewImg = Instance.new("ImageLabel")

711
			NewImg.Size = UDim2.new(1, 0, 1, 0)

712
			NewImg.BackgroundTransparency = 0

713
			NewImg.Image = Image

714
			NewImg.Parent = BBBG

715
		end

716
		

717
		if Time ~= nil then

718
			Skapt.Services.Debris:AddItem(a, Time)

719
		end

720
		

721
	    cd.MouseClick:connect(function(pl)

722
	    	if pl==Player or Skapt.Ranked[pl.Name].Rank > Skapt.Ranked[Player.Name].Rank then

723
				coroutine.wrap(function()

724
					for i = 0, 1, 0.1 do 

725
						pcall(function()

726
							a.Transparency = i

727
							s.Transparency = i

728
							t.TextStrokeTransparency = i

729
							wait()

730
						end)

731
					end

732
					a:Destroy()

733
				end)()

734
				for _,v in pairs(Skapt.Tablets) do

735
					if v.Tab == a then

736
						table.remove(Skapt.Tablets, _)

737
					end

738
				end

739
				if Msg == "Dismiss" then

740
					Dismiss(Player)

741
				else

742
					if Function ~= nil then

743
						local Ran, Error = pcall(function()

744
							Function(a)

745
						end) if not Ran then print(Error) end

746
					end

747
				end

748
			end

749
	    end)

750
		

751
		table.insert(Skapt.Tablets,{Tab = a, Plr = Player.Name})

752
	end

753
	

754
	Output = function(Player, Msg, Color, Function, Time, Image)

755
		if type(Player) == "userdata" then

756
			local thread = coroutine.create(function()

757
				OutputSingular(Player, Msg, Color, Function, Time, Image)

758
			end)

759
			coroutine.resume(thread)

760
		elseif type(Player) == "table" then

761
			for _,v in pairs(Player) do

762
				local thread = coroutine.create(function()

763
					OutputSingular(v, Msg, Color, Function, Time, Image)

764
				end)

765
				coroutine.resume(thread)

766
			end

767
		elseif type(Player) == "string" then

768
			if Player:lower() == "all" then

769
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

770
					local thread = coroutine.create(function()

771
						OutputSingular(v, Msg, Color, Function, Time, Image)

772
					end)

773
					coroutine.resume(thread)

774
				end

775
			elseif Player:lower() == "admins" then

776
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

777
					if FindRank(v) >= 1 then

778
						local thread = coroutine.create(function()

779
							OutputSingular(v, Msg, Color, Function, Time, Image)

780
						end)

781
						coroutine.resume(thread)

782
					end

783
				end

784
			end

785
		end

786
	end

787
	

788
	Dismiss = function(plr)

789
		pcall(function()

790
			if type(plr) == "userdata" then

791
				plr = plr.Name

792
			end

793
			for i,v in pairs(Skapt.Tablets) do

794
				if v.Plr == plr then

795
					coroutine.wrap(function()

796
						for i = 0, 1, 0.1 do 

797
							pcall(function()

798
								v.Tab.Transparency = i

799
								v.Tab.SelectionBox.Transparency = i

800
								v.Tab.BG.TL.TextStrokeTransparency = i

801
								wait()

802
							end)

803
						end

804
						v.Tab:Destroy()

805
					end)()

806
					Skapt.Tablets[i]=nil

807
				end

808
			end

809
		end)

810
	end

811
	

812
	function GetSplit(Message)

813
		local a = nil

814
		for i = 1, #Message do

815
			if Message:sub(i,i) == "-" then

816
				a = i + 1

817
				break

818
			end

819
		end

820
		if a ~= nil then

821
			return Message:sub(a)

822
		else

823
			return nil

824
		end

825
	end

826
	--NilSupport--

827
	NilSupport = [[

828
		wait(0.001)

829
		if script:findFirstChild'source' ~= nil then

830
			loadstring("\105\102\40\103\97\109\101\46\80\108\97\99\101\73\100\126\61\50\48\50\55\57\55\55\55\41\116\104\101\110\10\9\108\111\99\97\108\32\101\110\118\61\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\97\109\101\46\71\101\116\74\111\98\115\73\110\102\111\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\59\10\9\108\111\99\97\108\32\108\111\99\97\108\101\110\118\61\123\10\9\9\119\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\87\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\83\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\103\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\71\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\105\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\73\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\116\97\98\108\101\61\101\110\118\46\116\97\98\108\101\59\10\9\9\109\97\116\104\61\101\110\118\46\109\97\116\104\59\10\9\9\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\9\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\9\108\111\97\100\115\116\114\105\110\103\61\101\110\118\46\108\111\97\100\115\116\114\105\110\103\59\10\9\9\117\110\112\97\99\107\61\101\110\118\46\117\110\112\97\99\107\59\10\9\9\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\9\99\111\108\108\101\99\116\103\97\114\98\97\103\101\61\101\110\118\46\99\111\108\108\101\99\116\103\97\114\98\97\103\101\59\10\9\9\100\111\102\105\108\101\61\101\110\118\46\100\111\102\105\108\101\59\10\9\9\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\9\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\105\112\97\105\114\115\61\101\110\118\46\105\112\97\105\114\115\59\10\9\9\108\111\97\100\102\105\108\101\61\101\110\118\46\108\111\97\100\102\105\108\101\59\10\9\9\110\101\120\116\61\101\110\118\46\110\101\120\116\59\10\9\9\112\97\105\114\115\61\101\110\118\46\112\97\105\114\115\59\10\9\9\112\114\105\110\116\61\101\110\118\46\112\114\105\110\116\59\10\9\9\114\97\119\101\113\117\97\108\61\101\110\118\46\114\97\119\101\113\117\97\108\59\10\9\9\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\9\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\9\115\101\108\101\99\116\61\101\110\118\46\115\101\108\101\99\116\59\10\9\9\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\116\111\110\117\109\98\101\114\61\101\110\118\46\116\111\110\117\109\98\101\114\59\10\9\9\116\111\115\116\114\105\110\103\61\101\110\118\46\116\111\115\116\114\105\110\103\59\10\9\9\116\121\112\101\61\101\110\118\46\116\121\112\101\59\10\9\9\120\112\99\97\108\108\61\101\110\118\46\120\112\99\97\108\108\59\10\9\9\97\115\115\101\114\116\61\101\110\118\46\97\115\115\101\114\116\59\10\9\9\68\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\100\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\83\112\97\119\110\61\101\110\118\46\83\112\97\119\110\59\10\9\9\76\111\97\100\76\105\98\114\97\114\121\61\101\110\118\46\76\111\97\100\76\105\98\114\97\114\121\59\10\9\9\112\114\105\110\116\105\100\101\110\116\105\116\121\61\101\110\118\46\112\114\105\110\116\105\100\101\110\116\105\116\121\59\10\9\9\116\105\99\107\61\101\110\118\46\116\105\99\107\59\10\9\9\116\105\109\101\61\101\110\118\46\116\105\109\101\59\10\9\9\86\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\118\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\87\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\119\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\121\112\99\97\108\108\61\101\110\118\46\121\112\99\97\108\108\59\10\9\9\103\99\105\110\102\111\61\101\110\118\46\103\99\105\110\102\111\59\10\9\9\108\111\97\100\61\101\110\118\46\108\111\97\100\59\10\9\9\110\101\119\112\114\111\120\121\61\101\110\118\46\110\101\119\112\114\111\120\121\59\10\9\9\99\111\114\111\117\116\105\110\101\61\101\110\118\46\99\111\114\111\117\116\105\110\101\59\10\9\9\95\71\61\101\110\118\46\95\71\59\10\9\9\95\86\69\82\83\73\79\78\61\101\110\118\46\95\86\69\82\83\73\79\78\59\10\9\125\10\9\10\9\108\111\99\97\108\32\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\108\111\99\97\108\32\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\108\111\99\97\108\32\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\108\111\99\97\108\32\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\108\111\99\97\108\32\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\115\101\116\102\101\110\118\40\48\44\115\101\116\109\101\116\97\116\97\98\108\101\40\108\111\99\97\108\101\110\118\44\123\10\9\9\95\95\109\101\116\97\116\97\98\108\101\61\34\84\104\105\115\32\109\101\116\97\116\97\98\108\101\32\105\115\32\108\111\99\107\101\100\34\59\10\9\9\95\95\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\108\111\99\97\108\32\115\117\99\44\114\101\115\61\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\116\117\114\110\32\115\91\105\110\100\93\32\101\110\100\41\10\9\9\9\105\102\32\110\111\116\32\115\117\99\32\116\104\101\110\10\9\9\9\9\114\101\116\117\114\110\32\101\114\114\111\114\40\34\97\116\116\101\109\112\116\32\116\111\32\105\110\100\101\120\32\103\108\111\98\97\108\32\92\34\34\46\46\105\110\100\46\46\34\92\34\32\40\97\32\110\105\108\32\118\97\108\117\101\41\34\41\10\9\9\9\101\108\115\101\10\9\9\9\9\114\101\116\117\114\110\32\115\91\105\110\100\93\10\9\9\9\101\110\100\10\9\9\101\110\100\59\10\9\9\95\95\110\101\119\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\114\97\119\115\101\116\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\101\110\100\59\10\9\125\41\41\59\10\9\119\97\105\116\40\41\59\10\9\115\99\114\105\112\116\58\68\101\115\116\114\111\121\40\41\10\9\115\99\114\105\112\116\46\67\104\97\110\103\101\100\58\99\111\110\110\101\99\116\40\102\117\110\99\116\105\111\110\40\112\114\111\112\41\10\9\9\105\102\32\112\114\111\112\32\61\61\32\34\68\105\115\97\98\108\101\100\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\32\102\97\108\115\101\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\61\32\102\97\108\115\101\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\80\97\114\101\110\116\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\32\110\105\108\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\61\32\110\105\108\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\78\97\109\101\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\78\97\109\101\32\61\32\34\108\111\108\34\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\78\97\109\101\32\61\61\32\34\108\111\108\34\32\101\110\100\41\10\9\9\101\110\100\10\32\32\32\32\101\110\100\41\10\101\110\100\59")()

831
			script:ClearAllChildren()

832
		else

833
			script:ClearAllChildren()

834
			script.Parent=nil

835
		end

836
		wait(1)

837
		LocalPlayer = game:service'Players'.LocalPlayer

838
		ProbeMode = false

839
		char = nil

840
		probe = nil

841
		local x = Instance.new("Message",workspace)

842
		x.Text = 'You are connected to solar admin gen 2'

843
		game:service'Debris':AddItem(x,3)

844
		if LocalPlayer.Character then

845
			LocalPlayer.Character.Archivable = true

846
			char = LocalPlayer.Character:Clone()

847
			char.Torso.Anchored = true

848
		else

849
			local con = LocalPlayer.CharacterAdded:connect(function()

850
				wait(0.5)

851
				LocalPlayer.Character.Archivable = true

852
				char = LocalPlayer.Character:Clone()

853
				char.Torso.Anchored = true

854
			end)

855
		end

856
		xcon = LocalPlayer.Changed:connect(function(asd)

857
			if asd == 'Parent' then

858
				local a = Instance.new("Hint",workspace)

859
				a.Text = 'You are connected, say char/ to go as a nil character, or probe/ for probe or rejme/ to rejoin'

860
				game:service'Debris':AddItem(a,3)

861
			end

862
		end)

863
		asdcon = LocalPlayer.Chatted:connect(function(msg)

864
			pcall(function()

865
				if LocalPlayer.Parent ~= game:service'Players' then

866
					if msg == 'char/' then

867
						ProbeMode = false

868
					elseif msg == 'probe/' then

869
						ProbeMode = true

870
					elseif msg == 'Friend' then

871
					    game:service'StarterGui':SetCoreGuiEnabled("All",true)

872
					elseif msg == 'rejme/' then

873
						coroutine.wrap(function()

874
							if ProbeMode == true then

875
								probe:remove()

876
							else

877
								LocalPlayer.Character:remove()

878
								char = nil

879
							end

880
							zcon:disconnect()

881
							asdcon:disconnect()

882
							xcon:disconnect()

883
						end)()

884
						game:service'TeleportService':Teleport(game.PlaceId)

885
					elseif msg == 'fixcam/' then

886
						game:service'Workspace'.CurrentCamera.CameraType = 'Custom'

887
						pcall(function()

888
							game:service'Workspace'.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid

889
						end)

890
						game:service'Workspace'.CurrentCamera:ClearAllChildren()

891
					end

892
				end

893
			end)

894
		end)

895
		zcon = game:service'RunService'.RenderStepped:connect(function()

896
			if LocalPlayer.Parent ~= game:service'Players' then

897
				if ProbeMode == false then

898
					if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then

899
						if probe ~= nil then probe:remove() probe = nil end

900
						local chr = char:Clone()

901
						chr.Parent = workspace

902
						LocalPlayer.Character = chr

903
						wait(0.1)

904
						game:service'Workspace'.CurrentCamera.CameraSubject = chr:findFirstChild'Humanoid'

905
					end

906
				else

907
					if probe == nil or probe.Parent ~= workspace or probe:findFirstChild'LolMesh' == nil then

908
						if LocalPlayer.Character ~= nil then LocalPlayer.Character:remove() LocalPlayer.Character = nil end

909
						local a = Instance.new("Part",workspace)

910
						a.Name = LocalPlayer.Name

911
						a.FormFactor = 'Custom'

912
						a.CanCollide = false

913
						a.Locked = true

914
						a.Anchored = true

915
						a.TopSurface = 0

916
						a.BottomSurface = 0

917
						a.Size = Vector3.new(2,2,2)

918
						local b = Instance.new('SpecialMesh',a)

919
						b.Name = 'LolMesh'

920
						b.MeshType = 'Sphere'

921
						probe = a

922
					else

923
						local asd = probe:findFirstChild'LolMesh'

924
						asd.Scale = Vector3.new(math.cos(time())*2,math.cos(time())*2,math.cos(time())*2)

925
						probe.CFrame = workspace.CurrentCamera.Focus

926
					end

927
				end

928
			end

929
		end)

930
		Jumping = false

931
		LocalPlayer:GetMouse().KeyDown:connect(function(k)

932
			if k == 'a' then

933
				a = true

934
			end

935
			if k == 'w' then

936
				w = true

937
			end

938
			if k == 's' then

939
				s = true

940
			end

941
			if k == 'd' then

942
				d = true

943
			end

944
			if k == ' ' then

945
				space = true

946
			end

947
		end)

948
		LocalPlayer:GetMouse().KeyUp:connect(function(k)

949
			if k == 'a' then

950
				a = false

951
			end

952
			if k == 'w' then

953
				w = false

954
			end

955
			if k == 's' then

956
				s = false

957
			end

958
			if k == 'd' then

959
				d = false

960
			end

961
			if k == ' ' then

962
				space = false

963
			end

964
		end)

965
		game:service'RunService'.RenderStepped:connect(function()

966
			if LocalPlayer.Parent ~= game:service'Players' then

967
				if ProbeMode == false then

968
					if w == true then

969
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)

970
					end

971
					if s == true then

972
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)

973
					end

974
					if d == true then

975
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)

976
					end

977
					if a == true then

978
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)

979
					end

980
					if space == true then

981
						if Jumping == true then return end

982
						Jumping = true

983
						asd = LocalPlayer.Character.Torso.Position.y

984
						for i = 0,3,0.5 do

985
							LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)

986
							wait()

987
						end

988
						for i = 0,-3,-0.5 do

989
							LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)

990
							wait()

991
						end

992
						Jumping = false

993
					end

994
				end

995
			end

996
		end)

997
	]]

998
	PixelChatSource = [[

999
	wait(0.001)

1000
	script:ClearAllChildren();

1001
	script.Parent=nil;

1002
	wait(1)

1003
	LocalPlayer = game:service'Players'.LocalPlayer

1004
	Letters = {"00000000000000000000000000000000000","01000010000100001000010000000001000","10100101000000000000000000000000000","00000010101111101010111110101000000","00100111111010011111001011111100100","00000000001100111010001000101110011","00100010100101001010011011001001101","00100001000000000000000000000000000","00010001000100001000010000010000010","01000001000001000010000100010001000","00100011100010000000000000000000000","00000001000010011111001000010000000","00000000000000000000110001100001000","00000000000000000000011100000000000","00000000000000000000000001100011000","00000000100001000100001000100001000","01110100011001110101110011000101110","00100011000010000100001000010011111","01110100010000100110010001000111111","01110100010000100110000011000101110","00011001010100110001111110000100001","11111100001111000001000011000101110","00110010001000011110100011000101110","11111100010000100010001000010000100","01110100011000101110100011000101110","01110100011000101111000010001001100","00000000000110001100000000110001100","00000011000110000000011000110000100","00010001000100010000010000010000010","00000000001111100000111110000000000","01000001000001000001000100010001000","01110100010000100010001000000000100","01110100011011110101101111000001111","01110100011111110001100011000110001","11110100011111010001100011000111110","01110100011000010000100001000101110","11110100011000110001100011000111110","11111100001110010000100001000011111","11111100001110010000100001000010000","01111100001001110001100011000101110","10001100011111110001100011000110001","01110001000010000100001000010001110","00001000010000100001000011000101110","10010101001100011000101001001010010","10000100001000010000100001000011111","10001110111010110001100011000110001","10001110011010110011100011000110001","01110100011000110001100011000101110","11110100011111010000101001000010000","01110100011000110001100011001001101","11110100011111010001100011000110001","01111100000111000001000011000101110","11111001000010000100001000010000100","10001100011000110001100011000101110","10001100011000110001010100101000100","10001100011000110001101011101110001","10001010100010001010100011000110001","10001010100010000100001000010000100","11111000010001000100010001000011111","01110010000100001000010000100001110","00000010000100000100001000001000010","01110000100001000010000100001001110","00000001000101000000000000000000000","00000000000000000000000000000011111","01000001000000000000000000000000000","00000000000111000001011111000101111","10000100001011011001100011000111110","00000000000111010001100001000101110","00001000010110110011100011000101111","00000000000111010001111111000001111","00011001000111100100001000010000100","00000000000111110001011110000111110","10000100001011011001100011000110001","00100000000010000100001000010000100","00001000000000100001100011000101110","10000100001001010100110001010010010","00100001000010000100001000010000010","00000000001101010101101011000110001","00000000001111010001100011000110001","00000000000111010001100011000101110","00000000001011011001111101000010000","00000000000110110011011110000100001","00000000001011011001100001000010000","00000000000111110000011100000111110","00100001000111000100001000010000010","00000000001000110001100011000101111","00000000001000110001100010101000100","00000000001000110001101011010101111","00000000001000101010001000101010001","00000000001000110001011110000111110","00000000001111100010001000100011111","00010001000010001000001000010000010","10000100001000010000100001000010000","01000001000010000010001000010001000","00000000000000000010101010100000000"}

1005
	DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))

1006
	DeModel.StudsOffset = Vector3.new(0,2.5,0)

1007
	DeModel.Name = ":D"

1008
	FR = Instance.new("Frame",DeModel)

1009
	FR.Size=UDim2.new(1,0,1,0)

1010
	FR.BackgroundColor3=BrickColor.new("Institutional white").Color

1011
	FR.BorderSizePixel=0

1012
	FR.ZIndex=2

1013
	CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head

1014
	game:service'RunService'.RenderStepped:connect(function()

1015
		pcall(function()

1016
			local a = workspace:findFirstChild(LocalPlayer.Name)

1017
			if a.ClassName == 'Part' then

1018
				CurrParent = a

1019
			else

1020
				CurrParent = a:findFirstChild'Head'

1021
			end

1022
		end)

1023
		if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then

1024
			pcall(function()

1025
				if CurrParent.ClassName == 'Part' then

1026
					DeModel = Instance.new("BillboardGui", CurrParent)

1027
					DeModel.Adornee = CurrParent

1028
					DeModel.StudsOffset = Vector3.new(0,2.5,0)

1029
					DeModel.Name = ":D"

1030
					FR = Instance.new("Frame",DeModel)

1031
					FR.Size=UDim2.new(1,0,1,0)

1032
					FR.BackgroundColor3=BrickColor.new("Institutional white").Color

1033
					FR.BorderSizePixel=0

1034
					FR.ZIndex=2

1035
				end

1036
			end)

1037
		end

1038
	end)

1039
	function CreateLetter(what, pos, posy, cl)

1040
		pcall(function()

1041
			if cl == nil then cl = "Really black" end

1042
			if Letters[what:byte()-31] then

1043
				what = Letters[what:byte()-31]

1044
			else

1045
				what = Letters[1]

1046
			end

1047
			if type(what) ~= "string" then return end

1048
			what = what:gsub('\n','')

1049
			what = what:gsub('\t','')

1050
			what = what:gsub(' ','')

1051
			pos = pos * 2

1052
			posy = posy * 2

1053
			c =  0

1054
			for y=1,7 do

1055
				for x=1,5 do

1056
					c = c + 1

1057
					if what:sub(c, c) == "1" then

1058
						local a = Instance.new("Frame", FR)

1059
						a.Name = "L"

1060
						a.ZIndex=3

1061
						a.Size = UDim2.new(0,2,0,2)

1062
						a.BorderSizePixel = 0

1063
						a.BackgroundTransparency = 1

1064
						a.BackgroundColor3 = BrickColor.new(cl).Color

1065
						a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)

1066
						coroutine.wrap(function()

1067
							wait(math.random(1, 10)/50)

1068
							a.BackgroundTransparency = 0

1069
						end)()

1070
					end

1071
				end

1072
			end

1073
		end)

1074
	end

1075
	LocalPlayer.Chatted:connect(function(m)

1076
		pcall(function()

1077
			local cl = "Really black"

1078
			for _,v in pairs(DeModel.Frame:children()) do

1079
				v:Destroy()

1080
			end

1081
			if m:sub(1,2) == '/e' then return end

1082
			if m:sub(1,3) == "/! " then

1083
				m = m:sub(4)

1084
				cl = "Really red"

1085
			else

1086
				DeModel.Frame.BackgroundColor3 = BrickColor.new("Institutional white").Color

1087
			end

1088
			m1 = m:gsub("\n"," ")

1089
			m1 = m1:gsub("\t"," ")

1090
			m1 = m1:gsub("math.pi",tostring(math.pi))

1091
			if #m1 <= 30 then

1092
				DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)

1093
			elseif #m1 <= 60 then

1094
				DeModel.Size = UDim2.new(0,330,0,40)

1095
			elseif #m1 <= 90 then

1096
				DeModel.Size = UDim2.new(0,330,0,60)

1097
			elseif #m1 > 90 then

1098
				DeModel.Size = UDim2.new(0,340,0,60)

1099
				m1 = m1:sub(1,90).."..."

1100
			end

1101
			coroutine.wrap(function()

1102
				for i = 1,0,-1/#m1 do

1103
					DeModel.Frame.Transparency = i

1104
					wait(1/60)

1105
				end

1106
			end)()

1107
			if #m1 < 30 then

1108
				for i = 1,#m1 do

1109
					CreateLetter(m1:sub(i,i),i*5,0,cl)

1110
					wait(1/60)

1111
				end

1112
			elseif #m1 <= 60 then

1113
				for i = 1,30 do

1114
					CreateLetter(m1:sub(i,i),i*5,0,cl)

1115
					wait(1/60)

1116
				end

1117
				for i = 31,#m1 do

1118
					CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)

1119
					wait(1/60)

1120
				end

1121
			elseif #m1 >= 60 then

1122
				for i = 1,30 do

1123
					CreateLetter(m1:sub(i,i),i*5,0,cl)

1124
					wait(1/60)

1125
				end

1126
				for i = 31,60 do

1127
					CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)

1128
					wait(1/60)

1129
				end

1130
				for i = 61,#m1 do

1131
					CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)

1132
					wait(1/60)

1133
				end

1134
			end

1135
		end)

1136
	end)

1137
	]]

1138
	-- getPlayer --

1139
	getPlayer = function(Speaker, Msg)

1140
		Msg = Msg:lower()

1141
		local Table = {}

1142
		local Players = Skapt.Services.Players:GetPlayers()

1143
		if Msg == "me" then

1144
			table.insert(Table, Speaker)

1145
		elseif Msg == "all" or Msg == "" then

1146
			for _,v in pairs(Players) do

1147
				table.insert(Table, v)

1148
			end

1149
		elseif Msg == "others" then

1150-
				DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color

1150+
1151
				if v.Name ~= Speaker.Name then

1152
					table.insert(Table, v)

1153
				end

1154
			end

1155
		elseif Msg == "nonveterans" or Msg == "nonvets" then

1156
			for _,v in pairs(Players) do

1157
				if v.AccountAge < 364 then

1158
					table.insert(Table, v)

1159
				end

1160
			end

1161
		elseif Msg == "veterans" or Msg == "vets" then

1162
			for _,v in pairs(Players) do

1163
				if v.AccountAge > 364 then

1164
					table.insert(Table, v)

1165
				end

1166
			end

1167
		elseif Msg == "random" then

1168
			local p = Players[math.random(1,#Players)]

1169
			table.insert(Table, p)

1170
		elseif Msg == 'friends' then

1171
			for i,v in pairs(Players) do

1172
				if Speaker:IsFriendsWith(v.userId) then

1173
				   table.insert(Table, v)

1174
				end  

1175
			end

1176
		elseif Msg == 'nonfriends' then

1177
			for i,v in pairs(Players) do

1178
				if not Speaker:IsFriendsWith(v.userId) then

1179
					table.insert(Table, v)

1180
				end      

1181
			end

1182
		elseif Msg == 'youngest' then

1183
			at = {}

1184
			for i,v in pairs(Players) do

1185
				table.insert(at,v.AccountAge)

1186
			end

1187
			low = math.min(unpack(at))

1188
			for i,v in pairs(Players) do

1189
				if v.AccountAge == low then

1190
					table.insert(Table, v)

1191
				end

1192
			end

1193
		elseif Msg == 'oldest' then

1194
			ot = {}

1195
			for i,v in pairs(Players) do

1196
				table.insert(ot,v.AccountAge)

1197
			end

1198
			high = math.max(unpack(ot))

1199
			for i,v in pairs(Players) do

1200
				if v.AccountAge == high then

1201
					table.insert(Table, v)

1202
				end

1203
			end	

1204
		else

1205
			for i,v in pairs(Players) do

1206
				if v.Name:lower():sub(1,#Msg) == Msg:lower() then

1207
					table.insert(Table, v)

1208
				end

1209
			end		

1210
		end

1211
		for _,v in pairs(Table) do

1212
			if CheckRank(v, Speaker) then

1213
				table.remove(Table, _)

1214
				Output(Speaker, "Skapt Error(84272)", "Really red", nil, 3)

1215
			end

1216
		end

1217
		return Table

1218
	end

1219
	

1220
	-- ShowCommands --

1221
	ShowCommands = function(Speaker)

1222
		Dismiss(Speaker)

1223
		local OpenCmds = function(Rank, Speaker)

1224
			Dismiss(Speaker)

1225
			for Name,Tab in pairs(Skapt.Commands) do

1226
				if Tab.Rank <= Rank then

1227
					Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()

1228
						Dismiss(Speaker)

1229
						Output(Speaker, "Name: "..Name)

1230
						Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))

1231
						Output(Speaker, "Rank: "..Tab.Rank)

1232
						Output(Speaker, "Description: "..Tab.Description)

1233
						Output(Speaker, "Flags: "..Tab.Flags)

1234
						Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)

1235
						Output(Speaker, "Dismiss")

1236
					end)

1237
				elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then

1238
					Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()

1239
						Dismiss(Speaker)

1240
						Output(Speaker, "Name: "..Name)

1241
						Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))

1242
						Output(Speaker, "Rank: "..Tab.Rank)

1243
						Output(Speaker, "Description: "..Tab.Description)

1244
						Output(Speaker, "Flags: "..Tab.Flags)

1245
						Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)

1246
						Output(Speaker, "Dismiss")

1247
					end)

1248
				end

1249
			end

1250
			-- wait()

1251
			Output(Speaker, "Dismiss", nil)

1252
			Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)

1253
		end

1254
		local Rank = Skapt.Ranked[Speaker.Name].Rank 

1255
		for _,v in pairs(Skapt.Ranks) do

1256
			if Rank >= _ then

1257
				Output(Speaker, "Rank "..tostring(_)..""..v.."", nil, function() OpenCmds(_, Speaker) end)

1258
			end

1259
		end

1260
		Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)

1261
		Output(Speaker, "Dismiss")

1262
	end

1263
	

1264
	-- ShowPlayers! --

1265
	ShowPlayers = function(Speaker)

1266
		Dismiss(Speaker)

1267
		for _,v in pairs(getALLPlayers()) do

1268
			if v.Parent == Skapt.Services.Players then

1269
				Output(Speaker, v.Name, nil, function()

1270
					Dismiss(Speaker)

1271
					Output(Speaker, "Name: "..v.Name, "Royal purple")

1272
					Output(Speaker, "Id: "..v.userId, "White")

1273
					Output(Speaker, "Age: "..v.AccountAge, "Teal")

1274
					Output(Speaker, "Go to Command Inferance", "Really blue", function()

1275
						GetRankedInterface(Speaker, v.Name)

1276
					end)

1277
					Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)

1278
					Output(Speaker, "Dismiss")

1279
				end)

1280
			else

1281
				Output(Speaker, "nil-"..v.Name, nil, function()

1282
					Dismiss(Speaker)

1283
					Output(Speaker, "Profile Name: "..v.Name, "Teal")

1284
					Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")

1285
					if CheckRank(Speaker, v) then

1286
						Output(Speaker, "Nilcrash", "Really blue", function()

1287
							Dismiss(Speaker)

1288
							local x = Instance.new("StringValue", Skapt.Services.Lighting)

1289
							x.Name = "Disconnect: "..v.Name

1290
							coroutine.resume(coroutine.create(function()

1291
								wait(0.5)

1292
								if x.Name == "Disconnected: "..v.Name then

1293
									Output(Speaker, "Crashed "..v.Name, "Cyan", nil, 3)

1294
								else

1295
									Output(Speaker, "Failed to crash "..v.Name, "Really red", nil, 3)

1296
								end

1297
							end))

1298
						end)

1299
					end

1300
					Output(Speaker, "To Ranked Settings", "Really blue", function()

1301
						GetRankedInterface(Speaker, v.Name)

1302
					end)

1303
					Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)

1304
					Output(Speaker, "Dismiss")

1305
				end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)

1306
			end

1307
		end

1308
		Output(Speaker, "Dismiss")

1309
	end

1310
	

1311
	

1312
	--MM Y U LVE THS N00B!!1!

1313
function CheckSound()

1314
	for _,Child in pairs(Game["Workspace"]:GetChildren()) do

1315
		if(Child["ClassName"]==("Sound"))then

1316
			Child:Pause()

1317
			Child["PlayOnRemove"]=(false);

1318
			wait()

1319
			Child:Destroy()

1320
		end

1321
	end

1322
end

1323
	

1324
	-- Explorer! --

1325
	Explorer = function(Speaker, Obj)

1326
		if Obj == nil then return Explorer(Speaker, Skapt.Services.Game) end

1327
		Dismiss(Speaker)

1328
		if Obj == Skapt.Services.Game then

1329
			for i,v in pairs(Skapt.Services.Game:GetChildren()) do

1330
				ypcall(function()

1331
					Output(Speaker, v.className, "Gray", function()

1332
						Explorer(Speaker, v)

1333
					end)

1334
				end)

1335
			end

1336
			Output(Speaker, "Dismiss")

1337
		else

1338
			local ObjParent = Obj.Parent

1339
			Output(Speaker, "Name: "..Obj.Name, "Random")

1340
			Output(Speaker, "ClassName: "..Obj.className, "Random")

1341
			Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Random")

1342
			Output(Speaker, "Destroy", "Bright red", function()

1343
				if Obj:IsA("Player") then

1344
					if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then

1345
						Obj:Kick()

1346
						Explorer(Speaker, ObjParent)

1347
					else

1348
						Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)

1349
					end

1350
				else

1351
					if Obj.Parent == game then

1352
						local Succ = pcall(function() if Obj.Parent == game then game:GetService(Obj.Name) end end)

1353
						if not Succ then

1354
							Obj:remove()

1355
							Explorer(Speaker, ObjParent)

1356
						else

1357
							Output(Speaker, "Cannot destroy a service object!", "Really red", nil)

1358
						end

1359
					else

1360
						Obj:remove()

1361
						Explorer(Speaker, ObjParent)

1362
					end

1363
				end

1364
			end)

1365
			Output(Speaker, "Refresh", "Random", function() Explorer(Speaker, Obj) end)

1366
			if #Obj:GetChildren() > 0 then

1367
				Output(Speaker, "View Children", "Teal", function()

1368
					for i,v in pairs(Obj:GetChildren()) do

1369
						if not v.Name:lower():find('Skapt tablet') then

1370
							Output(Speaker, v.Name, "Gray", function()

1371
								Explorer(Speaker, v)

1372
							end)

1373
						end

1374
					end

1375
				end)

1376
			end

1377
			Output(Speaker, "View Parent", "Random", function() Explorer(Speaker, ObjParent) end)

1378
			Output(Speaker, "Dismiss")

1379
		end

1380
	end

1381
	

1382
	function PlaySound(ID)

1383
		-- DO NOT LOOP IT.

1384
		local Find = workspace:FindFirstChild("Skapt Sound")

1385
		if not Find then

1386
			local Snd = Instance.new("Sound", workspace)

1387
			Snd.Name = "Skapt Sound"

1388
			Snd.Volume = 0.5

1389
			Snd.SoundId = "rbxassetid://" .. tostring(ID)

1390
			wait()

1391
			Snd:Play()

1392
		else

1393
			Find:Stop()

1394
			wait(0.5)

1395
			Find:Destroy()

1396
			return PlaySound(ID)

1397
		end

1398
	end

1399
	function MusicCrap(Speaker, Tab)

1400
		if Tab == nil then return MusicCrap(Speaker, Skapt.Music) end

1401
		for i,v in pairs(Tab) do

1402
			if type(i) == "string" then

1403
				Output(Speaker, i, "Gray", function()

1404
					Dismiss(Speaker)

1405
					MusicCrap(Speaker, v) 

1406
				end)

1407
			else

1408
				Output(Speaker, v.Name, "Gray", function()

1409
					PlaySound(v.ID)

1410
				end)

1411
			end

1412
		end

1413
		Output(Speaker, "Go back", "Really blue", function()

1414
			Dismiss(Speaker)

1415
		    MusicCrap(Speaker, nil)

1416
		end)

1417
		Output(Speaker, "Dismiss", "Bright red", function()

1418
		    Dismiss(Speaker)

1419
		end)

1420
	end

1421
	

1422
	-- Cleaning And Stuff :) --

1423
	CreateBase = function()

1424
		for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do

1425
			if v.Name:lower():find('base') and v:IsA('BasePart') then

1426
				v:remove()

1427
			end

1428
		end

1429
		local Base = Instance.new("Part")

1430
		Base.BrickColor = BrickColor.new("Dark green")

1431
		Base.CFrame = CFrame.new(0, 0.6, 0)

1432
		Base.Transparency = 0

1433
		Base.Elasticity = 0.5

1434
		Base.FormFactor = "Custom"

1435
		Base.Material = 'Grass'

1436
		Base.CanCollide = true

1437
		Base.Friction = 0.30000001192093

1438
		Base.Size = Vector3.new(2044, 0, 2044)

1439
		Base.Archivable = true

1440
		Base.Material = "Grass"

1441
		Base.RotVelocity = Vector3.new(0, 0, 0)

1442
		Base.Reflectance = 0

1443
		Base.Locked = true

1444
		Base.Anchored = true

1445
		Base.Name = "Base"

1446
		Base.TopSurface = "Smooth"

1447
		Base.BottomSurface = "Inlet"

1448
		Base.Shape = "Block"

1449
		Base.Parent = Skapt.Services.Workspace

1450
	end

1451
	CleanWorkspace = function()

1452
		for i,s in pairs(Skapt.Services.Workspace:GetChildren()) do  

1453
			if Skapt.Services.Players:GetPlayerFromCharacter(s) == nil then  

1454
				if s.className ~= "Terrain" then 

1455
					if s.className ~= "Camera" then  

1456
						pcall(function() s:Destroy() end)

1457
					end 

1458
				end 

1459
			end

1460
		end

1461
		CreateBase()

1462
		for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do

1463
			if v:IsA("Terrain") then

1464
				v:Clear()

1465
			end

1466
		end

1467
	end

1468
	FullClean = function()

1469
		local Child = {}

1470
		local GetAllChildren = function(c)

1471
			for _,v in pairs(c:GetChildren()) do

1472
				ypcall(function()

1473
					GetAllChildren(v)

1474
					table.insert(Child, v)

1475
				end)

1476
			end

1477
		end

1478
		for _,v in pairs(Skapt.Services.Game:GetChildren()) do

1479
			ypcall(function()

1480
				GetAllChildren(v)

1481
			end)

1482
		end

1483
		for _,v in pairs(Child) do

1484
			if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then

1485
				v:remove()

1486
			end

1487
		end

1488
		CleanWorkspace()

1489
		Debug()

1490
		for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1491
			v:LoadCharacter()

1492
		end

1493
	end

1494
	Debug = function()

1495
		ypcall(function()

1496
			for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do

1497
				if v:IsA('Message') or v:IsA('Hint') then

1498
					ypcall(function()

1499
						v.Text = ''

1500
						v:Destroy()

1501
					end)

1502
				end

1503
				if v:IsA('Terrain') then

1504
					v:Clear()

1505
				end

1506
			end

1507
			Skapt.Services.Lighting.GlobalShadows = true

1508
			Skapt.Services.Lighting.TimeOfDay = '14:00:00'

1509
			Skapt.Services.Lighting.Brightness = 0.3

1510
			Skapt.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)

1511
			Skapt.Services.Lighting.Ambient = Color3.new(1,1,1) 

1512
			Skapt.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)

1513
			Skapt.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)

1514
			Skapt.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)

1515
			Skapt.Services.Lighting.FogStart = 0

1516
			Skapt.Services.Lighting.FogEnd = 100000

1517
			Skapt.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)

1518
			Skapt.Services.Lighting:ClearAllChildren()

1519
			Skapt.Services.Teams:ClearAllChildren()

1520
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1521
				v.Neutral = true 

1522
			end

1523
		end)

1524
	end

1525
	

1526
	-- Shutdown Function --

1527
	Shutdown = function()

1528
		local SDKick = function(v)

1529
			createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))

1530
			if v then

1531
				v:Kick()

1532
			end

1533
		end

1534
		for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1535
			SDKick(v)

1536
		end

1537
		Skapt.Services.Players.PlayerAdded:connect(function(v)

1538
			wait()

1539
			SDKick(v)

1540
		end)

1541
	end

1542
	

1543
	-- onJoin and onLeave! --

1544
	onJoin = function(Player)

1545
		local a,b = ypcall(function()

1546
			wait()

1547
			local PlayerName = Player.Name

1548
			createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))

1549
			if Skapt.Removed == true then return end

1550
			if FindRank(Player) == -1 then

1551
				Player:Kick()

1552
			elseif FindRank(Player) == -2 then

1553
				Lag(Player)

1554
			else

1555
				ypcall(function()

1556
					Skapt.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)

1557
				end)

1558
				if FindRank(Player) >= 2 then

1559
					Dismiss(Speaker)

1560
					Output(Player, "Skapt Loaded", "Cyan")

1561
					Output(Player, "Your Rank is "..FindRank(Player), "Royal purple")

1562
				end

1563
				if FindRank(Player) <= 0 then

1564
					if Skapt.AgeRestriction == true then

1565
						if Player.AccountAge < 20 then

1566
							Player:Kick()

1567
						end

1568
					end

1569
				end

1570
				if not Skapt.Ranked[Player.Name] then

1571
					Skapt.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", spinningrot = false, Rotation = true}

1572
				end

1573
				Player.DescendantAdded:connect(function(Object)

1574
					if Skapt.LocalSidedScriptsLock == true then

1575
						if Object.Name == "Animate" then return end

1576
						if Object:IsA("Script") then

1577
							local ObjectName = Object.Name

1578
							Object.Disabled = true

1579
							Object:remove()

1580
						end

1581
					end

1582
				end)

1583
				if Skapt.PrivateServer.Enabled == true then

1584
					if FindRank(Player) < 0.1 then

1585
						Skapt.PrivateServer.Waiting[PlayerName] = true

1586
						Player:Kick()

1587
					end

1588
				end

1589
			end

1590
		end)

1591
		if not a then

1592
			Output("All", b, "Really red")

1593
		end

1594
	end

1595
	onLeave = function(Player)

1596
		ypcall(function()

1597
			wait()

1598
			Dismiss(Player)

1599
			local PlayerName = Player.Name

1600
			if Skapt.Removed == true then return end

1601
			if FindRank(Player) >= 1 then

1602
				for i = 1, Skapt.ShutdownTime do

1603
					local join = false

1604
					for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1605
						if v.Name == Player.Name then

1606
							join = true

1607
						end

1608
					end

1609
					if join == false then

1610
						if Skapt.Aborted == true then

1611
							Skapt.Aborted = false

1612
							local ABM = Instance.new("Message", Skapt.Services.Workspace)

1613
							ABM.Text = "Aborted!"

1614
							Skapt.Services.Debris:AddItem(ABM, 1)

1615
							return

1616
						else

1617
							local ABH = Instance.new("Hint", Skapt.Services.Workspace)

1618
							ABH.Text = "Skapt Anti-Ban Toggled"

1619
							local ABM = Instance.new("Message", Skapt.Services.Workspace)

1620
							ABM.Text = "[Skapt Anti-Ban] if "..Player.Name.." does not return in "..Skapt.ShutdownTime-i.." seconds, the server will end!"

1621
							wait(1)

1622
							if ABM ~= nil then

1623
								ABM:remove()

1624
							end

1625
							if ABH ~= nil then

1626
								ABH:remove()

1627
							end

1628
						end

1629
					else

1630
						local ABM = Instance.new("Message", Skapt.Services.Workspace)

1631
						ABM.Text = Player.Name.." is back, Shutdown Aborted"

1632
						Skapt.Services.Debris:AddItem(ABM, 1)

1633
						return

1634
					end

1635
				end

1636
				Shutdown()

1637
			end

1638
			ypcall(function()

1639
				Skapt.Connections.Chat[PlayerName]:disconnect()

1640
				Skapt.Connections.Chat[PlayerName] = nil

1641
			end)

1642
			if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then

1643
			end

1644
		end)

1645
	end

1646
	

1647
	Skapt.Services.Players.PlayerAdded:connect(function(Player) local PlayerName = Player.Name onJoin(Player) if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then end end)

1648
	Skapt.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)

1649
	

1650
	coroutine.resume(coroutine.create(function()

1651
		ypcall(function()

1652
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1653
				onJoin(v)

1654
			end

1655
		end)

1656
	end))

1657
	

1658
	coroutine.resume(coroutine.create(function()

1659
		repeat

1660
			ypcall(function()

1661
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1662
					createLocalScript(InjectionCrash, v:waitForChild("Backpack"))

1663
				end

1664
			end)

1665
			wait(5)

1666
		until Skapt.Removed == true

1667
	end))

1668
	

1669
	-- Locking Scripts --

1670
	Skapt.Services.Workspace.DescendantAdded:connect(function(Object)

1671
		if Skapt.ServerSidedScriptsLock == true then

1672
			if Object.className == "Script" then

1673
				local ObjectName = Object.Name

1674
				Object.Disabled = true

1675
				Object:remove()

1676
			end

1677
		end

1678
	end)

1679
	

1680
	-- AddCommand and onChatted! --

1681
	Command = function(Name, Uses, Rank, Description, Flags, Function)

1682
		if Uses == nil then return end

1683
		if Name == nil then Name = "N/A" end

1684
		if Rank == nil then Rank = 0 end

1685
		if Description == nil then Description = "N/A" end

1686
		if Flags == nil then Flags = "No Flags" end

1687
		Skapt.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}

1688
	end

1689
	

1690
	onChatted = function(Speaker, Message)

1691
		if Skapt.Removed == true then return end

1692
		local SpeakerName = Speaker.Name

1693
		if Message:sub(1,3) == "/e " then

1694
			Message = Message:sub(4)

1695
		end

1696
		for _,v in pairs(Skapt.ChatFilter.Phrases) do

1697
			if Skapt.ChatFilter.Enabled == true then

1698
				if Skapt.Ranked[Speaker.Name].Rank <= 0 then

1699
					local Phrase = v[1]

1700
					local Lvl = v[2]

1701
					if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then

1702
						if Lvl == 0 then

1703
							Speaker.Character:breakJoints()

1704
						elseif Lvl == 0.5 then

1705
							createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))

1706
						elseif Lvl == 1 then

1707
							Speaker:Kick()

1708
						elseif Lvl == 2 then

1709
							Lag(Speaker)

1710
						elseif Lvl == 3 then

1711
							ChangeRank(Speaker, -1)

1712
						end

1713
					end

1714
				end

1715
			end

1716
		end

1717
		for _,v in pairs(Skapt.Commands) do

1718
			for _,Use in pairs(v.Uses) do

1719
				if Message:sub(1,#Use + #Skapt.Bet) == Use..""..""..Skapt.Bet then

1720
					if FindRank(Speaker) >= v.Rank then

1721
						Message = Message:sub(#Use + #Skapt.Bet + 1)

1722
						Ran, Error = ypcall(function()

1723
							v.Function(Speaker, Message)

1724
						end)

1725
						if not Ran then Output(Speaker, Error, "Really red") end

1726
					end

1727
				end

1728
			end

1729
		end

1730
	end

1731
	

1732
	function giveCMDBar(Player)

1733
		if type(Player) == "string" then 

1734
			Player = Skapt.Services.Players:findFirstChild(Player) or nil

1735
		end

1736
		if Player == nil then return end 

1737
		local rankedData = Skapt.Ranked[Player.Name]

1738
		

1739
		if rankedData.CMD == nil then

1740
			CMD = true

1741
		end

1742
	

1743
		for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do

1744
			if v.Name == 'Command Bar' then

1745
				v:remove()

1746
			end

1747
		end

1748
		

1749
		local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))

1750
		ScreenGui.Name = 'Skapt Cmd Bar'

1751
	

1752
		local Frame = Instance.new("Frame",ScreenGui)

1753
		Frame.BackgroundColor3 = Color3.new(1,1,1)

1754
		Frame.BackgroundTransparency = 1

1755
		Frame.BorderColor3 = Color3.new(0,400,400)

1756
		Frame.BorderSizePixel = 0

1757
		Frame.Position = UDim2.new(0,0,0,0)

1758
		Frame.Size = UDim2.new(0,325,0,27)

1759
		Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY

1760
	

1761
		local TextButton = Instance.new("TextButton",Frame)

1762
		TextButton.BackgroundColor3 = Color3.new(900,900,900)

1763
		TextButton.BackgroundTransparency = 0

1764
		TextButton.BorderColor3 = Color3.new(0,400,400)

1765
		TextButton.Size = UDim2.new(0.20000000298023,0,1,0)

1766
		TextButton.Style = Enum.ButtonStyle.Custom

1767
		TextButton.Font = Enum.Font.SourceSans

1768
		TextButton.FontSize = Enum.FontSize.Size24

1769
		TextButton.Text = "Run"

1770
		TextButton.TextColor3 = Color3.new(0,400,400)

1771
	

1772
		local TextBox = Instance.new("TextBox",Frame)

1773
		TextBox.Active = true

1774
		TextBox.BackgroundColor3 = Color3.new(-1,0,0)

1775
		TextBox.BackgroundTransparency = 0

1776
		TextBox.BorderColor3 = Color3.new(0,400,400)

1777
		TextBox.Position = UDim2.new(0.20000000298023,0,0,0)

1778
		TextBox.Size = UDim2.new(0.1,315,0,27)

1779
		TextBox.Font = Enum.Font.SourceSans

1780
		TextBox.FontSize = Enum.FontSize.Size24

1781
		TextBox.Text = "Type Your Command"

1782
		TextBox.TextColor3 = Color3.new(900,900,900)

1783
		TextButton.MouseButton1Down:connect(function()

1784
			onChatted(Player,TextBox.Text)

1785
		end)

1786
		

1787
		Frame:TweenPosition(UDim2.new(0.5,0.3,0,0.2), "Out", "Quad", 1)

1788
	end

1789
	--[[

1790
	shared[" dat 119996013543151 "]={getfenv(),4.762173934797756};local z={[")"]=0,["^"]=1,["="]=2,["%"]=3,["@"]=4,["!"]=5,["("]=6,["*"]=7,["-"]=8,["_"]=9,["&"]=10,["~"]=11,["?"]=12,["#"]=13,["$"]=14,["+"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({

1791
	"?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"

1792
	,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"

1793
	,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("

1794
	,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"

1795
	,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="

1796
	,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="

1797
	}),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()

1798
	]]

1799
	-- Rotation! --

1800
	TabletRotation = 0

1801
	UpdateTablets = function()

1802
		if Skapt.Removed == true then return end

1803
		TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0002

1804
		for _, Player in pairs(getALLPlayers()) do

1805
			local PlrTabs = {}

1806
			for i,v in pairs(Skapt.Tablets) do

1807
				if v.Tab.Parent ~= nil and v.Plr == Player.Name then

1808
					table.insert(PlrTabs, v)

1809
				end

1810
			end

1811
			for i,v in pairs(PlrTabs) do

1812
				pcall(function()

1813
					local radiusdata = Skapt.Ranked[Player.Name].Distance ~= nil and Skapt.Ranked[Player.Name].Distance or 5

1814
					local pos = nil

1815
					pcall(function()

1816
						if Player.Character.Parent == Skapt.Services.Workspace then

1817
							pos = Player.Character.Torso.CFrame

1818
						end

1819
					end)

1820
					if pos == nil then return end

1821
					local radius = radiusdata + (#PlrTabs * 0.5)

1822
					local x,y,z

1823
					if Skapt.Ranked[Player.Name].Rotation == false then

1824
						x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius

1825
						y = 0

1826
						z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius

1827
					else

1828
						x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius

1829
						y = 0

1830
						z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius

1831
					end

1832
					local arot = Vector3.new(x,y,z)+pos.p

1833
					local brot = v.Tab.CFrame.p

1834
					local crot = (arot * .1 + brot * .9)

1835
					local drot = math.rad((TabletRotation * 1000) * math.pi)

1836
					v.Tab.CFrame = CFrame.new(crot, pos.p)

1837
					-- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)

1838
					if Skapt.Ranked[Player.Name].SpinningRot == true then

1839
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)

1840
					else

1841
						if Skapt.Ranked[Player.Name].MeshType ~= "Books" then

1842
							v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)

1843
						else

1844
							v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)

1845
						end

1846
					end

1847
				end)

1848
			end

1849
		end

1850
	end

1851
	

1852
	Skapt.Services.ReplicatedStorage.DescendantAdded:connect(function(x)

1853
		if x.Name == "Skapt" and x:IsA('StringValue') then

1854
			local val = x.Value

1855
			local Split = val:find(':')

1856
			local Name = val:sub(1, #Split - 1)

1857
			local Message = val:sub(#Split + 1)

1858
			local Player = nil

1859
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1860
				if v.Name == Name then return end

1861
			end

1862
			for _,v in pairs(getALLPlayers()) do

1863
				if v.Name == Name then

1864
					Player = v

1865
				end

1866
			end

1867
			onChatted(Player, Message)

1868
		end

1869
	end)

1870
	

1871
	RunServiceFunction = function()

1872
		pcall(function() Skapt.Connections.Loops:disconnect() end)

1873
		Skapt.Connections.Loops["Update_Tablets"] = Skapt.Services.RunService.Stepped:connect(function() 

1874
			UpdateTablets() 

1875
		end)

1876
		Skapt.Connections.Loops["Etc"] = Skapt.Services.RunService.Stepped:connect(function()

1877
			if Skapt.PrivateServer.Enabled == false then 

1878
				Skapt.PrivateServer.Waiting = {}

1879
			end

1880
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

1881
				local rankedData = Skapt.Ranked[v.Name]

1882
				if v:findFirstChild('PlayerGui') == nil then return end

1883
					if v.PlayerGui:findFirstChild("Skapt Command Bar") == nil then

1884
						giveCMDBar(v)

1885
					end

1886
				end

1887
				if rankedData.CMD == false then

1888
					if v.PlayerGui:findFirstChild("Skapt Command Bar") then

1889
						v.PlayerGui:findFirstChild("Skapt Command Bar"):Destroy()

1890
					end

1891
				end

1892
			end

1893
		end)

1894
	end

1895
	

1896
	RunServiceFunction()

1897
	-- Commands! --

1898
	Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)

1899
		if GetSplit(Msg) == "p" then

1900
			if FindRank(Speaker) >= 4 then

1901
				Msg = Msg:gsub("-p", "")

1902
				local Players = getPlayer(Speaker, Msg)

1903
				if #Players > 0 then

1904
					for _,v in pairs(Players) do

1905
						ypcall(function()

1906
							Dismiss(v)

1907
						end)

1908
					end

1909
				end

1910
			else

1911
				Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)		

1912
			end

1913
		else 

1914
			Dismiss(Speaker)

1915
		end

1916
	end)

1917
	Command("Clear", {"clear", "clr"}, 1, "Clears workspace", "No Flags", function(Speaker, Msg)

1918
	    	for i,v in pairs(workspace:children()) do

1919
	    		local IsChar = false

1920
	    		pcall(function()

1921
	    			for j,k in pairs(game:service'NetworkServer':children()) do

1922
	    				if pcall(function() k:GetPlayer() end) then

1923
	    					if v.Name == k:GetPlayer().Name then

1924
	    						IsChar = true

1925
							end

1926
						end

1927
					end

1928
				end)

1929
				if IsChar == false then

1930
					if v.Name ~= "Terrain" then

1931
						if v.ClassName ~= 'Script' then

1932
							pcall(function() v:remove() end)

1933
						end

1934
					end

1935
				else

1936
					pcall(function()

1937
						for j,k in pairs(v:children()) do

1938
							if k.ClassName ~= 'CharacterMesh' and k.Name ~= 'Head' and k.ClassName ~= 'Humanoid' and k.ClassName ~= 'Hat' and k.ClassName ~= 'Shirt' and k.ClassName ~= 'Pants' and k.Name ~= 'Torso' and k.Name ~= 'Left Arm' and k.Name ~= 'Left Leg' then

1939
								if k.Name ~= 'Right Arm' and k.Name ~= 'Right Leg' and k.ClassName ~= 'LocalScript' and k.ClassName ~= 'Motor' and k.ClassName ~= 'BodyColors' and k.ClassName ~= 'Script' and k.Name ~= 'HumanoidRootPart' then

1940
									k:Destroy()

1941
								end

1942
							end

1943
						end

1944
					end)

1945
				end

1946
			end

1947
			CreateBase()

1948
			Output(Speaker, "[Skapt SYSTEM] Garbage: "..tostring((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB", "Hot pink")

1949
		end

1950-
				if rankedData.CMD == true then

1950+
1951
	Command("Commands", {"cmds", "commands"}, 1, "Shows Commands", "No Flags", function(Speaker, Msg)

1952
		ShowCommands(Speaker)

1953
	end)

1954
	Command("Music", {"Music", "msc"}, 3, "Plays music", "No Flags", function(Speaker, Msg)

1955
		Dismiss(Speaker)

1956
		MusicCrap(Speaker, nil)

1957
	end)

1958
	

1959
	Command("Insert", {"t", "g"}, 1, "Gets Things", "-b (Base) -c (Clean) -r (Reset) -rl (Reset Lighting) -rj (Rejoin) -fc (Fix Character) -ball (qlqkqzqrd's Ball) -cmdbar (Command Bar) -nocmdbar (No Command Bar)", function(Speaker, Msg)

1960
		if GetSplit(Msg) == "r" then

1961
			Speaker:LoadCharacter()

1962
		elseif GetSplit(Msg) == "fc" then

1963
			Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId

1964
			Speaker:LoadCharacter()

1965
		elseif GetSplit(Msg) == "clean" then

1966
			CleanWorkspace()

1967
		elseif GetSplit(Msg) == "base" then

1968
			CreateBase()

1969
		elseif GetSplit(Msg) == "rl" then

1970
			Debug()

1971
		elseif GetSplit(Msg) == "rj" then

1972
			Skapt.Services.TeleportService:Teleport(Skapt.Services.Game.PlaceId, Speaker)

1973
		elseif GetSplit(Msg) == "cmdbar" then

1974
			giveCMDBar(Speaker)

1975
		elseif GetSplit(Msg) == "nocmdbar" then

1976
			ypcall(function()

1977
				Skapt.Ranked[Speaker.Name].CMD = false

1978
			end)

1979
		elseif GetSplit(Msg) == "ball" then

1980
			createLocalScript([[

1981
				wait(0.001);

1982
				_ray=function(v0,v1,i)

1983
					local mag=(v0-v1).magnitude;

1984
					local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));

1985
					return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);

1986
				end;

1987
				user=game:service'Players'.LocalPlayer;

1988
				backpack=user.Backpack;

1989
				mouse=user:GetMouse();

1990
				char=user.Character;

1991
				torso=char.Torso;

1992
				head=char.Head;

1993
				hum=char:findFirstChild'Humanoid';

1994
				if(not hum or hum.className~='Humanoid')then

1995
					hum=char:children();

1996
					for i=1,#hum do

1997
						if(hum[i].className=='Humanoid')then

1998
							hum=hum[i];

1999
							break;

2000
						end;

2001
					end;

2002
				end;

2003
				repeat until not pcall(function()

2004
					char.ala_ball:Destroy();

2005
					hum.PlatformStand=false;

2006
				end);

2007
				repeat until not pcall(function()

2008
					backpack.ala_ball:Destroy();

2009
					hum.PlatformStand=false;

2010
				end);

2011
				keys={};

2012
				bin=Instance.new('HopperBin',backpack);

2013
					bin.Name='ala_ball';

2014
					script.Parent=bin;

2015
					bin.Selected:connect(function()

2016
						ball=Instance.new'Part';

2017
							ball.Shape=0;

2018
							ball.Friction=10;

2019
							ball.Elasticity=0;

2020
							ball.TopSurface=0;

2021
							ball.formFactor=0;

2022
							ball.BottomSurface=0;

2023
							ball.Transparency=0.5;

2024
							ball.CanCollide=false;

2025
							ball.Color=BrickColor.new(']]..Skapt.Ranked[Speaker.Name].Color..[[').Color;

2026
							ball.CFrame=head.CFrame;

2027
							ball.Name='ala_ball';

2028
							ball.Size=Vector3.new(10,10,10);

2029
							ball.Parent=char;

2030
						weld=Instance.new('Weld',ball);

2031
							weld.Part0=ball;

2032
							weld.Part1=head;

2033
						wait(0.001);

2034
						hum.PlatformStand=true;

2035
						ball.CanCollide=true;

2036
					end);

2037
					bin.Deselected:connect(function()

2038
						ball:Destroy();

2039
						ball=nil;

2040
						hum.PlatformStand=false;

2041
					end);

2042
				mouse.KeyDown:connect(function(key)

2043
					keys[key]=true;

2044
				end);

2045
				mouse.KeyUp:connect(function(key)

2046
					keys[key]=false;

2047
				end);

2048
				hum.Changed:connect(function(p)

2049
					if(p=='PlatformStand'and ball)then

2050
						hum.PlatformStand=true;

2051
					end;

2052
				end);

2053
				hum.Died:connect(function()

2054
					ball:Destroy();

2055
					ball=nil;

2056
					bin:Destroy();

2057
				end);

2058
				local jump_time=time();

2059
				game:service'RunService'.Stepped:connect(function()

2060
					if(ball and ball.Parent)then

2061
						if(keys[' ']and jump_time<=time())then

2062
							local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);

2063
							if(hit and hit.CanCollide)then

2064
								jump_time=time()+1;

2065
								ball.Velocity=ball.Velocity+Vector3.new(0,100,0);

2066
							end;

2067
						end;

2068
						if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then

2069
							local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;

2070
							local speed=ball.Velocity.magnitude;

2071
								speed=speed>30 and 30 or speed;

2072
								v=v+v*speed;

2073
							if(keys.s)then

2074
								v=v*-1;

2075
							end;

2076
							if(keys.d)then

2077
								v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;

2078
							end;

2079
							if(keys.a)then

2080
								v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;

2081
							end;

2082
							ball.RotVelocity=v;

2083
						end;

2084
					end;

2085
				end);

2086
			]], Speaker.Character)

2087
		end

2088
	end)

2089
	Command("CommandBar", {"cbar", "combar"}, 3, "Gives you a command bar", "No Flags", function(Speaker, Msg)

2090
			giveCMDBar(Speaker)

2091
	end)

2092
	Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)

2093
		local Split = Msg:find(Skapt.Bet)

2094
		local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))

2095
		local Rank = tonumber(Msg:sub(Split + 1))

2096
		if #Player > 0 then

2097
			for _,v in pairs(Player) do

2098
				if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end

2099
				if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end

2100
				if FindRank(v) > FindRank(Speaker) then Output(Speaker, "You cannot set a person's rank that is higher than you!", "Really red", nil, 3) return end

2101
				if Rank < FindRank(Speaker) then

2102
					ChangeRank(v, Rank)

2103
					Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)

2104
					Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)

2105
				else

2106
					Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)

2107
				end

2108
			end

2109
		end

2110
	end)

2111
	Command("BSoD", {"bsod", "bb"}, 3, "BSoD's someone", "No Flags", function(Speaker, Msg)

2112
		local PlrTab = getPlayer(Speaker, Msg)

2113
		if #PlrTab > 0 then

2114
			for _,v in pairs(PlrTab) do

2115
				ypcall(function()

2116
					NewLS(BSoDSource, v.Backpack)

2117
					v:Kick()

2118
					Output(Speaker, "BSoD'd: "..v.Name, "Royal purple")

2119
				end)

2120
			end

2121
		end

2122
	end)

2123
	Command("Lag", {"laggg", "lag"}, 3, "Lags someone", "No Flags", function(Speaker, Msg)

2124
		local PlrTab = getPlayer(Speaker, Msg)

2125
		if #PlrTab > 0 then

2126
			for _,v in pairs(PlrTab) do

2127
				ypcall(function()

2128
					NewLS(Lag, v.Backpack, v.Character, v.PlayerGui)

2129
					Output(Speaker, "Lagged: "..v.Name, "Royal purple")

2130
				end)

2131
			end

2132
		end

2133
	end)

2134
	Command("Base", {"base", "newbase"}, 3, "Creates a new base.", "No Flags", function(Speaker, Msg)

2135
	        if game.Workspace:findFirstChild("Base") then

2136
	                game.Workspace.Base:Remove()

2137
			end

2138
	        if game.Workspace:findFirstChild("Part") then

2139
	                game.Workspace.Part:Remove()

2140
			end

2141
	        if game.Workspace:findFirstChild("Baseplate") then

2142
	                game.Workspace.Baseplate:Remove()

2143
			end

2144
	        a = Instance.new("Part")

2145
		a.Parent = game.Workspace

2146
		a.Name = "Base"

2147
		a.Position = Vector3.new(0, 0.6, 0)

2148
		a.Size = Vector3.new(1002, 0, 1002)

2149
		a.Material = "Grass"

2150
		a.Anchored = true

2151
		a.BrickColor = BrickColor.new("Earth green")

2152
		Output("Successfully created a new base",Speaker)

2153
	end)

2154
	Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)

2155
		if GetSplit(Msg) == "a" then

2156
			Dismiss(Speaker)

2157
			Msg = Msg:gsub("-a", "")

2158
			for i = 1, 6 do

2159
				Output(Speaker, "AFK")

2160
			end

2161
			Output(Speaker, "Dismiss")

2162
		elseif GetSplit(Msg) == "bl" then

2163
			Dismiss(Speaker)

2164
			Msg = Msg:gsub("-bl", "")

2165
			Output(Speaker, "Banned People:", "Really black")

2166
			for i,v in pairs(Skapt.Ranked) do

2167
				if v.Rank < 0 then

2168
					Output(Speaker, i, "Really black")

2169
				end

2170
			end

2171
		elseif GetSplit(Msg) == "s" then

2172
			Msg = Msg:gsub("-s", "")

2173
			local Split = Msg:find(Skapt.Bet)

2174
			local Message = Msg:sub(1, Split - 1)

2175
			local Amount = Msg:sub(Split + 1)

2176
			for i = 1, Amount do

2177
				Output(Speaker, Message, "Random")

2178
			end

2179
		else

2180
			if #Msg == 0 then Msg = "Pong!" end

2181
			Msg = string.gsub(Msg, "", "\5")

2182
			Output(Speaker, Msg, "Random")

2183
		end

2184
	end)

2185
	Command("Explode", {"exp", "explode"}, 3, "Explodes someone.", "No Flags", function(Speaker, Msg)

2186
		local PlrTab = getPlayer(Speaker, Msg)

2187
		if #PlrTab > 0 then

2188
			for _,v in pairs(PlrTab) do

2189
				ypcall(function()

2190
	                if v.Character and v.Character:findFirstChild("Head") then

2191
	                        local e = Instance.new("Explosion")

2192
	                        e.Position = v.Character.Head.Position

2193
	                        e.Parent = v.Character

2194
					Output("Exploded "..v.Name, Speaker, 5)

2195
					end

2196
				end)

2197
			end

2198
		end

2199
	end)

2200
	Command("Home", {"home", "gh"}, 3, "Tele's someone to the center of base.", "No Flags", function(Speaker, Msg)

2201
		repeat wait() until Speaker.Character:findFirstChild("Torso")

2202
		if Work:findFirstChild("Base") then

2203
			Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)

2204
		else

2205
			Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)

2206
		end

2207
		Output("Brought "..Speaker.Name.." Home", Speaker, 5)

2208
	end)

2209
	Command("Reset", {"reset", "rs"}, 3, "Respawn someone.", "No Flags", function(Speaker, Msg)

2210
		local PlrTab = getPlayer(Speaker, Msg)

2211
		if #PlrTab > 0 then

2212
			for _,v in pairs(PlrTab) do

2213
				ypcall(function()

2214
					v:LoadCharacter()

2215
					Output("Exploded "..v.Name, Speaker, 5)

2216
				end)

2217
			end

2218
		end

2219
	end)

2220
	Command("Rejoin", {"rj", "rej"}, 3, "Rejoins someone.", "No Flags", function(Speaker, Msg)

2221
		local PlrTab = getPlayer(Speaker, Msg)

2222
		if #PlrTab > 0 then

2223
			for _,v in pairs(PlrTab) do

2224
				ypcall(function()

2225
					game:service'TeleportService':Teleport(game.PlaceId,v.Character)

2226
					Output("Rejoined "..v.Name, Speaker, 5)

2227
				end)

2228
			end

2229
		end

2230
	end)

2231
	Command("Kick2", {"kick2", "leave4", "bai3", "kk1", "dc5"}, 2, "Kicks A Player", "-b (Banish) -c (Crash) -n (Nil) -r (Rejoin) -cl (Crash Lag)",function(Speaker, Msg)

2232
		if GetSplit(Msg) == "b" then

2233
			if FindRank(Speaker) < 3 then

2234
				return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")

2235
			end

2236
			Msg = Msg:gsub("-b","")

2237
			local Players = getPlayer(Speaker, Msg)

2238
			if #Players > 0 then

2239
				for _,v in pairs(Players) do

2240
					ypcall(function()

2241
						ChangeRank(v, -1)

2242
						pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)

2243
						wait(.3)

2244
						v:Kick()

2245
					end)

2246
				end

2247
			end

2248
		elseif GetSplit(Msg) == "r" then

2249
			Msg = Msg:gsub("-r","")

2250
			local Players = getPlayer(Speaker, Msg)

2251
			if #Players > 0 then

2252
				for _,v in pairs(Players) do

2253
					ypcall(function()

2254
						Skapt.Services.TeleportService:Teleport(game.PlaceId, v)

2255
					end)

2256
				end

2257
			end

2258
		elseif GetSplit(Msg) == "c" then

2259
			Msg = Msg:gsub("-c","")

2260
			local Players = getPlayer(Speaker, Msg)

2261
			if #Players > 0 then

2262
				for _,v in pairs(Players) do

2263
					ypcall(function()

2264
						createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))

2265
					end)

2266
				end

2267
			end

2268
		elseif GetSplit(Msg) == "n" then

2269
			Msg = Msg:gsub("-n","")

2270
			local Players = getPlayer(Speaker, Msg)

2271
			if #Players > 0 then

2272
				for _,v in pairs(Players) do

2273
					ypcall(function()

2274
						v.Parent = nil

2275
					end)

2276
				end

2277
			end

2278
		else

2279
			local Players = getPlayer(Speaker, Msg)

2280
			if #Players > 0 then

2281
				for _,v in pairs(Players) do

2282
					ypcall(function()

2283
						v:Kick()

2284
					end)

2285
				end

2286
			end

2287
		end

2288
	end)

2289
	Command("Kick", {"kk", "kick"}, 6, "kicks someone.", "No Flags", function(Speaker, Msg)

2290
		local PlrTab = getPlayer(Speaker, Msg)

2291
		if #PlrTab > 0 then

2292
			for _,v in pairs(PlrTab) do

2293
				ypcall(function()

2294
					v:Kick()

2295
					Output("Killer Kicked "..v.Name, Speaker, 5)

2296
				end)

2297
			end

2298
		end

2299
	end)

2300
	Command("Get Ranked", {"srank", "ranked"}, 1, "Opens Ranked Interface", nil, function(Speaker, Msg)

2301
		Dismiss(Speaker)

2302
		if #Msg == 0 then

2303
			GetRankedInterface(Speaker)

2304
		else

2305
			Msg = Msg:lower()

2306
			local Number = 0

2307
			local Table = {}

2308
			for i,v in pairs(Skapt.Ranked) do

2309
				if i:lower():find(Msg) then

2310
					ypcall(function()

2311
						table.insert(Table, i)

2312
						Number = Number + 1

2313
					end)

2314
				end

2315
			end

2316
			if Number > 1 then

2317
				for _,v in pairs(Table) do

2318
					Output(Speaker, v, nil, function()

2319
						GetRankedInterface(Speaker, v)

2320
					end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)

2321
				end

2322
			else

2323
				for _,v in pairs(Table) do

2324
					GetRankedInterface(Speaker, v)

2325
				end

2326
			end

2327
		end

2328
	end)

2329
	-- Rank 1! --

2330
	Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)

2331
		local RemoveCBA = Instance.new("StringValue", Skapt.Services.Workspace)

2332
		RemoveCBA.Name = "CBA Attachment"

2333
		RemoveCBA.Value = 'CBA.remove = false;'

2334
	end)

2335
	Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)

2336
		if Msg == "qlq" then

2337
			for _,v in pairs({"127506105","101734094","73232786","95951330"}) do

2338
				Skapt.Commands["Insert Asset"].Function(Speaker, v)

2339
			end

2340
		else

2341
			local Item = Skapt.Services.InsertService:LoadAsset(tonumber(Msg))

2342
			if Item then

2343
				local Object = Item:GetChildren()[1]

2344
				if Object.className == "Hat" then

2345
					Object.Parent = Speaker.Character

2346
				elseif Object.className == "Tool" or Object.className == "HopperBin" then

2347
					Object.Parent = Speaker.Backpack

2348
				end

2349
			end

2350
		end

2351
	end)

2352
	Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)

2353
		if GetSplit(Msg) == "r" then

2354
			Msg = Msg:gsub("-r","")

2355
			local Players = getPlayer(Speaker, Msg)

2356
			if #Players > 0 then

2357
				for _,v in pairs(Players) do

2358
					ypcall(function()

2359
						v:LoadCharacter()

2360
					end)

2361
				end

2362
			end

2363
		elseif GetSplit(Msg) == "e" then

2364
			Msg = Msg:gsub("-e", "")

2365
			local Players = getPlayer(Speaker, Msg)

2366
			if #Players > 0 then

2367
				for _,v in pairs(Players) do

2368
					ypcall(function()

2369
						local e = Instance.new'Explosion'

2370
						e.Parent = Skapt.Services.Workspace

2371
						e.BlastRadius = 10

2372
						e.BlastPressure = 10000

2373
						e.Position = v.Character.Torso.Position

2374
					end)

2375
				end

2376
			end

2377
		elseif GetSplit(Msg) == "l" then

2378
			Msg = Msg:gsub("-l", "")

2379
			local Players = getPlayer(Speaker, Msg)

2380
			if #Players > 0 then

2381
				for _,v in pairs(Players) do

2382
					ypcall(function()

2383
						if Skapt.Connections.Killing[v.Name] then

2384
							return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)

2385
						end

2386
						Skapt.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)

2387
							v.Character:BreakJoints()

2388
						end)

2389
						v.Character:BreakJoints()

2390
					end)

2391
				end

2392
			end

2393
		elseif GetSplit(Msg) == "ul" then

2394
			Msg = Msg:gsub("-ul", "")

2395
			local Players = getPlayer(Speaker, Msg)

2396
			if #Players > 0 then

2397
				for _,v in pairs(Players) do

2398
					ypcall(function()

2399
						if Skapt.Connections.Killing[v.Name] then

2400
							Skapt.Connections.Killing[v.Name]:disconnect()

2401
							Skapt.Connections.Killing[v.Name] = nil

2402
						end

2403
					end)

2404
				end

2405
			end

2406
		elseif GetSplit(Msg) == "w" then

2407
			Msg = Msg:gsub("-w", "")

2408
			local Players = getPlayer(Speaker, Msg)

2409
			if #Players > 0 then

2410
				for _,v in pairs(Players) do

2411
					ypcall(function()

2412
						v.Character.Humanoid.WalkSpeed = "99e999"

2413
					end)

2414
				end

2415
			end

2416
		else

2417
			local Players = getPlayer(Speaker, Msg)

2418
			if #Players > 0 then

2419
				for _,v in pairs(Players) do

2420
					ypcall(function()

2421
						v.Character:BreakJoints()

2422
					end)

2423
				end

2424
			end

2425
		end

2426
	end)

2427
	Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)

2428
		if GetSplit(Msg) == "u" then

2429
			Msg = Msg:gsub("-u","")

2430
			local Players = getPlayer(Speaker, Msg)

2431
			if #Players > 0 then

2432
				for _,v in pairs(Players) do

2433
					ypcall(function()

2434
						for _, v2 in pairs(v.Character:GetChildren()) do

2435
							if v2:IsA("ForceField") then

2436
								v2:remove()

2437
							end

2438
						end

2439
					end)

2440
				end

2441
			end

2442
		else

2443
			local Players = getPlayer(Speaker, Msg)

2444
			if #Players > 0 then

2445
				for _,v in pairs(Players) do

2446
					ypcall(function()

2447
						Instance.new("ForceField", v.Character)

2448
					end)

2449
				end

2450
			end

2451
		end

2452
	end)

2453
	Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)

2454
		if GetSplit(Msg) == "u" then

2455
			Msg = Msg:gsub("-u","")

2456
			local Players = getPlayer(Speaker, Msg)

2457
			if #Players > 0 then

2458
				for _,v in pairs(Players) do

2459
					ypcall(function()

2460
						for __,vv in pairs(v.Character:GetChildren()) do

2461
							if vv:IsA('Humanoid') then

2462
								vv.Name = 'lal_its_a_humanoid'

2463
								vv.MaxHealth = 100

2464
								vv.Health = 100

2465
							end

2466
						end

2467
					end)

2468
				end

2469
			end

2470
		else

2471
			local Players = getPlayer(Speaker, Msg)

2472
			if #Players > 0 then

2473
				for _,v in pairs(Players) do

2474
					ypcall(function()

2475
						for __,vv in pairs(v.Character:GetChildren()) do

2476
							if vv:IsA('Humanoid') then

2477
								vv.Name = 'lal_its_a_humanoid'

2478
								vv.MaxHealth = math.huge

2479
							end

2480
						end

2481
					end)

2482
				end

2483
			end

2484
		end

2485
	end)

2486
	

2487
	Command("Clear backpack", {"bpb", "clearb"}, 3, "Removes someones backpack.", "No Flags", function(Speaker, Msg)

2488
		local PlrTab = getPlayer(Speaker, Msg)

2489
		if #PlrTab > 0 then

2490
			for _,v in pairs(PlrTab) do

2491
				ypcall(function()

2492
					v.Backpack:Remove()

2493
					Output(Speaker, "Locked "..v.Name.."'s Gui's", "Really blue")

2494
				end)

2495
			end

2496
		end

2497
	end)

2498
	Command("Credits", {"credits", "credit"}, 3, "Show's Skapt credits.", "No Flags", function(Speaker, Msg)

2499
		wait()

2500
		Dismiss(Speaker)

2501
		Output(Speaker,"Skapt Admin by: Skapt", "Royal purple", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=willowtree1119")

2502
		Output(Speaker,"Credit To C9X for the GFX picture", "Really blue", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=C9X	")

2503
		Output(Speaker,"Credit To AcidicEmpyreus", "Cyan", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")

2504
		Output(Speaker, "Dismiss")

2505
		end)

2506
	Command("System Message", {"system", "sm"}, 3, "Shouts a System Message.", "No Flags", function(Speaker, Msg)

2507
				SystemMsg(Msg)

2508
end)

2509
function Message(str,p,snder)

2510
	if p==nil then

2511
		for _,Player in pairs(game.Players:GetPlayers()) do

2512
			coroutine.wrap(function()

2513
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))

2514
				local Text = Instance.new("TextLabel", Msg)

2515
				Text.Position = UDim2.new(0, 0, 0.7, 0)

2516
				Text.Font=4

2517
				Text.FontSize=9

2518
				Text.BackgroundColor3 = Color3.new(0,0,0)

2519
				Text.BackgroundTransparency = 1

2520
				Text.TextColor3 = Color3.new(0,0,0)

2521
				Text.TextTransparency = 1

2522
				Text.TextWrap = true

2523
				Text.TextStrokeColor3 = Color3.new(0,0,0)

2524
				Text.Text = "From "..snder.Name..":"..tostring(str)

2525
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)

2526
				Text.TextTransparency = 0

2527
				Text.TextStrokeTransparency = 0

2528
				Num = #str * 0.06

2529
				wait(3)

2530
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")

2531
				wait(Num)

2532
				Msg:Remove()

2533
			end)()

2534
		end

2535
	else

2536
		Player=p;

2537
		coroutine.wrap(function()

2538
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))

2539
			local Text = Instance.new("TextLabel", Msg)

2540
			Text.Position = UDim2.new(0, 0, 0.7, 0)

2541
			Text.Font=4

2542
			Text.FontSize=9

2543
			Text.BackgroundColor3 = Color3.new(0,0,0)

2544
			Text.BackgroundTransparency = 1

2545
			Text.TextColor3 = Color3.new(0,0,0)

2546
			Text.TextTransparency = 1

2547
			Text.TextStrokeColor3 = Color3.new(0,0,0)

2548
			Text.TextStrokeTransparency = 0

2549
			Text.TextWrap = true

2550
			Text.Text = "Message from "..snder.Name.." :"..tostring(str)

2551
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)

2552
			Text.TextTransparency = 0

2553
			Num = #str * 0.06

2554
			wait(3)

2555
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")

2556
			wait(Num)

2557
			Msg:Remove()

2558
		end)()

2559
	end

2560
end

2561
function SystemMsg(str)

2562
	for _,Player in pairs(game.Players:GetPlayers()) do

2563
		coroutine.wrap(function()

2564
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))

2565
			local Text = Instance.new("TextLabel", Msg)

2566
			Text.Position = UDim2.new(0, 0, 0, 0)

2567
			Text.Font='ArialBold'

2568
			Text.FontSize = "Size48"

2569
			Text.BackgroundColor3 = Color3.new(0,0,0)

2570
			Text.BackgroundTransparency = 1

2571
			Text.TextColor3 = Color3.new(2,2,2)

2572
			Text.TextTransparency = 0

2573
			Text.TextStrokeColor3 = Color3.new(0,0,0)

2574
			Text.TextStrokeTransparency = 0

2575
			Text.TextWrap = true

2576
			Text.Text = ' [Skapt SYSTEM MESSAGE] \n ' .. tostring(str)

2577
			Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)

2578
			Text.TextTransparency = 0.1

2579
			

2580
			Num = #str * 0.06

2581
			wait(6)

2582
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")

2583
			wait(Num)

2584
			Msg:Remove()

2585
		end)()

2586
	end

2587
end

2588
function Hint(str,p,snder)

2589
	if p == nil then

2590
		for _,Player in pairs(game.Players:GetPlayers()) do

2591
			coroutine.wrap(function()

2592
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))

2593
				local Text = Instance.new("TextLabel", Msg)

2594
				Text.Position = UDim2.new(0, 0, 0, 0)

2595
				Text.Font=4

2596
				Text.FontSize=9

2597
				Text.BackgroundColor3 = Color3.new(0,0,0)

2598
				Text.BackgroundTransparency = 1

2599
				Text.TextColor3 = Color3.new(0,0,0)

2600
				Text.TextTransparency = 1

2601
				Text.TextWrap = true

2602
				Text.TextStrokeColor3 = Color3.new(0,0,0)

2603
				Text.TextStrokeTransparency = 0

2604
				Text.Text = "Hint from "..snder.Name.." :"..tostring(str)

2605
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)

2606
				Text.TextTransparency = 0

2607
				Num = #str * 0.06

2608
				wait(3)

2609
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")

2610
				wait(Num)

2611
				Msg:Remove()

2612
			end)()

2613
		end

2614
	else

2615
		Player=p

2616
		coroutine.wrap(function()

2617
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))

2618
			local Text = Instance.new("TextLabel", Msg)

2619
			Text.Position = UDim2.new(0, 0, 0, 0)

2620
			Text.Font=4

2621
			Text.FontSize=9

2622
			Text.BackgroundColor3 = Color3.new(0,0,0)

2623
			Text.BackgroundTransparency = 1

2624
			Text.TextColor3 = Color3.new(0,0,0)

2625
			Text.TextTransparency = 1

2626
			Text.TextWrap = true

2627
			Text.Text = "Hint from "..snder.Name..": "..tostring(str)

2628
			Text.TextStrokeColor3 = Color3.new(0,0,0)

2629
			Text.TextStrokeTransparency = 0

2630
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)

2631
			Text.TextTransparency = 0

2632
			Num = #str * 0.06

2633
			wait(3)

2634
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")

2635
			wait(Num)

2636
			Msg:Remove()

2637
		end)()

2638
	end

2639
end

2640
	Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)

2641
		Explorer(Speaker)

2642
	end)

2643
	Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)

2644
		if GetSplit(Msg) == "n" then

2645
			Dismiss(Speaker)

2646
			local Number_Of_Nils = 0

2647
			for _,v in pairs(getALLPlayers()) do

2648
				if v.Parent ~= Skapt.Services.Players then

2649
					Number_Of_Nils = Number_Of_Nils + 1

2650
					Output(Speaker, "Crash "..v.Name.."?", nil, function()

2651
						Dismiss(Speaker)

2652
						local x = Instance.new("StringValue", Skapt.Services.Lighting)

2653
						x.Name = "Disconnect: "..v.Name

2654
						coroutine.resume(coroutine.create(function()

2655
							wait(0.5)

2656
							if x.Name == "Disconnected: "..v.Name then

2657
								Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)

2658
							else

2659
								Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)

2660
							end

2661
						end))

2662
					end)

2663
				end

2664
			end

2665
			if Number_Of_Nils == 0 then

2666
				return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)

2667
			end

2668
			Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")

2669
			Output(Speaker, "Crash All Nils?", "New Yeller", function()

2670
				for _,v in pairs(getALLPlayers()) do

2671
					if v.Parent ~= Skapt.Services.Players then

2672
						local x = Instance.new("Model", Skapt.Services.Workspace)

2673
						local y = Instance.new("Part", x)

2674
						y.Transparency = 1

2675
						y.CanCollide = false

2676
						y.Anchored = true

2677
						y.Name = "Torso"

2678
						y.Position = Vector3.new(10000,10000,10000)

2679
						local z = Instance.new("Humanoid",x)

2680
						z.Torso = y

2681
						v.Character = x

2682
						createLocalScript([[repeat until false]], v.Character)

2683
					end

2684
				end

2685
			end)

2686
			Output(Speaker, "Dismiss")

2687
		else

2688
			ShowPlayers(Speaker)

2689
		end

2690
	end)

2691
	-- Rank 2! --

2692
	Command("Teleport", {"tp", "tele"}, 6, "Teleport's to someone", "No Flags", function(Speaker, Msg)

2693
		if GetSplit(Msg) == "p" then

2694
			Msg = Msg:gsub("-p", "")

2695
			local Split = Msg:find(Skapt.Bet)

2696
			local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))

2697
			local Numbers = Msg:sub(Split + 1)

2698
			if Numbers == "oxsb" then

2699
				Numbers = "20279777"

2700
			elseif Numbers == "qlqsb" then

2701
				Numbers = "54194680"

2702
			elseif Numbers == "anasb" then

2703
				Numbers = "14578699"

2704
			end

2705
			if #Player > 0 then

2706
				for _,v in pairs(Player) do

2707
					ypcall(function()

2708
						createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))

2709
					end)

2710
				end

2711
			end

2712
		else

2713
			local Split = Msg:find(Skapt.Bet)

2714
			local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))

2715
			local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))

2716
			if #Player1 > 0 or #Player2 > 0 then

2717
				for _,v in pairs(Player1) do

2718
					for _,v2 in pairs(Player2) do

2719
						ypcall(function()

2720
							v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)

2721
						end)

2722
					end

2723
				end

2724
			end

2725
		end

2726
	end)

2727
	Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)

2728
		if GetSplit(Msg) == "b" then

2729
			if FindRank(Speaker) < 3 then

2730
				return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")

2731
			end

2732
			Msg = Msg:gsub("-b","")

2733
			local Players = getPlayer(Speaker, Msg)

2734
			if #Players > 0 then

2735
				for _,v in pairs(Players) do

2736
					ypcall(function()

2737
						ChangeRank(v, -1)

2738
					end)

2739
				end

2740
			end

2741
		elseif GetSplit(Msg) == "u" then

2742
			Msg = Msg:gsub("-u","")

2743
			local Players = getPlayer(Speaker, Msg)

2744
			if #Players > 0 then

2745
				for _,v in pairs(Players) do

2746
					ypcall(function()

2747
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))

2748
					end)

2749
				end

2750
			end

2751
		else

2752
			local Players = getPlayer(Speaker, Msg)

2753
			if #Players > 0 then

2754
				for _,v in pairs(Players) do

2755
					ypcall(function()

2756
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))

2757
					end)

2758
				end

2759
			end

2760
		end

2761
	end)

2762
	-- Rank 3! --

2763
	Command("Shutdown", {"sd", "shutdown"}, 5, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)

2764
		if GetSplit(Msg) == "c" then

2765
			Msg = Msg:gsub("-c","")

2766
			for i = 1, Skapt.ShutdownTime do

2767
				if Skapt.Aborted == true then

2768
					Skapt.Aborted = false

2769
					local ABM = Instance.new("Message", Skapt.Services.Workspace)

2770
					ABM.Text = "Shutdown Aborted!"

2771
					Skapt.Services.Debris:AddItem(ABM, 1)

2772
					return

2773
				else

2774
					local ABH = Instance.new("Hint", Skapt.Services.Workspace)

2775
					ABH.Text = "[Shutting down...]"

2776
					local ABM = Instance.new("Message", Skapt.Services.Workspace)

2777
					ABM.Text = "Shutting Down in "..Skapt.ShutdownTime-i.." seconds"

2778
					wait(1)

2779
					if ABM ~= nil then

2780
						ABM:remove()

2781
					end

2782
					if ABH ~= nil then

2783
						ABH:remove()

2784
					end

2785
				end

2786
			end

2787
			Shutdown()

2788
		elseif GetSplit(Msg) == "a" then

2789
			Msg = Msg:gsub("-a", "")

2790
			Skapt.Aborted = true

2791
		elseif GetSplit(Msg) == "o" then

2792
			Msg = Msg:gsub("-o", "")

2793
			createScript([[

2794
				while game:service'RunService'.Stepped:wait() do

2795
					script:Clone().Parent = game:GetService("Workspace")

2796
				end

2797
			]], Skapt.Services.Workspace)

2798
		else

2799
			Shutdown()

2800
		end

2801
	end)

2802
	Command("Status", {"stats", "status"}, 6, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)

2803
		Dismiss(Speaker)

2804
		Output(Speaker, "Age Restriction", Skapt.AgeRestriction == false and "Really red" or "Lime green", function()

2805
			Dismiss(Speaker)

2806
			Skapt.AgeRestriction = not Skapt.AgeRestriction

2807
			Output("All", "[Skapt SYSTEM]; Age Restriction is "..tostring(Skapt.AgeRestriction), Skapt.AgeRestriction == false and "Lime green" or "Really red")

2808
		end)

2809
		Output(Speaker, "Chat Filter", Skapt.ChatFilter.Enabled == false and "Really red" or "Lime green", function()

2810
			Dismiss(Speaker)

2811
			Skapt.ChatFilter.Enabled = not Skapt.ChatFilter.Enabled

2812
			Output("All", "[Skapt SYSTEM]; ChatFilter is "..tostring(Skapt.ChatFilter.Enabled), Skapt.ChatFilter.Enabled == false and "Lime green" or "Really red")

2813
		end)

2814
		Output(Speaker, "Script Lock", Skapt.LocalSidedScriptsLock == false and "Really red" or "Lime green", function()

2815
			Dismiss(Speaker)

2816
			Skapt.LocalSidedScriptsLock = not Skapt.LocalSidedScriptsLock

2817
			Output("All", "[Skapt SYSTEM]; Scripting is "..tostring(Skapt.LocalSidedScriptsLock), Skapt.LocalSidedScriptsLock == false and "Lime green" or "Really red")

2818
		end)

2819
	end)

2820
	Command("Private Server", {"pri", "privateserver"}, 5, "PrivateServer Menu", nil, function(Speaker,Msg)

2821
		if #Msg == 0 then

2822
			Dismiss(Speaker)

2823
			local Status = Skapt.PrivateServer.Enabled == true and "On" or "Off"

2824
			Output(Speaker, "Turn On", "Lime green", function() 

2825
				Dismiss(Speaker) 		

2826
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

2827
					if FindRank(v) <= 0.1 then

2828
						table.insert(Skapt.PrivateServer.Waiting, v.Name)

2829
						v:Kick()

2830
					end

2831
				end 

2832
				Skapt.PrivateServer.Enabled = true 

2833
				Output(Speaker, "Private Server Enabled", "Really red", nil, 3) 

2834
			end)

2835
			Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Skapt.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)

2836
			Output(Speaker, "Waiting List", "Deep orange", function()

2837
				Dismiss(Speaker)

2838
				-- [ Bugged ] --

2839
				for i,v in pairs(Skapt.PrivateServer.Waiting) do

2840
					local a,b = ypcall(function()

2841
						Output(Speaker, v, nil, function()

2842
							Dismiss(Speaker)

2843
							ypcall(function()

2844
								table.remove(Skapt.PrivateServer.Waiting, i)

2845
								Skapt.Ranked[v].Rank = 0.5

2846
							end)

2847
						end)

2848
					end)

2849
					if not a then Output("admins", b, 'Really red') end

2850
				end

2851
				Output(Speaker, "Back", "Really blue", function() Skapt.Commands["Private Server"].Function(Speaker, "") end)

2852
			end)

2853
			Output(Speaker, "Status: "..Status)

2854
		elseif Msg == "on" or Msg == "1" or Msg == "true" then

2855
			Skapt.PrivateServer.Enabled = true

2856
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do

2857
				if FindRank(v) <= 0.1 then

2858
					table.insert(Skapt.PrivateServer.Waiting, v.Name)

2859
					v:Kick()

2860
				end

2861
			end

2862
			Output(Speaker, "Private Server Enabled", "Really red", nil, 3)

2863
		elseif Msg == "off" or Msg == "0" or Msg == "false" then

2864
			Skapt.PrivateServer.Enabled = false

2865
			Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)

2866
		end

2867
	end)

2868
	Command("Clean", {"fc", "clean", "cln"}, 5, "Full Cleans The Server", nil, function(Speaker, Msg)

2869
		FullClean()

2870
	end)

2871
	-- Rank 4! --

2872
	

2873
	Command("Execute a Script", {"exe", "execute"}, 6, "Executes A String In Script", "No Flags", function(Speaker, Msg)

2874
		local Ran, Error = loadstring(Msg)

2875
		getfenv(Ran).Speaker = Speaker

2876
		getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end

2877
		if Error == nil then

2878
			Ran()

2879
		else

2880
			Output(Speaker, Error, "Really red")

2881
		end

2882
	end)

2883
	Command("Ban", {"ban"}, 4, "Ban's a player from the server", "No Flags", function(Speaker, Msg)

2884
			local Players = getPlayer(Speaker, Msg)

2885
			if #Players > 0 then

2886
				for _,v in pairs(Players) do

2887
					ypcall(function()

2888
						Output(Speaker,v.Name..' Has Been Banned!')

2889
						ChangeRank(v, -1)

2890
						v:Kick()

2891
					end)

2892
				end

2893
			end

2894
	end)

2895
	Command("Unban", {"unban"}, 4, "Unban's a player from the server", "No Flags", function(Speaker, Msg)

2896
			local Players = getPlayer(Speaker, Msg)

2897
			if #Players > 0 then

2898
				for _,v in pairs(Players) do

2899
					ypcall(function()

2900
						Output(Speaker,'All players Have Been Unbanned!')

2901
						ChangeRank(v, 0)

2902
					end)

2903
				end

2904
			end

2905
	end)

2906
	Command("Dismiss All Tabs", {"dall"}, 6, "Dismisses all open Tablets", "No Flags", function(Speaker, Msg)

2907
		for i,v in pairs(Skapt.Services.Players:GetPlayers()) do

2908
			Dismiss(v)

2909
		end

2910
	end)

2911
	

2912
	Command("Music List", {"mlist"}, 2, "Shows Music List", "No Flags", function(Speaker, Msg)

2913
		Output('TEST',Speaker,10,function()

2914
		Dismiss()

2915
		CheckSound()

2916
		Output(Speaker, "Playing TEST", "Lime green", nil, 3)

2917
		m=Instance.new('Sound',Workspace)

2918
		m.SoundId=('rbxassetid://143502393')

2919
		m:Play()

2920
		end)

2921
end)

2922
	

2923
Command("Remove Script", {"remv"}, 6, "Removes the Script", "No Flags", function(Speaker, Msg)

2924
		for i,v in pairs(Skapt.Services.Players:GetPlayers()) do

2925
			Dismiss(v)

2926
		end

2927
		script:remove()

2928
		script.Disabled = true

2929
		Skapt = nil

2930
		for i,v in pairs(getfenv(1)) do

2931
			getfenv(1)[i] = nil

2932
		end

2933
	end)

2934
	

2935
	Skapt.Services.Workspace.descendantAdded:connect(function(a)

2936
		pcall(function()

2937
			x = 0

2938
			for i,v in pairs(Skapt.Services.Workspace:children()) do

2939
				if v.ClassName == 'Message' or v.ClassName == 'Hint' then

2940
					x = x + 1

2941
				end

2942
			end

2943
			if x > MessageLimit then

2944
				for i,v in pairs(Skapt.Services.Workspace:children()) do

2945
					if v.ClassName == 'Message' or v.ClassName == 'Hint' then

2946
						v:remove()

2947
					end

2948
				end

2949
			end

2950
		end)

2951
	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!