View difference between Paste ID: 8KweYCwe and 1GgfyVCD
SHOW: | | - or go back to the newest paste.
1
--[[ 
2
© [ClockworkHorror Administration gen 1], Legal Copyright
3-
© [Skapt Administration gen 1], Legal Copyright
3+
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:[ClockworkHorror]
15-
Creator:[Skapt]
15+
Developers: [ClockworkHorror], [C9X], [P7N], [Z7M] and [optiplex123]
16-
Developers: [willowtree1119], [C9X], [P7N], [Z7M] and [optiplex123]
16+
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
local Clo = script:clone()
21
Clo.Disabled = true
22
Clo.Parent = game:GetService('ServerScriptService')
23
Clo["DSource"].Value = [[
24
while true do
25
script.Parent = nil
26
for i,v in pairs(game:GetService('Players'):GetPlayers()) do
27
Find = v:FindFirstChild("PlayerGui")
28
if Find then
29
Find2 = Find:FindFirstChild("SkaptGui")
30
if not Find2 then
31
local ScreenGui = Instance.new("ScreenGui", Find)
32
ScreenGui.Name = "SkaptGui"
33
local ImageLabel = Instance.new("ImageLabel", ScreenGui)
34
ImageLabel.Image = "rbxassetid://162905731"
35
ImageLabel.BackgroundColor3 = Color3.new(1, 1, 1)
36
ImageLabel.BackgroundTransparency = 1
37
ImageLabel.BorderColor3 = Color3.new(1, 1, 1)
38
ImageLabel.Position = UDim2.new(1, -314, 1, -80)
39
ImageLabel.Size = UDim2.new(0, 305, 0, 70)
40
end
41
end
42
end
43
game:GetService('RunService').Heartbeat:wait()
44
end
45
]]
46
Clo.Disabled = false
47
Clo["DSource"].Value = ""
48
	function getNilRank(name)
49
	  return playerSettings[name].Rank
50
	end
51
	function getPS(plr)
52
	  return playerSettings[plr.Name]
53
	  end
54
	
55
	function getRank(plr)
56
	  if not plr then return 255 end
57
	  if type(plr)=='string' then
58
		return getNilRank(plr)
59
	  else return getPS(plr).Rank end
60
	end
61
62
	function setRank(plr,newRank)
63
	  playerSettings[plr.Name].Rank=newRank
64
	end
65
	
66
	function parseRank(plr1,plr2,allowEqual)
67
	  pcall(function() if type(plr1)~='number' then plr1=getRank(plr1) end end)
68
	  pcall(function() if type(plr2)~='number' then plr2=getRank(plr2) end end)
69
	
70
	  if plr1>plr2 then return true
71
	  elseif allowEqual and plr1==plr2 then return true
72
	  else return false end
73
	end
74
	
75
	function Name()
76
	local G = Instance.new("ScreenGui")
77
	G.Parent = game.StarterGui
78
	local b = Instance.new("TextLabel",G)
79
	b.BackgroundColor3 = Color3.new(0,0,0)
80
	b.BackgroundTransparency = 0.35
81
	b.Size = UDim2.new{1, 0, 1, 0}
82
	b.Position =  UDim2.new(0.8, 0, 0.9, 0)
83
	b.BorderSizePixel = 0
84
	b.FontSize = "Size36"
85
	b.Text = "[GFX]"
86
	b.Font = "SourceSans"
87
	b.TextColor3 = Color3.new(255,255,255)
88
	end
89
	
90
	-- [==[ ~ Skapt ~ ]==] ~~
91
	
92
	local _start = time()
93
	wait()
94
	MessageLimit = 10
95
	Skapt = { 
96
		Ranked = { 
97
			--[--Ranked--]--
98
			["ClockworkHorror"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator/Scripter", SpinningRot = true, Rotation = true};
99-
			["willowtree1119"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator", SpinningRot = true, Rotation = true};
99+
100
		["wdwdd"] = {Rank = 6, Color = "Royal purple", Distance = 6, Description = "Lead Dev", SpinningRot = false, Rotation = true};
101
		["wdwd"] = {Rank = 5, Color = "Royal purple", Distance = 6, Description = "Test dummie <3", SpinningRot = false, Rotation = true};
102
		["wdwd"] = {Rank = 4, Color = "Royal purple", Distance = 6, Description = "nub", SpinningRot = false, Rotation = true};
103
		["wdwdwd"] = {Rank = 3, Color = "Royal purple", Distance = 6, Description = "Skapters halpr", SpinningRot = false, Rotation = true};
104
		["wdwdwd9"] = {Rank = 2, Color = "Royal purple", Distance = 6, Description = "ololol nubcaik", SpinningRot = false, Rotation = true};
105
		["wdwdwdwd"] = {Rank = 1, Color = "Royal purple", Distance = 6, Description = "noob", SpinningRot = false, Rotation = true};
106
		["wdwdwdwd"] = {Rank = -1, Color = "Royal purple", Distance = 6, Description = "banned fgt", SpinningRot = false, Rotation = true};
107
		
108
		
109
		key = ';';
110-
		key = '/';
110+
111
			[-1] =": Banned"; 
112
			[0] = ": Guest";
113
			[1] = ": User";
114
			[2] = ": Moderator";
115
			[3] = ": Test dummie <3";
116
			[4] = ": Admin";
117
			[5] = ": Dev";
118
			[6] = ": Lead Dev";
119
			[7] = ": Co-Creator";
120
			[8] = ": Creator";
121
		};
122
		Services = setmetatable({Game = game;}, {
123
			__index = function(tab, key)
124
				if game:GetService(key) == nil then
125
					return "No such service named "
126
				end
127
				return game:GetService(key)
128
			end
129
		});
130
		ChatFilter = {
131
			Phrases = { 
132
				--[==[
133
					0 = Kill
134
					0.5 = Mute
135
					1 = Kick
136
					2 = Lag
137
					3 = Banishment
138
				]==]--
139
				{"TeleportService", 1};
140
	
141
			};
142
			Enabled = true;
143
		};
144
		PrivateServer = {
145
			Enabled = false;
146
			Waiting = {};
147
		};
148
		Removed = false;
149
		Aborted = false;
150
		ServerSidedScriptsLock = false;
151
		LocalSidedScriptsLock = false;
152
		AgeRestriction = true;
153
		ShowRanks = true;
154
		ShutdownTime = 45;
155
		Bet = "/";
156
		Commands = {};
157
		Tablets = {};
158
		ExplorerObjectClones = {};
159
		Scripts = {
160
			ServerSided = {};
161
			ClientSided = {};
162
		};
163
		Connections = {
164
			Loops = {};
165
			Killing = {};
166
			Chat = {};
167
		};
168
		Music={
169
			["Popular"]={
170
		    	[1] = {Name = "Radioactive", ID = 131111368};
171
		    	[2] = {Name = "One less problem", ID = 155319906};
172
		    	[3] = {Name = "Dark horse", ID = 143204341};
173
		    	[4] = {Name = "Latch", ID = 155298039};
174
		    	[5] = {Name = "Fancy", ID = 151667588};
175
		    	[6] = {Name = "Demons", ID = 131261480};
176
		    	[7] = {Name = 'Me and my broken heart', ID = 157466103};
177
		    	[8] = {Name = 'Break free', ID = 164417255};
178
		    	[9] = {Name = 'Me and my broken heart', ID = 157466103};
179
		    	[10] = {Name = "Boom Clap", ID = 160594536};
180
		    	[11] = {Name = "Pompeii", ID = 144635805};
181
		    	[12] = {Name = "Roar", ID = 131065183};
182
		    	[13] = {Name = 'Rude', ID = 154764197};
183
		    	[14] = {Name = 'Monster', ID = 142562463};
184
		    	[15] = {Name = "Work", ID = 152250611};
185
		    	[16] = {Name = "Spooky Scary Skeletons", ID = 155313239};
186
		    };
187
		    ["Dance"]={
188
		    	[1] = {Name = "Destroid 11. - Get Stupid", ID = 146968276};
189
		    	[2] = {Name = "Turn down for what", ID = 143959455};
190
		    	[3] = {Name = "Beam", ID = 165065112};
191
		    	[4] = {Name = "Frag out", ID = 152451589};
192
		    	[5] = {Name = "The hallows", ID = 146824166};
193
		    	[6] = {Name = "Radiation", ID = 144249596};
194
		    	[7] = {Name = "The final countdown", ID = 145162750};
195
		    	[8] = {Name = "Need you", ID = 155415981};
196
		    	[9] = {Name = "Boom", ID = 150101784};
197
		    	[10] = {Name = 'Domination', ID = 150669700};
198
		    	[11] = {Name = "Disfigure - Blank", ID = 167337732};
199
		    	[12] = {Name = "Ahrix - Nova", ID = 167022806};
200
			};
201
			["Alternative"]={
202
		    	[1] = {Name = "Do the harlem shake", ID = 131154740};
203
		    	[2] = {Name = "I like trains", ID = 142386784};
204
		    	[3] = {Name = "Saxaphone guy", ID = 130775431};
205
		    	[4] = {Name = "Selfie song", ID = 151029303};
206
			};
207
			["R7B"]={
208
		    	[1] = {Name = "All of me", ID = 155057593};
209
			};
210
			["Hiphop"]={
211
			    [2] = {Name = "Gentleman", ID = 131326102};
212
				[3] = {Name = "Wake me up", ID = 130969284};
213
				[4] = {Name = "We are one", ID = 154782317};
214
				[5] = {Name = "La la la", ID = 161186230};
215
			};
216
			["Rap"]={
217
			    [1] = {Name = "I'm not afraid", ID = 143736517};
218
			};
219
			["Mood"]={
220
				[1] = {Name = "Say something", ID = 143763527};
221
				[2] = {Name = 'Because I\'m happy', ID = 142435409};
222
			};
223
			["Remix"]={
224
				[1] = {Name = "Idols", ID = 143311712};
225
				[2] = {Name = "Come and get it (remix)", ID = 131320359};
226
			};
227
		};
228
		MusicMenu = nil;
229
		Source = nil;
230
		SourceName = nil;
231
	}
232
	
233
	if script and game.PlaceId ~= 0 and game then
234
		script.Name = "Skapt Tablet Admin"
235
		for _,v in pairs(script:GetChildren()) do
236
			if v:IsA("StringValue") then
237
				Skapt.SourceName = v.Name
238
				Skapt.SourceValue = v.Value
239
				v.Value = [==[error("Attempted to call a nil value");]==]
240
			end
241
		end
242
		coroutine.yield()
243
		script:ClearAllChildren()
244
		script.Parent = Instance.new("Model") or __LOLNO__ or nil
245
	end
246
	
247
	-- SkaptScripting Functions --
248
	createLocalScript = function(source,parent,name)
249
		if newLocalScript then
250
			local nls = newLocalScript(source,parent)
251
			nls.Name = (name ~= nil and name) or "Source"
252
			return nls
253
		else
254
			if Skapt.Source ~= nil then
255
				local x = Skapt.Source:clone()
256
				x.Disabled = true
257
				x.Name = (name ~= nil and name) or "Source"
258
				x:ClearAllChildren()
259
				for _,v in pairs({"DSource", "Source", "source"}) do
260
					local newSource = Instance.new("StringValue", x)
261
					newSource.Name = v
262
					newSource.Value = source
263
				end
264
				x.Parent = parent
265
				x.Disabled = false
266
			else
267
				-- Output("Admins", "No Source Source!", "Really red", nil, 5)
268
			end
269
		end
270
	end
271
	createScript = function(source, parent, name)
272
		if newScript then
273
			local ns = newScript(source,parent)
274
			ns.Name = (name ~= nil and name) or "Source"
275
			return ns
276
		else
277
			local x = script:Clone()
278
			x.Disabled = true
279
			x.Name = (name ~= nil and name) or "Source"
280
			x:ClearAllChildren()
281
			for _,v in pairs({"DSource", "Source", "source"}) do
282
				local newSource = Instance.new("StringValue", x)
283
				newSource.Name = v
284
				newSource.Value = source
285
			end
286
			x.Parent = parent
287
			x.Disabled = false
288
		end
289
	end
290
	
291
	-- getALLPlayers --
292
	getALLPlayers = function() 
293
		local ALLPlayers = {}
294
		for i,v in pairs(Skapt.Services.NetworkServer:GetChildren()) do
295
			ypcall(function()
296
				if v:IsA("ServerReplicator") then
297
					table.insert(ALLPlayers, v:GetPlayer())
298
				end
299
			end)
300
		end
301
		return ALLPlayers
302
	end
303
	
304
	-- Garbage --
305
	function GetGarbage()
306
		return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
307
	end
308
	-- Sources --
309
	RemovePlayer = [[
310
		local plrs = game:GetService('Players')
311
		if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then
312
			plrs["LocalPlayer"].Parent=nil
313
			plrs["LocalPlayer"].Parent=plrs
314
		else
315
			for i=1, 1000 do
316
				Instance.new('ManualSurfaceJointInstance') 
317
			end
318
		end
319
		pcall(function()
320
			game:GetService('Workspace'):ClearAllChildren()
321
		end)
322
	]]
323
	
324
	coroutine.wrap(function()
325
	while wait() do
326
	if LSource ~= nil then break end
327
	if SorN == "source" then break end
328
	for _,v in pairs(game.Players:players()) do
329
	if LSource ~= nil then break end
330
	pcall(function()
331
	for j,k in pairs(v.Backpack:children()) do
332
	if LSource ~= nil then break end
333
	if k.ClassName == 'LocalScript' then
334
	if k:findFirstChild(SorN) ~= nil then
335
	k.Archivable = true
336
	LSource = k:Clone()
337
	LSource.Disabled = true
338
	PingAdmins("Source found")
339
	break
340
	end
341
	end
342
	wait()
343
	end
344
	for ab,cd in pairs(v.Character:children()) do
345
	if LSource ~= nil then break end
346
	if cd.ClassName == 'LocalScript' then
347
	if cd:findFirstChild(SorN) ~= nil then
348
	cd.Archivable = true
349
	LSource = cd:Clone()
350
	LSource.Disabled = true
351
	PingAdmins("Source found")
352
	break
353
	end
354
	end
355
	wait()
356
	end
357
	end)
358
	end
359
	end
360
	end)()
361
	
362
	function NewS(sourcev, parent)
363
		if SorN == 'source' then
364
			NS(source,parent)
365
		else
366
			local s = SSource:Clone()
367
			s.Parent = parent
368
			if s:findFirstChild(SorN) ~= nil then
369
				source = s:findFirstChild(SorN)
370
			else
371
				source = Instance.new("StringValue", s)
372
				source.Name = SorN
373
			end
374
			if source then
375
				source.Value = sourcev
376
			else
377
				PingAdmins("Something went wrong")
378
			end
379
			wait()
380
			s.Disabled = false
381
		end
382
	end
383
	function NewLS(sourcev,parent, lock)
384
		if SorN == 'source' then
385
			NLS(sourcev,parent)
386
		elseif LSource then
387
			local s = LSource:Clone()
388
			s.Parent = parent
389
			if s:findFirstChild(SorN) ~= nil then
390
				source = s:findFirstChild(SorN)
391
			else
392
				source = Instance.new("StringValue", s)
393
				source.Name = SorN
394
			end
395
			if source then
396
				source.Value = sourcev
397
			else
398
				PingAdmins("Something went wrong")
399
				return
400
			end
401
			wait()
402
			if lock == true then
403
				for i = 0,5 do
404
					s.Disabled = false
405
					wait(0.5)
406
					s.Disabled = true
407
					wait(0.5)
408
					s.Disabled = false
409
				end
410
			else
411
				s.Disabled = false
412
			end
413
			return s
414
		else
415
			PingAdmins("No source","Really red")
416
		end
417
	end
418
	--ON JOIN SOUND MUSIC CREDIT TO DANGCOOLLSREAL--
419
ID = "174584892"
420
game:GetService('Players').PlayerAdded:connect(function(Plr)
421
v=Instance.new("Sound")
422
	v.Parent = game.Workspace
423
	v.SoundId="http://www.roblox.com/Asset/?id="
424
	v.Pitch = 1
425
	v.Name="Sound... Skapt"
426
	v.Looped=true
427
	wait()
428
	v:Play()
429
	end)
430
	
431
	function Name()
432
	local G = Instance.new("ScreenGui")
433
		G.Parent = game.StarterGui
434
	local b = Instance.new("TextLabel",G)
435
	b.BackgroundColor3 = Color3.new(0,0,0)
436
	b.BackgroundTransparency = 0.35
437
	b.Size = UDim2.new{1, 0, 1, 0}
438
	b.Position =  UDim2.new(0.8, 0, 0.9, 0)
439
	b.BorderSizePixel = 0
440
	b.FontSize = "Size36"
441
	b.Text = "[Skapt]"
442
	b.Font = "SourceSans"
443
	b.TextColor3 = Color3.new(255,255,255)
444
	end
445
	
446
	InjectionCrash = [[
447
		wait()
448
		script.Parent = nil
449
		script:ClearAllChildren()
450
		local Services = setmetatable({Game = game;}, {
451
			__index = function(index, table)
452
				return game:GetService(table)
453
			end
454
		})
455
		local LocalPlayer = Services.Players.LocalPlayer
456
		local Stop = Instance.new("StringValue", LocalPlayer)
457
		Stop.Name = "STAP CONNECTIONS UMG"
458
		Stop.Value = "Skapt"
459
		wait(0.1)
460
		Stop:remove()
461
		local ChatConnection = LocalPlayer.Chatted:connect(function(Message)
462
			if LocalPlayer.Parent ~= Services.Players then
463
				local x = Instance.new('StringValue', Services.ReplicatedStorage)
464
				x.Name = "Skapt"
465
				x.Value = LocalPlayer.Name..":"..Message
466
				Services.Debris:AddItem(x, 2)
467
			end
468
		end)
469
		local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)
470
			if Object:IsA("StringValue") then
471
				if Object.Name == "Disconnect: All Players" then
472
					Object.Name = "Disconnected: All Players"
473
					]]..RemovePlayer..[[
474
				elseif Object.Name == "Disconnect: "..LocalPlayer.Name then
475
					Object.Name = "Disconnected: "..LocalPlayer.Name
476
					]]..RemovePlayer..[[
477
				elseif Object.Name == "Disconnect: Nil Players" then
478
					if LocalPlayer.Parent ~= game:GetService("Players") then
479
						Object.Name = "Disconnected: Nil Players"
480
						]]..RemovePlayer..[[
481
					end
482
				end
483
			end
484
		end)
485
		local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)
486
			if Object:IsA("StringValue") then
487
				if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Skapt" then
488
					StringConnection:disconnect()
489
					StringConnection = nil
490
					StopConnection:disconnect()
491
					StopConnection = nil
492
					ChatConnection:disconnect()
493
					ChatConnection = nil
494
				end
495
			end
496
		end)
497
	]]
498
	
499
	BSoDSource = [[
500
		wait()
501
		script.Parent = game:service'TeleportService'
502
		CC = game.Workspace.CurrentCamera
503
		RS = game:service("RunService")
504
		PG = game.Players.LocalPlayer.PlayerGui
505
		C = game.Players.LocalPlayer.Character
506
		function Lag()
507
			coroutine.resume(coroutine.create(function()
508
				while wait() do
509
					M = Instance.new("Message",CC)
510
					M.Text = tick()*math.floor(5%4*21)
511
					H = Instance.new("Hint",CC)
512
					H.Text = 'Get out from this place!'
513
					SG=Instance.new("ScreenGui",PG)
514
					FR=Instance.new("Frame",SG)
515
					FR.Size = UDim2.new(500,500,500,500)
516
					while wait() do
517
						FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
518
					end
519
					P=Instance.new("Part",CC)
520
					E=Instance.new("Explosion",P)
521
					E.BlastRadius=math.huge
522
					E.Position=P.Position
523
					F=Instance.new("Fire",P)
524
					S=Instance.new("Smoke",P)
525
					P.CFrame = CC.Focus
526
					P.Anchored = true
527
					P.CanCollide = false
528
					P.AncestryChanged:connect(function()Lag()end)
529
					for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
530
				end 
531
			end)) 
532
		end
533
		RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
534
	]]
535
	
536
	LagSource = [[
537
		wait()
538
		script.Parent = game:service'TeleportService'
539
		CC = workspace.CurrentCamera
540
		RS = game:service("RunService")
541
		PG = game.Players.LocalPlayer.PlayerGui
542
		C = game.Players.LocalPlayer.Character
543
		function Lag()
544
			coroutine.resume(coroutine.create(function()
545
				while wait() do
546
					M = Instance.new("Message",CC)
547
					M.Text = "u shouldn't have fked around"
548
					H = Instance.new("Hint",CC)
549
					H.Text = string.reverse("dikS")
550
					SG=Instance.new("ScreenGui",PG)
551
					FR=Instance.new("Frame",SG)
552
					FR.Size = UDim2.new(500,500,500,500)
553
					while wait() do
554
						FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
555
					end
556
					P=Instance.new("Part",CC)
557
					E=Instance.new("Explosion",P)
558
					E.BlastRadius=math.huge
559
					E.Position=P.Position
560
					Output=Instance.new("Fire",P)
561
					S=Instance.new("Smoke",P)
562
					P.CFrame = CC.Focus
563
					P.Anchored = true
564
					P.CanCollide = false
565
					P.AncestryChanged:connect(function()Lag()end)
566
					for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
567
				end 
568
			end)) 
569
		end
570
		RS.Stepped:connect(function()for i = 1, 140000 do Lag() Lag() Lag() Lag() Lag() end end)
571
	]]
572
	
573
	-- Get Rankings Functions --
574
	GetRanking = function(Player)
575
		if type(Player) == "userdata" then
576
			Player = Player.Name
577
		end
578
		if Skapt.Ranked[Player] ~= nil then
579
			return Skapt.Ranked[Player]
580
		else
581
			local Table = {}
582
			Table[Player] = {Rank = 0, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false};
583
			return Table[Player]
584
		end
585
	end
586
	FindRank = function(Player)
587
		if type(Player) == "userdata" then
588
			Player = Player.Name
589
		end
590
		return GetRanking(Player).Rank
591
	end
592
	CheckRank = function(Player1, Player2)
593
		if Player1 == Player2 then
594
			return false
595
		end
596
		if type(Player1) == "userdata" then
597
			Player1 = Player1.Name
598
		end
599
		if type(Player2) == "userdata" then
600
			Player2 = Player2.Name
601
		end
602
		if FindRank(Player1) >= FindRank(Player2) then
603
			return true
604
		else
605
			return false
606
		end
607
	end
608
	ChangeRank = function(Player, Rank)
609
		if type(Player) == "userdata" then
610
			Player = Player.Name
611
		end
612
		if Skapt.Ranked[Player] ~= nil then
613
			Skapt.Ranked[Player].Rank = Rank
614
		else
615
			Skapt.Ranked[Player] = {Rank = Rank, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false, Rotation = true} 
616
		end
617
	end
618
	GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name
619
		Dismiss(Speaker)
620
		if type(Player) == "userdata" then
621
			Player = Player.Name
622
		end
623
		local GetRankedPlayer = function(i)
624
			if type(i) == "userdata" then
625
				i = i.Name
626
			end
627
			Dismiss(Speaker)
628
			Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)
629
			ypcall(function()
630
				Output(Speaker, "Age: "..Skapt.Services.Players[i].AccountAge)
631
				Output(Speaker, "Id: "..Skapt.Services.Players[i].userId)
632
				Output(Speaker, "Crash(Remote)", nil, function()
633
					Dismiss(Speaker)
634
					Skapt.Commands.Kick2.Function(Speaker, i.."-c")
635
				end)
636
				Output(Speaker, "Crash(Insert)", nil, function()
637
					Dismiss(Speaker)
638
					Skapt.Commands.Kick2.Function(Speaker, i.."-c")
639
				end)
640
				Output(Speaker, "Crash Lag", nil, function()
641
					Dismiss(Speaker)
642
					Skapt.Commands.Kick2.Function(Speaker, i.."-cl")
643
				end)
644
				Output(Speaker, "Lag", nil, function()
645
					Dismiss(Speaker)
646
					Skapt.Commands.Lag.Function(Speaker, i.."-l")
647
				end)
648
				Output(Speaker, "Go Nil", nil, function()
649
					Dismiss(Speaker)
650
					Skapt.Commands.Kick2.Function(Speaker, i.."-n")
651
				end)
652
				Output(Speaker, "Kill", nil, function()
653
					Dismiss(Speaker)
654
					Skapt.Commands.Kill.Function(Speaker, i)
655
				end)
656
				Output(Speaker, "Explode", nil, function()
657
					Dismiss(Speaker)
658
					Skapt.Commands.Kill.Function(Speaker, i.."-e")
659
				end)
660
				Output(Speaker, "Reset", nil, function()
661
					Dismiss(Speaker)
662
					Skapt.Commands.Kill.Function(Speaker, i.."-r")
663
				end)
664
				Output(Speaker, "Ban", nil, function()
665
					Dismiss(Speaker)
666
					Skapt.Commands.Kick2.Function(Speaker, i.."-b")
667
				end)
668
				Output(Speaker, "Rejoin", nil, function()
669
					Dismiss(Speaker)
670
					Skapt.Commands.Kick2.Function(Speaker, i.."-r")
671
				end)
672
			end)
673
			if FindRank(Speaker) > FindRank(i) then
674
				Output(Speaker, "Set Rank", "Royal purple", function()
675
					Dismiss(Speaker)
676
					for __,v in pairs(Skapt.Ranks) do
677
						if __ < FindRank(Speaker) then
678
							Output(Speaker, '['..tostring(__)..'] '..v, nil, function()
679
								ChangeRank(i, __)
680
							end)
681
						end
682
					end
683
				end)
684
			end
685
			Output(Speaker, "Dismiss")
686
		end
687
		if Player ~= nil then
688
			GetRankedPlayer(Player)
689
		else
690
			for i,v in pairs(Skapt.Ranked) do
691
				Output(Speaker, i, Skapt.Ranked[i].Color, function()
692
					GetRankedPlayer(i)
693
				end)
694
			end
695
		end
696
	end
697
	-- Output Functions --
698
	OutputSingular = function(Player, Msg, Color, Function, Time, Image)
699
		if Skapt.Removed == true then return end
700
		--wait()
701
		if Msg == nil then 
702
			Msg = " " 
703
		elseif Msg == "Dismiss" then
704
			Color = "Really red"
705
		end
706
		if Color == nil then 
707
			Color = Skapt.Ranked[Player.Name].Color ~= nil and Skapt.Ranked[Player.Name].Color or "White"
708
		end
709
		
710
		local a = Instance.new("Part", workspace)
711
		a.Name = "Looped Baseplate"
712
		
713
		if Color == "Random" then
714
			a.BrickColor = BrickColor.Random()
715
		else
716
			a.BrickColor = BrickColor.new(Color)
717
		end
718
		
719
		a.TopSurface = 0.34325
720
		a.BottomSurface = 0.34325
721
		a.FormFactor = "Custom"
722
		a.Size = Vector3.new(4,3,0)
723
	    a.Anchored = true
724
	    a.Locked = true
725
	    a.Transparency = 0.34325
726
		--Tab.Reflectance=0.5
727
	    a.CanCollide = false
728
	    pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)
729
	    
730
		-- local p = Instance.new("PointLight", a)
731
		-- p.Color = a.BrickColor.Color
732
		-- p.Range = 3
733
		-- p.Brightness = 1/0
734
		
735
		local s = Instance.new("SelectionBox", a)
736
		s.Adornee = a
737
		s.Color = BrickColor.new("Really black")
738
		s.Transparency = 0.6335234537664356435734637342
739
		
740
	    local b = Instance.new("BillboardGui", a)
741
		b.Name = 'BG'
742
	    b.StudsOffset = Vector3.new(0,1.5,0)
743
	    b.Size = UDim2.new(9,0,8,0)
744
	    b.Adornee = a
745
		
746
	    local cd = Instance.new('ClickDetector',a)
747
		cd.MaxActivationDistance = 1/0
748
		
749
	    local t = Instance.new("TextLabel", b)
750
		t.Name = "TL"
751
	    t.Font = "SourceSans"
752
	    t.FontSize = "Size24"
753
	    t.Size = UDim2.new(1,0,0.6,0)
754
	    t.TextColor = a.BrickColor
755
	    t.TextStrokeTransparency = 0.5
756
	    t.BackgroundTransparency = 1
757
	    t.Text = string.gsub(Msg,"","\5") 
758
	
759
		if Image ~= nil then
760
			local BBBG = Instance.new("BillboardGui")
761
			BBBG.Size = UDim2.new(5, 0, 6, 0)
762
			BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
763
			BBBG.AlwaysOnTop = true
764
			BBBG.Adornee = a
765
			BBBG.Parent = a
766
			
767
			Delay(0, function()
768
				while BBBG.Parent ~= nil do wait()
769
					ypcall(function()
770
						BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
771
					end)
772
				end
773
			end)
774
		
775
			local NewImg = Instance.new("ImageLabel")
776
			NewImg.Size = UDim2.new(1, 0, 1, 0)
777
			NewImg.BackgroundTransparency = 0
778
			NewImg.Image = Image
779
			NewImg.Parent = BBBG
780
		end
781
		
782
		if Time ~= nil then
783
			Skapt.Services.Debris:AddItem(a, Time)
784
		end
785
		
786
	    cd.MouseClick:connect(function(pl)
787
	    	if pl==Player or Skapt.Ranked[pl.Name].Rank > Skapt.Ranked[Player.Name].Rank then
788
				coroutine.wrap(function()
789
					for i = 0, 1, 0.1 do 
790
						pcall(function()
791
							a.Transparency = i
792
							s.Transparency = i
793
							t.TextStrokeTransparency = i
794
							wait()
795
						end)
796
					end
797
					a:Destroy()
798
				end)()
799
				for _,v in pairs(Skapt.Tablets) do
800
					if v.Tab == a then
801
						table.remove(Skapt.Tablets, _)
802
					end
803
				end
804
				if Msg == "Dismiss" then
805
					Dismiss(Player)
806
				else
807
					if Function ~= nil then
808
						local Ran, Error = pcall(function()
809
							Function(a)
810
						end) if not Ran then print(Error) end
811
					end
812
				end
813
			end
814
	    end)
815
		
816
		table.insert(Skapt.Tablets,{Tab = a, Plr = Player.Name})
817
	end
818
	
819
	Output = function(Player, Msg, Color, Function, Time, Image)
820
		if type(Player) == "userdata" then
821
			local thread = coroutine.create(function()
822
				OutputSingular(Player, Msg, Color, Function, Time, Image)
823
			end)
824
			coroutine.resume(thread)
825
		elseif type(Player) == "table" then
826
			for _,v in pairs(Player) do
827
				local thread = coroutine.create(function()
828
					OutputSingular(v, Msg, Color, Function, Time, Image)
829
				end)
830
				coroutine.resume(thread)
831
			end
832
		elseif type(Player) == "string" then
833
			if Player:lower() == "all" then
834
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
835
					local thread = coroutine.create(function()
836
						OutputSingular(v, Msg, Color, Function, Time, Image)
837
					end)
838
					coroutine.resume(thread)
839
				end
840
			elseif Player:lower() == "admins" then
841
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
842
					if FindRank(v) >= 1 then
843
						local thread = coroutine.create(function()
844
							OutputSingular(v, Msg, Color, Function, Time, Image)
845
						end)
846
						coroutine.resume(thread)
847
					end
848
				end
849
			end
850
		end
851
	end
852
	
853
	Dismiss = function(plr)
854
		pcall(function()
855
			if type(plr) == "userdata" then
856
				plr = plr.Name
857
			end
858
			for i,v in pairs(Skapt.Tablets) do
859
				if v.Plr == plr then
860
					coroutine.wrap(function()
861
						for i = 0, 1, 0.1 do 
862
							pcall(function()
863
								v.Tab.Transparency = i
864
								v.Tab.SelectionBox.Transparency = i
865
								v.Tab.BG.TL.TextStrokeTransparency = i
866
								wait()
867
							end)
868
						end
869
						v.Tab:Destroy()
870
					end)()
871
					Skapt.Tablets[i]=nil
872
				end
873
			end
874
		end)
875
	end
876
	
877
	function GetSplit(Message)
878
		local a = nil
879
		for i = 1, #Message do
880
			if Message:sub(i,i) == "-" then
881
				a = i + 1
882
				break
883
			end
884
		end
885
		if a ~= nil then
886
			return Message:sub(a)
887
		else
888
			return nil
889
		end
890
	end
891
	--NilSupport--
892
	NilSupport = [[
893
		wait(0.001)
894
		if script:findFirstChild'source' ~= nil then
895
			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")()
896
			script:ClearAllChildren()
897
		else
898
			script:ClearAllChildren()
899
			script.Parent=nil
900
		end
901
		wait(1)
902
		LocalPlayer = game:service'Players'.LocalPlayer
903
		ProbeMode = false
904
		char = nil
905
		probe = nil
906
		local x = Instance.new("Message",workspace)
907
		x.Text = 'You are connected to solar admin gen 2'
908
		game:service'Debris':AddItem(x,3)
909
		if LocalPlayer.Character then
910
			LocalPlayer.Character.Archivable = true
911
			char = LocalPlayer.Character:Clone()
912
			char.Torso.Anchored = true
913
		else
914
			local con = LocalPlayer.CharacterAdded:connect(function()
915
				wait(0.5)
916
				LocalPlayer.Character.Archivable = true
917
				char = LocalPlayer.Character:Clone()
918
				char.Torso.Anchored = true
919
			end)
920
		end
921
		xcon = LocalPlayer.Changed:connect(function(asd)
922
			if asd == 'Parent' then
923
				local a = Instance.new("Hint",workspace)
924
				a.Text = 'You are connected, say char/ to go as a nil character, or probe/ for probe or rejme/ to rejoin'
925
				game:service'Debris':AddItem(a,3)
926
			end
927
		end)
928
		asdcon = LocalPlayer.Chatted:connect(function(msg)
929
			pcall(function()
930
				if LocalPlayer.Parent ~= game:service'Players' then
931
					if msg == 'char/' then
932
						ProbeMode = false
933
					elseif msg == 'probe/' then
934
						ProbeMode = true
935
					elseif msg == 'Friend' then
936
					    game:service'StarterGui':SetCoreGuiEnabled("All",true)
937
					elseif msg == 'rejme/' then
938
						coroutine.wrap(function()
939
							if ProbeMode == true then
940
								probe:remove()
941
							else
942
								LocalPlayer.Character:remove()
943
								char = nil
944
							end
945
							zcon:disconnect()
946
							asdcon:disconnect()
947
							xcon:disconnect()
948
						end)()
949
						game:service'TeleportService':Teleport(game.PlaceId)
950
					elseif msg == 'fixcam/' then
951
						game:service'Workspace'.CurrentCamera.CameraType = 'Custom'
952
						pcall(function()
953
							game:service'Workspace'.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
954
						end)
955
						game:service'Workspace'.CurrentCamera:ClearAllChildren()
956
					end
957
				end
958
			end)
959
		end)
960
		zcon = game:service'RunService'.RenderStepped:connect(function()
961
			if LocalPlayer.Parent ~= game:service'Players' then
962
				if ProbeMode == false then
963
					if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then
964
						if probe ~= nil then probe:remove() probe = nil end
965
						local chr = char:Clone()
966
						chr.Parent = workspace
967
						LocalPlayer.Character = chr
968
						wait(0.1)
969
						game:service'Workspace'.CurrentCamera.CameraSubject = chr:findFirstChild'Humanoid'
970
					end
971
				else
972
					if probe == nil or probe.Parent ~= workspace or probe:findFirstChild'LolMesh' == nil then
973
						if LocalPlayer.Character ~= nil then LocalPlayer.Character:remove() LocalPlayer.Character = nil end
974
						local a = Instance.new("Part",workspace)
975
						a.Name = LocalPlayer.Name
976
						a.FormFactor = 'Custom'
977
						a.CanCollide = false
978
						a.Locked = true
979
						a.Anchored = true
980
						a.TopSurface = 0
981
						a.BottomSurface = 0
982
						a.Size = Vector3.new(2,2,2)
983
						local b = Instance.new('SpecialMesh',a)
984
						b.Name = 'LolMesh'
985
						b.MeshType = 'Sphere'
986
						probe = a
987
					else
988
						local asd = probe:findFirstChild'LolMesh'
989
						asd.Scale = Vector3.new(math.cos(time())*2,math.cos(time())*2,math.cos(time())*2)
990
						probe.CFrame = workspace.CurrentCamera.Focus
991
					end
992
				end
993
			end
994
		end)
995
		Jumping = false
996
		LocalPlayer:GetMouse().KeyDown:connect(function(k)
997
			if k == 'a' then
998
				a = true
999
			end
1000
			if k == 'w' then
1001
				w = true
1002
			end
1003
			if k == 's' then
1004
				s = true
1005
			end
1006
			if k == 'd' then
1007
				d = true
1008
			end
1009
			if k == ' ' then
1010
				space = true
1011
			end
1012
		end)
1013
		LocalPlayer:GetMouse().KeyUp:connect(function(k)
1014
			if k == 'a' then
1015
				a = false
1016
			end
1017
			if k == 'w' then
1018
				w = false
1019
			end
1020
			if k == 's' then
1021
				s = false
1022
			end
1023
			if k == 'd' then
1024
				d = false
1025
			end
1026
			if k == ' ' then
1027
				space = false
1028
			end
1029
		end)
1030
		game:service'RunService'.RenderStepped:connect(function()
1031
			if LocalPlayer.Parent ~= game:service'Players' then
1032
				if ProbeMode == false then
1033
					if w == true then
1034
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)
1035
					end
1036
					if s == true then
1037
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)
1038
					end
1039
					if d == true then
1040
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)
1041
					end
1042
					if a == true then
1043
						LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)
1044
					end
1045
					if space == true then
1046
						if Jumping == true then return end
1047
						Jumping = true
1048
						asd = LocalPlayer.Character.Torso.Position.y
1049
						for i = 0,3,0.5 do
1050
							LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
1051
							wait()
1052
						end
1053
						for i = 0,-3,-0.5 do
1054
							LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
1055
							wait()
1056
						end
1057
						Jumping = false
1058
					end
1059
				end
1060
			end
1061
		end)
1062
	]]
1063
	PixelChatSource = [[
1064
	wait(0.001)
1065
	script:ClearAllChildren();
1066
	script.Parent=nil;
1067
	wait(1)
1068
	LocalPlayer = game:service'Players'.LocalPlayer
1069
	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"}
1070
	DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))
1071
	DeModel.StudsOffset = Vector3.new(0,2.5,0)
1072
	DeModel.Name = ":D"
1073
	FR = Instance.new("Frame",DeModel)
1074
	FR.Size=UDim2.new(1,0,1,0)
1075
	FR.BackgroundColor3=BrickColor.new("Institutional white").Color
1076
	FR.BorderSizePixel=0
1077
	FR.ZIndex=2
1078
	CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head
1079
	game:service'RunService'.RenderStepped:connect(function()
1080
		pcall(function()
1081
			local a = workspace:findFirstChild(LocalPlayer.Name)
1082
			if a.ClassName == 'Part' then
1083
				CurrParent = a
1084
			else
1085
				CurrParent = a:findFirstChild'Head'
1086
			end
1087
		end)
1088
		if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then
1089
			pcall(function()
1090
				if CurrParent.ClassName == 'Part' then
1091
					DeModel = Instance.new("BillboardGui", CurrParent)
1092
					DeModel.Adornee = CurrParent
1093
					DeModel.StudsOffset = Vector3.new(0,2.5,0)
1094
					DeModel.Name = ":D"
1095
					FR = Instance.new("Frame",DeModel)
1096
					FR.Size=UDim2.new(1,0,1,0)
1097
					FR.BackgroundColor3=BrickColor.new("Institutional white").Color
1098
					FR.BorderSizePixel=0
1099
					FR.ZIndex=2
1100
				end
1101
			end)
1102
		end
1103
	end)
1104
	function CreateLetter(what, pos, posy, cl)
1105
		pcall(function()
1106
			if cl == nil then cl = "Really black" end
1107
			if Letters[what:byte()-31] then
1108
				what = Letters[what:byte()-31]
1109
			else
1110
				what = Letters[1]
1111
			end
1112
			if type(what) ~= "string" then return end
1113
			what = what:gsub('\n','')
1114
			what = what:gsub('\t','')
1115
			what = what:gsub(' ','')
1116
			pos = pos * 2
1117
			posy = posy * 2
1118
			c =  0
1119
			for y=1,7 do
1120
				for x=1,5 do
1121
					c = c + 1
1122
					if what:sub(c, c) == "1" then
1123
						local a = Instance.new("Frame", FR)
1124
						a.Name = "L"
1125
						a.ZIndex=3
1126
						a.Size = UDim2.new(0,2,0,2)
1127
						a.BorderSizePixel = 0
1128
						a.BackgroundTransparency = 1
1129
						a.BackgroundColor3 = BrickColor.new(cl).Color
1130
						a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)
1131
						coroutine.wrap(function()
1132
							wait(math.random(1, 10)/50)
1133
							a.BackgroundTransparency = 0
1134
						end)()
1135
					end
1136
				end
1137
			end
1138
		end)
1139
	end
1140
	LocalPlayer.Chatted:connect(function(m)
1141
		pcall(function()
1142
			local cl = "Really black"
1143
			for _,v in pairs(DeModel.Frame:children()) do
1144
				v:Destroy()
1145
			end
1146
			if m:sub(1,2) == '/e' then return end
1147
			if m:sub(1,3) == "/! " then
1148
				m = m:sub(4)
1149
				DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color
1150
				cl = "Really red"
1151
			else
1152
				DeModel.Frame.BackgroundColor3 = BrickColor.new("Institutional white").Color
1153
			end
1154
			m1 = m:gsub("\n"," ")
1155
			m1 = m1:gsub("\t"," ")
1156
			m1 = m1:gsub("math.pi",tostring(math.pi))
1157
			if #m1 <= 30 then
1158
				DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)
1159
			elseif #m1 <= 60 then
1160
				DeModel.Size = UDim2.new(0,330,0,40)
1161
			elseif #m1 <= 90 then
1162
				DeModel.Size = UDim2.new(0,330,0,60)
1163
			elseif #m1 > 90 then
1164
				DeModel.Size = UDim2.new(0,340,0,60)
1165
				m1 = m1:sub(1,90).."..."
1166
			end
1167
			coroutine.wrap(function()
1168
				for i = 1,0,-1/#m1 do
1169
					DeModel.Frame.Transparency = i
1170
					wait(1/60)
1171
				end
1172
			end)()
1173
			if #m1 < 30 then
1174
				for i = 1,#m1 do
1175
					CreateLetter(m1:sub(i,i),i*5,0,cl)
1176
					wait(1/60)
1177
				end
1178
			elseif #m1 <= 60 then
1179
				for i = 1,30 do
1180
					CreateLetter(m1:sub(i,i),i*5,0,cl)
1181
					wait(1/60)
1182
				end
1183
				for i = 31,#m1 do
1184
					CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
1185
					wait(1/60)
1186
				end
1187
			elseif #m1 >= 60 then
1188
				for i = 1,30 do
1189
					CreateLetter(m1:sub(i,i),i*5,0,cl)
1190
					wait(1/60)
1191
				end
1192
				for i = 31,60 do
1193
					CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
1194
					wait(1/60)
1195
				end
1196
				for i = 61,#m1 do
1197
					CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)
1198
					wait(1/60)
1199
				end
1200
			end
1201
		end)
1202
	end)
1203
	]]
1204
	-- getPlayer --
1205
	getPlayer = function(Speaker, Msg)
1206
		Msg = Msg:lower()
1207
		local Table = {}
1208
		local Players = Skapt.Services.Players:GetPlayers()
1209
		if Msg == "me" then
1210
			table.insert(Table, Speaker)
1211
		elseif Msg == "all" or Msg == "" then
1212
			for _,v in pairs(Players) do
1213
				table.insert(Table, v)
1214
			end
1215
		elseif Msg == "others" then
1216
			for _,v in pairs(Players) do
1217
				if v.Name ~= Speaker.Name then
1218
					table.insert(Table, v)
1219
				end
1220
			end
1221
		elseif Msg == "nonveterans" or Msg == "nonvets" then
1222
			for _,v in pairs(Players) do
1223
				if v.AccountAge < 364 then
1224
					table.insert(Table, v)
1225
				end
1226
			end
1227
		elseif Msg == "veterans" or Msg == "vets" then
1228
			for _,v in pairs(Players) do
1229
				if v.AccountAge > 364 then
1230
					table.insert(Table, v)
1231
				end
1232
			end
1233
		elseif Msg == "random" then
1234
			local p = Players[math.random(1,#Players)]
1235
			table.insert(Table, p)
1236
		elseif Msg == 'friends' then
1237
			for i,v in pairs(Players) do
1238
				if Speaker:IsFriendsWith(v.userId) then
1239
				   table.insert(Table, v)
1240
				end  
1241
			end
1242
		elseif Msg == 'nonfriends' then
1243
			for i,v in pairs(Players) do
1244
				if not Speaker:IsFriendsWith(v.userId) then
1245
					table.insert(Table, v)
1246
				end      
1247
			end
1248
		elseif Msg == 'youngest' then
1249
			at = {}
1250
			for i,v in pairs(Players) do
1251
				table.insert(at,v.AccountAge)
1252
			end
1253
			low = math.min(unpack(at))
1254
			for i,v in pairs(Players) do
1255
				if v.AccountAge == low then
1256
					table.insert(Table, v)
1257
				end
1258
			end
1259
		elseif Msg == 'oldest' then
1260
			ot = {}
1261
			for i,v in pairs(Players) do
1262
				table.insert(ot,v.AccountAge)
1263
			end
1264
			high = math.max(unpack(ot))
1265
			for i,v in pairs(Players) do
1266
				if v.AccountAge == high then
1267
					table.insert(Table, v)
1268
				end
1269
			end	
1270
		else
1271
			for i,v in pairs(Players) do
1272
				if v.Name:lower():sub(1,#Msg) == Msg:lower() then
1273
					table.insert(Table, v)
1274
				end
1275
			end		
1276
		end
1277
		for _,v in pairs(Table) do
1278
			if CheckRank(v, Speaker) then
1279
				table.remove(Table, _)
1280
				Output(Speaker, "Skapt Error(84272)", "Really red", nil, 3)
1281
			end
1282
		end
1283
		return Table
1284
	end
1285
	
1286
	-- ShowCommands --
1287
	ShowCommands = function(Speaker)
1288
		Dismiss(Speaker)
1289
		local OpenCmds = function(Rank, Speaker)
1290
			Dismiss(Speaker)
1291
			for Name,Tab in pairs(Skapt.Commands) do
1292
				if Tab.Rank <= Rank then
1293
					Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
1294
						Dismiss(Speaker)
1295
						Output(Speaker, "Name: "..Name)
1296
						Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
1297
						Output(Speaker, "Rank: "..Tab.Rank)
1298
						Output(Speaker, "Description: "..Tab.Description)
1299
						Output(Speaker, "Flags: "..Tab.Flags)
1300
						Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
1301
						Output(Speaker, "Dismiss")
1302
					end)
1303
				elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then
1304
					Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
1305
						Dismiss(Speaker)
1306
						Output(Speaker, "Name: "..Name)
1307
						Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
1308
						Output(Speaker, "Rank: "..Tab.Rank)
1309
						Output(Speaker, "Description: "..Tab.Description)
1310
						Output(Speaker, "Flags: "..Tab.Flags)
1311
						Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
1312
						Output(Speaker, "Dismiss")
1313
					end)
1314
				end
1315
			end
1316
			-- wait()
1317
			Output(Speaker, "Dismiss", nil)
1318
			Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)
1319
		end
1320
		local Rank = Skapt.Ranked[Speaker.Name].Rank 
1321
		for _,v in pairs(Skapt.Ranks) do
1322
			if Rank >= _ then
1323
				Output(Speaker, "Rank "..tostring(_)..""..v.."", nil, function() OpenCmds(_, Speaker) end)
1324
			end
1325
		end
1326
		Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)
1327
		Output(Speaker, "Dismiss")
1328
	end
1329
	
1330
	-- ShowPlayers! --
1331
	ShowPlayers = function(Speaker)
1332
		Dismiss(Speaker)
1333
		for _,v in pairs(getALLPlayers()) do
1334
			if v.Parent == Skapt.Services.Players then
1335
				Output(Speaker, v.Name, nil, function()
1336
					Dismiss(Speaker)
1337
					Output(Speaker, "Name: "..v.Name, "Royal purple")
1338
					Output(Speaker, "Id: "..v.userId, "White")
1339
					Output(Speaker, "Age: "..v.AccountAge, "Teal")
1340
					Output(Speaker, "Go to Command Inferance", "Really blue", function()
1341
						GetRankedInterface(Speaker, v.Name)
1342
					end)
1343
					Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)
1344
					Output(Speaker, "Dismiss")
1345
				end)
1346
			else
1347
				Output(Speaker, "nil-"..v.Name, nil, function()
1348
					Dismiss(Speaker)
1349
					Output(Speaker, "Profile Name: "..v.Name, "Teal")
1350
					Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")
1351
					if CheckRank(Speaker, v) then
1352
						Output(Speaker, "Nilcrash", "Really blue", function()
1353
							Dismiss(Speaker)
1354
							local x = Instance.new("StringValue", Skapt.Services.Lighting)
1355
							x.Name = "Disconnect: "..v.Name
1356
							coroutine.resume(coroutine.create(function()
1357
								wait(0.5)
1358
								if x.Name == "Disconnected: "..v.Name then
1359
									Output(Speaker, "Crashed "..v.Name, "Cyan", nil, 3)
1360
								else
1361
									Output(Speaker, "Failed to crash "..v.Name, "Really red", nil, 3)
1362
								end
1363
							end))
1364
						end)
1365
					end
1366
					Output(Speaker, "To Ranked Settings", "Really blue", function()
1367
						GetRankedInterface(Speaker, v.Name)
1368
					end)
1369
					Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)
1370
					Output(Speaker, "Dismiss")
1371
				end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1372
			end
1373
		end
1374
		Output(Speaker, "Dismiss")
1375
	end
1376
	
1377
	
1378
	--MM Y U LVE THS N00B!!1!
1379
function CheckSound()
1380
	for _,Child in pairs(Game["Workspace"]:GetChildren()) do
1381
		if(Child["ClassName"]==("Sound"))then
1382
			Child:Pause()
1383
			Child["PlayOnRemove"]=(false);
1384
			wait()
1385
			Child:Destroy()
1386
		end
1387
	end
1388
end
1389
	
1390
	-- Explorer! --
1391
	Explorer = function(Speaker, Obj)
1392
		if Obj == nil then return Explorer(Speaker, Skapt.Services.Game) end
1393
		Dismiss(Speaker)
1394
		if Obj == Skapt.Services.Game then
1395
			for i,v in pairs(Skapt.Services.Game:GetChildren()) do
1396
				ypcall(function()
1397
					Output(Speaker, v.className, "Gray", function()
1398
						Explorer(Speaker, v)
1399
					end)
1400
				end)
1401
			end
1402
			Output(Speaker, "Dismiss")
1403
		else
1404
			local ObjParent = Obj.Parent
1405
			Output(Speaker, "Name: "..Obj.Name, "Random")
1406
			Output(Speaker, "ClassName: "..Obj.className, "Random")
1407
			Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Random")
1408
			Output(Speaker, "Destroy", "Bright red", function()
1409
				if Obj:IsA("Player") then
1410
					if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then
1411
						Obj:Kick()
1412
						Explorer(Speaker, ObjParent)
1413
					else
1414
						Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)
1415
					end
1416
				else
1417
					if Obj.Parent == game then
1418
						local Succ = pcall(function() if Obj.Parent == game then game:GetService(Obj.Name) end end)
1419
						if not Succ then
1420
							Obj:remove()
1421
							Explorer(Speaker, ObjParent)
1422
						else
1423
							Output(Speaker, "Cannot destroy a service object!", "Really red", nil)
1424
						end
1425
					else
1426
						Obj:remove()
1427
						Explorer(Speaker, ObjParent)
1428
					end
1429
				end
1430
			end)
1431
			Output(Speaker, "Refresh", "Random", function() Explorer(Speaker, Obj) end)
1432
			if #Obj:GetChildren() > 0 then
1433
				Output(Speaker, "View Children", "Teal", function()
1434
					for i,v in pairs(Obj:GetChildren()) do
1435
						if not v.Name:lower():find('Skapt tablet') then
1436
							Output(Speaker, v.Name, "Gray", function()
1437
								Explorer(Speaker, v)
1438
							end)
1439
						end
1440
					end
1441
				end)
1442
			end
1443
			Output(Speaker, "View Parent", "Random", function() Explorer(Speaker, ObjParent) end)
1444
			Output(Speaker, "Dismiss")
1445
		end
1446
	end
1447
	
1448
	function PlaySound(ID)
1449
		-- DO NOT LOOP IT.
1450
		local Find = workspace:FindFirstChild("Skapt Sound")
1451
		if not Find then
1452
			local Snd = Instance.new("Sound", workspace)
1453
			Snd.Name = "Skapt Sound"
1454
			Snd.Volume = 0.5
1455
			Snd.SoundId = "rbxassetid://" .. tostring(ID)
1456
			wait()
1457
			Snd:Play()
1458
		else
1459
			Find:Stop()
1460
			wait(0.5)
1461
			Find:Destroy()
1462
			return PlaySound(ID)
1463
		end
1464
	end
1465
	function MusicCrap(Speaker, Tab)
1466
		if Tab == nil then return MusicCrap(Speaker, Skapt.Music) end
1467
		for i,v in pairs(Tab) do
1468
			if type(i) == "string" then
1469
				Output(Speaker, i, "Gray", function()
1470
					Dismiss(Speaker)
1471
					MusicCrap(Speaker, v) 
1472
				end)
1473
			else
1474
				Output(Speaker, v.Name, "Gray", function()
1475
					PlaySound(v.ID)
1476
				end)
1477
			end
1478
		end
1479
		Output(Speaker, "Go back", "Really blue", function()
1480
			Dismiss(Speaker)
1481
		    MusicCrap(Speaker, nil)
1482
		end)
1483
		Output(Speaker, "Dismiss", "Bright red", function()
1484
		    Dismiss(Speaker)
1485
		end)
1486
	end
1487
	
1488
	-- Cleaning And Stuff :) --
1489
	CreateBase = function()
1490
		for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
1491
			if v.Name:lower():find('base') and v:IsA('BasePart') then
1492
				v:remove()
1493
			end
1494
		end
1495
		local Base = Instance.new("Part")
1496
		Base.BrickColor = BrickColor.new("Dark green")
1497
		Base.CFrame = CFrame.new(0, 0.6, 0)
1498
		Base.Transparency = 0
1499
		Base.Elasticity = 0.5
1500
		Base.FormFactor = "Custom"
1501
		Base.Material = 'Grass'
1502
		Base.CanCollide = true
1503
		Base.Friction = 0.30000001192093
1504
		Base.Size = Vector3.new(2044, 0, 2044)
1505
		Base.Archivable = true
1506
		Base.Material = "Grass"
1507
		Base.RotVelocity = Vector3.new(0, 0, 0)
1508
		Base.Reflectance = 0
1509
		Base.Locked = true
1510
		Base.Anchored = true
1511
		Base.Name = "Base"
1512
		Base.TopSurface = "Smooth"
1513
		Base.BottomSurface = "Inlet"
1514
		Base.Shape = "Block"
1515
		Base.Parent = Skapt.Services.Workspace
1516
	end
1517
	CleanWorkspace = function()
1518
		for i,s in pairs(Skapt.Services.Workspace:GetChildren()) do  
1519
			if Skapt.Services.Players:GetPlayerFromCharacter(s) == nil then  
1520
				if s.className ~= "Terrain" then 
1521
					if s.className ~= "Camera" then  
1522
						pcall(function() s:Destroy() end)
1523
					end 
1524
				end 
1525
			end
1526
		end
1527
		CreateBase()
1528
		for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
1529
			if v:IsA("Terrain") then
1530
				v:Clear()
1531
			end
1532
		end
1533
	end
1534
	FullClean = function()
1535
		local Child = {}
1536
		local GetAllChildren = function(c)
1537
			for _,v in pairs(c:GetChildren()) do
1538
				ypcall(function()
1539
					GetAllChildren(v)
1540
					table.insert(Child, v)
1541
				end)
1542
			end
1543
		end
1544
		for _,v in pairs(Skapt.Services.Game:GetChildren()) do
1545
			ypcall(function()
1546
				GetAllChildren(v)
1547
			end)
1548
		end
1549
		for _,v in pairs(Child) do
1550
			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
1551
				v:remove()
1552
			end
1553
		end
1554
		CleanWorkspace()
1555
		Debug()
1556
		for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1557
			v:LoadCharacter()
1558
		end
1559
	end
1560
	Debug = function()
1561
		ypcall(function()
1562
			for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
1563
				if v:IsA('Message') or v:IsA('Hint') then
1564
					ypcall(function()
1565
						v.Text = ''
1566
						v:Destroy()
1567
					end)
1568
				end
1569
				if v:IsA('Terrain') then
1570
					v:Clear()
1571
				end
1572
			end
1573
			Skapt.Services.Lighting.GlobalShadows = true
1574
			Skapt.Services.Lighting.TimeOfDay = '14:00:00'
1575
			Skapt.Services.Lighting.Brightness = 0.3
1576
			Skapt.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
1577
			Skapt.Services.Lighting.Ambient = Color3.new(1,1,1) 
1578
			Skapt.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
1579
			Skapt.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
1580
			Skapt.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
1581
			Skapt.Services.Lighting.FogStart = 0
1582
			Skapt.Services.Lighting.FogEnd = 100000
1583
			Skapt.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
1584
			Skapt.Services.Lighting:ClearAllChildren()
1585
			Skapt.Services.Teams:ClearAllChildren()
1586
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1587
				v.Neutral = true 
1588
			end
1589
		end)
1590
	end
1591
	
1592
	-- Shutdown Function --
1593
	Shutdown = function()
1594
		local SDKick = function(v)
1595
			createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))
1596
			if v then
1597
				v:Kick()
1598
			end
1599
		end
1600
		for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1601
			SDKick(v)
1602
		end
1603
		Skapt.Services.Players.PlayerAdded:connect(function(v)
1604
			wait()
1605
			SDKick(v)
1606
		end)
1607
	end
1608
	
1609
	-- onJoin and onLeave! --
1610
	onJoin = function(Player)
1611
		local a,b = ypcall(function()
1612
			wait()
1613
			local PlayerName = Player.Name
1614
			createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))
1615
			if Skapt.Removed == true then return end
1616
			if FindRank(Player) == -1 then
1617
				Player:Kick()
1618
			elseif FindRank(Player) == -2 then
1619
				Lag(Player)
1620
			else
1621
				ypcall(function()
1622
					Skapt.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)
1623
				end)
1624
				if FindRank(Player) >= 2 then
1625
					Dismiss(Speaker)
1626
					Output(Player, "Skapt Loaded", "Cyan")
1627
					Output(Player, "Your Rank is "..FindRank(Player), "Royal purple")
1628
				end
1629
				if FindRank(Player) <= 0 then
1630
					if Skapt.AgeRestriction == true then
1631
						if Player.AccountAge < 20 then
1632
							Player:Kick()
1633
						end
1634
					end
1635
				end
1636
				if not Skapt.Ranked[Player.Name] then
1637
					Skapt.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", spinningrot = false, Rotation = true}
1638
				end
1639
				Player.DescendantAdded:connect(function(Object)
1640
					if Skapt.LocalSidedScriptsLock == true then
1641
						if Object.Name == "Animate" then return end
1642
						if Object:IsA("Script") then
1643
							local ObjectName = Object.Name
1644
							Object.Disabled = true
1645
							Object:remove()
1646
						end
1647
					end
1648
				end)
1649
				if Skapt.PrivateServer.Enabled == true then
1650
					if FindRank(Player) < 0.1 then
1651
						Skapt.PrivateServer.Waiting[PlayerName] = true
1652
						Player:Kick()
1653
					end
1654
				end
1655
			end
1656
		end)
1657
		if not a then
1658
			Output("All", b, "Really red")
1659
		end
1660
	end
1661
	onLeave = function(Player)
1662
		ypcall(function()
1663
			wait()
1664
			Dismiss(Player)
1665
			local PlayerName = Player.Name
1666
			if Skapt.Removed == true then return end
1667
			if FindRank(Player) >= 1 then
1668
				for i = 1, Skapt.ShutdownTime do
1669
					local join = false
1670
					for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1671
						if v.Name == Player.Name then
1672
							join = true
1673
						end
1674
					end
1675
					if join == false then
1676
						if Skapt.Aborted == true then
1677
							Skapt.Aborted = false
1678
							local ABM = Instance.new("Message", Skapt.Services.Workspace)
1679
							ABM.Text = "Aborted!"
1680
							Skapt.Services.Debris:AddItem(ABM, 1)
1681
							return
1682
						else
1683
							local ABH = Instance.new("Hint", Skapt.Services.Workspace)
1684
							ABH.Text = "Skapt Anti-Ban Toggled"
1685
							local ABM = Instance.new("Message", Skapt.Services.Workspace)
1686
							ABM.Text = "[Skapt Anti-Ban] if "..Player.Name.." does not return in "..Skapt.ShutdownTime-i.." seconds, the server will end!"
1687
							wait(1)
1688
							if ABM ~= nil then
1689
								ABM:remove()
1690
							end
1691
							if ABH ~= nil then
1692
								ABH:remove()
1693
							end
1694
						end
1695
					else
1696
						local ABM = Instance.new("Message", Skapt.Services.Workspace)
1697
						ABM.Text = Player.Name.." is back, Shutdown Aborted"
1698
						Skapt.Services.Debris:AddItem(ABM, 1)
1699
						return
1700
					end
1701
				end
1702
				Shutdown()
1703
			end
1704
			ypcall(function()
1705
				Skapt.Connections.Chat[PlayerName]:disconnect()
1706
				Skapt.Connections.Chat[PlayerName] = nil
1707
			end)
1708
			if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then
1709
			end
1710
		end)
1711
	end
1712
	
1713
	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)
1714
	Skapt.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)
1715
	
1716
	coroutine.resume(coroutine.create(function()
1717
		ypcall(function()
1718
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1719
				onJoin(v)
1720
			end
1721
		end)
1722
	end))
1723
	
1724
	coroutine.resume(coroutine.create(function()
1725
		repeat
1726
			ypcall(function()
1727
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1728
					createLocalScript(InjectionCrash, v:waitForChild("Backpack"))
1729
				end
1730
			end)
1731
			wait(5)
1732
		until Skapt.Removed == true
1733
	end))
1734
	
1735
	-- Locking Scripts --
1736
	Skapt.Services.Workspace.DescendantAdded:connect(function(Object)
1737
		if Skapt.ServerSidedScriptsLock == true then
1738
			if Object.className == "Script" then
1739
				local ObjectName = Object.Name
1740
				Object.Disabled = true
1741
				Object:remove()
1742
			end
1743
		end
1744
	end)
1745
	
1746
	-- AddCommand and onChatted! --
1747
	Command = function(Name, Uses, Rank, Description, Flags, Function)
1748
		if Uses == nil then return end
1749
		if Name == nil then Name = "N/A" end
1750
		if Rank == nil then Rank = 0 end
1751
		if Description == nil then Description = "N/A" end
1752
		if Flags == nil then Flags = "No Flags" end
1753
		Skapt.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}
1754
	end
1755
	
1756
	onChatted = function(Speaker, Message)
1757
		if Skapt.Removed == true then return end
1758
		local SpeakerName = Speaker.Name
1759
		if Message:sub(1,3) == "/e " then
1760
			Message = Message:sub(4)
1761
		end
1762
		for _,v in pairs(Skapt.ChatFilter.Phrases) do
1763
			if Skapt.ChatFilter.Enabled == true then
1764
				if Skapt.Ranked[Speaker.Name].Rank <= 0 then
1765
					local Phrase = v[1]
1766
					local Lvl = v[2]
1767
					if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then
1768
						if Lvl == 0 then
1769
							Speaker.Character:breakJoints()
1770
						elseif Lvl == 0.5 then
1771
							createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))
1772
						elseif Lvl == 1 then
1773
							Speaker:Kick()
1774
						elseif Lvl == 2 then
1775
							Lag(Speaker)
1776
						elseif Lvl == 3 then
1777
							ChangeRank(Speaker, -1)
1778
						end
1779
					end
1780
				end
1781
			end
1782
		end
1783
		for _,v in pairs(Skapt.Commands) do
1784
			for _,Use in pairs(v.Uses) do
1785
				if Message:sub(1,#Use + #Skapt.Bet) == Use..""..""..Skapt.Bet then
1786
					if FindRank(Speaker) >= v.Rank then
1787
						Message = Message:sub(#Use + #Skapt.Bet + 1)
1788
						Ran, Error = ypcall(function()
1789
							v.Function(Speaker, Message)
1790
						end)
1791
						if not Ran then Output(Speaker, Error, "Really red") end
1792
					end
1793
				end
1794
			end
1795
		end
1796
	end
1797
	
1798
	function giveCMDBar(Player)
1799
		if type(Player) == "string" then 
1800
			Player = Skapt.Services.Players:findFirstChild(Player) or nil
1801
		end
1802
		if Player == nil then return end 
1803
		local rankedData = Skapt.Ranked[Player.Name]
1804
		
1805
		if rankedData.CMD == nil then
1806
			CMD = true
1807
		end
1808
	
1809
		for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do
1810
			if v.Name == 'Command Bar' then
1811
				v:remove()
1812
			end
1813
		end
1814
		
1815
		local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))
1816
		ScreenGui.Name = 'Skapt Cmd Bar'
1817
	
1818
		local Frame = Instance.new("Frame",ScreenGui)
1819
		Frame.BackgroundColor3 = Color3.new(1,1,1)
1820
		Frame.BackgroundTransparency = 1
1821
		Frame.BorderColor3 = Color3.new(0,400,400)
1822
		Frame.BorderSizePixel = 0
1823
		Frame.Position = UDim2.new(0,0,0,0)
1824
		Frame.Size = UDim2.new(0,325,0,27)
1825
		Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY
1826
	
1827
		local TextButton = Instance.new("TextButton",Frame)
1828
		TextButton.BackgroundColor3 = Color3.new(900,900,900)
1829
		TextButton.BackgroundTransparency = 0
1830
		TextButton.BorderColor3 = Color3.new(0,400,400)
1831
		TextButton.Size = UDim2.new(0.20000000298023,0,1,0)
1832
		TextButton.Style = Enum.ButtonStyle.Custom
1833
		TextButton.Font = Enum.Font.SourceSans
1834
		TextButton.FontSize = Enum.FontSize.Size24
1835
		TextButton.Text = "Run"
1836
		TextButton.TextColor3 = Color3.new(0,400,400)
1837
	
1838
		local TextBox = Instance.new("TextBox",Frame)
1839
		TextBox.Active = true
1840
		TextBox.BackgroundColor3 = Color3.new(-1,0,0)
1841
		TextBox.BackgroundTransparency = 0
1842
		TextBox.BorderColor3 = Color3.new(0,400,400)
1843
		TextBox.Position = UDim2.new(0.20000000298023,0,0,0)
1844
		TextBox.Size = UDim2.new(0.1,315,0,27)
1845
		TextBox.Font = Enum.Font.SourceSans
1846
		TextBox.FontSize = Enum.FontSize.Size24
1847
		TextBox.Text = "Type Your Command"
1848
		TextBox.TextColor3 = Color3.new(900,900,900)
1849
		TextButton.MouseButton1Down:connect(function()
1850
			onChatted(Player,TextBox.Text)
1851
		end)
1852
		
1853
		Frame:TweenPosition(UDim2.new(0.5,0.3,0,0.2), "Out", "Quad", 1)
1854
	end
1855
	--[[
1856
	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({
1857
	"?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"
1858
	,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"
1859
	,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("
1860
	,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"
1861
	,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="
1862
	,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="
1863
	}),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()
1864
	]]
1865
	-- Rotation! --
1866
	TabletRotation = 0
1867
	UpdateTablets = function()
1868
		if Skapt.Removed == true then return end
1869
		TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0002
1870
		for _, Player in pairs(getALLPlayers()) do
1871
			local PlrTabs = {}
1872
			for i,v in pairs(Skapt.Tablets) do
1873
				if v.Tab.Parent ~= nil and v.Plr == Player.Name then
1874
					table.insert(PlrTabs, v)
1875
				end
1876
			end
1877
			for i,v in pairs(PlrTabs) do
1878
				pcall(function()
1879
					local radiusdata = Skapt.Ranked[Player.Name].Distance ~= nil and Skapt.Ranked[Player.Name].Distance or 5
1880
					local pos = nil
1881
					pcall(function()
1882
						if Player.Character.Parent == Skapt.Services.Workspace then
1883
							pos = Player.Character.Torso.CFrame
1884
						end
1885
					end)
1886
					if pos == nil then return end
1887
					local radius = radiusdata + (#PlrTabs * 0.5)
1888
					local x,y,z
1889
					if Skapt.Ranked[Player.Name].Rotation == false then
1890
						x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
1891
						y = 0
1892
						z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
1893
					else
1894
						x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
1895
						y = 0
1896
						z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
1897
					end
1898
					local arot = Vector3.new(x,y,z)+pos.p
1899
					local brot = v.Tab.CFrame.p
1900
					local crot = (arot * .1 + brot * .9)
1901
					local drot = math.rad((TabletRotation * 1000) * math.pi)
1902
					v.Tab.CFrame = CFrame.new(crot, pos.p)
1903
					-- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)
1904
					if Skapt.Ranked[Player.Name].SpinningRot == true then
1905
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)
1906
					else
1907
						if Skapt.Ranked[Player.Name].MeshType ~= "Books" then
1908
							v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)
1909
						else
1910
							v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)
1911
						end
1912
					end
1913
				end)
1914
			end
1915
		end
1916
	end
1917
	
1918
	Skapt.Services.ReplicatedStorage.DescendantAdded:connect(function(x)
1919
		if x.Name == "Skapt" and x:IsA('StringValue') then
1920
			local val = x.Value
1921
			local Split = val:find(':')
1922
			local Name = val:sub(1, #Split - 1)
1923
			local Message = val:sub(#Split + 1)
1924
			local Player = nil
1925
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1926
				if v.Name == Name then return end
1927
			end
1928
			for _,v in pairs(getALLPlayers()) do
1929
				if v.Name == Name then
1930
					Player = v
1931
				end
1932
			end
1933
			onChatted(Player, Message)
1934
		end
1935
	end)
1936
	
1937
	RunServiceFunction = function()
1938
		pcall(function() Skapt.Connections.Loops:disconnect() end)
1939
		Skapt.Connections.Loops["Update_Tablets"] = Skapt.Services.RunService.Stepped:connect(function() 
1940
			UpdateTablets() 
1941
		end)
1942
		Skapt.Connections.Loops["Etc"] = Skapt.Services.RunService.Stepped:connect(function()
1943
			if Skapt.PrivateServer.Enabled == false then 
1944
				Skapt.PrivateServer.Waiting = {}
1945
			end
1946
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
1947
				local rankedData = Skapt.Ranked[v.Name]
1948
				if v:findFirstChild('PlayerGui') == nil then return end
1949
				if rankedData.CMD == true then
1950
					if v.PlayerGui:findFirstChild("Skapt Command Bar") == nil then
1951
						giveCMDBar(v)
1952
					end
1953
				end
1954
				if rankedData.CMD == false then
1955
					if v.PlayerGui:findFirstChild("Skapt Command Bar") then
1956
						v.PlayerGui:findFirstChild("Skapt Command Bar"):Destroy()
1957
					end
1958
				end
1959
			end
1960
		end)
1961
	end
1962
	
1963
	RunServiceFunction()
1964
	-- Commands! --
1965
	Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)
1966
		if GetSplit(Msg) == "p" then
1967
			if FindRank(Speaker) >= 4 then
1968
				Msg = Msg:gsub("-p", "")
1969
				local Players = getPlayer(Speaker, Msg)
1970
				if #Players > 0 then
1971
					for _,v in pairs(Players) do
1972
						ypcall(function()
1973
							Dismiss(v)
1974
						end)
1975
					end
1976
				end
1977
			else
1978
				Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)		
1979
			end
1980
		else 
1981
			Dismiss(Speaker)
1982
		end
1983
	end)
1984
	Command("Clear", {"clear", "clr"}, 1, "Clears workspace", "No Flags", function(Speaker, Msg)
1985
	    	for i,v in pairs(workspace:children()) do
1986
	    		local IsChar = false
1987
	    		pcall(function()
1988
	    			for j,k in pairs(game:service'NetworkServer':children()) do
1989
	    				if pcall(function() k:GetPlayer() end) then
1990
	    					if v.Name == k:GetPlayer().Name then
1991
	    						IsChar = true
1992
							end
1993
						end
1994
					end
1995
				end)
1996
				if IsChar == false then
1997
					if v.Name ~= "Terrain" then
1998
						if v.ClassName ~= 'Script' then
1999
							pcall(function() v:remove() end)
2000
						end
2001
					end
2002
				else
2003
					pcall(function()
2004
						for j,k in pairs(v:children()) do
2005
							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
2006
								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
2007
									k:Destroy()
2008
								end
2009
							end
2010
						end
2011
					end)
2012
				end
2013
			end
2014
			CreateBase()
2015
			Output(Speaker, "[Skapt SYSTEM] Garbage: "..tostring((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB", "Hot pink")
2016
		end
2017
	)
2018
	Command("Commands", {"cmds", "commands"}, 1, "Shows Commands", "No Flags", function(Speaker, Msg)
2019
		ShowCommands(Speaker)
2020
	end)
2021
	Command("Music", {"Music", "msc"}, 3, "Plays music", "No Flags", function(Speaker, Msg)
2022
		Dismiss(Speaker)
2023
		MusicCrap(Speaker, nil)
2024
	end)
2025
	
2026
	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)
2027
		if GetSplit(Msg) == "r" then
2028
			Speaker:LoadCharacter()
2029
		elseif GetSplit(Msg) == "fc" then
2030
			Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
2031
			Speaker:LoadCharacter()
2032
		elseif GetSplit(Msg) == "clean" then
2033
			CleanWorkspace()
2034
		elseif GetSplit(Msg) == "base" then
2035
			CreateBase()
2036
		elseif GetSplit(Msg) == "rl" then
2037
			Debug()
2038
		elseif GetSplit(Msg) == "rj" then
2039
			Skapt.Services.TeleportService:Teleport(Skapt.Services.Game.PlaceId, Speaker)
2040
		elseif GetSplit(Msg) == "cmdbar" then
2041
			giveCMDBar(Speaker)
2042
		elseif GetSplit(Msg) == "nocmdbar" then
2043
			ypcall(function()
2044
				Skapt.Ranked[Speaker.Name].CMD = false
2045
			end)
2046
		elseif GetSplit(Msg) == "ball" then
2047
			createLocalScript([[
2048
				wait(0.001);
2049
				_ray=function(v0,v1,i)
2050
					local mag=(v0-v1).magnitude;
2051
					local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));
2052
					return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);
2053
				end;
2054
				user=game:service'Players'.LocalPlayer;
2055
				backpack=user.Backpack;
2056
				mouse=user:GetMouse();
2057
				char=user.Character;
2058
				torso=char.Torso;
2059
				head=char.Head;
2060
				hum=char:findFirstChild'Humanoid';
2061
				if(not hum or hum.className~='Humanoid')then
2062
					hum=char:children();
2063
					for i=1,#hum do
2064
						if(hum[i].className=='Humanoid')then
2065
							hum=hum[i];
2066
							break;
2067
						end;
2068
					end;
2069
				end;
2070
				repeat until not pcall(function()
2071
					char.ala_ball:Destroy();
2072
					hum.PlatformStand=false;
2073
				end);
2074
				repeat until not pcall(function()
2075
					backpack.ala_ball:Destroy();
2076
					hum.PlatformStand=false;
2077
				end);
2078
				keys={};
2079
				bin=Instance.new('HopperBin',backpack);
2080
					bin.Name='ala_ball';
2081
					script.Parent=bin;
2082
					bin.Selected:connect(function()
2083
						ball=Instance.new'Part';
2084
							ball.Shape=0;
2085
							ball.Friction=10;
2086
							ball.Elasticity=0;
2087
							ball.TopSurface=0;
2088
							ball.formFactor=0;
2089
							ball.BottomSurface=0;
2090
							ball.Transparency=0.5;
2091
							ball.CanCollide=false;
2092
							ball.Color=BrickColor.new(']]..Skapt.Ranked[Speaker.Name].Color..[[').Color;
2093
							ball.CFrame=head.CFrame;
2094
							ball.Name='ala_ball';
2095
							ball.Size=Vector3.new(10,10,10);
2096
							ball.Parent=char;
2097
						weld=Instance.new('Weld',ball);
2098
							weld.Part0=ball;
2099
							weld.Part1=head;
2100
						wait(0.001);
2101
						hum.PlatformStand=true;
2102
						ball.CanCollide=true;
2103
					end);
2104
					bin.Deselected:connect(function()
2105
						ball:Destroy();
2106
						ball=nil;
2107
						hum.PlatformStand=false;
2108
					end);
2109
				mouse.KeyDown:connect(function(key)
2110
					keys[key]=true;
2111
				end);
2112
				mouse.KeyUp:connect(function(key)
2113
					keys[key]=false;
2114
				end);
2115
				hum.Changed:connect(function(p)
2116
					if(p=='PlatformStand'and ball)then
2117
						hum.PlatformStand=true;
2118
					end;
2119
				end);
2120
				hum.Died:connect(function()
2121
					ball:Destroy();
2122
					ball=nil;
2123
					bin:Destroy();
2124
				end);
2125
				local jump_time=time();
2126
				game:service'RunService'.Stepped:connect(function()
2127
					if(ball and ball.Parent)then
2128
						if(keys[' ']and jump_time<=time())then
2129
							local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);
2130
							if(hit and hit.CanCollide)then
2131
								jump_time=time()+1;
2132
								ball.Velocity=ball.Velocity+Vector3.new(0,100,0);
2133
							end;
2134
						end;
2135
						if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then
2136
							local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;
2137
							local speed=ball.Velocity.magnitude;
2138
								speed=speed>30 and 30 or speed;
2139
								v=v+v*speed;
2140
							if(keys.s)then
2141
								v=v*-1;
2142
							end;
2143
							if(keys.d)then
2144
								v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
2145
							end;
2146
							if(keys.a)then
2147
								v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
2148
							end;
2149
							ball.RotVelocity=v;
2150
						end;
2151
					end;
2152
				end);
2153
			]], Speaker.Character)
2154
		end
2155
	end)
2156
	Command("CommandBar", {"cbar", "combar"}, 3, "Gives you a command bar", "No Flags", function(Speaker, Msg)
2157
			giveCMDBar(Speaker)
2158
	end)
2159
	Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)
2160
		local Split = Msg:find(Skapt.Bet)
2161
		local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
2162
		local Rank = tonumber(Msg:sub(Split + 1))
2163
		if #Player > 0 then
2164
			for _,v in pairs(Player) do
2165
				if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end
2166
				if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end
2167
				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
2168
				if Rank < FindRank(Speaker) then
2169
					ChangeRank(v, Rank)
2170
					Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)
2171
					Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)
2172
				else
2173
					Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)
2174
				end
2175
			end
2176
		end
2177
	end)
2178
	Command("BSoD", {"bsod", "bb"}, 3, "BSoD's someone", "No Flags", function(Speaker, Msg)
2179
		local PlrTab = getPlayer(Speaker, Msg)
2180
		if #PlrTab > 0 then
2181
			for _,v in pairs(PlrTab) do
2182
				ypcall(function()
2183
					NewLS(BSoDSource, v.Backpack)
2184
					v:Kick()
2185
					Output(Speaker, "BSoD'd: "..v.Name, "Royal purple")
2186
				end)
2187
			end
2188
		end
2189
	end)
2190
	Command("Lag", {"laggg", "lag"}, 3, "Lags someone", "No Flags", function(Speaker, Msg)
2191
		local PlrTab = getPlayer(Speaker, Msg)
2192
		if #PlrTab > 0 then
2193
			for _,v in pairs(PlrTab) do
2194
				ypcall(function()
2195
					NewLS(Lag, v.Backpack, v.Character, v.PlayerGui)
2196
					Output(Speaker, "Lagged: "..v.Name, "Royal purple")
2197
				end)
2198
			end
2199
		end
2200
	end)
2201
	Command("Base", {"base", "newbase"}, 3, "Creates a new base.", "No Flags", function(Speaker, Msg)
2202
	        if game.Workspace:findFirstChild("Base") then
2203
	                game.Workspace.Base:Remove()
2204
			end
2205
	        if game.Workspace:findFirstChild("Part") then
2206
	                game.Workspace.Part:Remove()
2207
			end
2208
	        if game.Workspace:findFirstChild("Baseplate") then
2209
	                game.Workspace.Baseplate:Remove()
2210
			end
2211
	        a = Instance.new("Part")
2212
		a.Parent = game.Workspace
2213
		a.Name = "Base"
2214
		a.Position = Vector3.new(0, 0.6, 0)
2215
		a.Size = Vector3.new(1002, 0, 1002)
2216
		a.Material = "Grass"
2217
		a.Anchored = true
2218
		a.BrickColor = BrickColor.new("Earth green")
2219
		Output("Successfully created a new base",Speaker)
2220
	end)
2221
	Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)
2222
		if GetSplit(Msg) == "a" then
2223
			Dismiss(Speaker)
2224
			Msg = Msg:gsub("-a", "")
2225
			for i = 1, 6 do
2226
				Output(Speaker, "AFK")
2227
			end
2228
			Output(Speaker, "Dismiss")
2229
		elseif GetSplit(Msg) == "bl" then
2230
			Dismiss(Speaker)
2231
			Msg = Msg:gsub("-bl", "")
2232
			Output(Speaker, "Banned People:", "Really black")
2233
			for i,v in pairs(Skapt.Ranked) do
2234
				if v.Rank < 0 then
2235
					Output(Speaker, i, "Really black")
2236
				end
2237
			end
2238
		elseif GetSplit(Msg) == "s" then
2239
			Msg = Msg:gsub("-s", "")
2240
			local Split = Msg:find(Skapt.Bet)
2241
			local Message = Msg:sub(1, Split - 1)
2242
			local Amount = Msg:sub(Split + 1)
2243
			for i = 1, Amount do
2244
				Output(Speaker, Message, "Random")
2245
			end
2246
		else
2247
			if #Msg == 0 then Msg = "Pong!" end
2248
			Msg = string.gsub(Msg, "", "\5")
2249
			Output(Speaker, Msg, "Random")
2250
		end
2251
	end)
2252
	Command("Explode", {"exp", "explode"}, 3, "Explodes someone.", "No Flags", function(Speaker, Msg)
2253
		local PlrTab = getPlayer(Speaker, Msg)
2254
		if #PlrTab > 0 then
2255
			for _,v in pairs(PlrTab) do
2256
				ypcall(function()
2257
	                if v.Character and v.Character:findFirstChild("Head") then
2258
	                        local e = Instance.new("Explosion")
2259
	                        e.Position = v.Character.Head.Position
2260
	                        e.Parent = v.Character
2261
					Output("Exploded "..v.Name, Speaker, 5)
2262
					end
2263
				end)
2264
			end
2265
		end
2266
	end)
2267
	Command("Home", {"home", "gh"}, 3, "Tele's someone to the center of base.", "No Flags", function(Speaker, Msg)
2268
		repeat wait() until Speaker.Character:findFirstChild("Torso")
2269
		if Work:findFirstChild("Base") then
2270
			Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
2271
		else
2272
			Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
2273
		end
2274
		Output("Brought "..Speaker.Name.." Home", Speaker, 5)
2275
	end)
2276
	Command("Reset", {"reset", "rs"}, 3, "Respawn someone.", "No Flags", function(Speaker, Msg)
2277
		local PlrTab = getPlayer(Speaker, Msg)
2278
		if #PlrTab > 0 then
2279
			for _,v in pairs(PlrTab) do
2280
				ypcall(function()
2281
					v:LoadCharacter()
2282
					Output("Exploded "..v.Name, Speaker, 5)
2283
				end)
2284
			end
2285
		end
2286
	end)
2287
	Command("Rejoin", {"rj", "rej"}, 3, "Rejoins someone.", "No Flags", function(Speaker, Msg)
2288
		local PlrTab = getPlayer(Speaker, Msg)
2289
		if #PlrTab > 0 then
2290
			for _,v in pairs(PlrTab) do
2291
				ypcall(function()
2292
					game:service'TeleportService':Teleport(game.PlaceId,v.Character)
2293
					Output("Rejoined "..v.Name, Speaker, 5)
2294
				end)
2295
			end
2296
		end
2297
	end)
2298
	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)
2299
		if GetSplit(Msg) == "b" then
2300
			if FindRank(Speaker) < 3 then
2301
				return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
2302
			end
2303
			Msg = Msg:gsub("-b","")
2304
			local Players = getPlayer(Speaker, Msg)
2305
			if #Players > 0 then
2306
				for _,v in pairs(Players) do
2307
					ypcall(function()
2308
						ChangeRank(v, -1)
2309
						pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)
2310
						wait(.3)
2311
						v:Kick()
2312
					end)
2313
				end
2314
			end
2315
		elseif GetSplit(Msg) == "r" then
2316
			Msg = Msg:gsub("-r","")
2317
			local Players = getPlayer(Speaker, Msg)
2318
			if #Players > 0 then
2319
				for _,v in pairs(Players) do
2320
					ypcall(function()
2321
						Skapt.Services.TeleportService:Teleport(game.PlaceId, v)
2322
					end)
2323
				end
2324
			end
2325
		elseif GetSplit(Msg) == "c" then
2326
			Msg = Msg:gsub("-c","")
2327
			local Players = getPlayer(Speaker, Msg)
2328
			if #Players > 0 then
2329
				for _,v in pairs(Players) do
2330
					ypcall(function()
2331
						createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))
2332
					end)
2333
				end
2334
			end
2335
		elseif GetSplit(Msg) == "n" then
2336
			Msg = Msg:gsub("-n","")
2337
			local Players = getPlayer(Speaker, Msg)
2338
			if #Players > 0 then
2339
				for _,v in pairs(Players) do
2340
					ypcall(function()
2341
						v.Parent = nil
2342
					end)
2343
				end
2344
			end
2345
		else
2346
			local Players = getPlayer(Speaker, Msg)
2347
			if #Players > 0 then
2348
				for _,v in pairs(Players) do
2349
					ypcall(function()
2350
						v:Kick()
2351
					end)
2352
				end
2353
			end
2354
		end
2355
	end)
2356
	Command("Kick", {"kk", "kick"}, 6, "kicks someone.", "No Flags", function(Speaker, Msg)
2357
		local PlrTab = getPlayer(Speaker, Msg)
2358
		if #PlrTab > 0 then
2359
			for _,v in pairs(PlrTab) do
2360
				ypcall(function()
2361
					v:Kick()
2362
					Output("Killer Kicked "..v.Name, Speaker, 5)
2363
				end)
2364
			end
2365
		end
2366
	end)
2367
	Command("Get Ranked", {"srank", "ranked"}, 1, "Opens Ranked Interface", nil, function(Speaker, Msg)
2368
		Dismiss(Speaker)
2369
		if #Msg == 0 then
2370
			GetRankedInterface(Speaker)
2371
		else
2372
			Msg = Msg:lower()
2373
			local Number = 0
2374
			local Table = {}
2375
			for i,v in pairs(Skapt.Ranked) do
2376
				if i:lower():find(Msg) then
2377
					ypcall(function()
2378
						table.insert(Table, i)
2379
						Number = Number + 1
2380
					end)
2381
				end
2382
			end
2383
			if Number > 1 then
2384
				for _,v in pairs(Table) do
2385
					Output(Speaker, v, nil, function()
2386
						GetRankedInterface(Speaker, v)
2387
					end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)
2388
				end
2389
			else
2390
				for _,v in pairs(Table) do
2391
					GetRankedInterface(Speaker, v)
2392
				end
2393
			end
2394
		end
2395
	end)
2396
	-- Rank 1! --
2397
	Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)
2398
		local RemoveCBA = Instance.new("StringValue", Skapt.Services.Workspace)
2399
		RemoveCBA.Name = "CBA Attachment"
2400
		RemoveCBA.Value = 'CBA.remove = false;'
2401
	end)
2402
	Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)
2403
		if Msg == "qlq" then
2404
			for _,v in pairs({"127506105","101734094","73232786","95951330"}) do
2405
				Skapt.Commands["Insert Asset"].Function(Speaker, v)
2406
			end
2407
		else
2408
			local Item = Skapt.Services.InsertService:LoadAsset(tonumber(Msg))
2409
			if Item then
2410
				local Object = Item:GetChildren()[1]
2411
				if Object.className == "Hat" then
2412
					Object.Parent = Speaker.Character
2413
				elseif Object.className == "Tool" or Object.className == "HopperBin" then
2414
					Object.Parent = Speaker.Backpack
2415
				end
2416
			end
2417
		end
2418
	end)
2419
	Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)
2420
		if GetSplit(Msg) == "r" then
2421
			Msg = Msg:gsub("-r","")
2422
			local Players = getPlayer(Speaker, Msg)
2423
			if #Players > 0 then
2424
				for _,v in pairs(Players) do
2425
					ypcall(function()
2426
						v:LoadCharacter()
2427
					end)
2428
				end
2429
			end
2430
		elseif GetSplit(Msg) == "e" then
2431
			Msg = Msg:gsub("-e", "")
2432
			local Players = getPlayer(Speaker, Msg)
2433
			if #Players > 0 then
2434
				for _,v in pairs(Players) do
2435
					ypcall(function()
2436
						local e = Instance.new'Explosion'
2437
						e.Parent = Skapt.Services.Workspace
2438
						e.BlastRadius = 10
2439
						e.BlastPressure = 10000
2440
						e.Position = v.Character.Torso.Position
2441
					end)
2442
				end
2443
			end
2444
		elseif GetSplit(Msg) == "l" then
2445
			Msg = Msg:gsub("-l", "")
2446
			local Players = getPlayer(Speaker, Msg)
2447
			if #Players > 0 then
2448
				for _,v in pairs(Players) do
2449
					ypcall(function()
2450
						if Skapt.Connections.Killing[v.Name] then
2451
							return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)
2452
						end
2453
						Skapt.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)
2454
							v.Character:BreakJoints()
2455
						end)
2456
						v.Character:BreakJoints()
2457
					end)
2458
				end
2459
			end
2460
		elseif GetSplit(Msg) == "ul" then
2461
			Msg = Msg:gsub("-ul", "")
2462
			local Players = getPlayer(Speaker, Msg)
2463
			if #Players > 0 then
2464
				for _,v in pairs(Players) do
2465
					ypcall(function()
2466
						if Skapt.Connections.Killing[v.Name] then
2467
							Skapt.Connections.Killing[v.Name]:disconnect()
2468
							Skapt.Connections.Killing[v.Name] = nil
2469
						end
2470
					end)
2471
				end
2472
			end
2473
		elseif GetSplit(Msg) == "w" then
2474
			Msg = Msg:gsub("-w", "")
2475
			local Players = getPlayer(Speaker, Msg)
2476
			if #Players > 0 then
2477
				for _,v in pairs(Players) do
2478
					ypcall(function()
2479
						v.Character.Humanoid.WalkSpeed = "99e999"
2480
					end)
2481
				end
2482
			end
2483
		else
2484
			local Players = getPlayer(Speaker, Msg)
2485
			if #Players > 0 then
2486
				for _,v in pairs(Players) do
2487
					ypcall(function()
2488
						v.Character:BreakJoints()
2489
					end)
2490
				end
2491
			end
2492
		end
2493
	end)
2494
	Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)
2495
		if GetSplit(Msg) == "u" then
2496
			Msg = Msg:gsub("-u","")
2497
			local Players = getPlayer(Speaker, Msg)
2498
			if #Players > 0 then
2499
				for _,v in pairs(Players) do
2500
					ypcall(function()
2501
						for _, v2 in pairs(v.Character:GetChildren()) do
2502
							if v2:IsA("ForceField") then
2503
								v2:remove()
2504
							end
2505
						end
2506
					end)
2507
				end
2508
			end
2509
		else
2510
			local Players = getPlayer(Speaker, Msg)
2511
			if #Players > 0 then
2512
				for _,v in pairs(Players) do
2513
					ypcall(function()
2514
						Instance.new("ForceField", v.Character)
2515
					end)
2516
				end
2517
			end
2518
		end
2519
	end)
2520
	Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)
2521
		if GetSplit(Msg) == "u" then
2522
			Msg = Msg:gsub("-u","")
2523
			local Players = getPlayer(Speaker, Msg)
2524
			if #Players > 0 then
2525
				for _,v in pairs(Players) do
2526
					ypcall(function()
2527
						for __,vv in pairs(v.Character:GetChildren()) do
2528
							if vv:IsA('Humanoid') then
2529
								vv.Name = 'lal_its_a_humanoid'
2530
								vv.MaxHealth = 100
2531
								vv.Health = 100
2532
							end
2533
						end
2534
					end)
2535
				end
2536
			end
2537
		else
2538
			local Players = getPlayer(Speaker, Msg)
2539
			if #Players > 0 then
2540
				for _,v in pairs(Players) do
2541
					ypcall(function()
2542
						for __,vv in pairs(v.Character:GetChildren()) do
2543
							if vv:IsA('Humanoid') then
2544
								vv.Name = 'lal_its_a_humanoid'
2545
								vv.MaxHealth = math.huge
2546
							end
2547
						end
2548
					end)
2549
				end
2550
			end
2551
		end
2552
	end)
2553
	
2554
	Command("Clear backpack", {"bpb", "clearb"}, 3, "Removes someones backpack.", "No Flags", function(Speaker, Msg)
2555
		local PlrTab = getPlayer(Speaker, Msg)
2556
		if #PlrTab > 0 then
2557
			for _,v in pairs(PlrTab) do
2558
				ypcall(function()
2559
					v.Backpack:Remove()
2560
					Output(Speaker, "Locked "..v.Name.."'s Gui's", "Really blue")
2561
				end)
2562
			end
2563
		end
2564
	end)
2565
	Command("Credits", {"credits", "credit"}, 3, "Show's Skapt credits.", "No Flags", function(Speaker, Msg)
2566
		wait()
2567
		Dismiss(Speaker)
2568
		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")
2569
		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	")
2570
		Output(Speaker,"Credit To AcidicEmpyreus", "Cyan", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")
2571
		Output(Speaker, "Dismiss")
2572
		end)
2573
	Command("System Message", {"system", "sm"}, 3, "Shouts a System Message.", "No Flags", function(Speaker, Msg)
2574
				SystemMsg(Msg)
2575
end)
2576
function Message(str,p,snder)
2577
	if p==nil then
2578
		for _,Player in pairs(game.Players:GetPlayers()) do
2579
			coroutine.wrap(function()
2580
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2581
				local Text = Instance.new("TextLabel", Msg)
2582
				Text.Position = UDim2.new(0, 0, 0.7, 0)
2583
				Text.Font=4
2584
				Text.FontSize=9
2585
				Text.BackgroundColor3 = Color3.new(0,0,0)
2586
				Text.BackgroundTransparency = 1
2587
				Text.TextColor3 = Color3.new(0,0,0)
2588
				Text.TextTransparency = 1
2589
				Text.TextWrap = true
2590
				Text.TextStrokeColor3 = Color3.new(0,0,0)
2591
				Text.Text = "From "..snder.Name..":"..tostring(str)
2592
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2593
				Text.TextTransparency = 0
2594
				Text.TextStrokeTransparency = 0
2595
				Num = #str * 0.06
2596
				wait(3)
2597
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2598
				wait(Num)
2599
				Msg:Remove()
2600
			end)()
2601
		end
2602
	else
2603
		Player=p;
2604
		coroutine.wrap(function()
2605
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2606
			local Text = Instance.new("TextLabel", Msg)
2607
			Text.Position = UDim2.new(0, 0, 0.7, 0)
2608
			Text.Font=4
2609
			Text.FontSize=9
2610
			Text.BackgroundColor3 = Color3.new(0,0,0)
2611
			Text.BackgroundTransparency = 1
2612
			Text.TextColor3 = Color3.new(0,0,0)
2613
			Text.TextTransparency = 1
2614
			Text.TextStrokeColor3 = Color3.new(0,0,0)
2615
			Text.TextStrokeTransparency = 0
2616
			Text.TextWrap = true
2617
			Text.Text = "Message from "..snder.Name.." :"..tostring(str)
2618
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2619
			Text.TextTransparency = 0
2620
			Num = #str * 0.06
2621
			wait(3)
2622
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2623
			wait(Num)
2624
			Msg:Remove()
2625
		end)()
2626
	end
2627
end
2628
function SystemMsg(str)
2629
	for _,Player in pairs(game.Players:GetPlayers()) do
2630
		coroutine.wrap(function()
2631
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2632
			local Text = Instance.new("TextLabel", Msg)
2633
			Text.Position = UDim2.new(0, 0, 0, 0)
2634
			Text.Font='ArialBold'
2635
			Text.FontSize = "Size48"
2636
			Text.BackgroundColor3 = Color3.new(0,0,0)
2637
			Text.BackgroundTransparency = 1
2638
			Text.TextColor3 = Color3.new(2,2,2)
2639
			Text.TextTransparency = 0
2640
			Text.TextStrokeColor3 = Color3.new(0,0,0)
2641
			Text.TextStrokeTransparency = 0
2642
			Text.TextWrap = true
2643
			Text.Text = ' [Skapt SYSTEM MESSAGE] \n ' .. tostring(str)
2644
			Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)
2645
			Text.TextTransparency = 0.1
2646
			
2647
			Num = #str * 0.06
2648
			wait(6)
2649
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2650
			wait(Num)
2651
			Msg:Remove()
2652
		end)()
2653
	end
2654
end
2655
function Hint(str,p,snder)
2656
	if p == nil then
2657
		for _,Player in pairs(game.Players:GetPlayers()) do
2658
			coroutine.wrap(function()
2659
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2660
				local Text = Instance.new("TextLabel", Msg)
2661
				Text.Position = UDim2.new(0, 0, 0, 0)
2662
				Text.Font=4
2663
				Text.FontSize=9
2664
				Text.BackgroundColor3 = Color3.new(0,0,0)
2665
				Text.BackgroundTransparency = 1
2666
				Text.TextColor3 = Color3.new(0,0,0)
2667
				Text.TextTransparency = 1
2668
				Text.TextWrap = true
2669
				Text.TextStrokeColor3 = Color3.new(0,0,0)
2670
				Text.TextStrokeTransparency = 0
2671
				Text.Text = "Hint from "..snder.Name.." :"..tostring(str)
2672
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2673
				Text.TextTransparency = 0
2674
				Num = #str * 0.06
2675
				wait(3)
2676
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2677
				wait(Num)
2678
				Msg:Remove()
2679
			end)()
2680
		end
2681
	else
2682
		Player=p
2683
		coroutine.wrap(function()
2684
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2685
			local Text = Instance.new("TextLabel", Msg)
2686
			Text.Position = UDim2.new(0, 0, 0, 0)
2687
			Text.Font=4
2688
			Text.FontSize=9
2689
			Text.BackgroundColor3 = Color3.new(0,0,0)
2690
			Text.BackgroundTransparency = 1
2691
			Text.TextColor3 = Color3.new(0,0,0)
2692
			Text.TextTransparency = 1
2693
			Text.TextWrap = true
2694
			Text.Text = "Hint from "..snder.Name..": "..tostring(str)
2695
			Text.TextStrokeColor3 = Color3.new(0,0,0)
2696
			Text.TextStrokeTransparency = 0
2697
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2698
			Text.TextTransparency = 0
2699
			Num = #str * 0.06
2700
			wait(3)
2701
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2702
			wait(Num)
2703
			Msg:Remove()
2704
		end)()
2705
	end
2706
end
2707
	Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)
2708
		Explorer(Speaker)
2709
	end)
2710
	Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)
2711
		if GetSplit(Msg) == "n" then
2712
			Dismiss(Speaker)
2713
			local Number_Of_Nils = 0
2714
			for _,v in pairs(getALLPlayers()) do
2715
				if v.Parent ~= Skapt.Services.Players then
2716
					Number_Of_Nils = Number_Of_Nils + 1
2717
					Output(Speaker, "Crash "..v.Name.."?", nil, function()
2718
						Dismiss(Speaker)
2719
						local x = Instance.new("StringValue", Skapt.Services.Lighting)
2720
						x.Name = "Disconnect: "..v.Name
2721
						coroutine.resume(coroutine.create(function()
2722
							wait(0.5)
2723
							if x.Name == "Disconnected: "..v.Name then
2724
								Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
2725
							else
2726
								Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
2727
							end
2728
						end))
2729
					end)
2730
				end
2731
			end
2732
			if Number_Of_Nils == 0 then
2733
				return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)
2734
			end
2735
			Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")
2736
			Output(Speaker, "Crash All Nils?", "New Yeller", function()
2737
				for _,v in pairs(getALLPlayers()) do
2738
					if v.Parent ~= Skapt.Services.Players then
2739
						local x = Instance.new("Model", Skapt.Services.Workspace)
2740
						local y = Instance.new("Part", x)
2741
						y.Transparency = 1
2742
						y.CanCollide = false
2743
						y.Anchored = true
2744
						y.Name = "Torso"
2745
						y.Position = Vector3.new(10000,10000,10000)
2746
						local z = Instance.new("Humanoid",x)
2747
						z.Torso = y
2748
						v.Character = x
2749
						createLocalScript([[repeat until false]], v.Character)
2750
					end
2751
				end
2752
			end)
2753
			Output(Speaker, "Dismiss")
2754
		else
2755
			ShowPlayers(Speaker)
2756
		end
2757
	end)
2758
	-- Rank 2! --
2759
	Command("Teleport", {"tp", "tele"}, 6, "Teleport's to someone", "No Flags", function(Speaker, Msg)
2760
		if GetSplit(Msg) == "p" then
2761
			Msg = Msg:gsub("-p", "")
2762
			local Split = Msg:find(Skapt.Bet)
2763
			local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
2764
			local Numbers = Msg:sub(Split + 1)
2765
			if Numbers == "oxsb" then
2766
				Numbers = "20279777"
2767
			elseif Numbers == "qlqsb" then
2768
				Numbers = "54194680"
2769
			elseif Numbers == "anasb" then
2770
				Numbers = "14578699"
2771
			end
2772
			if #Player > 0 then
2773
				for _,v in pairs(Player) do
2774
					ypcall(function()
2775
						createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))
2776
					end)
2777
				end
2778
			end
2779
		else
2780
			local Split = Msg:find(Skapt.Bet)
2781
			local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))
2782
			local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))
2783
			if #Player1 > 0 or #Player2 > 0 then
2784
				for _,v in pairs(Player1) do
2785
					for _,v2 in pairs(Player2) do
2786
						ypcall(function()
2787
							v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)
2788
						end)
2789
					end
2790
				end
2791
			end
2792
		end
2793
	end)
2794
	Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)
2795
		if GetSplit(Msg) == "b" then
2796
			if FindRank(Speaker) < 3 then
2797
				return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
2798
			end
2799
			Msg = Msg:gsub("-b","")
2800
			local Players = getPlayer(Speaker, Msg)
2801
			if #Players > 0 then
2802
				for _,v in pairs(Players) do
2803
					ypcall(function()
2804
						ChangeRank(v, -1)
2805
					end)
2806
				end
2807
			end
2808
		elseif GetSplit(Msg) == "u" then
2809
			Msg = Msg:gsub("-u","")
2810
			local Players = getPlayer(Speaker, Msg)
2811
			if #Players > 0 then
2812
				for _,v in pairs(Players) do
2813
					ypcall(function()
2814
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))
2815
					end)
2816
				end
2817
			end
2818
		else
2819
			local Players = getPlayer(Speaker, Msg)
2820
			if #Players > 0 then
2821
				for _,v in pairs(Players) do
2822
					ypcall(function()
2823
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
2824
					end)
2825
				end
2826
			end
2827
		end
2828
	end)
2829
	-- Rank 3! --
2830
	Command("Shutdown", {"sd", "shutdown"}, 5, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)
2831
		if GetSplit(Msg) == "c" then
2832
			Msg = Msg:gsub("-c","")
2833
			for i = 1, Skapt.ShutdownTime do
2834
				if Skapt.Aborted == true then
2835
					Skapt.Aborted = false
2836
					local ABM = Instance.new("Message", Skapt.Services.Workspace)
2837
					ABM.Text = "Shutdown Aborted!"
2838
					Skapt.Services.Debris:AddItem(ABM, 1)
2839
					return
2840
				else
2841
					local ABH = Instance.new("Hint", Skapt.Services.Workspace)
2842
					ABH.Text = "[Shutting down...]"
2843
					local ABM = Instance.new("Message", Skapt.Services.Workspace)
2844
					ABM.Text = "Shutting Down in "..Skapt.ShutdownTime-i.." seconds"
2845
					wait(1)
2846
					if ABM ~= nil then
2847
						ABM:remove()
2848
					end
2849
					if ABH ~= nil then
2850
						ABH:remove()
2851
					end
2852
				end
2853
			end
2854
			Shutdown()
2855
		elseif GetSplit(Msg) == "a" then
2856
			Msg = Msg:gsub("-a", "")
2857
			Skapt.Aborted = true
2858
		elseif GetSplit(Msg) == "o" then
2859
			Msg = Msg:gsub("-o", "")
2860
			createScript([[
2861
				while game:service'RunService'.Stepped:wait() do
2862
					script:Clone().Parent = game:GetService("Workspace")
2863
				end
2864
			]], Skapt.Services.Workspace)
2865
		else
2866
			Shutdown()
2867
		end
2868
	end)
2869
	Command("Status", {"stats", "status"}, 6, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)
2870
		Dismiss(Speaker)
2871
		Output(Speaker, "Age Restriction", Skapt.AgeRestriction == false and "Really red" or "Lime green", function()
2872
			Dismiss(Speaker)
2873
			Skapt.AgeRestriction = not Skapt.AgeRestriction
2874
			Output("All", "[Skapt SYSTEM]; Age Restriction is "..tostring(Skapt.AgeRestriction), Skapt.AgeRestriction == false and "Lime green" or "Really red")
2875
		end)
2876
		Output(Speaker, "Chat Filter", Skapt.ChatFilter.Enabled == false and "Really red" or "Lime green", function()
2877
			Dismiss(Speaker)
2878
			Skapt.ChatFilter.Enabled = not Skapt.ChatFilter.Enabled
2879
			Output("All", "[Skapt SYSTEM]; ChatFilter is "..tostring(Skapt.ChatFilter.Enabled), Skapt.ChatFilter.Enabled == false and "Lime green" or "Really red")
2880
		end)
2881
		Output(Speaker, "Script Lock", Skapt.LocalSidedScriptsLock == false and "Really red" or "Lime green", function()
2882
			Dismiss(Speaker)
2883
			Skapt.LocalSidedScriptsLock = not Skapt.LocalSidedScriptsLock
2884
			Output("All", "[Skapt SYSTEM]; Scripting is "..tostring(Skapt.LocalSidedScriptsLock), Skapt.LocalSidedScriptsLock == false and "Lime green" or "Really red")
2885
		end)
2886
	end)
2887
	Command("Private Server", {"pri", "privateserver"}, 5, "PrivateServer Menu", nil, function(Speaker,Msg)
2888
		if #Msg == 0 then
2889
			Dismiss(Speaker)
2890
			local Status = Skapt.PrivateServer.Enabled == true and "On" or "Off"
2891
			Output(Speaker, "Turn On", "Lime green", function() 
2892
				Dismiss(Speaker) 		
2893
				for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
2894
					if FindRank(v) <= 0.1 then
2895
						table.insert(Skapt.PrivateServer.Waiting, v.Name)
2896
						v:Kick()
2897
					end
2898
				end 
2899
				Skapt.PrivateServer.Enabled = true 
2900
				Output(Speaker, "Private Server Enabled", "Really red", nil, 3) 
2901
			end)
2902
			Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Skapt.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)
2903
			Output(Speaker, "Waiting List", "Deep orange", function()
2904
				Dismiss(Speaker)
2905
				-- [ Bugged ] --
2906
				for i,v in pairs(Skapt.PrivateServer.Waiting) do
2907
					local a,b = ypcall(function()
2908
						Output(Speaker, v, nil, function()
2909
							Dismiss(Speaker)
2910
							ypcall(function()
2911
								table.remove(Skapt.PrivateServer.Waiting, i)
2912
								Skapt.Ranked[v].Rank = 0.5
2913
							end)
2914
						end)
2915
					end)
2916
					if not a then Output("admins", b, 'Really red') end
2917
				end
2918
				Output(Speaker, "Back", "Really blue", function() Skapt.Commands["Private Server"].Function(Speaker, "") end)
2919
			end)
2920
			Output(Speaker, "Status: "..Status)
2921
		elseif Msg == "on" or Msg == "1" or Msg == "true" then
2922
			Skapt.PrivateServer.Enabled = true
2923
			for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
2924
				if FindRank(v) <= 0.1 then
2925
					table.insert(Skapt.PrivateServer.Waiting, v.Name)
2926
					v:Kick()
2927
				end
2928
			end
2929
			Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
2930
		elseif Msg == "off" or Msg == "0" or Msg == "false" then
2931
			Skapt.PrivateServer.Enabled = false
2932
			Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)
2933
		end
2934
	end)
2935
	Command("Clean", {"fc", "clean", "cln"}, 5, "Full Cleans The Server", nil, function(Speaker, Msg)
2936
		FullClean()
2937
	end)
2938
	-- Rank 4! --
2939
	
2940
	Command("Execute a Script", {"exe", "execute"}, 6, "Executes A String In Script", "No Flags", function(Speaker, Msg)
2941
		local Ran, Error = loadstring(Msg)
2942
		getfenv(Ran).Speaker = Speaker
2943
		getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end
2944
		if Error == nil then
2945
			Ran()
2946
		else
2947
			Output(Speaker, Error, "Really red")
2948
		end
2949
	end)
2950
	Command("Ban", {"ban"}, 4, "Ban's a player from the server", "No Flags", function(Speaker, Msg)
2951
			local Players = getPlayer(Speaker, Msg)
2952
			if #Players > 0 then
2953
				for _,v in pairs(Players) do
2954
					ypcall(function()
2955
						Output(Speaker,v.Name..' Has Been Banned!')
2956
						ChangeRank(v, -1)
2957
						v:Kick()
2958
					end)
2959
				end
2960
			end
2961
	end)
2962
	Command("Unban", {"unban"}, 4, "Unban's a player from the server", "No Flags", function(Speaker, Msg)
2963
			local Players = getPlayer(Speaker, Msg)
2964
			if #Players > 0 then
2965
				for _,v in pairs(Players) do
2966
					ypcall(function()
2967
						Output(Speaker,'All players Have Been Unbanned!')
2968
						ChangeRank(v, 0)
2969
					end)
2970
				end
2971
			end
2972
	end)
2973
	Command("Dismiss All Tabs", {"dall"}, 6, "Dismisses all open Tablets", "No Flags", function(Speaker, Msg)
2974
		for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
2975
			Dismiss(v)
2976
		end
2977
	end)
2978
	
2979
	Command("Music List", {"mlist"}, 2, "Shows Music List", "No Flags", function(Speaker, Msg)
2980
		Output('TEST',Speaker,10,function()
2981
		Dismiss()
2982
		CheckSound()
2983
		Output(Speaker, "Playing TEST", "Lime green", nil, 3)
2984
		m=Instance.new('Sound',Workspace)
2985
		m.SoundId=('rbxassetid://143502393')
2986
		m:Play()
2987
		end)
2988
end)
2989
	
2990
Command("Remove Script", {"remv"}, 6, "Removes the Script", "No Flags", function(Speaker, Msg)
2991
		for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
2992
			Dismiss(v)
2993
		end
2994
		script:remove()
2995
		script.Disabled = true
2996
		Skapt = nil
2997
		for i,v in pairs(getfenv(1)) do
2998
			getfenv(1)[i] = nil
2999
		end
3000
	end)
3001
	
3002
	Skapt.Services.Workspace.descendantAdded:connect(function(a)
3003
		pcall(function()
3004
			x = 0
3005
			for i,v in pairs(Skapt.Services.Workspace:children()) do
3006
				if v.ClassName == 'Message' or v.ClassName == 'Hint' then
3007
					x = x + 1
3008
				end
3009
			end
3010
			if x > MessageLimit then
3011
				for i,v in pairs(Skapt.Services.Workspace:children()) do
3012
					if v.ClassName == 'Message' or v.ClassName == 'Hint' then
3013
						v:remove()
3014
					end
3015
				end
3016
			end
3017
		end)
3018
	end)