View difference between Paste ID: Dms6cfj0 and vbd0wAtw
SHOW: | | - or go back to the newest paste.
1
--__(KAJ Admin Generation Four)__--
2
--__(  modified by adchand2   )__--
3
4
5
6
7
8
9
10
11
wait()
12
LocalPlayer = game:service("Players").LocalPlayer
13
script.Parent = adchand2
14
Tabs = {}
15
Cmds = {}
16
key = "/"
17
chatgui = false
18
probemode = false
19
connection = nil
20
selection = false
21
Bypass = fals
22-
XAdminsAdmin = "KajAdminG2"
22+
XAdminsAdmin = "Magermash"
23
XAdminsAdminPlayer = game:GetService("Players"):findFirstChild(XAdminsAdmin)
24
XAdmin = {
25
AdminsSoundAdminMusic = {
26
AdminMusic = {
27
{ID = "http://www.roblox.com/Asset/?id=144364636",PITCH = 1,NAME = "Hey brother"};
28
{ID = "http://www.roblox.com/Asset/?id=142720946",PITCH = 1,NAME = "Tsunami Hardstyle"};
29
{ID = "http://www.roblox.com/Asset/?id=133517131",PITCH = 1,NAME = "Swordland"};
30
{ID = "http://www.roblox.com/Asset/?id=155183751",PITCH = 1,NAME = "Crossing Fields"};
31
{ID = "http://www.roblox.com/Asset/?id=155319906",PITCH = 1,NAME = "Problem"};
32
{ID = "http://www.roblox.com/Asset/?id=155104467",PITCH = 1,NAME = "Take Me Home"};
33
{ID = "http://www.roblox.com/Asset/?id=142276301",PITCH = 1,NAME = "Overtime"};
34
{ID = "http://www.roblox.com/Asset/?id=142516045",PITCH = 1,NAME = "Orchestra"};
35
{ID = "http://www.roblox.com/Asset/?id=142518226",PITCH = 1,NAME = "X files"};
36
{ID = "http://www.roblox.com/Asset/?id=143545724",PITCH = 1,NAME = "Ghost"};
37
{ID = "http://www.roblox.com/Asset/?id=156650736",PITCH = 1,NAME = "trapped"};
38
{ID = "http://www.roblox.com/Asset/?id=131243684",PITCH = 1,NAME = "Chillstep"};
39
{ID = "http://www.roblox.com/Asset/?id=154199055",PITCH = 1,NAME = "What About Love"};
40
{ID = "http://www.roblox.com/Asset/?id=152020611",PITCH = 1,NAME = "Rich Girl"};
41
{ID = "http://www.roblox.com/Asset/?id=145411653",PITCH = 1,NAME = "What does the fox say?"};
42
{ID = "http://www.roblox.com/Asset/?id=154604668",PITCH = 1,NAME = "I Like It Loud"};
43
{ID = "http://www.roblox.com/Asset/?id=158643393",PITCH = 1,NAME = "[i made this audio] Alive(Cash Cash x DJ Kalkutta Remix) Part 1"};
44
{ID = "http://www.roblox.com/Asset/?id=158643635",PITCH = 1,NAME = "[i made this audio] Alive(Cash Cash x DJ Kalkutta Remix) Part 2"};
45
{ID = "http://www.roblox.com/Asset/?id=149881491",PITCH = 1,NAME = "Addicted to you"};
46
{ID = "http://www.roblox.com/Asset/?id=110735379",PITCH = 1,NAME = "Movement Proposition 2"};
47
{ID = "http://www.roblox.com/Asset/?id=45819151",PITCH = 1,NAME = "Temple Of The Ninja Masters"};
48
{ID = "http://www.roblox.com/Asset/?id=144105373",PITCH = 1,NAME = "What My Cutie Mark Is Telling Me"};
49
{ID = "http://www.roblox.com/Asset/?id=144468928",PITCH = 3,NAME = "wat the stopid"};
50
{ID = "http://www.roblox.com/Asset/?id=152940771",PITCH = 1,NAME = "This is what if feels LIKE"};
51
{ID = "http://www.roblox.com/Asset/?id=144658116",PITCH = 1,NAME = "Fifth harmony"};
52
{ID = "http://www.roblox.com/Asset/?id=148952593",PITCH = 1,NAME = "Talk dirty to me"};
53
{ID = "http://www.roblox.com/Asset/?id=148321914",PITCH = 1,NAME = "Selfie"};
54
{ID = "http://www.roblox.com/Asset/?id=130872377",PITCH = 1,NAME = "Narwhals"};
55
{ID = "http://www.roblox.com/Asset/?id=142492972",PITCH = 1,NAME = "Overfly"};
56
{ID = "http://www.roblox.com/Asset/?id=149811427",PITCH = 1,NAME = "mmm"};
57
};
58
};
59
};
60
tabmodel = Instance.new("Model", Workspace)
61
tabmodel.Name = "KAJ Admin"
62
SourceName = "DSource"
63
Banlist = {"CloudNinee","dominus500","DatOneHaxor","thehateboy","AlexColton","iiReanimation","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev"}
64
BSoDBanList = {"CloudNinee","dominus500","DatOneHaxor","thehateboy","AlexColton","iiReanimation","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev","ScripthDev"}
65
66
 
67
function Connect(player)
68
if game.Players[player] then
69
if not Players[player.Name] then 
70
NewLS(CrashSource,player.Backpack)
71
table.insert(Players,player.Name)
72
Output('Entered > '..player.Name,__)
73
end
74
end
75
end
76
  
77
78
function Crash(name)
79
name = tostring(name or "nil")
80
local t = Instance.new("StringValue")  
81
t.Name = "DISC: "..name
82
t.Parent = game.Lighting   
83
game:GetService("Debris"):AddItem(t,1)
84
end 
85
 
86
ConnectSource = [=[
87
	wait()
88
	script:ClearAllChildren()
89
	wait()
90
	script.Parent = nil
91
	wait()
92
	Player = game:service'Players'.LocalPlayer
93
	wait()
94
	while wait(0.1) do --this is actually the nilcrash
95
		if game.Lighting:findFirstChild("DISC: nil") then
96
			if Player.Parent == nil then
97
				repeat Delay(0, wait) until false
98
			end
99
		end
100
		if game.Lighting:findFirstChild("DISC: "..Player.Name) then
101
			repeat Delay(0, wait) until false
102
		end
103
		if game.Lighting:findFirstChild("DISC: all") then
104
			repeat Delay(0, wait) until false
105
		end
106
	end
107
]=]
108
109
110
DLSource = [==[
111
	  game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson	
112
wait(0)
113
script.Parent = nil
114
plr = game:GetService("Players").LocalPlayer
115
local plrgui = plr:findFirstChild("PlayerGui")
116
if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
117
while plr.Parent == game:GetService("Players") do
118
wait()
119
for i = 1, 100000 do
120
local sc = Instance.new("ScreenGui",plrgui)
121
local fr = Instance.new("TextLabel",sc)
122
fr.Text = "DL'D BY KAJ"
123
fr.Size = UDim2.new(1, 0, 1, 0)
124
fr.FontSize = "Size48"
125
end
126
end
127
]==]
128
129
LagSource = [[
130
	wait()
131
	script.Parent = game:service'TeleportService'
132
	CC = workspace.CurrentCamera
133
	    game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson	
134
135
	RS = game:service("RunService")
136
	PG = game.Players.LocalPlayer.PlayerGui
137
	C = game.Players.LocalPlayer.Character
138
	function Lag()
139
		coroutine.resume(coroutine.create(function()
140
			while wait() do
141
				M = Instance.new("Message",CC)
142
				M.Text = tick()*math.floor(5%4*21)
143
				H = Instance.new("Hint",CC)
144
				H.Text = 'Super lagged'
145
				SG=Instance.new("ScreenGui",PG)
146
				FR=Instance.new("Frame",SG)
147
				FR.Size = UDim2.new(500,500,500,500)
148
				while wait() do
149
					FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
150
				end
151
				P=Instance.new("Part",CC)
152
				E=Instance.new("Explosion",P)
153
				E.BlastRadius=math.huge
154
				E.Position=P.Position
155
				F=Instance.new("Fire",P)
156
				S=Instance.new("Smoke",P)
157
				P.CFrame = CC.Focus
158
				P.Anchored = true
159
				P.CanCollide = false
160
				P.AncestryChanged:connect(function()Lag()end)
161
				for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
162
			end 
163
		end)) 
164
	end
165
	RS.Stepped:connect(function()for i=1,10000 do Lag()Lag()Lag()end end)
166
]]
167
 
168
169
 
170
 
171
coroutine.resume(coroutine.create(function()
172
while wait(3) do
173
if game:GetService("Players").Name ~= "Players" then
174
game:GetService("Players").Name = "Players"
175
end
176
end
177
end))
178
 
179
function Dismiss()
180
for i = 1, 10 do
181
for i = 1, #Tabs do
182
table.remove(Tabs, i)
183
if tabmodel then
184
tabmodel:ClearAllChildren()
185
end end end
186
end
187
 
188
function AddCmd(Name,Say,Desc,Func)
189
table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
190
end
191
 
192
193
 
194
found = false
195
 
196
coroutine.wrap(function()
197
while found == false do
198
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
199
for _,scriptinworkspace in pairs(workspace:children()) do
200
if scriptinworkspace then
201
if scriptinworkspace:IsA("Script") then
202
if scriptinworkspace:FindFirstChild(SourceName) then
203
newScript = scriptinworkspace:Clone()
204
wait(0.2)
205
newScript.Name = "NewScript"
206
newScript.Disabled = true
207
newScript:FindFirstChild(SourceName).Value = ""
208
Output("Source found", __)
209
found = true 
210
break
211
end
212
end
213
end
214
end
215
wait()
216
end
217
end)()
218
 
219
AddCmd("Unpunish player","unpunish","Restore the player's character",
220
function(plrs)
221
for _, plr in pairs(plrs) do
222
if plr then
223
NewS("game.Players['"..plr.Name.."']:LoadCharacter()", workspace)
224
end
225
end
226
end
227
)
228
 
229
function NewS(sourcevalue, parent)
230
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then 
231
NS(sourcevalue, parent)
232
else
233
if newScript then
234
local scr = newScript:Clone()
235
if scr:FindFirstChild(SourceName) then
236
if scr:FindFirstChild(SourceName) then
237
scr:FindFirstChild(SourceName).Value = sourcevalue
238
scr.Parent = parent
239
wait(0.5)
240
scr.Disabled = false
241
return scr
242
end
243
end
244
end
245
end
246
end
247
 
248
sorcery = script:Clone()
249
 
250
Services = {
251
game:GetService("Workspace"),
252
game:GetService("Players"),
253
game:GetService("Lighting"),
254
game:GetService("StarterPack"),
255
game:GetService("StarterGui"),
256
game:GetService("Teams"),
257
game:GetService("SoundService"),
258
game:GetService("Debris"),
259
game:GetService("InsertService"),
260
game:GetService("RunService"),
261
game:GetService("Chat"),
262
game:GetService("TeleportService"),
263
game:GetService("Geometry"),
264
game:GetService("MarketplaceService"),
265
game:GetService("BadgeService"),
266
game:GetService("NetworkClient"),
267
game:GetService("FriendService"),
268
}
269
 
270
function Explore(Item)
271
Dismiss()
272
if(Item==nil)then
273
for _,v in pairs(Services)do
274
Output(v.Name,function() Explore(v) end)
275
end;
276
else
277
f={
278
['View children']=function()
279
Dismiss()
280
for _,v in pairs(Item:children())do
281
Output(v.Name,function()
282
Explore(v)
283
wait()
284
end);
285
end;
286
end;
287
['View parent']=function()
288
Explore(Item.Parent)
289
end;
290
['Destroy']=function()
291
Item:Destroy();
292
Explore(Item.Parent);
293
end;
294
['Clear']=function()
295
Item:ClearAllChildren()
296
end;
297
['Clone']=function()
298
pcall(function()
299
cloneableObj = Item:clone()
300
end)
301
end;
302
['Remove']=function()
303
Item:remove()
304
end;
305
['Paste']=function()
306
if cloneableObj then
307
cloneableObj.Parent = Item
308
end
309
end;
310
['Ki'..'ck Item']=function()
311
NewLS("local plr = game:service'Players'.LocalPlayer; plr:Ki".."ck()", Item)
312
end;
313
};
314
for i,v in pairs(f)do
315
Output(tostring(i),v);
316
end;
317
Output('Item Name: \''..tostring(Item.Name)..'\'',nil);
318
Output('Class: \''..tostring(Item.ClassName)..'\'',nil);
319
if cloneableObj then
320
Output('Currently Cloning: \''..tostring(cloneableObj.Name)..'\'',nil);
321
end
322
end;
323
end;
324
 
325
AddCmd("Explore","explore","Explore the game",
326
function()
327
Explore()
328
end
329
)
330
 
331
function NewLS(sourcevalue, parent)
332
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then 
333
NLS(sourcevalue, parent) 
334
else
335
local NS = sorcery:Clone()
336
NS.Name = "NewLocal"
337
local Source = NS:findFirstChild(SourceName)
338
if Source == nil then Instance.new('StringValue',NS).Name = SourceName end Source = NS:findFirstChild(SourceName)
339
Source.Value = sourcevalue
340
NS.Parent = parent
341
NS.Disabled = false
342
return NS
343
end
344
end
345
 
346
Clothes = {}
347
 
348
for _,Item in pairs(LocalPlayer.Character:GetChildren()) do
349
if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then
350
table.insert(Clothes,Item:Clone())
351
end
352
end
353
for i,v in pairs(LocalPlayer.Character:GetChildren()) do
354
if v:IsA("BodyColors") then
355
body = v
356
torsocolor = body.TorsoColor
357
leftlegcolor = body.LeftLegColor
358
rightlegcolor = body.RightLegColor
359
leftarmcolor = body.LeftArmColor
360
rightarmcolor = body.RightArmColor
361
headcolor = body.HeadColor
362
end
363
end
364
 
365
mouse = LocalPlayer:GetMouse()
366
367
mouse.KeyDown:connect(function(key)
368
if key == "q" then
369
game:service'StarterGui':SetCoreGuiEnabled(4, true)
370
end 
371
end)
372
 
373
AddCmd("Chat","chat","Turn you chat on/off",
374
function(plrs, msg)
375
if msg == "off" then
376
chatgui = false
377
elseif msg == "on" then
378
chatgui = true
379
end
380
end
381
)
382
 
383
AddCmd("Set speed","ws","Sets the Speed of a player",
384
function(plrs, msg)
385
local keypos = msg:find(key)
386
local targPlayers = msg:sub(1,keypos-1)
387
local plrs = getPlayers(targPlayers)
388
local speed = msg:sub(tonumber(keypos+1))
389
for _,v in pairs(plrs) do
390
if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
391
v.Character:findFirstChild("Humanoid").WalkSpeed = speed
392
end
393
end
394
end
395
)
396
 
397
 
398
Bad_Char = ""
399
 
400
401
AddCmd("Commands","cmds","Show the commands",
402
function()
403
Dismiss()
404
for i, v in pairs(Cmds) do
405
Output(v["Name"],
406
function()
407
Output("Description: "..v["Desc"], __)
408
Output("Usage: "..v["Say"], __)
409
Output("Name: "..v["Name"], __)
410
end)
411
end
412
end
413
)
414
 
415
AddCmd("Rejoin player","rej","Rejoin the player",
416
function(plrs)
417
for _, plr in pairs(plrs) do
418
if plr and plr.Backpack then
419
NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Backpack)
420
end
421
end
422
end
423
)
424
425
AddCmd("Clean workspace","clean","Clean the workspace",
426
function()
427
		        for a,b in pairs(game.Workspace:GetChildren()) do
428
                        if not game.Players:GetPlayerFromCharacter(b) and b.Name ~= 'Base' and b.Name ~= 'Camera' then
429
                                pcall(function() b:Destroy() end)
430
                        end
431
                end
432
                if game.Workspace:findFirstChild('Base') == nil then
433
                        local Base = Instance.new("Part",Game.Workspace)
434
                        Base.Name = "Base"
435
                        Base.Anchored = true
436
                        Base.Locked = true
437
                        Base.BrickColor = BrickColor.new("Bright green")
438
                        Base.Size = Vector3.new(2048,2,2048)
439
                        Base.CFrame = CFrame.new(0,0,0)
440
                end
441
                Output("You have cleaned workspace!")
442
        end
443
)
444
445
AddCmd("Execute", "exe","Execute a a Script",
446
function(plrs, msg)
447
a,b = ypcall(function()
448
loadstring(msg)()
449
end) if not a then Output(b,"Bright red") end
450
end
451
)
452
453
AddCmd("Anchored", "anchor","Anchor all parts",
454
function()
455
	g = game.Workspace:GetChildren () do
456
for i = 1, #g do
457
if g[i].ClassName == "Part" then
458
g[i].Anchored = true else if
459
g[i].ClassName == "Model" then
460
y = g[i]:GetChildren ()
461
for i = 1, #y do
462
if y[i].ClassName == "Part" then
463
y[i].Anchored = true
464
end
465
end
466
end
467
end
468
end
469
end
470
end
471
)
472
473
AddCmd("Unanchor", "unanchor","unanchor all parts",
474
function()
475
	g = game.Workspace:GetChildren () do
476
for i = 1, #g do
477
if g[i].ClassName == "Part" then
478
g[i].Anchored = false else if
479
g[i].ClassName == "Model" then
480
y = g[i]:GetChildren ()
481
for i = 1, #y do
482
if y[i].ClassName == "Part" then
483
y[i].Anchored = false
484
end
485
end
486
end
487
end
488
end
489
end
490
end
491
)
492
493
AddCmd("Give KAJ Admin to a player","kaj","Give KAJ Admin to a player",
494
function(plrs)
495
for _, plr in pairs(plrs) do
496
if plr and plr.Backpack then
497
script.Parent = plr.Backpack
498
Output("You gave admin to: "..plr.Name, __)
499
end
500
end
501
end
502
)
503
AddCmd("Script Info","sinfo","Shows the info of the Script",
504
	function()
505
Output("Buyable:No")
506
Output("Script name: KAJ Admin")
507
Output("Creators are: Cobalt1164, KajAdmin")
508
Output("The name is based on my 3 crushes, Kaley Franzwa, Alison Agular, and Jacquelyn Mollenhoff")
509
Output("If you have a request, message the creators.")
510
Output("Generation 4")
511
Output("Version 4.1")
512
	end
513
)
514
AddCmd("Away from Keyboard","afk","Your afk",
515
function()
516
Dismiss()
517
for i = 1,4 do
518
wait()
519
Output("i'm afk go away")
520
end
521
end
522
)
523
AddCmd("Test if KAJ Admin is still Working","a","Test!!!",
524
	function()
525
	Dismiss()
526
	for i = 1,4 do
527
	wait()
528
	Output("KAJ Admin is working")
529
	end
530
	end
531
)
532
AddCmd("Back","back","Your back",
533
function()
534
Dismiss()
535
for i = 1,4 do
536
wait()
537
Output("im back!!")
538
end
539
wait(3)
540
Dismiss()
541
end
542
)
543
 
544
AddCmd("Ban a player","ban","Kicks a player when he enters",
545
function(plrs, msg)
546
for _,v in pairs(plrs) do
547
if v then
548
table.insert(Banlist,v.Name)
549
Output('Banned > '..v.Name,__)
550
else
551
Output(Error)
552
end
553
end
554
end
555
)
556
557
558
AddCmd("Lighting Fix","fixl","Lighting fix",
559
function()
560
function dtr()
561
	local sk = game.Lighting:findFirstChild("Sky")
562
	if sk ~= nil then
563
		sk:Remove()
564
	end
565
	game.Lighting.FogEnd = 10011111111
566
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
567
	game.Lighting.TimeOfDay = "14:00:00"
568
	game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
569
	game.Lighting.Brightness = 1
570
	game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
571
	game.Lighting.ColorShift_Top = Color3.new(0,0,0)
572
	game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
573
end
574
575
dtr()
576
577
game.Lighting.Changed:connect(dtr)
578
end
579
)
580
581
AddCmd("Cobalt Sky","cs","Set the skybox to ME",
582
function()
583
sky = Instance.new("Sky")
584
sky.Parent = game.Lighting
585
sky.SkyboxBk = "http://www.roblox.com/asset/?id=159514018"
586
sky.SkyboxDn = "http://www.roblox.com/asset/?id=159514018"
587
sky.SkyboxFt = "http://www.roblox.com/asset/?id=159514018"
588
sky.SkyboxLf = "http://www.roblox.com/asset/?id=159514018"
589
sky.SkyboxRt = "http://www.roblox.com/asset/?id=159514018"
590
sky.SkyboxUp = "http://www.roblox.com/asset/?id=159514018"
591
end
592
)
593
594
595
AddCmd("Shutdown","sd","Shuts the server down",
596
    function()
597
        
598
        wait(1)
599
      for _,v in pairs(game.Players:GetPlayers()) do v:Kick() end
600
    end
601
)
602
603
AddCmd("Respawn","respawn","Respawn player",
604
	function(plrs)
605
		for _,plr in pairs(plrs) do
606
			if plr then
607
				NewS("game.Players['"..plr.Name.."']:LoadCharacter()", workspace)
608
			end
609
		end
610
	end
611
)
612
613
AddCmd("Connect","connect","Connect a player",
614
	function(plrs)
615
		for _,plr in pairs(plrs) do
616
			if plr and plr.Backpack then
617
				Connect(plr)
618
			end
619
		end
620
	end
621
)
622
AddCmd("Hello!","helh","SPAM HELLO AND HI!11",
623
	function()
624
		while true do wait() Output("Hello") Output("Hi")
625
	end end
626
)
627
AddCmd("Night","night","Makes it night",
628
	function()
629
		game.Lighting.TimeOfDay = "00:00:00"
630
	end
631
)
632
AddCmd("Kick player list","klist", "Show a kick player list",
633
function()
634
Dismiss()
635
Output("Players to kick", __)
636
for _,v in pairs(game:GetService("Players"):GetChildren()) do
637
Output(v.Name,
638
function()
639
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", v.Backpack)
640
v:Destroy()
641
end)
642
end
643
end
644
)
645
AddCmd("Day","day","Makes it day",
646
	function()
647
		game.Lighting.TimeOfDay = "12:00:00"
648
	end
649
)
650
651
AddCmd("Disconnect","dc","DC'S a player",
652
function(plrs)
653
for _,plr in pairs(plrs) do
654
if plr and plr.Backpack then
655
NewLS([[local lp = game.Players.LocalPlayer;lp.Parent = nil;wait();lp.Parent = game.Players]],plr.Backpack)
656
end
657
end
658
end)
659
660
AddCmd("Script local","ls","LocalScript",
661
	function(nothing, msg)
662
		if LocalPlayer.Parent ~= nil then
663
			NewLS(msg, LocalPlayer.Backpack)
664
		end
665
	end
666
)
667
668
AddCmd("Playerinfo","pinfo","Get info on someone",
669
    function(plrs)
670
        for _,plr in pairs(plrs) do
671
            if plr then
672
Output("Age: "..plr.AccountAge,"noncolar")
673
Output("Membership: "..plr.MembershipType.Name,"Hot pink") 
674
Output("Player: "..plr.Name,"Royal purple")
675
Output("Id: "..plr.userId,"New Yeller")
676
Output("Camera Mode: "..plr.CameraMode.Name,"Dark green")
677
end
678
end
679
end)
680
681
AddCmd("Force shutdown","fsd","Forces shutdown",
682
    function(nothing, msg)
683
        NewS([[local b = Instance.new ("ManualSurfaceJointInstance",Workspace)]],workspace)
684
    end
685
)
686
687
688
 
689
AddCmd("Create base","base","Create the base",
690
function()
691
a = Instance.new("Part")
692
a.Parent = Workspace
693
a.Name = "Base"
694
a.Position = Vector3.new(0, 0.6, 0)
695
a.Size = Vector3.new(1002, 0, 1002)
696
a.Material = "Grass"
697
a.Anchored = true
698
a.BrickColor = BrickColor.new("Dark green")
699
end
700
)
701
 
702
AddCmd("Ping","ping","Ping something",
703
function(plrs, msg)
704
if msg == "" then
705
Output("pong", __)
706
else
707
Output(msg, __)
708
end
709
end
710
)
711
 
712
AddCmd("Dismiss","dt","Dismiss tabs",
713
function()
714
Dismiss()
715
end
716
)
717
718
AddCmd("God player","god","God a player",
719
function(plrs)
720
for _, plr in pairs(plrs) do
721
if plr and plr.Character and plr.Character.Humanoid then
722
me = plr
723
me.Character.Humanoid.MaxHealth=math.huge
724
end
725
end
726
end
727
)
728
729
AddCmd("DL","dl","DL a player",
730
	function(Plrs)
731
		for _, plr in pairs(Plrs) do
732
			if plr and plr.Backpack then
733
				for i = 0,7,1 do
734
					NewLS(DLSource, plr.Backpack)
735
					Output("You DL'D "..plr.Name, __)
736
737
				end
738
			end
739
		end
740
	end
741
)
742
 
743
744
745
AddCmd("Nilp","nils","Shows nil",
746
	function()
747
		NewS([[
748
			Model = Instance.new("Model", game.Lighting)
749
			Model.Name = "V3rm Tabs"
750
			for _,v in pairs(game:service'NetworkServer':children()) do
751
				if v:GetPlayer() then
752
					if v:GetPlayer().Parent ~= game:service'Players' then
753
						Instance.new("StringValue",Model).Value = v:GetPlayer().Name
754
					end
755
				end
756
			end
757
		]], workspace)
758
		wait()
759
		np = nil
760
		for i = 0,5,1 do
761
			if game.Lighting:findFirstChild("V3rm Tabs") then
762
				np = game.Lighting:findFirstChild("V3rm Tabs")
763
				break
764
			end
765
			wait(0.1)
766
		end
767
		if np ~= nil then
768
			Dismiss()
769
			for _,v in pairs(np:children()) do
770
				if v:IsA("StringValue") then
771
					Output(v.Value,"Royal purple")
772
				end
773
			end
774
		elseif np == nil then
775
			Output("Something broke","Royal purple")
776
		end
777
	end
778
)
779
 
780
781
 
782
 
783
AddCmd("reload","char","Makes your character",
784
function()
785
if workspace.CurrentCamera == nil then return end
786
local camera = workspace.CurrentCamera
787
local new_char = game:service("InsertService"):LoadAsset(68452456):GetChildren()[1]
788
local human = new_char.Humanoid
789
human.Parent = nil
790
new_char.Name = LocalPlayer.Name
791
wait()
792
human.Parent = new_char
793
camera.CameraSubject = human
794
camera.CameraType = "Custom"
795
new_char.Parent = workspace
796
LocalPlayer.Character = new_char
797
new_char:MakeJoints()
798
new_char.Torso.BrickColor = torsocolor
799
new_char["Left Leg"].BrickColor = leftlegcolor
800
new_char["Right Leg"].BrickColor = rightlegcolor
801
new_char["Left Arm"].BrickColor = leftarmcolor
802
new_char["Right Arm"].BrickColor = rightarmcolor
803
new_char.Head.BrickColor = headcolor
804
for i,v in pairs(Clothes) do
805
v:Clone().Parent = new_char
806
end
807
probemode = false
808
end
809
)
810
 
811
AddCmd("Remove KAJ Admin","kajr","Remove KAJ Admin",
812
function()
813
Output("Remove KAJ Admin?",
814
function()
815
for i,v in pairs(getfenv(1)) do
816
getfenv(1)[i] = nil
817
end
818
script.Disabled = true
819
LocalPlayer = NO_PLAYER
820
script:findFirstChild(SourceName).Value = " "
821
script.Disabled = true
822
tabmodel:ClearAllChildren()
823
tabmodel:Destroy()
824
connection:disconnect()
825
Tabs = {}
826
Cmds = {}
827
Banlist = {}
828
fh.all = true
829
coroutine.resume(coroutine.create(function()
830
while wait(0.1) do
831
Dismiss()
832
end
833
end))
834
end)
835
end
836
)
837
 
838
AddCmd("ForceField","ff","Give a forcefield to player",
839
function(plrs)
840
for _, plr in pairs(plrs) do
841
if plr and plr.Character then
842
843
844
Instance.new("ForceField", plr.Character)
845
end
846
end
847
end
848
)
849
AddCmd("Super FF","sff","Give 6000 forcefields to a player",
850
	function(plrs)
851
		for _, plr in pairs(plrs) do
852
			if plr and plr.Character then
853
				for i = 1,6000 do
854
					Instance.new("ForceField", plr.Character)
855
				end
856
			end
857
		end
858
	end
859
)
860
function ShowBL()
861
	Dismiss()
862
	for _,v in pairs(Banlist) do
863
		Output(v, "Royal purple", function()
864
			Dismiss()
865
			Output("Un-ban", "Black", function() table.remove(Banlist,_) end)
866
			Output("Back", "Royal purple", function() ShowBL() end)
867
		end)
868
	end
869
end
870
 
871
AddCmd("Banlist","bl","Show banned players",
872
	function()
873
		ShowBL()
874
	end
875
)
876
AddCmd("C-FF","cff","Puts as much as ff's as there are commands",
877
	function(plrs)
878
		for _, plr in pairs(plrs) do
879
			if plr and plr.Character then
880
				for i = 1,#Cmds do
881
					Instance.new("ForceField",plr.Character)
882
				end
883
			end
884
		end
885
	end
886
)
887
AddCmd("Lag player","lag","Lag a player",
888
function(plrs)
889
for _, plr in pairs(plrs) do
890
if plr and plr.Backpack then
891
NewLS(LagSource, plr.Backpack)
892
end
893
end
894
end
895
)
896
AddCmd("Scythe","scy","Give someone scythe script",
897
	function(plrs)
898
		for _, plr in pairs(plrs) do
899
			if plr and plr.Backpack then
900
				NewLS(ScytheSource, plr.Backpack)
901
			end
902
		end
903
	end
904
)
905
 AddCmd("Normal Crash","ncr","Normal crash a player",
906
	function(Plrs)
907
		for _,plr in pairs(Plrs) do
908
			if plr and plr.Backpack then
909
				NewLS("repeat until false",plr.Backpack)
910
			end
911
		end
912
	end
913
)
914
AddCmd("Crash player","crash","Crash a player",
915
function(plrs)
916
for _, plr in pairs(plrs) do
917
if plr and plr.Backpack then
918
NewLS("while true do end", plr.Backpack)
919
end
920
end
921
end
922
)
923
 
924
AddCmd("Kill player","kill","Kill a player",
925
function(plrs)
926
for _, plr in pairs(plrs) do
927
if plr and plr.Character then
928
plr.Character:BreakJoints()
929
end
930
end
931
end
932
)  
933
AddCmd("Mute player","mute","Removes a players chatbar",
934
function(plrs)
935
for _, plr in pairs(plrs) do
936
if plr and plr.Backpack then
937
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
938
end
939
end
940
end
941
)  
942
AddCmd("Unmute player","unmute","Creates a players chatbar when removed",
943
function(plrs)
944
for _, plr in pairs(plrs) do
945
if plr and plr.Backpack then
946
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
947
end
948
end
949
end
950
)
951
 
952
AddCmd("Un-ForceField","unff","Remove the forcefield of someone",
953
function(plrs)
954
for _, plr in pairs(plrs) do
955
if plr and plr.Character then
956
pcall(function()
957
for _,v in pairs(plr.Character:GetChildren()) do
958
if v:IsA("ForceField") then
959
v:Destroy()
960
end
961
end
962
end)
963
end
964
end
965
end
966
)
967
968
969
970
AddCmd("Teleport","tp","Teleport a player to a place",
971
function(plrs, msg)
972
local keypos = msg:find(key)
973
local targPlayers = msg:sub(1,keypos-1)
974
local plrs = getPlayers(targPlayers)
975
local id = msg:sub(tonumber(keypos+1))
976
for _,v in pairs(plrs) do
977
if v and v.Backpack then
978
NewLS([[game:service'TeleportService':Teleport(]]..id..[[)]], v.Backpack)
979
end
980
end
981
end
982
)
983
984
985
AddCmd("Deep clean","deepclean","Ultimate clean",
986
    function()
987
	local sk = game.Lighting:findFirstChild("Sky")
988
	if sk ~= nil then
989
		sk:Remove()
990
	end
991
	game.Lighting.FogEnd = 10011111111
992
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
993
	game.Lighting.TimeOfDay = "14:00:00"
994
	game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
995
	game.Lighting.Brightness = 1
996
	game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
997
	game.Lighting.ColorShift_Top = Color3.new(0,0,0)
998
	game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
999
t = game.Teams:GetChildren()
1000
for i = 1, #t do
1001
if t[i]:IsA("Team") then
1002
t[i]: Destroy()
1003
end
1004
end
1005
l = game.Lighting:GetChildren()
1006
for i = 1, #l do
1007
if l[i]:IsA("Sky") then
1008
l[i]: Destroy()
1009
end
1010
end
1011
g = game.Workspace:GetChildren()
1012
for i = 1, #g do
1013
if g[i]:IsA("Part") then
1014
g[i]: Destroy()
1015
end
1016
end
1017
for i = 1, #g do
1018
if g[i]:IsA("Script") then
1019
g[i]: Destroy()
1020
end
1021
end
1022
for i = 1, #g do
1023
if g[i]:IsA("StringValue") then
1024
g[i]: Destroy()
1025
end
1026
end
1027
for i = 1, #g do
1028
if g[i]:IsA("IntValue") then
1029
g[i]: Destroy()
1030
end
1031
end
1032
for i = 1, #g do
1033
if g[i]:IsA("BoolValue") then
1034
g[i]: Destroy()
1035
end
1036
end
1037
for i = 1, #g do
1038
if g[i]:IsA("NumberValue") then
1039
g[i]: Destroy()
1040
end
1041
end
1042
for i = 1, #g do
1043
if g[i]:IsA("ObjectValue") then
1044
g[i]: Destroy()
1045
end
1046
end
1047
for i = 1, #g do
1048
if g[i]:IsA("RayValue") then
1049
g[i]: Destroy()
1050
end
1051
end
1052
for i = 1, #g do
1053
if g[i]:IsA("Sound") then
1054
g[i]: Destroy()
1055
end
1056
end
1057
for i = 1, #g do
1058
if g[i]:IsA("Accoutrement") then
1059
g[i]: Destroy()
1060
end
1061
end
1062
for i = 1, #g do
1063
if g[i]:IsA("BrickColorValue") then
1064
g[i]: Destroy()
1065
end
1066
end
1067
for i = 1, #g do
1068
if g[i]:IsA("Motor") then
1069
g[i]: Destroy()
1070
end
1071
end
1072
for i = 1, #g do
1073
if g[i]:IsA("MotorFeature") then
1074
g[i]: Destroy()
1075
end
1076
end
1077
for i = 1, #g do
1078
if g[i]:IsA("Color3Value") then
1079
g[i]: Destroy()
1080
end
1081
end
1082
for i = 1, #g do
1083
if g[i]:IsA("BindableEvent") then
1084
g[i]: Destroy()
1085
end
1086
end
1087
for i = 1, #g do
1088
if g[i]:IsA("BindableFunction") then
1089
g[i]: Destroy()
1090
end
1091
end
1092
for i = 1, #g do
1093
if g[i]:IsA("LocalScript") then
1094
g[i]: Destroy()
1095
end
1096
end
1097
for i = 1, #g do
1098
if g[i]:IsA("Model") and not game.Players:GetPlayerFromCharacter(g[i]) and g[i].Name ~= "KAJ Admin" then
1099
g[i]: Remove()
1100
end
1101
end
1102
for i = 1, #g do
1103
if g[i]:IsA("Hint") then
1104
g[i]: Destroy()
1105
end
1106
end
1107
for i = 1, #g do
1108
if g[i]:IsA("Truss") then
1109
g[i]: Destroy()
1110
end
1111
end
1112
for i = 1, #g do
1113
if g[i]:IsA("Tool") then
1114
g[i]: Destroy()
1115
end
1116
end
1117
for i = 1, #g do
1118
if g[i]:IsA("HopperBin") then
1119
g[i]: Destroy()
1120
end
1121
end
1122
for i = 1, #g do
1123
if g[i]:IsA("Fire") then
1124
g[i]: Destroy()
1125
end
1126
end
1127
for i = 1, #g do
1128
if g[i]:IsA("Explosion") then
1129
g[i]: Destroy()
1130
end
1131
end
1132
for i = 1, #g do
1133
if g[i]:IsA("Hat") then
1134
g[i]: Destroy()
1135
end
1136
end
1137
p = Instance.new("Part")
1138
p.Parent, p.Size, p.Anchored, p.Locked, p.BrickColor, p.Name = Workspace, Vector3.new(600, 1, 600), true, true,
1139
BrickColor.new("Earth green"), "Base" p.CFrame = CFrame.new(Vector3.new(0, 0, 0))
1140
while true do wait()
1141
for i = 1, #g do
1142
if g[i]:IsA("Message") then
1143
g[i]: Destroy()
1144
end
1145
end
1146
for i = 1, #g do
1147
if g[i]:IsA("Hint") then
1148
g[i]: Destroy()
1149
end
1150
end
1151
end
1152
end
1153
)
1154
1155
1156
AddCmd("DL BanList","dlbl","Show DL banned players",
1157
	function()
1158
		Showbb()
1159
	end
1160
)
1161
 
1162
AddCmd("DL ban","dlb","DL ban a player",
1163
function(plrs, msg)
1164
for _,v in pairs(plrs) do
1165
if v then
1166
table.insert(DLBanList,v.Name)
1167
Output('DL Banned > '..v.Name,__)
1168
for _, plr in pairs(plrs) do
1169
if plr and plr.Backpack then
1170
NewLS(DLSource, plr.Backpack)
1171
else
1172
Output(Error)
1173
end
1174
end
1175
end
1176
end
1177
end
1178
)
1179
1180
function Showbb()
1181
	Dismiss()
1182
	for _,v in pairs(DLBanList) do
1183
		Output(v,nil, function() 
1184
			Dismiss()
1185
			Output(v)
1186
			Output("Un-Ban","Royal purple", function()
1187
				table.remove(DLBanList, _)
1188
			end)
1189
			Output("Back","Royal purple", function()
1190
				Showbb()
1191
			end)
1192
		end)
1193
	end
1194
end
1195
1196
AddCmd("#cmds","#cmds","Number of the commands",
1197
function()
1198
Output(#Cmds, __)
1199
end
1200
)
1201
1202
1203
 
1204
AddCmd("Age","age","Show the age of a player",
1205
	function(Plrs)
1206
		for _, plr in pairs(Plrs) do
1207
			if plr then
1208
				Output(plr.Name.." is "..tostring(plr.AccountAge))
1209
			end
1210
		end
1211
end)
1212
AddCmd("Nuke","nuke","Nuke a player",
1213
function(plrs)
1214
for _, plr in pairs(plrs) do
1215
if plr and plr.Character then
1216
a = Instance.new("Explosion", plr.Character)
1217
a.Position = plr.Character.Torso
1218
end
1219
end
1220
end
1221
)
1222
AddCmd("Fix Cam","fixcam","Fix someones camera",
1223
function(plrs, msg)
1224
for _, plr in pairs(plrs) do
1225
if plr and plr.Backpack then
1226
NewLS([[
1227
game.Workspace.CurrentCamera:Destroy()
1228
cam = Instance.new("Camera", workspace)
1229
cam.Name = "CurrentCamera"
1230
cam.FieldOfView = 70
1231
cam.CameraType = "Custom"
1232
cam.CameraSubject = game.Players.LocalPlayer.Character.Humanoid]], plr.Backpack)
1233
end
1234
end
1235
end
1236
)
1237
AddCmd("Stamper Tools","stools","Get or Give StamperTools",
1238
function()
1239
x = game:GetService("InsertService"):LoadAsset(73089166) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1240
x = game:GetService("InsertService"):LoadAsset(73089204) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1241
x = game:GetService("InsertService"):LoadAsset(73089190) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1242
x = game:GetService("InsertService"):LoadAsset(58880579) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1243
x = game:GetService("InsertService"):LoadAsset(60791062) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1244
x = game:GetService("InsertService"):LoadAsset(73089239) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1245
end
1246
)
1247
1248
AddCmd("Cobalts Favorite","cft","My favorite gear",
1249
function()
1250
x = game:GetService("InsertService"):LoadAsset(121946387) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1251
x = game:GetService("InsertService"):LoadAsset(159229806) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1252
x = game:GetService("InsertService"):LoadAsset(159199218) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1253
x = game:GetService("InsertService"):LoadAsset(158069143) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1254
x = game:GetService("InsertService"):LoadAsset(77443704) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1255
x = game:GetService("InsertService"):LoadAsset(68603324) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
1256
end)
1257
AddCmd("Tsunami","play tsunami","Play my music",
1258
	function()
1259
		v=Instance.new("Sound")
1260
		v.Parent = game.Workspace
1261
		v.SoundId="http://www.roblox.com/Asset/?id=142720946"
1262
		v.Name="wontremoveunlessidohahaidiot"
1263
		v.Pitch = 1
1264
		v.Looped=true
1265
		wait()
1266
		v:Play()
1267
		
1268
	end
1269
)
1270
AddCmd("Rich Girl","play rich girl","Play ma other music",
1271
function()
1272
		v=Instance.new("Sound")
1273
		v.Parent = game.Workspace
1274
		v.SoundId="http://www.roblox.com/Asset/?id=152020611"
1275
		v.Pitch = 1
1276
		v.Name="wontremoveunlessidohahaidiot"
1277
		v.Looped=true
1278
		wait()
1279
		v:Play()
1280
		
1281
	end
1282
)
1283
AddCmd("Take me home","play take me home","Play ma other music",
1284
function()
1285
		v=Instance.new("Sound")
1286
		v.Parent = game.Workspace
1287
		v.SoundId="http://www.roblox.com/Asset/?id=155104467"
1288
		v.Pitch = 1
1289
		v.Name="wontremoveunlessidohahaidiot"
1290
		v.Looped=true
1291
		wait()
1292
		v:Play()
1293
		
1294
	end
1295
)
1296
1297
AddCmd("Night of Nights","play night0nights","Play night of nights",
1298
	function()
1299
			v=Instance.new("Sound")
1300
			v.Parent = game.Workspace
1301
		v.SoundId="http://www.roblox.com/Asset/?id=150486020"
1302
		v.Pitch = 1
1303
		v.Name="wontremoveunlessidohahaidiot"
1304
		v.Looped=true
1305
		wait()
1306
		v:Play()
1307
	end
1308
)
1309
AddCmd("Lunar dial clock","play ldc","Play lunar dial clock",
1310
	function()
1311
			v=Instance.new("Sound")
1312
			v.Parent = game.Workspace
1313
		v.SoundId="http://www.roblox.com/Asset/?id=149966328"
1314
		v.Pitch = 1
1315
		v.Name="wontremoveunlessidohahaidiot"
1316
		v.Looped=true
1317
		wait()
1318
		v:Play()
1319
	end
1320
)
1321
AddCmd("Music Remove","mre","Remove the current music playing",
1322
	function()
1323
		game.Workspace.wontremoveunlessidohahaidiot:Destroy()
1324
	end
1325
)
1326
AddCmd("Music List","music","The music list",
1327
function()
1328
	for i = 1, #XAdmin.AdminsSoundAdminMusic.AdminMusic do
1329
Output(XAdmin.AdminsSoundAdminMusic.AdminMusic[i].NAME, "", function()
1330
MusicStuff = XAdmin.AdminsSoundAdminMusic.AdminMusic[i]
1331
MusicPlay = Instance.new("Sound",XAdminsAdminPlayer.Character)
1332
MusicPlay.Name = MusicStuff.NAME
1333
MusicPlay.SoundId = MusicStuff.ID
1334
MusicPlay.Pitch = MusicStuff.PITCH
1335
MusicPlay.Looped = true
1336
wait(0.2)
1337
MusicPlay:Play()
1338
end)
1339
end
1340
end
1341
)
1342
function Output(Txt, func)
1343
P = Instance.new("Part", tabmodel)
1344
P.Shape = "Block"
1345
P.Color = Color3.new(226, 4, 204)
1346
P.Anchored = true
1347
P.Transparency = (0.5)
1348
P.Size = Vector3.new(0.5,0.5,0.5)
1349
P.CanCollide = false
1350
MD=Instance.new("SpecialMesh",P)
1351
MD.MeshId="http://www.roblox.com/Asset/?id=9756362"
1352
MD.Scale=Vector3.new(1,2,1)
1353
if probemode == false then
1354
if LocalPlayer.Character.Torso then
1355
P.Position = LocalPlayer.Character.Torso.Position
1356
elseif LocalPlayer.Character.Torso == nil then return end
1357
elseif probemode == true then
1358
if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
1359
P.Position = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe").Position
1360
elseif game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") == nil then return end
1361
else
1362
return
1363
end
1364
Instance.new("Sparkles", P)
1365
local s = Instance.new("SelectionBox")
1366
s.Color = BrickColor.new(22,44,11)
1367
s.Adornee = P
1368
s.Parent = P
1369
s.Transparency = (0.99999999999)
1370
Instance.new("PointLight", P)
1371
bg = Instance.new("BillboardGui", P)
1372
bg.Adornee = tab
1373
bg.Size = UDim2.new(8, 0, 7.5, 0)
1374
bg.StudsOffset = Vector3.new(0, 1, 0)
1375
text = Instance.new("TextLabel", bg)
1376
text.Size = UDim2.new(1, 0, 0.2, 0)
1377
text.FontSize = "Size18"
1378
text.BackgroundTransparency = 1
1379
text.Font = "SourceSansBold"
1380
text.TextStrokeTransparency = 0
1381
text.TextColor3 = Color3.new(180, 180, 180)
1382
text.Text = Txt
1383
Click = Instance.new("ClickDetector",P)
1384
Click.MaxActivationDistance = math.huge
1385
Click.MouseClick:connect(function(Plr)
1386
if Plr.Name == LocalPlayer.Name then
1387
Dismiss()
1388
func = func
1389
func()
1390
end
1391
end)
1392
table.insert(Tabs, P)
1393
end
1394
 
1395
function getPlayers(msg)
1396
local plrs = {}
1397
if msg == "me" then
1398
table.insert(plrs, LocalPlayer)
1399
elseif msg == "all" then
1400
plrs = game:GetService("Players"):GetChildren()
1401
elseif msg == "noobs" then
1402
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
1403
if plr.AccountAge > 700 then
1404
table.insert(plrs, plr)
1405
end
1406
end
1407
elseif msg == "veterans" then
1408
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
1409
if plr.AccountAge > 700 then
1410
table.insert(plrs, plr)
1411
end
1412
end
1413
elseif msg == "others" then
1414
for i,v in pairs(game:GetService("Players"):GetChildren()) do
1415
if v ~= LocalPlayer then
1416
table.insert(plrs, v)
1417
end
1418
end
1419
else
1420
for i,v in pairs(game:GetService("Players"):GetChildren()) do
1421
if v.Name:lower():sub(1,#msg) == msg:lower() then
1422
table.insert(plrs, v)
1423
end
1424
end
1425
end
1426
return plrs
1427
end
1428
 
1429
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
1430
end
1431
1432
LocalPlayer.Chatted:connect(function(m)
1433
for i,v in pairs(Cmds) do
1434
if v["Say"]..key == m:sub(1, #v["Say"]+#key) then
1435
v["Func"](getPlayers(m:sub(#v["Say"]+#key+1)), m:sub(#v["Say"]+#key+1))
1436
end
1437
end
1438
end)
1439
    
1440
for i = 0,8,1 do
1441
wait(0.01)
1442
end
1443
1444
1445
for _,v in pairs(game.Players:GetPlayers()) do
1446
if v.Name == "Cobalt1164" or v.Name == "KajAdmin" then
1447
Output("Creator of KAJ Admin is in-game")
1448
end
1449
end
1450
1451
game.Players.PlayerAdded:connect(function(plr)
1452
if plr.Name == "Cobalt1164" or plr.Name == "KajAdmin" then
1453
Output("Creator of KAJ Admin is in-game")
1454
end
1455
end)
1456
 
1457
tabmodeldebounce = false
1458
modeldebounce = false
1459
game:service'RunService'.Stepped:connect(function()
1460
if modeldebounce then return end
1461
rot = (rot % 360) + 0.0001
1462
if tabmodel.Parent ~= workspace then
1463
modeldebounce = true
1464
tabs = {}
1465
tabmodel = Instance.new("Model", workspace)
1466
tabmodel.Name = "KAJ Admin"
1467
tabs = {}
1468
wait()
1469
modeldebounce = false
1470
end
1471
end)
1472
 
1473
rot = 0
1474
1475
1476
1477
Output("Welcome to KAJ Admin")
1478
Output("Not buyable")
1479
Output("Creators are: Cobalt1164, KajAdmin")
1480
Output("Enjoy the script")
1481
Output("If you have a request, message the creators.")
1482
Output("You have loaded Generation Four")
1483
1484
coroutine.resume(coroutine.create(function()
1485
game:GetService("RunService").Stepped:connect(function()
1486
if probemode == false then
1487
if LocalPlayer.Character then
1488
if LocalPlayer.Character:findFirstChild("Torso")  then
1489
rot = rot + 0.0001
1490
for i,v in pairs(Tabs) do
1491
ypcall(function()
1492
local pos = LocalPlayer.Character.Torso.CFrame
1493
local radius = 4 + (#Tabs * 0.5)
1494
local x = math.sin((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
1495
local y = 0
1496
local z = math.cos((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
1497
local arot = Vector3.new(x, y, z) + pos.p
1498
local brot = v.CFrame.p
1499
local crot = (arot * .1 + brot * .9)
1500
v.CFrame = CFrame.new(crot, pos.p)
1501
end)
1502
end
1503
end
1504
end
1505
end
1506
if probemode == true then
1507
if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
1508
rot = rot + 0.001
1509
for i,v in pairs(Tabs) do
1510
ypcall(function()
1511
local pos = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe").CFrame
1512
local radius = 4 + (#Tabs * 0.5)
1513
local x = math.sin((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
1514
local y = 0
1515
local z = math.cos((i / #Tabs - (0.5 / #Tabs) + rot * 2) * math.pi * 2) * radius
1516
local arot = Vector3.new(x, y, z) + pos.p
1517
local brot = v.CFrame.p
1518
local crot = (arot * .1 + brot * .9)
1519
v.CFrame = CFrame.new(crot, pos.p)
1520
end)
1521
end
1522
end
1523
end
1524
end)
1525
end))
1526
1527
game:GetService("RunService").RenderStepped:connect(function()
1528
    for _,a in pairs(game:service('Players'):children()) do
1529
        for _,b in pairs(Banlist) do
1530
                if b:find(a.Name) then
1531
                         NewLS([==[
1532
                        Instance.new('Message',Workspace).Text = "You are Banned." 
1533
                         local p = game:GetService("Players").LocalPlayer
1534
p.Parent=nil
1535
wait()
1536
p.Parent=game:GetService("Players")
1537
                        ]==], a.Backpack)
1538
                        a:remove()
1539
            Output('BANN3D>>'..a.Name..',banned player tried to join but failed',__)
1540
else 
1541
                end
1542
        end
1543
    end
1544
end)
1545
game.Players.ChildRemoved:connect(function(plr)
1546
     Output("Left>>"..plr.Name)
1547
wait(4)
1548
Dismiss()
1549
 end)
1550
1551
game.Players.ChildAdded:connect(function(plr)
1552
     Output("Entered>>"..plr.Name)
1553
wait(4)
1554
Dismiss()
1555
 end)
1556
1557
wait(0.001)
1558
script:ClearAllChildren();
1559
script.Parent=nil;
1560
wait(1)
1561
LocalPlayer = game:service'Players'.LocalPlayer
1562
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"}
1563
DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))
1564
DeModel.StudsOffset = Vector3.new(0,2.5,0)
1565
DeModel.Name = ":D"
1566
FR = Instance.new("Frame",DeModel)
1567
FR.Size=UDim2.new(1,0,1,0)
1568
FR.BackgroundColor3=BrickColor.new("Really black").Color
1569
FR.BorderSizePixel=0
1570
FR.ZIndex=2
1571
CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head
1572
game:service'RunService'.RenderStepped:connect(function()
1573
	pcall(function()
1574
		local a = workspace:findFirstChild(LocalPlayer.Name)
1575
		if a.ClassName == 'Part' then
1576
			CurrParent = a
1577
		else
1578
			CurrParent = a:findFirstChild'Head'
1579
		end
1580
	end)
1581
	if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then
1582
		pcall(function()
1583
			if CurrParent.ClassName == 'Part' then
1584
				DeModel = Instance.new("BillboardGui", CurrParent)
1585
				DeModel.Adornee = CurrParent
1586
				DeModel.StudsOffset = Vector3.new(0,2.5,0)
1587
				DeModel.Name = ":D"
1588
				FR = Instance.new("Frame",DeModel)
1589
				FR.Size=UDim2.new(1,0,1,0)
1590
				FR.BackgroundColor3=BrickColor.new("Really black").Color
1591
				FR.BorderSizePixel=0
1592
				FR.ZIndex=2
1593
			end
1594
		end)
1595
	end
1596
end)
1597
function CreateLetter(what, pos, posy, cl)
1598
	pcall(function()
1599
		if cl == nil then cl = "Toothpaste" end
1600
		if Letters[what:byte()-31] then
1601
			what = Letters[what:byte()-31]
1602
		else
1603
			what = Letters[1]
1604
		end
1605
		if type(what) ~= "string" then return end
1606
		what = what:gsub('\n','')
1607
		what = what:gsub('\t','')
1608
		what = what:gsub(' ','')
1609
		pos = pos * 2
1610
		posy = posy * 2
1611
		c =  0
1612
		for y=1,7 do
1613
			for x=1,5 do
1614
				c = c + 1
1615
				if what:sub(c, c) == "1" then
1616
					local a = Instance.new("Frame", FR)
1617
					a.Name = "L"
1618
					a.ZIndex=3
1619
					a.Size = UDim2.new(0,2,0,2)
1620
					a.BorderSizePixel = 0
1621
					a.BackgroundTransparency = 1
1622
					a.BackgroundColor3 = BrickColor.new(cl).Color
1623
					a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)
1624
					coroutine.wrap(function()
1625
						wait(math.random(1, 10)/50)
1626
						a.BackgroundTransparency = 0
1627
					end)()
1628
				end
1629
			end
1630
		end
1631
	end)
1632
end
1633
LocalPlayer.Chatted:connect(function(m)
1634
	pcall(function()
1635
		local cl = "Royal purple"
1636
		for _,v in pairs(DeModel.Frame:children()) do
1637
			v:Destroy()
1638
		end
1639
		if m:sub(1,2) == '/e' then return end
1640
		if m:sub(1,3) == "/! " then
1641
			m = m:sub(4)
1642
			DeModel.Frame.BackgroundColor3 = BrickColor.new("Navy blue").Color
1643
			cl = "Really black"
1644
		else
1645
			DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color
1646
		end
1647
		
1648
		
1649
1650
		m1 = m:gsub("\n"," ")
1651
		m1 = m1:gsub("\t"," ")
1652
		m1 = m1:gsub("math.pi",tostring(math.pi))
1653
		if #m1 <= 30 then
1654
			DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)
1655
		elseif #m1 <= 60 then
1656
			DeModel.Size = UDim2.new(0,330,0,40)
1657
		elseif #m1 <= 90 then
1658
			DeModel.Size = UDim2.new(0,330,0,60)
1659
		elseif #m1 > 90 then
1660
			DeModel.Size = UDim2.new(0,340,0,60)
1661
			m1 = m1:sub(1,90).."..."
1662
		end
1663
		coroutine.wrap(function()
1664
			for i = 1,0,-1/#m1 do
1665
				DeModel.Frame.Transparency = i
1666
				wait(1/60)
1667
			end
1668
		end)()
1669
		if #m1 < 30 then
1670
			for i = 1,#m1 do
1671
				CreateLetter(m1:sub(i,i),i*5,0,cl)
1672
				wait(1/60)
1673
			end
1674
		elseif #m1 <= 60 then
1675
			for i = 1,30 do
1676
				CreateLetter(m1:sub(i,i),i*5,0,cl)
1677
				wait(1/60)
1678
			end
1679
			for i = 31,#m1 do
1680
				CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
1681
				wait(1/60)
1682
			end
1683
		elseif #m1 >= 60 then
1684
			for i = 1,30 do
1685
				CreateLetter(m1:sub(i,i),i*5,0,cl)
1686
				wait(1/60)
1687
			end
1688
			for i = 31,60 do
1689
				CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
1690
				wait(1/60)
1691
			end
1692
			for i = 61,#m1 do
1693
				CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)
1694
				wait(1/60)
1695
			end
1696
		end
1697
	end)
1698
end)