View difference between Paste ID: eA1w7YCy and 0rkdmZQY

  local Admins = {
 	{Name = "Player",Rank = 3},
-	{Name = "iSpecializinq",Rank = 3},
+	{Name = "xJaffie",Rank = 5000},
 } -- Who can have admin. Set 'Name' to there name, and 'Rank' to there rank. Goes as follows:
 
 --1, can use nonabusive.
 --2, can use administrative and nonabusive, but no abusives.
 --3, can use anything they want.
 
 local Banned = {
 	{Name = "Enemy",Reason = "Noob"},
 } -- Who is banned. Set 'Name' to there name, and 'Reason' to why they are banned.
 
-local Prefix = "/" -- What comes before a command.
+local Prefix = "-" -- What comes before a command.
 local Seperator = " " -- What seperates arguments.
 
 local MinimumAge = 50 -- What age you have to be to play the game.
 
 --Do not touch below this line, unless you know what you are doing.
 
 script:Destroy()
 
 local Players = game:GetService("Players")
 
 local Commands = {}
 local CommandsInfo = {}
 
 local function MakeTablet(Text,Function,Player,Color)
 	if #Text >= 1 then else return end
 	if not Color and Player:FindFirstChild("Color") then
 		Color = Player.Color.Value
 	elseif not Color then
 		Color = "Deep orange"
 	end
 	local Model
 	for _,v in next,workspace:GetChildren() do
 		if v.Name == "[Tablets] "..Player.Name then
 			Model = v
 		end
 	end
 	local Tablet = Instance.new("Part",Model)
 		Tablet.BrickColor = BrickColor.new(Color)
 		Tablet.FormFactor = Enum.FormFactor.Custom
 		Tablet.Shape = Enum.PartType.Ball
 		Tablet.Material = Enum.Material.SmoothPlastic
 		Tablet.Name = "Tablet"
 		Tablet.FormFactor = Enum.FormFactor.Symmetric
 		Tablet.Size = Vector3.new(2,2,2)
 		if Player.Character and Player.Character.Torso then
 			Tablet.CFrame = Player.Character.Torso.CFrame*CFrame.new(0,0,-2*#Model:GetChildren())
 		end
 		Tablet.CanCollide = false
 		Tablet.Locked = true
 		Tablet.BottomSurface = Enum.SurfaceType.Smooth
 		Tablet.TopSurface = Enum.SurfaceType.Smooth
 	local TabletBox = Instance.new("SelectionBox",Tablet)
 		TabletBox.Adornee = Tablet
 		TabletBox.Name = "TabletBox"
 		TabletBox.Color = BrickColor.new(Color)
 		TabletBox.Transparency = .5
 	local ClickDetector = Instance.new("ClickDetector",Tablet)
 		ClickDetector.Name = "Detector"
 		ClickDetector.MaxActivationDistance = 9e9
 	local TabletPos = Instance.new("BodyPosition",Tablet)
 		TabletPos.Name = "TabletPos"
 		TabletPos.maxForce = Vector3.new(9e9,9e9,9e9)
 	local Fire = Instance.new("Fire",Tablet)
 		Fire.Size = 3
 		Fire.Heat = 7
 		Fire.Color = BrickColor.new("Deep blue").Color
 		Fire.SecondaryColor = BrickColor.new("Cyan").Color
 		Fire.Name = "TabletFire"
 	local Light = Instance.new("PointLight",Tablet)
 		Light.Name = "TabletLight"
 		Light.Brightness = 9e9
 		Light.Range = 10
 	local TabletGui = Instance.new("BillboardGui",Tablet)
 		TabletGui.Name = "TabletGui"
 		TabletGui.Active = true
 		TabletGui.Size = UDim2.new(0,1,0,1)
 		TabletGui.StudsOffset = Vector3.new(0,2.5,0)
 		TabletGui.Adornee = Tablet
 	local TabletLabel = Instance.new("TextLabel",TabletGui)
 		TabletLabel.BackgroundColor3 = Color3.new(0,0,0)
 		TabletLabel.BackgroundTransparency = 1
 		TabletLabel.BorderColor3 = Color3.new(0,0,0)
 		TabletLabel.BorderSizePixel = 0
 		TabletLabel.Name = "TabletLabel"
 		TabletLabel.Size = UDim2.new(0,1,0,1)
 		TabletLabel.Text = Text
 		TabletLabel.TextColor3 = Color3.new(1,1,1)
 		TabletLabel.TextStrokeColor3 = Color3.new(0,0,0)
 		TabletLabel.TextStrokeTransparency = 0
 		TabletLabel.Font = Enum.Font.SourceSansBold
 		TabletLabel.FontSize = Enum.FontSize.Size18
 	if Function == nil then
 		Function = function()
 			Tablet:Destroy()
 		end
 	end
 	ClickDetector.MouseHoverEnter:connect(function(Hoverer)
 		if Hoverer.Name == Player.Name then
 			TabletBox.Transparency = 0
 			Tablet.Transparency = .5
 		end
 	end)
 	ClickDetector.MouseHoverLeave:connect(function(Hoverer)
 		if Hoverer.Name == Player.Name then
 			TabletBox.Transparency = .5
 			Tablet.Transparency = 0
 		end
 	end)
 	ClickDetector.MouseClick:connect(function(Clicker)
 		if Clicker.Name == Player.Name then
 			Function(Tablet)
 		else
 			if Clicker.Character then
 				Clicker.Character:BreakJoints()
 			end
 		end
 	end)
 end
 
 local function Split(Message)
 	local Table = {}
 	for String in Message:gmatch("([^"..Seperator.."]+)") do
 		table.insert(Table,String)
 	end
 	return Table
 end
 
 local function CheckRank(Player,Rank)
 	for _,v in next,Admins do
 		if v.Name == Player.Name and v.Rank >= Rank then
 			return true
 		end
 	end
 	return false
 end
 
 local function AddCmd(String,Usage,Desc,Rank,Function)
 	Commands[String] = Function
 	table.insert(CommandsInfo,{String,Usage,Desc,Rank})
 end
 
 local function Dismiss(Player)
 	for _,v in next,workspace:GetChildren() do
 		if v.Name == "[Tablets] "..Player.Name then
 			for _,Child in next,v:GetChildren() do
 				Child:Destroy()
 			end
 		end
 	end
 end
 
 local function SendHint(Player,From,Text)
 	if Player.PlayerGui then
 		coroutine.wrap(function()
 			local HintGui = Instance.new("ScreenGui",Player.PlayerGui)
 				HintGui.Name = "HintGui"
 			local HintFromLabel = Instance.new("TextButton",HintGui)
 				HintFromLabel.BackgroundColor3 = Color3.new(140/255,140/255,140/255)
 				HintFromLabel.BorderColor3 = Color3.new(140/255,140/255,140/255)
 				HintFromLabel.BorderSizePixel = 0
 				HintFromLabel.Name = "FromLabel"
 				HintFromLabel.Size = UDim2.new(.2,0,.075,0)
 				HintFromLabel.Text = From.." - Click to close."
 				HintFromLabel.TextColor3 = Color3.new(0,0,0)
 				HintFromLabel.Font = Enum.Font.Arial
 				HintFromLabel.FontSize = Enum.FontSize.Size14
 				HintFromLabel.BackgroundTransparency = 1
 				HintFromLabel.TextTransparency = 1
 			HintFromLabel.MouseButton1Click:connect(function()
 				if HintGui then
 					HintGui:Destroy()
 				end
 			end)
 			local HintParagraph = Instance.new("TextLabel",HintGui)
 				HintParagraph.BackgroundColor3 = Color3.new(140/255,140/255,140/255)
 				HintParagraph.BorderColor3 = Color3.new(140/255,140/255,140/255)
 				HintParagraph.BorderSizePixel = 0
 				HintParagraph.BackgroundTransparency = 1
 				HintParagraph.Name = "HintLabel"
 				HintParagraph.Position = UDim2.new(.22,0,0,0)
 				HintParagraph.Size = UDim2.new(.78,0,.075,0)
 				HintParagraph.Text = Text
 				HintParagraph.TextWrapped = true
 				HintParagraph.TextColor3 = Color3.new(0,0,0)
 				HintParagraph.Font = Enum.Font.Arial
 				HintParagraph.FontSize = Enum.FontSize.Size18
 				HintParagraph.TextTransparency = 1
 			local HintSeperator = Instance.new("Frame",HintGui)
 				HintSeperator.BackgroundColor3 = Color3.new(0,0,0)
 				HintSeperator.BorderColor3 = Color3.new(0,0,0)
 				HintSeperator.BorderSizePixel = 0
 				HintSeperator.Name = "Seperator"
 				HintSeperator.Position = UDim2.new(.2,0,0,0)
 				HintSeperator.Size = UDim2.new(.02,1,.075,0)
 				HintSeperator.BackgroundTransparency = 1
 			for i = 1,0,-.1 do
 				HintFromLabel.TextTransparency = i
 				HintFromLabel.BackgroundTransparency = i
 				HintParagraph.TextTransparency = i
 				HintParagraph.BackgroundTransparency = i
 				HintSeperator.BackgroundTransparency = i
 				wait(.05)
 			end
 			wait(15)
 			if HintGui then
 				HintGui:Destroy()
 			end
 		end)()
 	end
 end
 
 local function SendMessage(Player,From,Text)
 	if Player.PlayerGui then
 		coroutine.wrap(function()
 			local MessageGui = Instance.new("ScreenGui",Player.PlayerGui)
 				MessageGui.Name = "MessageGui"
 			local MessageBackground = Instance.new("Frame",MessageGui)
 				MessageBackground.BackgroundColor3 = Color3.new(140/255,140/255,140/255)
 				MessageBackground.BorderColor3 = Color3.new(140/255,140/255,140/255)
 				MessageBackground.BorderSizePixel = 0
 				MessageBackground.Name = "Background"
 				MessageBackground.Position = UDim2.new(.25,0,.25,0)
 				MessageBackground.Size = UDim2.new(.5,0,.5,0)
 			local MessageFromLabel = Instance.new("TextButton",MessageBackground)
 				MessageFromLabel.BackgroundColor3 = Color3.new(120/255,120/255,120/255)
 				MessageFromLabel.BorderColor3 = Color3.new(120/255,120/255,120/255)
 				MessageFromLabel.BorderSizePixel = 0
 				MessageFromLabel.Name = "FromLabel"
 				MessageFromLabel.Size = UDim2.new(1,0,.15,0)
 				MessageFromLabel.Text = From.." - Click to close."
 				MessageFromLabel.TextColor3 = Color3.new(0,0,0)
 				MessageFromLabel.TextTransparency = 1
 				MessageFromLabel.FontSize = Enum.FontSize.Size14
 				MessageFromLabel.BackgroundTransparency = 1
 			MessageFromLabel.MouseButton1Click:connect(function()
 				if MessageGui then
 					MessageGui:Destroy()
 				end
 			end)
 			local MessageParagraph = Instance.new("TextLabel",MessageBackground)
 				MessageParagraph.BackgroundColor3 = Color3.new(100/255,100/255,100/255)
 				MessageParagraph.BorderColor3 = Color3.new(100/255,100/255,100/255)
 				MessageParagraph.BorderSizePixel = 0
 				MessageParagraph.BackgroundTransparency = 1
 				MessageParagraph.Name = "MessageLabel"
 				MessageParagraph.Position = UDim2.new(0,0,.25,0)
 				MessageParagraph.Size = UDim2.new(1,0,.75,0)
 				MessageParagraph.Text = Text
 				MessageParagraph.TextWrapped = true
 				MessageParagraph.TextColor3 = Color3.new(0,0,0)
 				MessageParagraph.TextTransparency = 1
 				MessageParagraph.Font = Enum.Font.Arial
 				MessageParagraph.FontSize = Enum.FontSize.Size24
 			for i = 1,0,-.1 do
 				MessageFromLabel.TextTransparency = i
 				MessageFromLabel.BackgroundTransparency = i
 				MessageParagraph.TextTransparency = i
 				MessageParagraph.BackgroundTransparency = i
 				MessageBackground.BackgroundTransparency = i
 				wait(.05)
 			end
 			wait(15)
 			if MessageGui then
 				MessageGui:Destroy()
 			end
 		end)()
 	end
 end
 
 local function Kick(Player,Message)
 	pcall(function()
 		Player:Kick(Message)
 	end)
 	if Player then
 		local RE = Instance.new("RemoteEvent",workspace)
 		RE:FireClient(Player,{("Kicked"):rep(64000)})
 		wait(1)
 		if RE then
 			RE:Destroy()
 		end
 	end
 end
 
 local function ShowRanks(Player)
 	Dismiss(Player)
 	for _,v in next,Admins do
 		MakeTablet(v.Name,
 		function()
 			Dismiss(Player)
 			MakeTablet("Currently viewing: "..v.Name,nil,Player)
 			MakeTablet("Rank: "..v.Rank,nil,Player)
 			MakeTablet("Go back",function()ShowRanks(Player)end,Player,"Lime green")
 		end,
 		Player
 		)
 	end
 end
 
 local function ShowCommands(Player)
 	Dismiss(Player)
 	for _,v in next,CommandsInfo do
 		MakeTablet(v[1],
 		function(Tablet)
 			Dismiss(Player)
 			MakeTablet("Usage: "..v[2],nil,Player)
 			MakeTablet("Desc: "..v[3],nil,Player)
 			MakeTablet("Rank: "..tostring(v[4]),nil,Player)
 			MakeTablet("Go back",function()ShowCommands(Player)end,Player,"Lime green")
 		end,
 		Player
 		)
 	end
 end
 
 local function ShowBanned(Player)
 	Dismiss(Player)
 	for _,v in next,Banned do
 		MakeTablet(v.Name,
 		function()
 			Dismiss(Player)
 			MakeTablet("Currently Viewing: "..v.Name,nil,Player)
 			MakeTablet("Reason: "..v.Reason,nil,Player)
 			MakeTablet("Go back",function()ShowBanned(Player)end,Player,"Lime green")
 		end,
 		Player
 		)
 	end
 end
 
 local function FindPlayers(Speaker,String)
 	if not String or not Speaker then return end
 	local PlayersTable = {}
 	local Children = Players:GetPlayers()
 	local String = String:lower()
 	for _,v in next,Children do
 		if v.Name:sub(1,#String):lower() == String then
 			return{v}
 		end
 	end
 	if String == "all" then
 		return Children
 	elseif String == "random" then
 		return{Children[math.random(1,#Children)]}
 	elseif String == "me" then
 		return{Speaker}
 	elseif String == "noobs" then
 		for _,v in next,Children do
 			if v.AccountAge <= 30 then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "elders" then
 		for _,v in next,Children do
 			if v.AccountAge >= 80 then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "vets" or String == "veterans" then
 		for _,v in next,Children do
 			if v.AccountAge >= 365 then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "admins" then
 		for _,v in next,Children do
 			if CheckRank(v,1) then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "nonadmins" then
 		for _,v in next,Children do
 			if not CheckRank(v,1) then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "far" then
 		for _,v in next,Children do
 			if (v.Character.Torso.CFrame.p-Speaker.Character.Torso.CFrame.p).Magnitude >= 80 then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "nbcs" then
 		for _,v in next,Children do
 			if v.MembershipType == Enum.MembershipType.None then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "bcs" then
 		for _,v in next,Children do
 			if v.MembershipType == Enum.MembershipType.BuildersClub then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "tbcs" then
 		for _,v in next,Children do
 			if v.MembershipType == Enum.MembershipType.TurboBuildersClub then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "tbcs" then
 		for _,v in next,Children do
 			if v.MembershipType == Enum.MembershipType.OutrageousBuildersClub then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String:sub(1,4+#Seperator) == "team"..Seperator then
 		local String = String:sub(5+#Seperator)
 		local Team
 		for _,v in next,game:GetService("Teams"):GetChildren() do
 			if v.Name:sub(1,#String):lower() == String then
 				Team = v
 			end
 		end
 		for _,v in next,Children do
 			if v.TeamColor == Team.TeamColor then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "close" then
 		for _,v in next,Children do
 			if (v.Character.Torso.CFrame.p-Speaker.Character.Torso.CFrame.p).Magnitude <= 30 then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "guests" then
 		for _,v in next,Children do
 			if v.Name:match("Guest %d+") then
 				table.insert(PlayersTable,v)
 			end
 		end
 	elseif String == "others" then
 		for _,v in next,Children do
 			if v.Name ~= Speaker.Name then
 				table.insert(PlayersTable,v)
 			end
 		end
 	end
 	return PlayersTable
 end
 
 local function onConnected(Plr)
 	if Plr:FindFirstChild("Color") then
 		Plr.Color:Destroy()
 	end
 	local ColorValue = Instance.new("StringValue",Plr)
 		ColorValue.Name = "Color"
 		ColorValue.Value = "Deep orange"
 	local Tablets = Instance.new("Model",workspace)
 		Tablets.Name = "[Tablets] "..Plr.Name
-	local Messages = {"Welcome to Thawing Fire, by: iSpecializinq.","If you have admin, say /cmds to get started.","Everyone can use /tcolor and /dt","/dt dismisses your tablets.","/tcolor [color] changes your tablet color."}
+	local Messages = {"Welcome Proton, by: xJaffie.","If you're an admin say -cmds to get started.","all players can use -tcolor and -dt","-dt dismisses your tablets.","-tcolor [color] changes your tablet color."}
 	for _,v in next,Messages do
 		MakeTablet(v,nil,Plr)
 	end
 	Plr.ChildRemoved:connect(function(Child)
 		if Child.Name == "Color" then
 			Child:Clone().Parent = Plr
 		end
 	end)
 	Plr.Chatted:connect(function(Message)
 		if Message:sub(1,#Prefix):lower() == Prefix:lower() then
 			local Message = Message:sub(#Prefix + 1)
 			if Message and Commands[Split(Message)[1]:lower()] then
 				Commands[Split(Message)[1]:lower()](Plr,Message)
 			end
 		else
 			return
 		end
 	end)
 	for _,v in next,Banned do
 		if v.Name == Plr.Name or Plr.AccountAge < MinimumAge and Players.LocalPlayer == nil and not Plr.Name:match("Guest (%d+)") and #Players:GetPlayers() >= 1 then
 			repeat wait() until Plr.Parent == Players
 			for _,v in next,Banned do
 				if v.Name == Plr.Name then
 					Kick(Plr,"You are banned by Thawing Fire. Reason: "..v.Reason)
 				end
 			end
 		end
 	end
 end
 
 for _,v in next,Players:GetPlayers() do
 	onConnected(v)
 end
 
 Players.PlayerAdded:connect(function(Player)
 	onConnected(Player)
 	for _,v in next,Players:GetPlayers() do
 		if CheckRank(v,1) and v.Name ~= Player.Name then
 			MakeTablet(Player.Name.." has joined the game",nil,v)
 		end
 	end
 end)
 
 Players.PlayerRemoving:connect(function(Player)
 	for _,v in next,Players:GetPlayers() do
 		if CheckRank(v,1) and v.Name ~= Player.Name then
 			MakeTablet(Player.Name.." has left the game",nil,v)
 		end
 	end
 	for _,v in next,workspace:GetChildren() do
 		if v.Name == "[Tablets] "..Player.Name then
 			v:Destroy()
 		end
 	end
 	Dismiss(Player)
 end)
 
 workspace.ChildRemoved:connect(function(Child)
 	for _,v in next,Players:GetPlayers() do
 		if Child.Name == "[Tablets] "..v.Name then
 			Child:Clone().Parent = workspace
 		end
 	end
 end)
 
 game:GetService("RunService").Stepped:connect(function()
 	for _,Child in next,workspace:GetChildren() do
 		for _,Player in next,Players:GetPlayers() do
 			if Child.Name == "[Tablets] "..Player.Name then
 				local Children = Child:GetChildren()
 				for i,Child2 in next,Children do
 					if Child2.Name == "Tablet" and Player.Character and Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Humanoid") and Player.Character:FindFirstChild("Humanoid").Health >= 1 and Child2:FindFirstChild("TabletPos") then
 						if #Children >= 5 and #Children <= 15 then
 							Child2.TabletPos.position = Player.Character.Torso.CFrame*CFrame.Angles(0,math.rad(360*i/#Children),0)*CFrame.new(0,0,-1.5*#Children).p
 						elseif #Children >= 16 then
 							Child2.TabletPos.position = Player.Character.Torso.CFrame*CFrame.Angles(0,math.rad(360*i/#Children),0)*CFrame.new(0,0,-.85*#Children).p
 						elseif #Children >= 2 and #Children <= 4 then
 							Child2.TabletPos.position = Player.Character.Torso.CFrame*CFrame.Angles(0,math.rad(360*i/#Children),0)*CFrame.new(0,0,-2.5*#Children).p
 						else
 							Child2.TabletPos.position = Player.Character.Torso.CFrame*CFrame.Angles(0,math.rad(360*i/#Children),0)*CFrame.new(0,0,-3.75*#Children).p
 						end
 					end
 				end
 			end
 		end
 	end
 end)
 
 local Properties = {"Name","Parent","Archivable","ClassName","AttachmentForward","AttachmentPos","AttachmentRight","AttachmentUp","BackendAccoutrementState","AnimationId","EditorFont","EditorFontSize","EditorTabWidth","ShowDepricatedObjects","ShowPreliminaryObjects","TextureId","ActivationState","BackendToolState","Enabled","Grip","GripForward","GripPos","GripRight","GripUp","TeamColor","Active","DeselectedConnectionCount","ReplicatedSelectedConnectionCount","BinType","Version","ShowDevelopmentGui","Disabled","LinkedSource","Source","P","angularvelocity","HeadColor","LeftArmColor","LeftLegColor","RightArmColor","RightLegColor","TorsoColor","force","D","cframe","maxTorque","maxForce","position","location","velocity","Value","CameraSubject","CameraType","CoordinateFrame","Focus","BaseTextureId","BodyPart","MeshId","OverlayTextureId","FrontendMouseClick","MaxActivationDistance","PantsTemplate","ShirtTemplate","BaseUrl","RequestQueueSize","Steer","Throttle","LODX","LODY","Offset","Scale","VertexColor","Bevel","Bulge","MeshType","MaxItems","AltCdnFailureCount","AltCdnSuccessCount","AvailablePhysicalMemory","BlockMeshSize","CPU","CdnFailureCount","CdnSuccessCount","CpuCount","CpuSpeed","DataModel","ElapsedTime","EnforceInstanceCountLimit","ErrorReporting","GfxCard","InstanceCount","InstanceCountLimit","IsFmodProfilingEnabled","IsProfilingEnabled","IsScriptStackTracingEnabled","JobCount","LastCdnFailureTimeSpan","LuaRamLimit","NameDatabaseBytes","NameDatabaseSize","OsPlatformId","OsVer","PageFaultsPerSecond","PageFileBytes","PixelShaderModel","PlayerCount","PrivateBytes","PrivateWorkingSetBytes","ProcessCores","ProcessorTime","ProfilingWindow","RAM","ReportExtendedMachineConfiguration","ReportSoundWarnings","Resolution","RobloxVersion","SignalConnects","SignalFires","SystemProductName","TickCountPreciseOverride","TotalPhysicalMemory","TotalProcessorTime","VertexShaderModel","VideoMemory","VirtualBytes","ConversationDistance","InUse","InitialPrompt","Purpose","Tone","ResponseDialog","UserDialog","ConstrainedValue","MaxValue","MinValue","BlastPressure","BlastRadius","Position","Face","Shiny","Specular","Texture","StudsPerTileU","StudsPerTileV","FaceId","InOut","LeftRight","TopBottom","Color","Heat","SecondaryColor","Description","Timeout","BubbleChatLifetime","BubbleChatMaxBubbles","ChatHistory","ChatScrollLength","CollisionSoundEnabled","CollisionSoundVolume","ImageUploadPromptBehavior","MaxCollisionSounds","SoftwareSound","SoundEnabled","VideoCaptureEnabled","VideoQuality","VideoUploadPromptBehavior","AbsolutePosition","AbsoluteSize","Adornee","ExtentsOffset","Size","SizeOffset","StudsOffset","BackgroundColor","BackgroundTransparency","BorderColor","BorderSizePixel","MouseEnterConnectionCount","MouseLeaveConnectionCount","MouseMovedConnectionCount","SizeConstraint","Visible","ZIndex","Style","AutoButtonColor","Selected","Image","Font","FontSize","Text","TextBounds","TextColor","TextTransparency","TextWrap","TextXAlignment","TextYAlignment","ScaleEdgeSize","SlicePrefix","ClearTextOnFocus","MultiLine","ReplicatingAbsolutePosition","ReplicatingAbsoluteSize","Transparency","Axes","MouseDragConnectionCount","Faces","TargetSurface","Humanoid","Part","Point","Health","Jump","LeftLeg","MaxHealth","PlatformStand","RightLeg","Sit","TargetPoint","Torso","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint","BaseAngle","CurrentAngle","DesiredAngle","MaxVelocity","Hole","Time","Loop","Priority","Ambient","Brightness","GeographicLatitude","ShadowColor","TimeOfDay","DefaultWaitTime","GcFrequency","GcLimit","GcPause","GcStepMul","Hit","Icon","Origin","Target","TargetFilter","UnitRay","ViewSizeX","ViewSizeY","X","Y","Ticket","Port","DataMtuAdjust","ExperimentalPhysicsEnabled","IsQueueErrorComputed","IsThrottledByCongestionControl","IsThrottledByOutgoingBandwidthLimit","MaxDataModelSendBuffer","NetworkOwnerRate","PhysicsMtuAdjust","PhysicsReceive","PhysicsSend","PhysicsSendRate","PreferredClientPort","PrintEvents","PrintInstances","PrintPhysicsErrors","PrintProperties","ReceiveRate","ReportStatURL","ServerLocalScripts","WaitingForCharacterLogRate","Anchored","AlphaModifier","BackParamA","BackParamB","BackSurface","BackSurfaceInput","BottomParamA","BottomParamB","BottomSurface","BottomSurfaceInput","BrickColor","CFrame","CanCollide","Elasticity","Friction","FrontParamA","FrontParamB","FrontSurface","FrontSurfaceInput","LeftParamA","LeftParamB","LeftSurface","LeftSurfaceInput","Locked","Material","Reflectance","ResizeIncrement","ResizableFaces","RightParamA","RightParamB","RightSurface","RightSurfaceInput","RotVelocity","TopParamA","TopParamB","TopSurface","TopSurfaceInput","Velocity","formFactor","Shape","Controller","ControllingHumanoid","MoveState","StickyWheels","AllowTeamChangeOnTouch","Neutral","Sides","AreHingesDetected","HeadsUpDisplay","MaxSpeed","Torque","TurnSpeed","PrimaryPart","CurrentCamera","DistributedGameTime","AllowSweep","AreAnchorsShown","AreAwakePartsHighlighted","AreModelCoordsShown","AreOwnersShown","ArePartCoordsShown","AreRegionsShown","AreUnalignedPartsShown","AreWorldCoordsShown","IsReceiveAgeShown","ParallelPhysics","PhysicsEnviromentalThrottle","AccountAge","AccountAgeReplicate","Character","CharacterAppearance","DataComplexity","DataComplexityLimit","DataReady","MembershipType","SimulationRadius","userId","EnableReplication","IdleConnectionCount","KeyDownConnectionCount","KeyUpConnectionCount","MouseDelta","MouseHit","MouseOrigin","MousePosition","MouseTarget","MouseTargetSurface","MouseTargetFilter","MouseUnitRay","MoveConnectionCount","WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","BubbleChat","ClassicChat","LocalPlayer","MaxPlayers","NumPlayers","MaskWeight","Weight","PlayerGui","Browsable","Deprecated","Preliminary","summary","ExplorerImageIndex","ExplorerOrder","AASamples","AllowAmbientOcclusion","AluminumQuality","AlwaysDrawConnectors","Antialiasing","AutoFRMLevel","BatchSize","Bevels","CompoundMaterialQuality","CorrodedMetalQuality","DebugCullBlockCount","DebugDisableDebriService","DebugFRMCullHumanoids","DebugLogFRMLogVariables","DiamondPlateQuality","EagerBulkExecution","FrameRateManager","GrassQuality","IceQuality","IsAggregationShown","IsSynchronizedWithPhysics","PlasticQuality","QualityLevel","Shadow","ShowBoundingBoxes","SlateQuality","TextureCompositingEnabled","TrussDetail","WoodQuality","graphicsMode","CartoonFactor","MaxThrust","MaxTorque","TargetOffset","TargetRadius","ThrustD","ThrustP","TurnD","TurnP","GarbageCollectionFrequency","GarbageCollectionLimit","ScriptsDisabled","CreatorId","CreatorType","JobId","LocalSaveEnabled","PlaceId","Graphic","SkinColor","CelestialBodiesShown","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp","StarCount","Opacity","RiseVelocity","IsPaused","IsPlaying","Looped","Pitch","PlayCount","PlayOnRemove","SoundId","Volume","AmbientReverb","DistanceFactor","DopplerScale","RolloffScale","SparkleColor","AreArbitersThrottled","BudgetEnforced","Concurrency","NumRunningJobs","NumSleepingJobs","NumWaitingJobs","PriorityMethod","SchedulerDutyCycle","SchedulerRate","SleepAdjustMethod","ThreadAffinity","ThreadPoolConfig","ThreadPoolSize","ThrottledJobSleepTime","AutoAssignable","AutoColorCharacters","Score","MouseLock","ControlMode"}
 
 local function Explore(Player,Children)
 	Dismiss(Player)
 	for _,v in next,Children do
 		pcall(function()
 			MakeTablet(
 				v.Name,
 				function()
 					pcall(function()
 						Dismiss(Player)
 						MakeTablet("Viewing: "..v.Name,nil,Player)
 						MakeTablet("Go back",function()Explore(Player,v.Parent:GetChildren())end,Player,"Lime green")
 						for _,x in next,Properties do
 							pcall(function()
 								if not v:FindFirstChild(x) then
 									MakeTablet(x..": "..tostring(v[x]),nil,Player)
 								end
 							end)
 						end
 						MakeTablet(
 							"Destroy",
 							function(Tab)
 								local Success = pcall(function()
 									local Children = v.Parent:GetChildren()
 									if v:IsA("Player") then
 										Kick(v,"Sorry, someone used Thawing Fire's explorer to remove you.")
 									else
 										v:Destroy()
 									end
 									Explore(Player,Children)
 								end)
 								if not Success then
 									Tab.TabletGui.TabletLabel.Text = "Cannot destroy this"
 									wait(1)
 									Tab.TabletGui.TabletLabel.Text = "Destroy"
 								end
 							end,
 							Player,
 							"Hot pink"
 						)
 						MakeTablet("Viewing: "..v.Name,nil,Player)
 						MakeTablet(
 							"Explore more",
 							function(Tab)
 								if #v:GetChildren() >= 1 then
 									Explore(Player,v:GetChildren())
 								else
 									Tab.TabletGui.TabletLabel.Text = "Has no children"
 									wait(1)
 									Tab.TabletGui.TabletLabel.Text = "Explore more"
 								end
 							end,
 							Player,
 							"Really red"
 						)
 					end)
 				end,
 				Player
 			)
 		end)
 	end
 end
 
 AddCmd(
 	"kill",
 	"[Prefix]kill player",
 	"Kills player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					v.Character:BreakJoints()
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"respawn",
 	"[Prefix]respawn player",
 	"Respawns player",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..v.userId.."&placeId="..tostring(game.PlaceId)
 				v:LoadCharacter()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"ws",
 	"[Prefix]ws player 99",
 	"Makes players walkspeed 99",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) and #Split(Message) >= 3 then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					v.Character.Humanoid.WalkSpeed = Split(Message)[3]
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"msg",
 	"[Prefix]msg text",
 	"Gives everyone a custom message, with text.",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = Players:GetPlayers()
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendMessage(v,"From: "..Speaker.Name,table.concat(Split(Message)," ",2))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"tp",
 	"[Prefix]tp player1 player2",
 	"Teleports player1 to player2",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) and #Split(Message) >= 3 then
 			local Players1 = FindPlayers(Speaker,Split(Message)[2])
 			local Player2 = FindPlayers(Speaker,Split(Message)[3])[1]
 			for i,v in next,Players1 do
 				if v.Character and Player2.Character then
 					v.Character.Torso.CFrame = Player2.Character.Torso.CFrame*CFrame.new(0,5*i,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"dt",
 	"[Prefix]dt",
 	"Dismisses all tablets",
 	0,
 	function(Speaker)
 		Dismiss(Speaker)
 	end
 )
 
 AddCmd(
 	"kick",
 	"[Prefix]kick player",
 	"Kicks player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				for _,x in next,Players:GetPlayers() do
 					if CheckRank(x,1) and x.Name ~= Speaker.Name then
 						MakeTablet(v.Name.." has been kicked by: "..Speaker.Name,nil,x,"Really red")
 					elseif CheckRank(x,1) then
 						MakeTablet("Kicked "..v.Name.."!",nil,x,"Really red")
 					end
 				end
 				Kick(v,"You have been kicked by Thawing Fire")
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"ban",
 	"[Prefix]ban player [reason]",
 	"Bans player, with the reason being [reason]",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) and #Split(Message) >= 3 then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				for _,x in next,Players:GetPlayers() do
 					if CheckRank(x,1) and x.Name ~= Speaker.Name then
 						MakeTablet(v.Name.." has been banned by: "..Speaker.Name,nil,x,"Really red")
 					elseif CheckRank(x,1) then
 						MakeTablet("Banned "..v.Name.."!",nil,x,"Really red")
 					end
 				end
 				table.insert(Banned,{Name = v.Name,Reason = Split(Message)[3]})
 				Kick(v,"You have been banned by Thawing Fire")
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unban",
 	"[Prefix]unban player",
 	"Unbans player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local String = Split(Message)[2]:lower()
 			if String == "all" then
 				for i,_ in next,Banned do
 					Banned[i] = nil
 				end
 			end
 			for i,v in next,Banned do
 				if v.Name:sub(1,#String):lower() == String then
 					Banned[i] = nil
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"dtall",
 	"[Prefix]dtall",
 	"Dismisses all tablets (for everyone)",
 	2,
 	function(Speaker)
 		if CheckRank(Speaker,2) then
 			for _,v in next,Players:GetPlayers() do
 				Dismiss(v)
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"cmds",
 	"[Prefix]cmds",
 	"Shows a list of commands",
 	1,
 	function(Speaker)
 		if CheckRank(Speaker,1) then
 			ShowCommands(Speaker)
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"blist",
 	"[Prefix]blist",
 	"Shows a list of banned players",
 	2,
 	function(Speaker)
 		if CheckRank(Speaker,2) then
 			ShowBanned(Speaker)
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"setrank",
 	"[Prefix]setrank player [x]",
 	"Makes players rank [x]. If 0, it will unadmin them",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) and #Split(Message) >= 3 then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			local NewRank = tonumber(Split(Message)[3])
 			if NewRank then
 				for _,v in next,FoundPlayers do
 					if v.Name ~= Speaker.Name then
 						if NewRank >= 1 then
 							table.insert(Admins,{Name = v.Name,Rank = NewRank})
 							MakeTablet("You are now rank: "..NewRank..", say /cmds",nil,v,"Hot pink")
 						else
 							for i,_ in next,Admins do
 								if Admins[i].Name == v.Name then
 									table.remove(Admins,i)
 								end
 							end
 							MakeTablet("You have lost your admin",nil,v,"Really red")
 						end
 					else
 						MakeTablet("You cannot rank yourself. Cheater!",nil,Speaker,"Really red")
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"viewranks",
 	"[Prefix]viewranks",
 	"Shows all peoples ranks, if they have a rank",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			ShowRanks(Speaker)
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"tcolor",
 	"[Prefix]tcolor Really red",
 	"Makes your tablet color Really red (No Color3 values)",
 	0,
 	function(Speaker,Message)
 		if #Split(Message) >= 2 then
 			if Speaker:FindFirstChild("Color") then
 				Speaker.Color.Value = table.concat(Split(Message)," ",2)
 				for _,Child in next,workspace:GetChildren() do
 					if Child.Name == "[Tablets] "..Speaker.Name then
 						for _,v in next,Child:GetChildren() do
 							if v.Name == "Tablet" and v.TabletGui.TabletLabel.Text ~= "Go back" then
 								v.BrickColor = BrickColor.new(table.concat(Split(Message)," ",2))
 								v.TabletBox.Color = BrickColor.new(table.concat(Split(Message)," ",2))
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"nuke",
 	"[Prefix]nuke player",
 	"Nukes a player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local NukePart = Instance.new("Part",workspace)
 						NukePart.BrickColor = BrickColor.new("Deep orange")
 						NukePart.Transparency = .5
 						NukePart.Size = Vector3.new(1,1,1)
 						NukePart.Shape = Enum.PartType.Ball
 						NukePart.CFrame = v.Character.Torso.CFrame
 						NukePart.Anchored = true
 						NukePart.Locked = true
 						NukePart.CanCollide = false
 						NukePart.TopSurface = Enum.SurfaceType.Smooth
 						NukePart.BottomSurface = Enum.SurfaceType.Smooth
 					game:GetService("Debris"):AddItem(NukePart,8)
 					coroutine.wrap(function()
 					local Debounce
 					NukePart.Touched:connect(function(Hit)
 						if Players:GetPlayerFromCharacter(Hit.Parent) and Hit.Parent.Name == v.Character.Name and not Debounce then
 							Debounce = true
 							Hit.Parent:BreakJoints()
 							Hit.Anchored = true
 							wait(8)
 							Debounce = false
 						end
 					end)
 						for i = 1,250 do
 							NukePart.Size = Vector3.new(i,i,i)
 							NukePart.CFrame  = v.Character.Torso.CFrame
 							Instance.new("Explosion",workspace).Position = v.Character.Torso.CFrame.p + Vector3.new(math.random(-100,100),math.random(-12,12),math.random(-100,100))
 							wait()
 						end
 					end)()
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"ff",
 	"[Prefix]ff player",
 	"Gives player a forcefield",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("ForceField",v.Character)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"smoke",
 	"[Prefix]smoke player",
 	"Gives player smoke",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("Smoke",v.Character.Torso)
 					Instance.new("Smoke",v.Character.Head)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"fire",
 	"[Prefix]fire player",
 	"Gives player fire",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("Fire",v.Character.Torso)
 					Instance.new("Fire",v.Character.Head)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"sparkles",
 	"[Prefix]sparkles player",
 	"Gives player sparkles",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("Sparkles",v.Character.Torso)
 					Instance.new("Sparkles",v.Character.Head)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unff",
 	"[Prefix]unff player",
 	"Takes away players forcefield",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					for _,v in next,v.Character:GetChildren() do
 						if v:IsA("ForceField") then
 							v:Destroy()
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unfire",
 	"[Prefix]unfire player",
 	"Takes away players fire",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Pathways = {v.Character.Head:GetChildren(),v.Character.Torso:GetChildren()}
 					for _,v in next,Pathways do
 						for _,x in next,v do
 							if x:IsA("Fire") then
 								x:Destroy()
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unsmoke",
 	"[Prefix]unsmoke player",
 	"Takes away players smoke",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Pathways = {v.Character.Head:GetChildren(),v.Character.Torso:GetChildren()}
 					for _,v in next,Pathways do
 						for _,x in next,v do
 							if x:IsA("Smoke") then
 								x:Destroy()
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unsparkles",
 	"[Prefix]unsparkles player",
 	"Takes away players sparkles",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Pathways = {v.Character.Head:GetChildren(),v.Character.Torso:GetChildren()}
 					for _,v in next,Pathways do
 						for _,x in next,v do
 							if x:IsA("Sparkles") then
 								x:Destroy()
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"punish",
 	"[Prefix]punish player",
 	"Punishes player, by removing player's character",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					v.Character.Parent = game:GetService("ServerStorage")
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"explode",
 	"[Prefix]explode player",
 	"Explodes player.",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("Explosion",v.Character).Position = v.Character.Torso.CFrame.p
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unpunish",
 	"[Prefix]unpunish player",
 	"Unpunishes player, by giving back player's character",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					v.Character.Parent = workspace
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"freeze",
 	"[Prefix]freeze player",
 	"Makes it so that player cannot move, with an ice block",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local IceBlock = Instance.new("Part",v.Character)
 						IceBlock.BrickColor = BrickColor.new("Cyan")
 						IceBlock.Transparency = .5
 						IceBlock.Name = "IceBlock"
 						IceBlock.FormFactor = Enum.FormFactor.Symmetric
 						IceBlock.Size = Vector3.new(4,10,4)
 						IceBlock.CFrame = v.Character.Torso.CFrame
 						IceBlock.Anchored = true
 						IceBlock.CanCollide = false
 						IceBlock.Locked = true
 						IceBlock.BottomSurface = Enum.SurfaceType.Smooth
 						IceBlock.TopSurface = Enum.SurfaceType.Smooth
 					for _,x in next,v.Character:GetChildren() do
 						if x:IsA("BasePart") then
 							x.Anchored = true
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"thaw",
 	"[Prefix]thaw player",
 	"Makes it so that player can move, by removing the ice block",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					for _,x in next,v.Character:GetChildren() do
 						if x:IsA("BasePart") then
 							x.Anchored = false
 							if x.Name == "IceBlock" then
 								x:Destroy()
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"sd",
 	"[Prefix]sd",
 	"Shuts down the server",
 	3,
 	function(Speaker,Message)
 	if CheckRank(Speaker,3) then
 		for _,v in next,Players:GetPlayers() do
 			Kick(v,"Thawing Fire, shutting down! Sorry!")
 		end
 	else
 		SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 	end
 end
 )
 
 AddCmd(
 	"ping",
 	"[Prefix]ping text",
 	"Makes a tablet around you, with text",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			MakeTablet(table.concat(Split(Message)," ",2),nil,Speaker)
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"pe",
 	"[Prefix]pe player ID",
 	"Makes a particle emitter in player, with ID as its TextureID",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) and #Split(Message) >= 3 then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				local ID = Split(Message)[3]
 				if v.Character and ID then
 					pcall(function()
 						local ParticleEmitter = Instance.new("ParticleEmitter",v.Character.Head)
 						ParticleEmitter.Texture = "http://www.roblox.com/asset/?id="..ID-1
 						ParticleEmitter:Clone().Parent = v.Character.Torso
 					end)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unpe",
 	"[Prefix]unpe player",
 	"Takes away players Particle Emitter",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Pathways = {v.Character.Head:GetChildren(),v.Character.Torso:GetChildren()}
 					for _,v in next,Pathways do
 						for _,x in next,v do
 							if x:IsA("ParticleEmitter") then
 								x:Destroy()
 							end
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"blind",
 	"[Prefix]blind player",
 	"Blinds player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					local BlindGui = Instance.new("ScreenGui",v.PlayerGui)
 						BlindGui.Name = "BlindGui"
 					local BlindFrame = Instance.new("Frame",BlindGui)
 						BlindFrame.Name = "BlindFrame"
 						BlindFrame.Size = UDim2.new(1,0,1,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"strobe",
 	"[Prefix]strobe player",
 	"Strobes player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					local StrobeGui = Instance.new("ScreenGui",v.PlayerGui)
 						StrobeGui.Name = "StrobeGui"
 					local StrobeFrame = Instance.new("Frame",StrobeGui)
 						StrobeFrame.Name = "StrobeFrame"
 						StrobeFrame.Size = UDim2.new(1,0,1,0)
 						StrobeFrame.BackgroundColor3 = Color3.new(1,1,1)
 					coroutine.wrap(function()
 						while wait(.065) do
 							StrobeFrame.BackgroundColor3 = Color3.new(0,0,0)
 							wait(.065)
 							StrobeFrame.BackgroundColor3 = Color3.new(1,1,1)
 						end
 					end)()
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unblind",
 	"[Prefix]unblind player",
 	"Unblinds player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					for _,v in next,v.PlayerGui:GetChildren() do
 						if v.Name == "BlindGui" then
 							v:Destroy()
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unstrobe",
 	"[Prefix]unstrobe player",
 	"Unstrobes player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					for _,v in next,v.PlayerGui:GetChildren() do
 						if v.Name == "StrobeGui" then
 							v:Destroy()
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"hint",
 	"[Prefix]hint text",
 	"Sends a custom hint to all players, with text",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = Players:GetPlayers()
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendHint(v,"From: "..Speaker.Name,table.concat(Split(Message)," ",2))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"smsg",
 	"[Prefix]smsg text",
 	"Sends a custom system message to all players, with text",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = Players:GetPlayers()
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendMessage(v,"[SYSTEM MSG]",table.concat(Split(Message)," ",2))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"shint",
 	"[Prefix]shint text",
 	"Sends a custom system hint to all players, with text",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = Players:GetPlayers()
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendHint(v,"[SYSTEM HINT]",table.concat(Split(Message)," ",2))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"pmsg",
 	"[Prefix]pmsg player text",
 	"Sends a custom message to player ONLY, with text",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendMessage(v,"PM, From: "..Speaker.Name,table.concat(Split(Message)," ",3))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"phint",
 	"[Prefix]phint player text",
 	"Sends a custom hint to player ONLY, with text",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.PlayerGui then
 					SendHint(v,"PH, From: "..Speaker.Name,table.concat(Split(Message)," ",3))
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"clean",
 	"[Prefix]clean",
 	"Cleans the workspace",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			for _,v in next,workspace:GetChildren() do
 				pcall(function()
 					if v.Name ~= script.Name and not v.Name:lower():match("camera") and not v.Name:match("[Tablets] ") then
 						v:Destroy()
 					end
 				end)
 			end
 			local Base = Instance.new("SpawnLocation",workspace)
 				Base.BrickColor = BrickColor.new("Bright green")
 				Base.Name = "Baseplate"
 				Base.FormFactor = Enum.FormFactor.Symmetric
 				Base.Size = Vector3.new(2048,1,2048)
 				Base.CFrame = CFrame.new(0,0,0)
 				Base.Anchored = true
 				Base.Locked = true
 			for _,v in next,Players:GetPlayers() do
 				v:LoadCharacter()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"base",
 	"[Prefix]base",
 	"Creates a new baseplate",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local Base = Instance.new("SpawnLocation",workspace)
 				Base.BrickColor = BrickColor.new("Bright green")
 				Base.Name = "Baseplate"
 				Base.FormFactor = Enum.FormFactor.Symmetric
 				Base.Size = Vector3.new(2048,1,2048)
 				Base.CFrame = CFrame.new(0,0,0)
 				Base.Anchored = true
 				Base.Locked = true
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"bhead",
 	"[Prefix]bhead player",
 	"Makes player's head big",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Mesh = v.Character.Head.Mesh
 					Mesh.Scale = Vector3.new(2.5,2.5,2.5)
 					Mesh.Offset = Vector3.new(0,.75,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"mhead",
 	"[Prefix]mhead player",
 	"Makes player's head mini",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					local Mesh = v.Character.Head.Mesh
 					Mesh.Scale = Vector3.new(.625,.625,.625)
 					Mesh.Offset = Vector3.new(0,-.25,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"nhead",
 	"[Prefix]nhead player",
 	"Makes player's head normal",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					for _,v in next,v.Character:GetChildren() do
 						if v:IsA("Hat") then
 							v.Handle.Transparency = 0
 						end
 					end
 					local Mesh = v.Character.Head.Mesh
 					Mesh.Scale = Vector3.new(1.25,1.25,1.25)
 					Mesh.Offset = Vector3.new(0,0,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"nograv",
 	"[Prefix]nograv player",
 	"Lets player jump about 4x higher",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					Instance.new("BodyForce",v.Character.Torso).force = Vector3.new(0,2250,0)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"grav",
 	"[Prefix]grav player",
 	"Makes player jump normally",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character and v.Character:FindFirstChild("Torso") then
 					for _,v in next,v.Character.Torso:GetChildren() do
 						if v:IsA("BodyForce") then
 							v:Destroy()
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"invisible",
 	"[Prefix]invisible player",
 	"Makes player invisible",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					if v.Character:FindFirstChild("Head") and v.Character:FindFirstChild("Head"):FindFirstChild("face") then
 						v.Character.Head.face.Parent = v.Character
 					end
 					if v.Character:FindFirstChild("Torso") and v.Character:FindFirstChild("Torso"):FindFirstChild("roblox") then
 						v.Character.Torso.roblox.Parent = v.Character
 					end
 					for _,v in next,v.Character:GetChildren() do
 						if v:IsA("BasePart") and v.Name ~= "HumanoidRootPart" then
 							v.Transparency = 1
 						elseif v:IsA("Hat") then
 							v.Handle.Transparency = 1
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"visible",
 	"[Prefix]visible player",
 	"Makes player visible",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					if v.Character:FindFirstChild("face") and v.Character:FindFirstChild("Head") then
 						v.Character.face.Parent = v.Character.Head
 					end
 					if v.Character:FindFirstChild("roblox") and v.Character:FindFirstChild("Torso") then
 						v.Character.roblox.Parent = v.Character.Torso
 					end
 					for _,v in next,v.Character:GetChildren() do
 						if v:IsA("BasePart") and v.Name ~= "HumanoidRootPart" then
 							coroutine.wrap(function()
 								for i = 1,0,-.1 do
 									v.Transparency = i
 									wait(.05)
 								end
 							end)()
 						elseif v:IsA("Hat") then
 							coroutine.wrap(function()
 								for i = 1,0,-.1 do
 									v.Handle.Transparency = i
 									wait(.05)
 								end
 							end)()
 						end
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"explore",
 	"[Prefix]explore",
 	"Lets you explore the game",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			Explore(Speaker,game:GetChildren())
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"sword",
 	"[Prefix]sword player",
 	"Gives player a sword",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				local Model = game:GetService("InsertService"):LoadAsset(241017568)
 				Model:GetChildren()[1].Parent = v.Backpack
 				Model:Destroy()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"gear",
 	"[Prefix]gear player ID",
 	"Gives player the gear with that ID",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) and #Split(Message) >= 3 and tonumber(Split(Message)[3]) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				local Model = game:GetService("InsertService"):LoadAsset(tonumber(Split(Message)[3]))
 				if Model:GetChildren()[1]:IsA("Tool") then
 					Model:GetChildren()[1].Parent = v.Backpack
 				end
 				Model:Destroy()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"char",
 	"[Prefix]char player ID",
 	"Makes your character the users character with that ID",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) and #Split(Message) >= 3 then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Split(Message)[3].."&placeId="..tostring(game.PlaceId)
 				v:LoadCharacter()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"lkill",
 	"[Prefix]lkill player",
 	"Loopkills player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				Instance.new("StringValue",v).Name = "Loopkill"
 				coroutine.wrap(function()
 					repeat
 						if v.Character then
 							v.Character:BreakJoints()
 						end
 						repeat wait() until v.Character and v.Character.Humanoid.Health >= 1
 					until v:FindFirstChild("Loopkill") == nil
 				end)()
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"unlkill",
 	"[Prefix]unlkill player",
 	"Unloopkills player",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				for _,x in next,v:GetChildren() do
 					if x.Name == "Loopkill" then
 						x:Destroy()
 					end
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"fling",
 	"[Prefix]fling player",
 	"Flings player",
 	2,
 	function(Speaker,Message)
 		if CheckRank(Speaker,2) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				if v.Character then
 					v.Character.Humanoid.Sit = true
 					v.Character.Torso.Velocity = Vector3.new(5000,5000,5000)
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"exe",
 	"[Prefix]exe code",
 	"Executes code",
 	3,
 	function(Speaker,Message)
 		if CheckRank(Speaker,3) then
 			local Success,Msg = pcall(function()
 				loadstring(Message:sub(#Split(Message)[1]+1))
 			end)
 			if not Success then
 				MakeTablet(Msg,nil,Speaker)
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )
 
 AddCmd(
 	"btools",
 	"[Prefix]btools player",
 	"Gives player building tools",
 	1,
 	function(Speaker,Message)
 		if CheckRank(Speaker,1) then
 			local FoundPlayers = FindPlayers(Speaker,Split(Message)[2])
 			for _,v in next,FoundPlayers do
 				local IDs = {16969792,18474459}
 				for _,x in next,IDs do
 					local Model = game:GetService("InsertService"):LoadAsset(x)
 					if Model:GetChildren()[1]:IsA("Tool") then
 						Model:GetChildren()[1].Parent = v.Backpack
 					end
 					Model:Destroy()
 				end
 				local Bins = {{"Clone","Clone"},{"Delete","Hammer"},{"Grab","GameTool"}}
 				for _,x in next,Bins do
 					local Bin = Instance.new("HopperBin",v.Backpack)
 					Bin.Name = x[1]
 					Bin.BinType = Enum.BinType[x[2]]
 				end
 			end
 		else
 			SendMessage(Speaker,"[SYSTEM]","Not high enough rank, or unknown error.")
 		end
 	end
 )