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