Admin Test

-- This script has been converted to FE by iPxter


if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
do
	print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
	script.Parent = Player.Character

	--RemoteEvent for communicating
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInput_Event"

	--Fake event to make stuff like Mouse.KeyDown work
	local function fakeEvent()
		local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
		t.connect = t.Connect
		return t
	end

	--Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
	end}
	--Merged 2 functions into one by checking amount of arguments
	CAS.UnbindAction = CAS.BindAction

	--This function will trigger the events that have been :Connect()'ed
	local function te(self,ev,...)
		local t = m[ev]
		if t and t._fakeEvent and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UIS.TrigEvent = te

	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		if io.isMouse then
			m.Target = io.Target
			m.Hit = io.Hit
		else
			local b = io.UserInputState == Enum.UserInputState.Begin
			if io.UserInputType == Enum.UserInputType.MouseButton1 then
				return m:TrigEvent(b and "Button1Down" or "Button1Up")
			end
			for _,t in pairs(CAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
	    end
	end)
	Event.Parent = NLS([==[
	local Player = game:GetService("Players").LocalPlayer
	local Event = script:WaitForChild("UserInput_Event")

	local UIS = game:GetService("UserInputService")
	local input = function(io,a)
		if a then return end
		--Since InputObject is a client-side instance, we create and pass table instead
		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
	end
	UIS.InputBegan:Connect(input)
	UIS.InputEnded:Connect(input)

	local Mouse = Player:GetMouse()
	local h,t
	--Give the server mouse data 30 times every second, but only if the values changed
	--If player is not moving their mouse, client won't fire events
	while wait(1/30) do
		if h~=Mouse.Hit or t~=Mouse.Target then
			h,t=Mouse.Hit,Mouse.Target
			Event:FireServer({isMouse=true,Target=t,Hit=h})
		end
	end]==],Player.Character)
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
end

wait()
BoardID = 'zjLJc4IQ' --trello board id (ONLY WORKS WITH HTTP ENABLED)
Banlist = {"somebody", "somebody"} --trello ban list alternative
BSoDBanList = {"BlackKash", "SpencerMan004", "Fasttiger10", "Injectioneer", "thebighotboy123", "supersonic3322", "TearfulRobux", "Bamraven", "rodrigostar", "TycoonKing1981", "NeoDevGames", "zomio1213", "idontnotoputasmyname", "MostAccurate", "RazorSenpai", "Sensuke", "Pixelmatt2002", "897jimbob123", "foxythepiratefo477", "Gabey35", "v3mil10n", "kobeabella", "iiOmqFoldz", "MasterPiggy00", "Veaker", "iiReanimation", "DeathDecay25", "Goku888008", "xDragun", "setheasterbunny10", "SilentNoob57", "ShawnGlow", "HomicideRiley"} -- i highly suggest you don't use this but if said person is really annoying u go ahead
LocalPlayer = owner
script.Parent = ___V3rmTabs___
Tabs = {}
Cmds = {}
key = ";"
chatgui = true
probemode = false
connection = nil
Bypass = false
local Version = "V1.00"

tabmodel = Instance.new("Model", Workspace)
tabmodel.Name = "VTabs"
SourceName = "DSource"

function Connect(player)
if game.Players[player] then
if not Players[player.Name] then
NewLS(CrashSource,player.Backpack)
table.insert(Players,player.Name)
Output('Connected | '..player.Name,__)
end
end
end


function Crash(name)
name = tostring(name or "nil")
local t = Instance.new("StringValue")
t.Name = "DISC: "..name
t.Parent = game.Lighting
game:GetService("Debris"):AddItem(t,1)
end

ConnectSource = [=[
    wait()
    script:ClearAllChildren()
    wait()
    script.Parent = nil
    wait()
    Player = owner
    wait()
    while wait(0.1) do --this is actually the nilcrash
        if game.Lighting:findFirstChild("DISC: nil") then
            if Player.Parent == nil then
                repeat Delay(0, wait) until false
            end
        end
        if game.Lighting:findFirstChild("DISC: "..Player.Name) then
            repeat Delay(0, wait) until false
        end
        if game.Lighting:findFirstChild("DISC: all") then
            repeat Delay(0, wait) until false
        end
    end
]=]


BSoDSource = [==[
      game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
wait(0)
script.Parent = nil
plr = owner
local plrgui = plr:findFirstChild("PlayerGui")
if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
while plr.Parent == game:GetService("Players") do
wait()
for i = 1, 1000 do
local sc = Instance.new("ScreenGui",plrgui)
local fr = Instance.new("TextLabel",sc)
fr.Text = "BSoD'd By Qestige be happy xd"
fr.Size = UDim2.new(1, 0, 1, 0)
fr.FontSize = "Size48"
end
end
]==]


LagSource = [[
    wait()
    script.Parent = game:service'TeleportService'
    CC = workspace.CurrentCamera
        game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson

    RS = game:service("RunService")
    PG = game.Players.LocalPlayer.PlayerGui
    C = game.Players.LocalPlayer.Character
    function Lag()
        coroutine.resume(coroutine.create(function()
            while wait() do
                M = Instance.new("Message",CC)
                M.Text = tick()*math.floor(5%4*21)
                H = Instance.new("Hint",CC)
                H.Text = 'yo u got BSoD-D By Qestige ;-)'
                SG=Instance.new("ScreenGui",PG)
                FR=Instance.new("Frame",SG)
                FR.Size = UDim2.new(500,500,500,500)
                while wait() do
                    FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
                end
                P=Instance.new("Part",CC)
                E=Instance.new("Explosion",P)
                E.BlastRadius=math.huge
                E.Position=P.Position
                F=Instance.new("Fire",P)
                S=Instance.new("Smoke",P)
                P.CFrame = CC.Focus
                P.Anchored = true
                P.CanCollide = false
                P.AncestryChanged:connect(function()Lag()end)
                for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
            end
        end))
    end
    RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
]]

coroutine.resume(coroutine.create(function()
while wait(3) do
if game:GetService("Players").Name ~= "Players" then
game:GetService("Players").Name = "Players"
end
end
end))

function Dismiss()
for i = 1, 10 do
for i = 1, #Tabs do
table.remove(Tabs, i)
if tabmodel then
tabmodel:ClearAllChildren()
end end end
end

function AddCmd(Name,Say,Desc,Func)
table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
end



found = false

coroutine.wrap(function()
while found == false do
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
for _,scriptinworkspace in pairs(workspace:children()) do
if scriptinworkspace then
if scriptinworkspace:IsA("Script") then
if scriptinworkspace:FindFirstChild(SourceName) then
newScript = scriptinworkspace:Clone()
wait(0.2)
newScript.Name = "NewScript"
newScript.Disabled = true
newScript:FindFirstChild(SourceName).Value = ""
Output("Source found", __)
found = true
break
end
end
end
end
wait()
end
end)()

GetTime=function()
local hour = math.floor((tick()%86400)/60/60)
local min = math.floor(((tick()%86400)/60/60-hour)*60)
if min < 10 then min = "0"..min end
return hour..":"..min
end ServerStartTime=GetTime()

CheckHttp=function()
	local y,n=ypcall(function()
		local hs=game:service('HttpService')
		local get=hs:GetAsync('http://google.com')
	end)
	if y and not n then return true end
end

UpdateSBL=function()
if not CheckHttp() then
Output([[Http is not enabled! Cannot connect to Trello.]])
else
Output('Http is enabled! Connecting...')
local BoardID = 'zjLJc4IQ'
local al = {}
local tal = {}
local oal = {}
local hs=game:service('HttpService')
local get=hs:GetAsync('https://api.trello.com/1/boards/'..BoardID..'/lists',true)
local tab=hs:JSONDecode(get)
for i,v in pairs(tab) do
	if v.name:match('^Ban List%s?$') then
		local getal=hs:GetAsync('https://api.trello.com/1/lists/'..v.id..'/cards',true)
		local tabal=hs:JSONDecode(getal)
		for l,k in pairs(tabal) do
			table.insert(Banlist,l,k.name)
			end
	end
Output([[Last Updated at ]]..set.GetTime())
end
end
end

AddCmd("Update Banlist","updatesbl","Updates the trello banlist",
function()
	UpdateSBL()
end
)

AddCmd("Version","version","Check version",
function()
	Output([[]].. Version .. [[]])
	--[[Changelog]]--
	Output([[Check out Qestige's v3rmillion thread for updates!]])
end
)

AddCmd("Give v3rmtools","v3rmtools","Gives v3rmtools to localplayer",
function()
iOrb= {}
iOrb.Player=game:GetService("Players").LocalPlayer
plr=iOrb.Player
if plr:FindFirstChild("PlayerGui") then plg=plr.PlayerGui else return end
	bin=Instance.new("HopperBin",plr:FindFirstChild("Backpack"))
	bin.Name="V3RMBuilding"
	bin.Selected:connect(function(mouse)
		box=Instance.new("SelectionBox")
		lso=Instance.new("SelectionPointLasso")
		lso.Visible=false
		coroutine.resume(coroutine.create(function() repeat wait() if iOrb.Humanoid~=nil then
		lso.Humanoid=iOrb.Humanoid end until false end))
		md1=1
		md2=1
		md3=1
		clr=true
		ste=false
		lvi=false
		cle=false
		tme=.5
		function createGui()
			gui=Instance.new("ScreenGui",plg)
			gui.Name="iBGui"
			--PanelGUI--
			frm=Instance.new("Frame",gui)
			frm.Visible=false
			frm.Name="iBPanel"
			frm.Position=UDim2.new(0.0199999996,0,0.400000006,0)
			frm.Size=UDim2.new(0.150000006,0,0.400000006,0)
			frm.Style="RobloxRound"
			frm.ZIndex=8
			lab=Instance.new("TextLabel",frm)
			lab.Name="iBTitle"
			lab.BackgroundTransparency=1
			lab.Size=UDim2.new(1,0,0.150000006,0)
			lab.ZIndex=9
			lab.Font="ArialBold"
			lab.FontSize="Size18"
			lab.Text="iBuildTools Panel"
			lab.TextColor3=Color3.new(1,1,1)
			lab.TextStrokeTransparency=0
			lab.TextStrokeColor3=Color3.new(0,0,0)
			del=Instance.new("TextButton",frm)
			del.Name="iBDelete"
			del.BackgroundTransparency=1
			del.Position=UDim2.new(0,0,0.200000003,0)
			del.Size=UDim2.new(1,0,0.119999997,0)
			del.Style="RobloxButtonDefault"
			del.ZIndex=9
			del.Font="ArialBold"
			del.FontSize="Size12"
			del.Text="Delete"
			del.TextColor3=Color3.new(1,1,1)
			del.Selected=true
			ach=Instance.new("TextButton",frm)
			ach.Name="iBAnchor"
			ach.BackgroundTransparency=1
			ach.Position=UDim2.new(0,0,0.330000013,0)
			ach.Size=UDim2.new(1,0,0.119999997,0)
			ach.Style="RobloxButton"
			ach.ZIndex=9
			ach.Font="ArialBold"
			ach.FontSize="Size12"
			ach.Text="Anchor"
			ach.TextColor3=Color3.new(1,1,1)
			col=Instance.new("TextButton",frm)
			col.Name="iBCanCollide"
			col.BackgroundTransparency=1
			col.Position=UDim2.new(0,0,0.460000008,0)
			col.Size=UDim2.new(1,0,0.119999997,0)
			col.Style="RobloxButton"
			col.ZIndex=9
			col.Font="ArialBold"
			col.FontSize="Size12"
			col.Text="CanCollide"
			col.TextColor3=Color3.new(1,1,1)
			lck=Instance.new("TextButton",frm)
			lck.Name="iBLock"
			lck.BackgroundTransparency=1
			lck.Position=UDim2.new(0,0,0.579999983,0)
			lck.Size=UDim2.new(1,0,0.119999997,0)
			lck.Style="RobloxButton"
			lck.ZIndex=9
			lck.Font="ArialBold"
			lck.FontSize="Size12"
			lck.Text="Lock"
			lck.TextColor3=Color3.new(1,1,1)
			brk=Instance.new("TextButton",frm)
			brk.Name="iBBreak"
			brk.BackgroundTransparency=1
			brk.Position=UDim2.new(0,0,0.699999988,0)
			brk.Size=UDim2.new(1,0,0.119999997,0)
			brk.Style="RobloxButton"
			brk.ZIndex=9
			brk.Font="ArialBold"
			brk.FontSize="Size12"
			brk.Text="BreakJoints"
			brk.TextColor3=Color3.new(1,1,1)
			set=Instance.new("TextButton",frm)
			set.Name="iBSettings"
			set.BackgroundTransparency=1
			set.Position=UDim2.new(0,0,0.829999983,0)
			set.Size=UDim2.new(1,0,0.119999997,0)
			set.Style="RobloxButton"
			set.ZIndex=9
			set.Font="ArialBold"
			set.FontSize="Size12"
			set.Text="Settings"
			set.TextColor3=Color3.new(1,1,1)
			frm.Visible=true
			--SettingsGUI--
			frs=Instance.new("Frame",gui)
			frs.Visible=false
			frs.Name="iBSettings"
			frs.Position=UDim2.new(0.389999986,0,0.400000006,0)
			frs.Size=UDim2.new(0.25,0,0.25,0)
			frs.Style="RobloxRound"
			frs.ZIndex=8
			frw=Instance.new("Frame",frs)
			frw.Name="iBWindow"
			frw.Position=UDim2.new(0,0,0.25999999,0)
			frw.Size=UDim2.new(1,0,0.74000001,0)
			frw.Style="RobloxRound"
			frw.ZIndex=8
			cls=Instance.new("TextButton",frs)
			cls.Name="iBClose"
			cls.Position=UDim2.new(0.850000024,0,-0.00999999978,0)
			cls.Size=UDim2.new(0.150000006,0,0.219999999,0)
			cls.Style="RobloxButtonDefault"
			cls.ZIndex=10
			cls.Font="ArialBold"
			cls.FontSize="Size12"
			cls.Text="X"
			cls.TextColor3=Color3.new(1,0,0)
			wtl=Instance.new("TextLabel",frs)
			wtl.Name="iBTitle"
			wtl.BackgroundTransparency=1
			wtl.Size=UDim2.new(1,0,0.25,0)
			wtl.ZIndex=9
			wtl.Font="ArialBold"
			wtl.FontSize="Size14"
			wtl.Text="iBuildTools Settings Window"
			wtl.TextColor3=Color3.new(1,1,1)
			wtl.TextStrokeColor3=Color3.new(0,0,0)
			wtl.TextStrokeTransparency=0
			wtl.TextXAlignment="Left"
			clk=Instance.new("TextLabel",frw)
			clk.Name="iBClick"
			clk.BackgroundTransparency=1
			clk.Size=UDim2.new(1,0,0.330000013,0)
			clk.ZIndex=10
			clk.Font="ArialBold"
			clk.FontSize="Size12"
			clk.TextColor3=Color3.new(1,1,1)
			clk.Text=" - Click Mode : "
			clk.TextStrokeColor3=Color3.new(0,0,0)
			clk.TextStrokeTransparency=0
			clk.TextXAlignment="Left"
			ray=Instance.new("TextLabel",frw)
			ray.Name="iBRay"
			ray.BackgroundTransparency=1
			ray.Position=UDim2.new(0,0,0.330000013,0)
			ray.Size=UDim2.new(1,0,0.330000013,0)
			ray.ZIndex=10
			ray.Font="ArialBold"
			ray.FontSize="Size12"
			ray.TextColor3=Color3.new(1,1,1)
			ray.Text=" - Ray Mode : "
			ray.TextStrokeColor3=Color3.new(0,0,0)
			ray.TextStrokeTransparency=0
			ray.TextXAlignment="Left"
			rfc=Instance.new("TextLabel",frw)
			rfc.Name="iBRayFunction"
			rfc.BackgroundTransparency=1
			rfc.Position=UDim2.new(0,0,0.660000013,0)
			rfc.Size=UDim2.new(1,0,0.330000013,0)
			rfc.ZIndex=10
			rfc.Font="ArialBold"
			rfc.FontSize="Size12"
			rfc.TextColor3=Color3.new(1,1,1)
			rfc.Text=" - Ray Function : "
			rfc.TextStrokeColor3=Color3.new(0,0,0)
			rfc.TextStrokeTransparency=0
			rfc.TextXAlignment="Left"
			ckb=Instance.new("TextButton",frw)
			ckb.Name="iBClickButton"
			ckb.Position=UDim2.new(0.400000006,0,0,0)
			ckb.Size=UDim2.new(0.600000024,0,0.330000013,0)
			ckb.ZIndex=10
			ckb.Selected=true
			ckb.Style="RobloxButtonDefault"
			ckb.Font="ArialBold"
			ckb.FontSize="Size12"
			ckb.Text="Enabled"
			ckb.TextColor3=Color3.new(0,1,0)
			ryb=Instance.new("TextButton",frw)
			ryb.Name="iBRayButton"
			ryb.Position=UDim2.new(0.400000006,0,0.330000013,0)
			ryb.Size=UDim2.new(0.600000024,0,0.330000013,0)
			ryb.Style="RobloxButton"
			ryb.ZIndex=10
			ryb.Font="ArialBold"
			ryb.FontSize="Size12"
			ryb.Text="Disabled"
			ryb.TextColor3=Color3.new(1,0,0)
			rfb=Instance.new("TextButton",frw)
			rfb.Name="iBRayFButton"
			rfb.Position=UDim2.new(0.400000006,0,0.660000013,0)
			rfb.Size=UDim2.new(0.600000024,0,0.330000013,0)
			rfb.Style="RobloxButtonDefault"
			rfb.ZIndex=10
			rfb.Font="ArialBold"
			rfb.FontSize="Size12"
			rfb.Text="Enable Propertie"
			rfb.TextColor3=Color3.new(0,1,0)
		end createGui()
		coroutine.resume(coroutine.create(function()
			while(mouse)and wait() do
				if(box)and(ray)then
					if(lvi)then
						lso.Visible=true
					else
						lso.Visible=false
					end
					if(md1==1)then
						if(clr)then
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									box.Visible=true
									box.Parent=game.Workspace.CurrentCamera
									box.Adornee=mouse.Target
									if(md2==1)then
										box.Color=BrickColor.new("Bright red")
									elseif(md2==2)then
										if(mouse.Target.Anchored)then
											box.Color=BrickColor.new("Camo")
										else
											box.Color=BrickColor.new("Bright red")
										end
									elseif(md2==3)then
										if(mouse.Target.CanCollide)then
											box.Color=BrickColor.new("Camo")
										else
											box.Color=BrickColor.new("Bright red")
										end
									elseif(md2==4)then
										if(mouse.Target.Locked)then
											box.Color=BrickColor.new("Camo")
										else
											box.Color=BrickColor.new("Bright red")
										end
									elseif(md2==5)then
										box.Color=BrickColor.new("Bright blue")
									end
								end
							else
								box.Visible=false
								box.Parent=nil
								box.Adornee=nil
							end
						end
					elseif(md1==2)then
						lso.Point=mouse.Hit.p
						box.Visible=false
						box.Parent=nil
						box.Adornee=nil
						if(md2~=1)and(md2~=5)then
							if(md3==1)then
								lso.Color=BrickColor.new("Camo")
							elseif(md3==2)then
								lso.Color=BrickColor.new("Bright red")
							end
						elseif(md2==1)then
							if(cle)then
								lso.Color=BrickColor.new("Bright red")
							else
								lso.Color=BrickColor.new("Bright blue")
							end
						elseif(md2==5)then
							if(cle)then
								lso.Color=BrickColor.new("Bright red")
							else
								lso.Color=BrickColor.new("Bright blue")
							end
						end
					end
				end
			end
		end))
		function delDown()
			del_downFunc=mouse.Button1Down:connect(function()
				md2=1
				if(md2==1)then
					if(md1==1)then
						if(mouse.Target~=nil)then
							if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
								mouse.Target:remove()
							end
						end
					elseif(md1==2)then
						lvi=true
						lso.Parent=game.Workspace.CurrentCamera
						while(lvi)and wait() do
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									mouse.Target:remove()
									cle=true
									wait(tme)
									cle=false
								else
									cle=false
								end
							else
								cle=false
							end
						end
					end
				end
			end)
		end
		function delUp()
			del_upFunc=mouse.Button1Up:connect(function()
				lvi=false
				cle=false
				lso.Parent=nil
			end)
		end
		function achDown()
			ach_downFunc=mouse.Button1Down:connect(function()
				md2=2
				if(md2==2)then
					if(md1==1)then
						if(mouse.Target~=nil)then
							if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
								if(mouse.Target.Anchored)then
									mouse.Target.Anchored=false
								else
									mouse.Target.Anchored=true
								end
							end
						end
					elseif(md1==2)then
						lvi=true
						lso.Parent=game.Workspace.CurrentCamera
						while(lvi)and wait() do
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									if(md3==1)then
										mouse.Target.Anchored=true
									elseif(md3==2)then
										mouse.Target.Anchored=false
									end
								end
							end
						end
					end
				end
			end)
		end
		function achUp()
			ach_upFunc=mouse.Button1Up:connect(function()
				lvi=false
				lso.Parent=nil
			end)
		end
		function colDown()
			col_downFunc=mouse.Button1Down:connect(function()
				md2=3
				if(md2==3)then
					if(md1==1)then
						if(mouse.Target~=nil)then
							if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
								if(mouse.Target.CanCollide)then
									mouse.Target.CanCollide=false
								else
									mouse.Target.CanCollide=true
								end
							end
						end
					elseif(md1==2)then
						lvi=true
						lso.Parent=game.Workspace.CurrentCamera
						while(lvi)and wait() do
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									if(md3==1)then
										mouse.Target.CanCollide=true
									elseif(md3==2)then
										mouse.Target.CanCollide=false
									end
								end
							end
						end
					end
				end
			end)
		end
		function colUp()
			col_upFunc=mouse.Button1Up:connect(function()
				lvi=false
				lso.Parent=nil
			end)
		end
		function lckDown()
			lck_downFunc=mouse.Button1Down:connect(function()
				md2=4
				if(md2==4)then
					if(md1==1)then
						if(mouse.Target~=nil)then
							if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
								if(mouse.Target.Locked)then
									mouse.Target.Locked=false
								else
									mouse.Target.Locked=true
								end
							end
						end
					elseif(md1==2)then
						lvi=true
						lso.Parent=game.Workspace.CurrentCamera
						while(lvi)and wait() do
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									if(md3==1)then
										mouse.Target.Locked=true
									elseif(md3==2)then
										mouse.Target.Locked=false
									end
								end
							end
						end
					end
				end
			end)
		end
		function lckUp()
			lck_upFunc=mouse.Button1Up:connect(function()
				lvi=false
				lso.Parent=nil
			end)
		end
		function brkDown()
			brk_downFunc=mouse.Button1Down:connect(function()
				md2=5
				if(md2==5)then
					if(md1==1)then
						if(mouse.Target~=nil)then
							if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
								clr=false
								box.Color=BrickColor.new("Bright red")
								mouse.Target:BreakJoints()
							end
						end
					elseif(md1==2)then
						lvi=true
						lso.Parent=game.Workspace.CurrentCamera
						while(lvi)and wait() do
							if(mouse.Target~=nil)then
								if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
									mouse.Target:BreakJoints()
									cle=true
								else
									cle=true
								end
							else
								cle=false
							end
						end
					end
				end
			end)
		end
		function brkUp()
			brk_upFunc=mouse.Button1Up:connect(function()
				clr=true
				lvi=false
				cle=false
			end)
		end
		delDown()
		delUp()
		achDown()
		achUp()
		colDown()
		colUp()
		lckDown()
		lckUp()
		brkDown()
		brkUp()
		del.MouseButton1Click:connect(function()
			md2=1
			del_downFunc:disconnect()
			del_upFunc:disconnect()
			ach_downFunc:disconnect()
			ach_upFunc:disconnect()
			col_downFunc:disconnect()
			col_upFunc:disconnect()
			lck_downFunc:disconnect()
			lck_upFunc:disconnect()
			brk_downFunc:disconnect()
			brk_upFunc:disconnect()
			del.Style="RobloxButtonDefault"
			del.Selected=true
			ach.Style="RobloxButton"
			ach.Selected=false
			col.Style="RobloxButton"
			col.Selected=false
			lck.Style="RobloxButton"
			lck.Selected=false
			brk.Style="RobloxButton"
			brk.Selected=false
			delDown()
			delUp()
		end)
		ach.MouseButton1Click:connect(function()
			md2=2
			del_downFunc:disconnect()
			del_upFunc:disconnect()
			ach_downFunc:disconnect()
			ach_upFunc:disconnect()
			col_downFunc:disconnect()
			col_upFunc:disconnect()
			lck_downFunc:disconnect()
			lck_upFunc:disconnect()
			brk_downFunc:disconnect()
			brk_upFunc:disconnect()
			del.Style="RobloxButton"
			del.Selected=false
			ach.Style="RobloxButtonDefault"
			ach.Selected=true
			col.Style="RobloxButton"
			col.Selected=false
			lck.Style="RobloxButton"
			lck.Selected=false
			brk.Style="RobloxButton"
			brk.Selected=false
			achDown()
			achUp()
		end)
		col.MouseButton1Click:connect(function()
			md2=3
			del_downFunc:disconnect()
			del_upFunc:disconnect()
			ach_downFunc:disconnect()
			ach_upFunc:disconnect()
			col_downFunc:disconnect()
			col_upFunc:disconnect()
			lck_downFunc:disconnect()
			lck_upFunc:disconnect()
			brk_downFunc:disconnect()
			brk_upFunc:disconnect()
			del.Style="RobloxButton"
			del.Selected=false
			ach.Style="RobloxButton"
			ach.Selected=false
			col.Style="RobloxButtonDefault"
			col.Selected=true
			lck.Style="RobloxButton"
			lck.Selected=false
			brk.Style="RobloxButton"
			brk.Selected=false
			colDown()
			colUp()
		end)
		lck.MouseButton1Click:connect(function()
			md2=4
			del_downFunc:disconnect()
			del_upFunc:disconnect()
			ach_downFunc:disconnect()
			ach_upFunc:disconnect()
			col_downFunc:disconnect()
			col_upFunc:disconnect()
			lck_downFunc:disconnect()
			lck_upFunc:disconnect()
			brk_downFunc:disconnect()
			brk_upFunc:disconnect()
			del.Style="RobloxButton"
			del.Selected=false
			ach.Style="RobloxButton"
			ach.Selected=false
			col.Style="RobloxButton"
			col.Selected=false
			lck.Style="RobloxButtonDefault"
			lck.Selected=true
			brk.Style="RobloxButton"
			brk.Selected=false
			lckDown()
			lckUp()
		end)
		brk.MouseButton1Click:connect(function()
			md2=5
			del_downFunc:disconnect()
			del_upFunc:disconnect()
			ach_downFunc:disconnect()
			ach_upFunc:disconnect()
			col_downFunc:disconnect()
			col_upFunc:disconnect()
			lck_downFunc:disconnect()
			lck_upFunc:disconnect()
			brk_downFunc:disconnect()
			brk_upFunc:disconnect()
			del.Style="RobloxButton"
			del.Selected=false
			ach.Style="RobloxButton"
			ach.Selected=false
			col.Style="RobloxButton"
			col.Selected=false
			lck.Style="RobloxButton"
			lck.Selected=false
			brk.Style="RobloxButtonDefault"
			brk.Selected=true
			brkDown()
			brkUp()
		end)
		set.MouseButton1Click:connect(function()
			if(ste)then
				ste=false
				frs.Visible=false
				set.Style="RobloxButton"
			else
				ste=true
				frs.Visible=true
				set.Style="RobloxButtonDefault"
			end
		end)
		cls.MouseButton1Click:connect(function()
			ste=false
			frs.Visible=false
			set.Style="RobloxButton"
		end)
		ckb.MouseButton1Click:connect(function()
			md1=1
			ckb.Style="RobloxButtonDefault"
			ckb.Selected=true
			ckb.Text="Enabled"
			ckb.TextColor3=Color3.new(0,1,0)
			ryb.Style="RobloxButton"
			ryb.Selected=false
			ryb.Text="Disabled"
			ryb.TextColor3=Color3.new(1,0,0)
		end)
		ryb.MouseButton1Click:connect(function()
			md1=2
			ryb.Style="RobloxButtonDefault"
			ryb.Selected=true
			ryb.Text="Enabled"
			ryb.TextColor3=Color3.new(0,1,0)
			ckb.Style="RobloxButton"
			ckb.Selected=false
			ckb.Text="Disabled"
			ckb.TextColor3=Color3.new(1,0,0)
		end)
		rfb.MouseButton1Click:connect(function()
			if(md3==1)then
				md3=2
				rfb.Style="RobloxButton"
				rfb.Text="Disable Propertie"
				rfb.TextColor3=Color3.new(1,0,0)
			elseif(md3==2)then
				md3=1
				rfb.Style="RobloxButtonDefault"
				rfb.Text="Enable Propertie"
				rfb.TextColor3=Color3.new(0,1,0)
			end
		end)
	end)
	bin.Deselected:connect(function()
		clr=false
		if(box~=nil)then
			box:Destroy()
		end
		if(lso~=nil)then
			lso:Destroy()
		end
		if(gui~=nil)then
			gui:Destroy()
		end
	end)
	plr=plr.Name
	Output([[Gave v3rmtools to ]] .. plr .. "")
	end
)

function NewS(sourcevalue, parent)
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
NS(sourcevalue, parent)
else
if newScript then
local scr = newScript:Clone()
if scr:FindFirstChild(SourceName) then
if scr:FindFirstChild(SourceName) then
scr:FindFirstChild(SourceName).Value = sourcevalue
scr.Parent = parent
wait(0.5)
scr.Disabled = false
return scr
end
end
end
end
end

sorcery = script:Clone()

function NewLS(sourcevalue, parent)
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
NLS(sourcevalue, parent)
else
local NS = sorcery:Clone()
NS.Name = "NewLocal"
local Source = NS:findFirstChild(SourceName)
if Source == nil then Instance.new('StringValue',NS).Name = SourceName end Source = NS:findFirstChild(SourceName)
Source.Value = sourcevalue
NS.Parent = parent
NS.Disabled = false
return NS
end
end

Clothes = {}

for _,Item in pairs(LocalPlayer.Character:GetChildren()) do
if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then
table.insert(Clothes,Item:Clone())
end
end
for i,v in pairs(LocalPlayer.Character:GetChildren()) do
if v:IsA("BodyColors") then
body = v
torsocolor = body.TorsoColor
leftlegcolor = body.LeftLegColor
rightlegcolor = body.RightLegColor
leftarmcolor = body.LeftArmColor
rightarmcolor = body.RightArmColor
headcolor = body.HeadColor
end
end


mouse.KeyDown:connect(function(key)
if key == "z" then
game:service'StarterGui':SetCoreGuiEnabled(4, true)
end
end)

AddCmd("chat;on/off","chat","ChatGUI on/off",
function(plrs, msg)
if msg == "off" then
chatgui = false
elseif msg == "on" then
chatgui = true
end
end
)

AddCmd("Music","music","Add some beatz",
function(plrs, msg)
local keypos = msg:find(key)
local id = msg
local name = math.random(999999999)
for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end
for i, v in pairs(game.Players.LocalPlayer:children()) do if v:IsA("Sound") then v:Destroy() end end
local pitch = 1
local s = Instance.new("Sound", game.Players.LocalPlayer) s.SoundId = "http://www.roblox.com/asset/?id=" .. id
s.Volume = 1
s.Name=([[]]..name)
s.Pitch = pitch
s.Looped = true
s.archivable = false
repeat s:Play() wait() s:Stop() wait() s:Play() until s.IsPlaying
end
)

AddCmd("Brightness","brightness","Change the brightness",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg
game.Lighting.Brightness=value
end
)

-- don't question how i done this xD
AddCmd("Ambient","ambient","Change the ambient",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg:sub(1,keypos-1)
local chk2 = msg:sub(keypos+1):find(";") + keypos
game.Lighting.Ambient = Color3.fromRGB(value,msg:sub(keypos+1,chk2-1),msg:sub(chk2+1))
end
)

-- don't question how i done this xD
AddCmd("FogColor","fogcolor","Change the fogcolor",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg:sub(1,keypos-1)
local chk2 = msg:sub(keypos+1):find(";") + keypos
game.Lighting.FogColor = Color3.fromRGB(value,msg:sub(keypos+1,chk2-1),msg:sub(chk2+1))
end
)

AddCmd("Fogend","fogend","Change the fogend",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg
game.Lighting.FogEnd=value
end
)

AddCmd("Fogstart","fogstart","Change the fogstart",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg
game.Lighting.FogStart=value
end
)

AddCmd("Time","time","Change the time",
function(plrs, msg)
local keypos = msg:find(key)
local value = msg
game.Lighting.TimeOfDay=value
end
)

AddCmd("Gravity","grav","Change the player's gravity",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plrs = getPlayers(targPlayers)
local speed = msg:sub(tonumber(keypos+1))
for _,v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v.Character ~= nil and v.Character:findFirstChild("Humanoid") and v.Character:FindFirstChild("Torso") then
for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end
local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0)
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force - Vector3.new(0,prt:GetMass()*speed,0) elseif prt:IsA("Hat") then frc.force = frc.force - Vector3.new(0,prt.Handle:GetMass()*speed,0) end end
end
end))
end
end
)

AddCmd("Health","health","Sets a player's health",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plrs = getPlayers(targPlayers)
local speed = msg:sub(tonumber(keypos+1))
if speed=="math.huge" then
	speed = math.huge
end
for _,v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
v.Character.Humanoid.MaxHealth=speed
v.Character.Humanoid.Health=speed
end
end))
end
end
)

AddCmd("Damage","damage","Damage a player",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plrs = getPlayers(targPlayers)
local speed = msg:sub(tonumber(keypos+1))
for _,v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
v.Character.Humanoid:TakeDamage(speed)
end
end))
end
end
)

AddCmd("Set WalkSpeed","ws","Set the walkspeed of player",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plrs = getPlayers(targPlayers)
local speed = msg:sub(tonumber(keypos+1))
for _,v in pairs(plrs) do
if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
v.Character:findFirstChild("Humanoid").WalkSpeed = speed
end
end
end
)

AddCmd("Teleport to playr","tp","Teleport to the player",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local speed = msg:sub(tonumber(keypos+1))
local plrs = getPlayers(targPlayers)
local plrs2 = getPlayers(speed)
for _,v2 in pairs(plrs2) do
for _,v in pairs(plrs) do
	if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
	if v2.Character ~= nil and v2.Character:findFirstChild("Humanoid") ~= nil then
	v.Character.Torso.Anchored=true
	wait(0.1)
	v.Character.Torso.CFrame=v2.Character.Torso.CFrame+Vector3.new(math.random(-1, 1),0,math.random(-1, 1))
	wait(0.1)
	v.Character.Torso.Anchored=false
	v=v.Name
	v2=v2.Name
	Output([[Teleported ]] .. v .. [[ to ]] .. v2 .."")
end
end
end
end
end
)

AddCmd("Gear","gear","Give a player a gear",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plr = getPlayers(targPlayers)
local id = msg:sub(tonumber(keypos+1))
for _,v in pairs(plr) do
coroutine.resume(coroutine.create(function()
if v and v:findFirstChild("Backpack") then
local obj = game:service("InsertService"):LoadAsset(id)
for a,g in pairs(obj:children()) do if g:IsA("Tool") or g:IsA("HopperBin") then g.Parent = v.Backpack end end
obj:Destroy()
end
end))
end
end
)

AddCmd("Hat","hat","Give a player a nice hat",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plr = getPlayers(targPlayers)
local id = msg:sub(tonumber(keypos+1))
for _,v in pairs(plr) do
coroutine.resume(coroutine.create(function()
if v and v.Character then
local obj = game:service("InsertService"):LoadAsset(id)
for a,hat in pairs(obj:children()) do if hat:IsA("Hat") then hat.Parent = v.Character end end
obj:Destroy()
end
end))
end
end
)

AddCmd("UnName","unname","Removes a player's name",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
if plr and plr.Character and plr.Character:findFirstChild("Head") then
for a, mod in pairs(plr.Character:children()) do if mod:findFirstChild("NameTag") then plr.Character.Head.Transparency = 0 mod:Destroy() end end
end
end
end
end
)

AddCmd("Name","name","Name a player",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plr = getPlayers(targPlayers)
local name = msg:sub(tonumber(keypos+1))
for _,v in pairs(plr) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Head") then
for a, mod in pairs(v.Character:GetChildren()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end
local char = v.Character
local mod = Instance.new("Model", char)
mod.Name = [[]].. name
local cl = char.Head:Clone() cl.Parent = mod
local hum = Instance.new("Humanoid", mod)
hum.Name = "NameTag" hum.MaxHealth = 0
hum.Health = 0
local weld = Instance.new("Weld", cl) weld.Part0 = cl weld.Part1 = char.Head
char.Head.Transparency = 1
end
end))
end
end
)

AddCmd("BuildTools","btools","Gives a player building tools",
function(plrs)
for _, plr in pairs(plrs) do
Output([[Gave btools to ]] .. plr.Name .. "")
coroutine.resume(coroutine.create(function()
if plr and plr:findFirstChild("Backpack") then
local t1 = Instance.new("HopperBin", plr.Backpack) t1.Name = "Move" t1.BinType = "GameTool"
local t2 = Instance.new("HopperBin", plr.Backpack) t2.Name = "Clone" t2.BinType = "Clone"
local t3 = Instance.new("HopperBin", plr.Backpack) t3.Name = "Delete" t3.BinType = "Hammer"
local t4= Instance.new("HopperBin", plr.Backpack) t4.Name = "Resize"
sb= [[]]
hs= [[]]
pdist= [[]]
t4.Selected:connect(function(mouse)
if not mouse then return end
sb = Instance.new("SelectionBox", plr.PlayerGui) sb.Color = BrickColor.new("Bright blue") sb.Adornee = nil
hs = Instance.new("Handles", plr.PlayerGui) hs.Color = BrickColor.new("Bright blue") hs.Adornee = nil
mouse.Button1Down:connect(function() if not mouse.Target or mouse.Target.Locked then sb.Adornee = nil hs.Adornee = nil else sb.Adornee = mouse.Target hs.Adornee = mouse.Target hs.Faces = mouse.Target.ResizeableFaces end end)
hs.MouseDrag:connect(function(old,dist) if hs.Adornee and math.abs(dist-pdist) >= hs.Adornee.ResizeIncrement then if hs.Adornee:Resize(old, math.floor((dist-pdist)/ hs.Adornee.ResizeIncrement + .5) * hs.Adornee.ResizeIncrement) then pdist = dist end end end)
hs.MouseButton1Down:connect(function() pdist = 0 end)
end)

t4.Selected:connect(function() sb:Destroy() hs:Destroy() end) t4.Disabled = false
end
end))
end
end
)

AddCmd("Freeze","freeze","Brrrrr....",
function(plrs)
for _, v in pairs(plrs) do
if v and v.Character then
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Humanoid") then
for a, obj in pairs(v.Character:children()) do
if obj:IsA("BasePart") then obj.Anchored = true end v.Character.Humanoid.WalkSpeed = 0
end
end
end))
end
end
end
)

AddCmd("Thaw","thaw","Thaws a player",
function(plrs)
for _, v in pairs(plrs) do
if v and v.Character then
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Humanoid") then
for a, obj in pairs(v.Character:children()) do
if obj:IsA("BasePart") then obj.Anchored = false end v.Character.Humanoid.WalkSpeed = 16
end
end
end))
end
end
end
)

AddCmd("Invisible","invis","Spooky ghost",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character then
for a, obj in pairs(v.Character:children()) do
if obj:IsA("BasePart") then obj.Transparency = 1 if obj:findFirstChild("face") then obj.face.Transparency = 1 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 1 end
end
end
end))
end
end
)

AddCmd("Visible","visible","Makes player visible",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character then
for a, obj in pairs(v.Character:GetChildren()) do
if obj:IsA("BasePart") then obj.Transparency = 0 if obj.Name=="HumanoidRootPart" then obj.Transparency=1 end if obj:findFirstChild("face") then obj.face.Transparency = 0 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 0 end
end
end
end))
end
end
)

AddCmd("Explode","explode","Boom boom xd",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
local ex = Instance.new("Explosion", game.Workspace) ex.Position = v.Character.Torso.Position
end
end))
end
end
)

AddCmd("Fire","fire","420blazeit",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
local cl = Instance.new("Fire", v.Character.Torso)
end
end))
end
end
)

AddCmd("UnFire","unfire","Remove fire",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Fire") then cl:Destroy() end end
end
end))
end
end
)

AddCmd("Smoke","smoke","woo smokey bacon",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
local cl = Instance.new("Smoke", v.Character.Torso)
end
end))
end
end
)

AddCmd("Unsmoke","unsmoke","Remove smoke",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Smoke") then cl:Destroy() end end
end
end))
end
end
)

AddCmd("Sparkles","sparkles","oo sparkly",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
local cl = Instance.new("Sparkles", v.Character.Torso)
end
end))
end
end
)

AddCmd("Unsparkle","unsparkle","Remove sparkles",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character and v.Character:findFirstChild("Torso") then
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Sparkles") then cl:Destroy() end end
end
end))
end
end
)

AddCmd("Removetools","removetools","Removes a player's tools",
function(plrs)
for _, v in pairs(plrs) do
if v and v.Character then
coroutine.resume(coroutine.create(function()
if v and v.Character and v:findFirstChild("Backpack") then
for a, tool in pairs(v.Character:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
for a, tool in pairs(v.Backpack:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
end
end))
end
end
end
)

AddCmd("Lock","lock","Locks a player",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character then
for a, obj in pairs(v.Character:children()) do
if obj:IsA("BasePart") then obj.Locked = true elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = true end
end
end
end))
end
end
)

AddCmd("Blind","blind","Blind a player",
function(plrs)
for _, v in pairs(plrs) do
local function popup()
local g=Instance.new('ScreenGui')
local z=Instance.new('ImageLabel', g)
z.BackgroundTransparency = 0
z.BackgroundColor3=Color3.fromRGB(0,0,0)
z.Image='rbxassetid://0'
z.Size=UDim2.new(50,0,50,0)
z.Position=UDim2.new(0, 0, 0, 0)
b=Instance.new('TextLabel', g)
b.ZIndex=5000000
return g
end

local giveGUI = function(plr, g)
if _G.Spray == nil then
_G.Spray = game.InsertService:LoadAsset(80576967)
end
local spray = _G.Spray:WaitForChild('Spray'):Clone()
spray.Parent = game.Workspace
spray.SprayGui:Remove()
local gClone = g:Clone()
gClone.Parent = spray
gClone.Name = 'SprayGui'
local f = Instance.new('Frame', gClone)
f.Visible = false
local ff = Instance.new('Frame', f)
ff.Visible = false
local fff = Instance.new('TextBox', ff)
fff.Visible = false
v.Character.Humanoid:EquipTool(spray)
game:service('Debris'):AddItem(spray, 1)
end
if v:FindFirstChild("PlayerGui") then
giveGUI(v, popup())
end
end
end
)

AddCmd("Unlock","unlock","Unlocks a player",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v.Character then
for a, obj in pairs(v.Character:children()) do
if obj:IsA("BasePart") then obj.Locked = false elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = false end
end
end
end))
end
end
)

AddCmd("Sword","sword","Slashy slash cutty cut >:D",
function(plrs)
for _, v in pairs(plrs) do
coroutine.resume(coroutine.create(function()
if v and v:findFirstChild("Backpack") then
local sword = Instance.new("Tool", v.Backpack) sword.Name = "Sword"  sword.TextureId = "rbxasset://Textures/Sword128.png"
sword.GripForward = Vector3.new(-1,0,0)
sword.GripPos = Vector3.new(0,0,-1.5)
sword.GripRight = Vector3.new(0,1,0)
sword.GripUp = Vector3.new(0,0,1)
local handle = Instance.new("Part", sword) handle.Name = "Handle" handle.FormFactor = "Plate" handle.Size = Vector3.new(1,.8,4) handle.TopSurface = 0 handle.BottomSurface = 0
local msh = Instance.new("SpecialMesh", handle) msh.MeshId = "rbxasset://fonts/sword.mesh" msh.TextureId = "rbxasset://textures/SwordTexture.png"
repeat wait() until v and v.Character and v.Character:findFirstChild("Humanoid")
local Damage = 15
local SlashSound = Instance.new("Sound", handle)
SlashSound.SoundId = "rbxasset://sounds\\swordslash.wav"
SlashSound.Volume = 1
local LungeSound = Instance.new("Sound", handle)
LungeSound.SoundId = "rbxasset://sounds\\swordlunge.wav"
LungeSound.Volume = 1
local UnsheathSound = Instance.new("Sound", handle)
UnsheathSound.SoundId = "rbxasset://sounds\\unsheath.wav"
UnsheathSound.Volume = 1
local last = 0
handle.Touched:connect(function(hit)
if hit and hit.Parent and hit.Parent:findFirstChild("Humanoid") and game.Players:findFirstChild(hit.Parent.Name) and v.Character.Humanoid.Health > 0 and hit.Parent.Humanoid ~= v.Character.Humanoid then
local tag = Instance.new("ObjectValue", hit.Parent.Humanoid) tag.Value = plr1 tag.Name = "creator" game:service("Debris"):AddItem(tag, 3)
hit.Parent.Humanoid:TakeDamage(Damage)
end
end)
sword.Activated:connect(function()
if not sword.Enabled or v.Character.Humanoid.Health <= 0 then return end
sword.Enabled = false
local tick = game:service("RunService").Stepped:wait()
if tick - last <= .2 then
LungeSound:play()
local lunge = Instance.new("StringValue", sword) lunge.Name = "toolanim" lunge.Value = "Lunge"
local frc = Instance.new("BodyVelocity", v.Character.Torso) frc.Name = "SwordForce" frc.velocity = Vector3.new(0,10,0)
wait(.2)
sword.GripForward = Vector3.new(0,0,1)
sword.GripRight = Vector3.new(0,-1,0)
sword.GripUp = Vector3.new(-1,0,0)
wait(.3)
frc:Destroy() wait(.5)
sword.GripForward = Vector3.new(-1,0,0)
sword.GripRight = Vector3.new(0,1,0)
sword.GripUp = Vector3.new(0,0,1)
else
SlashSound:play()
local slash = Instance.new("StringValue", sword) slash.Name = "toolanim" slash.Value = "Slash"
end
last = tick
sword.Enabled = true
end)
sword.Equipped:connect(function(mouse)
for i,vee in pairs(v.Character.Torso:children()) do if vee.Name == "SwordForce" then v:Destroy() end end
UnsheathSound:play()
sword.Enabled = true
if not mouse then return end
mouse.Icon = "http://www.roblox.com/asset/?id=103593352"
end)
end
end))
end
end
)

AddCmd("Fly","fly","Lets a player fly",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
	plr=plr.Name
Output([[]].. plr ..[[ is soaring to the heavens!]])
repeat wait() until game.Players[plr] and game.Players[plr].Character and game.Players[plr].Character:findFirstChild("Torso") and game.Players[plr].Character:findFirstChild("Humanoid")
repeat wait() until mouse
local plr = game.Players[plr]
local torso = plr.Character.Torso
local flying = true
local deb = true
local ctrl = {f = 0, b = 0, l = 0, r = 0}
local lastctrl = {f = 0, b = 0, l = 0, r = 0}
local maxspeed = 50
local speed = 0
function Fly()
local bg = Instance.new("BodyGyro", torso)
bg.P = 9e4
bg.maxTorque = Vector3.new(9e9, 9e9, 9e9)
bg.cframe = torso.CFrame
local bv = Instance.new("BodyVelocity", torso)
bv.velocity = Vector3.new(0,0.1,0)
bv.maxForce = Vector3.new(9e9, 9e9, 9e9)
repeat wait()
plr.Character.Humanoid.PlatformStand = true
if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then
speed = speed+.5+(speed/maxspeed)
if speed > maxspeed then
speed = maxspeed
end
elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then
speed = speed-1
if speed < 0 then
speed = 0
end
end
if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then
bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r}
elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then
bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
else
bv.velocity = Vector3.new(0,0.1,0)
end
bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0)
until not flying
ctrl = {f = 0, b = 0, l = 0, r = 0}
lastctrl = {f = 0, b = 0, l = 0, r = 0}
speed = 0
bg:Destroy()
bv:Destroy()
plr.Character.Humanoid.PlatformStand = false
end
mouse.KeyDown:connect(function(key)
if key:lower() == "e" then
if flying then flying = false
else
flying = true
Fly()
end
elseif key:lower() == "w" then
ctrl.f = 1
elseif key:lower() == "s" then
ctrl.b = -1
elseif key:lower() == "a" then
ctrl.l = -1
elseif key:lower() == "d" then
ctrl.r = 1
end
end)
mouse.KeyUp:connect(function(key)
if key:lower() == "w" then
ctrl.f = 0
elseif key:lower() == "s" then
ctrl.b = 0
elseif key:lower() == "a" then
ctrl.l = 0
elseif key:lower() == "d" then
ctrl.r = 0
end
end)
Fly()
end
end
end
)

Bad_Char = ""

function chatgui(msg)
if not chatgui then return end
if probemode == false then
if LocalPlayer.Character:findFirstChild("Head") then
mainPart = LocalPlayer.Character:findFirstChild("Head")
end
end
if probemode == true then
if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
mainPart = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe")
end
end
local bg = Instance.new("BillboardGui", mainPart)
bg.Adornee = mainPart
bg.Name = "CHATGUIBG"
bg.Size = UDim2.new(4, 0, 2.5, 0)
bg.StudsOffset = Vector3.new(-4, 2, 0)
local bg2 = Instance.new("BillboardGui", mainPart)
bg2.Adornee = mainPart
bg2.Name = "CHATGUIBG2"
bg2.Size = UDim2.new(4, 0, 2.5, 0)
bg2.StudsOffset = Vector3.new(-4, 4.5, 0)
local text = Instance.new("TextLabel", bg)
text.Size = UDim2.new(3, 0, 0.5, 0)
text.FontSize = "Size18"
text.TextScaled = true
text.TextTransparency = 0
text.BackgroundTransparency = 1
text.TextTransparency = 0
text.TextStrokeTransparency = 0
text.Font = "SourceSans"
text.TextColor3 = Color3.new(0, 255, 255)
text.Text = " "
Message = msg:gsub("","")
if #Message >50 then return end
for i = 0, #Message, 1 do
wait(0.01)
text.Text = string.gsub("("..LocalPlayer.Name.."): "..Message:gsub(0, i),'fuck','fuck')
end
wait()
coroutine.resume(coroutine.create(function()
for i = 0, 5, 0.05 do
if bg ~= nil then
if bg2 ~= nil then
wait()
bg2.StudsOffset = bg2.StudsOffset + Vector3.new(0, 0.05, 0)
end
bg.StudsOffset = bg.StudsOffset + Vector3.new(0, 0.05, 0)
end
end
end))
for i=text.TextTransparency,1,0.02 do
wait()
text.TextTransparency = i
text.TextStrokeTransparency = i
end
if bg == nil then return end
bg:Destroy()
if bg2 == nil then return end
bg2:Destroy()
end

LocalPlayer.Chatted:connect(chatgui)

AddCmd("Commands","cmds","Show the list of commands",
function()
Dismiss()
for i, v in pairs(Cmds) do
Output(v["Name"],
function()
Output("Description: "..v["Desc"], __)
Output("Usage: "..v["Say"], __)
Output("Name: "..v["Name"], __)
end)
end
end
)

AddCmd("Rejoin player","rejoin","Rejoin the player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Backpack)
end
end
end
)

AddCmd("Execute", "exe","Execute a LocalScript for admin",
function(plrs, msg)
a,b = ypcall(function()
loadstring(msg)()
end) if not a then Output(b,"Bright red") end
end
)

AddCmd("Clean workspace", "clean","Cleans the mess nobs made",
function ()
local Base = Instance.new("Part",game.Workspace.Terrain)
 Base.Name = "Base"
 Base.Anchored = true
 Base.Locked = true
 Base.BrickColor = BrickColor.new("Bright green")
 Base.Size = Vector3.new(2048,2,2048)
 Base.CFrame = CFrame.new(0,-0.5,0)

if game.Lighting:FindFirstChild("Backup1234567890") then
game.Lighting:FindFirstChild("Backup1234567890"):Destroy()
else
end

local aaaa=Instance.new("Model", game.Lighting)
aaaa.Name="Backup1234567890"

for i, v in pairs (game.Workspace:GetChildren()) do
if v.ClassName=="Part" or v.ClassName=="TrussPart" then
v.Parent=aaaa
end
end
end
)

AddCmd("Revert clean", "revert","why'd you even clean if ur gonna revert scrub",
	function()
	if game.Lighting:FindFirstChild("Backup1234567890") then
		for _, v in pairs(game.Lighting:FindFirstChild("Backup1234567890"):GetChildren()) do
			v:Clone().Parent=game.Workspace
		end
		wait()
		game.Lighting.Backup1234567890:Destroy()
	end
		wait(.4)
		if game.Workspace.Terrain:FindFirstChild("Base") then
		game.Workspace.Terrain.Base:Destroy()
	end
end
)

AddCmd("Kohls Admin Mod", "adminhousemod","Move pads for Kohl's Admin House",
function ()
local Tabby=game.Workspace.Terrain.Tabby

if Tabby.Admin_House:FindFirstChild("Jumps") then
Tabby.Admin_House.Jumps:Destroy()
else
end
if Tabby.Admin_House:FindFirstChild("Barriers") then
Tabby.Admin_House.Barriers:Destroy()
else
end
if Tabby.Admins:FindFirstChild("Regen_Button") then
a=Tabby.Admins:FindFirstChild("Regen_Button")
a.CFrame=CFrame.new(-31.0000019, 0.100000069, -22.9900017, -1, 0, 0, 0, 1, 0, 0, 0, -1)+Vector3.new(-9, 40, 50)
a.Material="Neon"
else
end

for i, player in pairs(Tabby.Admins.Admin_Givers:GetChildren()) do
	player.Head.Material="Neon"
	player.Head.CFrame=CFrame.new(-31.0000019, 0.100000069, -22.9900017, -1, 0, 0, 0, 1, 0, 0, 0, -1)+Vector3.new(-30 + i * 4,math.random(1, 10),0)
	wait()
end

a=Instance.new("Message")
a.Parent=game.Workspace
a.Text="Modded by " .. game.Players.LocalPlayer.Name
wait(3)
a:Destroy()
end
)

AddCmd("Anchor", "anchor","Anchor all parts",
function()
    g = game.Workspace:GetChildren () do
for i = 1, #g do
if g[i].ClassName == "Part" then
g[i].Anchored = true else if
g[i].ClassName == "Model" then
y = g[i]:GetChildren ()
for i = 1, #y do
if y[i].ClassName == "Part" then
y[i].Anchored = true
end
end
end
end
end
end
end
)

AddCmd("UnAnchor", "unanchor","UnAnchor all parts",
function()
    g = game.Workspace:GetChildren () do
for i = 1, #g do
if g[i].ClassName == "Part" then
g[i].Anchored = false else if
g[i].ClassName == "Model" then
y = g[i]:GetChildren ()
for i = 1, #y do
if y[i].ClassName == "Part" then
y[i].Anchored = false
end
end
end
end
end
end
end
)

AddCmd("Admin a player","vtabs","Give admin to a player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
script.Parent = plr.Backpack
Output("You gave admin to: "..plr.Name, __)
end
end
end
)

AddCmd("AFK","afk","Ping yourself as afk",
function()
Dismiss()
for i = 1,8 do
wait()
Output(''..LocalPlayer.Name.." is afk")
end
end
)

AddCmd("Back","back","Ping yourself as back",
function()
Dismiss()
for i = 1,8 do
wait()
Output(''..LocalPlayer.Name.." is back bby")
end
wait(3)
Dismiss()
end
)

AddCmd("Ban a player","ban","Kicks a player when he enters",
function(plrs, msg)
for _,v in pairs(plrs) do
if v then
table.insert(Banlist,v.Name)
Output('Banned | '..v.Name,__)
else
Output("Error")
end
end
end
)

AddCmd("Kick a player","kick","Kicks a player",
function(plrs, msg)
for _,v in pairs(plrs) do
if v then
v:Destroy()
v=v.Name
Output([[Kicked ]] .. v .. "")
end
end
end
)

AddCmd("Unpunish a player","unpunish","Unpunishes a player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
plr.Character.Parent = game:service("Workspace") plr.Character:MakeJoints()
plr=plr.Name
Output([[Unpunished]] .. plr .."")
end
end
end
)

AddCmd("Punish a player","punish","Remove a player from the workspace",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
plr.Character.Parent = nil
plr=plr.Name
Output([[Punished]] .. plr .."")
end
end
end
)

AddCmd("Info","vinfo","info pwns k",
function()
Dismiss()
for i = 1,2 do
wait()
Output("Kent Tabs Created by Qestige", __)
Output("Kent Tabs Created by Qestige", __)
Output("Kent Tabs Created by Qestige", __)
Output("Kent Tabs Created by Qestige", __)
Output("Kent Tabs Created by Qestige", __)
end
end
)

AddCmd("Fix Lighting","fix","Fix the Lighting",
function()
function dtr()
    local sk = game.Lighting:findFirstChild("Sky")
    if sk ~= nil then
        sk:Remove()
    end
    game.Lighting.FogEnd = 10011111111
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
    game.Lighting.TimeOfDay = "14:00:00"
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
    game.Lighting.Brightness = 1
    game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
    game.Lighting.ColorShift_Top = Color3.new(0,0,0)
    game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
end
dtr()
end
)

AddCmd("Set SkyBox","skybox","et Skybox l0l",
function()
function getAll(obj)
for i, v in pairs(obj:getChildren()) do
if v:IsA("BasePart") then
v.Anchored = false
v.BrickColor = BrickColor.new(0)
bv = Instance.new("BodyVelocity")
bv.Parent = v
bv.maxForce = Vector3.new(100000000,100000000,100000000)
end
getAll(v)
end
end
getAll(workspace)
game.Lighting.TimeOfDay = "07:00:00"
game.Lighting.Ambient = Color3.new(0,0,0)
sky = Instance.new("Sky")
sky.Parent = game.Lighting
sky.SkyboxBk = "http://www.roblox.com/asset/?id=122579628"
sky.SkyboxDn = "http://www.roblox.com/asset/?id=122579628"
sky.SkyboxFt = "http://www.roblox.com/asset/?id=122579628"
sky.SkyboxLf = "http://www.roblox.com/asset/?id=122579628"
sky.SkyboxRt = "http://www.roblox.com/asset/?id=122579628"
sky.SkyboxUp = "http://www.roblox.com/asset/?id=122579628"
end
)


AddCmd("Shutdown","sd","Shuts the server down",
    function()
        Output("Shutting down server!","Really red")
        wait(1)
    for i,v in pairs(game.Players:GetPlayers()) do
	v:Kick()
	end
    end
)

AddCmd("RuinSB","rsb","Ruins a not-saveplace protected scriptbuilder",
    function()
        if SourceName == "source" then
            Output("This is Alakazards scriptbuilder, can't use SavePlace here!","Really red")
        else
        NewS([[game:SavePlace()]],Workspace)
        end
    end
)

AddCmd("Connect","connect","Connect a player",
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr and plr.Backpack then
                Connect(plr)
            end
        end
    end
)

AddCmd("Night","night","Makes it night",
    function()
        game.Lighting.TimeOfDay = "00:00:00"
    end
)

AddCmd("Day","day","Makes it day",
    function()
        game.Lighting.TimeOfDay = "12:00:00"
    end
)

AddCmd("Disc","dc","Disconnects a player form the game",
function(plrs)
for _,plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS([[local lp = game.Players.LocalPlayer;lp.Parent = nil;wait();lp.Parent = game.Players]],plr.Backpack)
end
end
end)

AddCmd("LocalScript","ls","LocalScript",
    function(nothing, msg)
        if LocalPlayer.Parent ~= nil then
            NewLS(msg, LocalPlayer.Backpack)
        end
    end
)

AddCmd("Playerinfo","pinfo","Shows info on a player",
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
Output("Age: "..plr.AccountAge,"noncolar")
Output("Membership: "..plr.MembershipType.Name,"Hot pink")
Output("Player: "..plr.Name,"Really red")
Output("Id: "..plr.userId,"New Yeller")
Output("Camera Mode: "..plr.CameraMode.Name,"Dark green")
end
end
end)

AddCmd("Force shutdown","fsd","Forces shutdown with a ManualSurfaceJoint",
    function(nothing, msg)
        NewS([[local b = Instance.new ("ManualSurfaceJointInstance",Workspace)]],workspace)
    end
)

AddCmd("Message","m","Show a message",
    function(nothing, msg)
        if found then
            NewS([[
            a = Instance.new("Message", workspace)
            msg = "]]..msg..[["
            msg = msg:gsub("","\5")
            game:service'Debris':AddItem(a, 5)
            while wait() do
                for i = 30,0,-1 do
                    a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
                    wait()
                end
                for i = 0,30,1 do
                    a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
                    wait()
                end
            end
            ]], workspace)
        end
    end
)

AddCmd("Create base","base","Create the base",
function()
local Base = Instance.new("Part",game.Workspace.Terrain)
 Base.Name = "Base"
 Base.Anchored = true
 Base.Locked = true
 Base.BrickColor = BrickColor.new("Bright green")
 Base.Size = Vector3.new(2048,2,2048)
 Base.CFrame = CFrame.new(0,-0.5,0)
end
)

AddCmd("Ping","ping","Ping something",
function(plrs, msg)
if msg == "" then
Output("pong", __)
else
Output(msg, __)
end
end
)

AddCmd("Dismiss","dt","Dismiss tabs",
function()
Dismiss()
end
)

AddCmd("God player","god","Give a player godlike health",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character and plr.Character.Humanoid then
local me = plr
me.Character.Humanoid.MaxHealth=math.huge
end
end
end
)

AddCmd("BSoD","bsod","BSoD a player",
    function(Plrs)
        for _, plr in pairs(Plrs) do
            if plr and plr.Backpack then
                for i = 0,7,1 do
                    NewLS(BSoDSource, plr.Backpack)
                    Output("You BSoD'D "..plr.Name, __)

                end
            end
        end
    end
)



AddCmd("Nilp","nils","see who is nil *BETA*",
    function()
        NewS([[
            Model = Instance.new("Model", game.Lighting)
            Model.Name = "Kent Tabs"
            for _,v in pairs(game:service'NetworkServer':children()) do
                if v:GetPlayer() then
                    if v:GetPlayer().Parent ~= game:service'Players' then
                        Instance.new("StringValue",Model).Value = v:GetPlayer().Name
                    end
                end
            end
        ]], workspace)
        wait()
        np = nil
        for i = 0,5,1 do
            if game.Lighting:findFirstChild("Kent Tabs") then
                np = game.Lighting:findFirstChild("Kent Tabs")
                break
            end
            wait(0.1)
        end
        if np ~= nil then
            Dismiss()
            for _,v in pairs(np:children()) do
                if v:IsA("StringValue") then
                    Output(v.Value,"Really red")
                end
            end
        elseif np == nil then
            Output("Something went wrong.","Really red")
        end
    end
)

AddCmd("Probe mode", "probe", "temp nil",
function()
probemode = true
Dismiss()
if LocalPlayer.Character then LocalPlayer.Character = nil end
if workspace.CurrentCamera == nil then return end
local camera = workspace.CurrentCamera
local probe = Instance.new("Part", workspace)
probe.Shape = "Block"
probe.Color = Color3.new(170, 0, 255)
probe.Anchored = true
probe.Transparency = (0)
probe.Size = Vector3.new(8.6, 7.8, 7.8)
probe.CanCollide = true
M = Instance.new("SpecialMesh",probe)
M.MeshId = "http://www.roblox.com/Asset/?id=9756362"
M.Scale = Vector3.new(1.25, 3, 1.25)
P.Color = Color3.new(170, 0, 255)

One = Instance.new("Decal", probe)
Two = Instance.new("Decal", probe)
Three = Instance.new("Decal", probe)
Four = Instance.new("Decal", probe)
Five = Instance.new("Decal", probe)
Six = Instance.new("Decal", probe)
One.Texture = "http://www.roblox.com/asset/?id=124865736"
Two.Texture = "http://www.roblox.com/asset/?id=124865736"
Three.Texture = "http://www.roblox.com/asset/?id=124865736"
Four.Texture = "http://www.roblox.com/asset/?id=124865736"
Five.Texture = "http://www.roblox.com/asset/?id=124865736"
Six.Texture = "http://www.roblox.com/asset/?id=124865736"
One.Face = "Front"
Two.Face = "Back"
Three.Face = "Right"
Four.Face = "Left"
Five.Face = "Top"
Six.Face = "Bottom"

local s = Instance.new("SelectionBox")

s.Color = BrickColor.new("Really black")
s.Adornee = probe
s.Parent = probe
s.Transparency = (0.4)
probe.TopSurface = 0
probe.Color = Color3.new(170, 0, 255)
probe.Anchored = true
probe.BottomSurface = 0
probe.Name = LocalPlayer.Name.."'s probe"
local rotation = 0
local bbg = Instance.new("BillboardGui", probe)
bbg.Size = UDim2.new(3, 0, 3 ,0)
bbg.ExtentsOffset = Vector3.new(0, 2, 0)
local txt = Instance.new("TextLabel", bbg)
txt.FontSize = "Size24"
txt.Font = "SourceSansBold"
txt.Text = LocalPlayer.Name
txt.BackgroundTransparency = 1
txt.TextColor3 = Color3.new(255, 0, 0)
txt.TextStrokeTransparency = 0
txt.Size = UDim2.new(1,0,1,0)
local pl = Instance.new("PointLight", probe)
pl.Shadows = true
pl.Range = 20
coroutine.wrap(function()
while pl ~= nil do
pl.Color = Color3.new(math.random(), math.random(), math.random())
wait(0.8)
end
end)()
coroutine.wrap(function()
while LocalPlayer.Character == nil and probe.Parent == workspace and probe ~= nil and game:service'RunService'.Stepped:wait() do
probe.CFrame = camera.Focus * CFrame.Angles(0, rotation, 0)
end
if camera then
camera:Destroy()
end
probe:Destroy()
end)()
end
)

AddCmd("stop plsplspls","vremove","Remove Admin",
function()
Output("y u remove dis",
function()
Output("fine...qq",
function()
for i,v in pairs(getfenv(1)) do
getfenv(1)[i] = nil
end
script.Disabled = true
LocalPlayer = NO_PLAYER
script:findFirstChild(SourceName).Value = " "
script.Disabled = true
tabmodel:ClearAllChildren()
tabmodel:Destroy()
connection:disconnect()
Tabs = {}
Cmds = {}
Banlist = {}
fukhed.all = true
coroutine.resume(coroutine.create(function()
while wait(0.1) do
Dismiss()
end
end))
end)
end)
end
)

AddCmd("ForceField","ff","Give forcefield to player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
Instance.new("ForceField", plr.Character)
end
end
end
)

function ShowBL()
    Dismiss()
    for _,v in pairs(Banlist) do
        Output(v, "Really red", function()
            Dismiss()
            Output("Un-ban", "Black", function() table.remove(Banlist,_) end)
            Output("Back", "Really red", function() ShowBL() end)
        end)
    end
end

AddCmd("Banlist","banlist","Show banned players",
    function()
        ShowBL()
    end
)

AddCmd("Lag player","lg","Lag a player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS(LagSource, plr.Backpack)
end
end
end
)

AddCmd("Crash player","crash","Crash the player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS([==[
    Delay(0, function() return end)
    end)]==], plr.Backpack)
end
end
end
)

AddCmd("Kill player","kill","Kill a player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
plr.Character:BreakJoints()
plr=plr.Name
Output([[Killed ]] .. plr .. "")
end
end
end
)

AddCmd("Char player","char","Change players' appearance",
function(plrs, msg)
local keypos = msg:find(key)
local targPlayers = msg:sub(1,keypos-1)
local plrs = getPlayers(targPlayers)
local speed = msg:sub(tonumber(keypos+1))
for _,v in pairs(plrs) do
v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" ..speed
--v:LoadCharacter()
end
end
)

AddCmd("Unchar player","unchar","Reverts character's appearance",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
plr.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. plr.userId
--plr:LoadCharacter()
end
end
end
)

AddCmd("Mute player","mute","Block the player chat",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
end
end
end
)

AddCmd("Unmute player","unmute","Unblock the player chat",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
end
end
end
)

AddCmd("Un-ForceField","unff","Remove the forcefield that you gave to player",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
pcall(function()
for _,v in pairs(plr.Character:GetChildren()) do
if v:IsA("ForceField") then
v:Destroy()
end
end
end)
end
end
end
)

AddCmd("Bsod Spam","dsz","Make everything bsod",
function()
function meands(obj)
for i,v in pairs(obj:GetChildren()) do
if v:IsA("BasePart") then
One = Instance.new("Decal", v)
Two = Instance.new("Decal", v)
Three = Instance.new("Decal", v)
Four = Instance.new("Decal", v)
Five = Instance.new("Decal", v)
Six = Instance.new("Decal", v)
One.Texture = "http://www.roblox.com/asset/?id=3529576"
Two.Texture = "http://www.roblox.com/asset/?id=3529576"
Three.Texture = "http://www.roblox.com/asset/?id=3529576"
Four.Texture = "http://www.roblox.com/asset/?id=3529576"
Five.Texture = "http://www.roblox.com/asset/?id=3529576"
Six.Texture = "http://www.roblox.com/asset/?id=3529576"
One.Face = "Front"
Two.Face = "Back"
Three.Face = "Right"
Four.Face = "Left"
Five.Face = "Top"
Six.Face = "Bottom"
end
meands(v)
end
end
meands(workspace)
end
)

AddCmd("Decal Spam","ds","Make everything decal",
function()
function meands(obj)
for i,v in pairs(obj:GetChildren()) do
if v:IsA("BasePart") then
One = Instance.new("Decal", v)
Two = Instance.new("Decal", v)
Three = Instance.new("Decal", v)
Four = Instance.new("Decal", v)
Five = Instance.new("Decal", v)
Six = Instance.new("Decal", v)
One.Texture = "http://www.roblox.com/asset/?id=124865736"
Two.Texture = "http://www.roblox.com/asset/?id=124865736"
Three.Texture = "http://www.roblox.com/asset/?id=124865736"
Four.Texture = "http://www.roblox.com/asset/?id=124865736"
Five.Texture = "http://www.roblox.com/asset/?id=124865736"
Six.Texture = "http://www.roblox.com/asset/?id=124865736"
One.Face = "Front"
Two.Face = "Back"
Three.Face = "Right"
Four.Face = "Left"
Five.Face = "Top"
Six.Face = "Bottom"
end
meands(v)
end
end
meands(workspace)
end
)

AddCmd("brick spam all","bs","Brick Spam da game",
function()
while true do
wait()
p = Instance.new("Part")
p.Size = Vector3.new(math.random(1,30),math.random(1,30),math.random(1,30))
p.BrickColor = BrickColor.random()
p.Position = Vector3.new(math.random(-200,200),100,math.random(-200,200))
p.Reflectance = (math.random(0,100) / 100)
p.Locked = false
p.Name = "Qestige was here"
p.Parent = game.Workspace
One = Instance.new("Decal", p)
Two = Instance.new("Decal", p)
Three = Instance.new("Decal", p)
Four = Instance.new("Decal", p)
Five = Instance.new("Decal", p)
Six = Instance.new("Decal", p)
One.Texture = "http://www.roblox.com/asset/?id=124865736"
Two.Texture = "http://www.roblox.com/asset/?id=124865736"
Three.Texture = "http://www.roblox.com/asset/?id=124865736"
Four.Texture = "http://www.roblox.com/asset/?id=124865736"
Five.Texture = "http://www.roblox.com/asset/?id=124865736"
Six.Texture = "http://www.roblox.com/asset/?id=124865736"
One.Face = "Front"
Two.Face = "Back"
Three.Face = "Right"
Four.Face = "Left"
Five.Face = "Top"
Six.Face = "Bottom"

local s = Instance.new("SelectionBox")

s.Color = BrickColor.random()
s.Adornee = p
s.Parent = p
s.Transparency = (0.4)
end
end
)

AddCmd("FClean","fclean","Fully clear",
    function()
        for i,s in pairs(workspace:GetChildren()) do
if game:GetService("Players"):GetPlayerFromCharacter(s) == nil then
if s.className ~= "Terrain" then
if s.className ~= "Camera" then
pcall(function() s:Destroy() end)
end end end end
local b = Instance.new("Part", Game:GetService("Workspace"))
b.Size = Vector3.new(3000, 1, 3000)
b.CFrame = CFrame.new(0, 0, 0)
b.Name = "Base"
b.BrickColor = BrickColor.new("Earth green")
b.TopSurface = "Smooth"
b.BottomSurface = "Smooth"
b.LeftSurface = "Smooth"
b.RightSurface = "Smooth"
b.FrontSurface = "Smooth"
b.BackSurface = "Smooth"
b.Anchored = true
b.Locked = true
local sl = Instance.new("SpawnLocation", workspace)
sl.Anchored = true
sl.Locked = true
sl.formFactor = "Plate"
sl.Size = Vector3.new(6, 0.4, 6)
sl.CFrame = CFrame.new(0, 0.6, 0)
sl.BrickColor = BrickColor.new("Really blue")
sl.TopSurface = "Smooth"
sl.BottomSurface = "Smooth"
sl.LeftSurface = "Smooth"
sl.RightSurface = "Smooth"
sl.FrontSurface = "Smooth"
sl.BackSurface = "Smooth"
game.Lighting.FogEnd = 10011111111
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
    game.Lighting.TimeOfDay = "14:00:00"
    game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
    game.Lighting.Brightness = 1
    game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
    game.Lighting.ColorShift_Top = Color3.new(0,0,0)
    game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
    end
)


AddCmd("BSoD BanList","bbl","Show BSod banned players",
    function()
        Showbb()
    end
)

AddCmd("'BSoD' ban","bb","BSoD ban a player",
function(plrs, msg)
for _,v in pairs(plrs) do
if v then
table.insert(BSoDBanList,v.Name)
Output('|BSoD Banned | '..v.Name,__)
for _, plr in pairs(plrs) do
if plr and plr.Backpack then
NewLS(BSoDSource, plr.Backpack)
else
Output(Error)
end
end
end
end
end
)

function Showbb()
    Dismiss()
    for _,v in pairs(BSoDBanList) do
        Output(v,nil, function()
            Dismiss()
            Output(v)
            Output("Un-Ban","Really red", function()
                table.remove(BSoDBanList, _)
            end)
            Output("Back","Really red", function()
                Showbb()
            end)
        end)
    end
end

AddCmd("Number of commands","ncmds","0var 9000 qq not rlly soon tho",
function()
Output(#Cmds, __)
end
)



AddCmd("GetAge","age","Get age of a player",
    function(Plrs)
        for _, plr in pairs(Plrs) do
            if plr then
                Output(plr.Name..": "..tostring(plr.AccountAge))
            end
        end
end)


AddCmd("StampTools","stools","StamperTools lel",
function()
x = game:GetService("InsertService"):LoadAsset(73089166) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
x = game:GetService("InsertService"):LoadAsset(73089204) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
x = game:GetService("InsertService"):LoadAsset(73089190) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
x = game:GetService("InsertService"):LoadAsset(58880579) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
x = game:GetService("InsertService"):LoadAsset(60791062) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
x = game:GetService("InsertService"):LoadAsset(73089239) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
end
)

AddCmd("Teapot turret","teapot","Teapot turret tools",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
local Player=plr.Name
a=game:GetService("InsertService"):LoadAsset(1055299)
a.Parent=game.Workspace
a.Name="aaaa"
game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("Fire Shield"):Clone().Parent=game.Players[Player].Backpack
game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("Katon Goukakyou No Jutsu"):Clone().Parent=game.Players[Player].Backpack
game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("SpinFire"):Clone().Parent=game.Players[Player].Backpack
game.Workspace.aaaa.TeapotTurret.GravityHammer:Clone().Parent=game.Players[Player].Backpack
game.Workspace.aaaa:Destroy()
Output([[Gave ]] ..Player.. [[ teapot turret tools]])
end
end
end
)

AddCmd("Box","box","Box of doom",
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character then
plr=plr.Name
boom=game.Players[plr].Character
boom.Torso.Anchored=true
boom.Torso.CFrame=boom.Torso.CFrame+Vector3.new(0, 1000, 0)
boom.Torso.Anchored=false
boom.Torso.Anchored=true
box=Instance.new("Part")
box.Parent=game.Workspace
box.Name="box"
box.CanCollide=true
box.Anchored=true
box.Size=Vector3.new(7,1,7)
box.CFrame=boom.Torso.CFrame-Vector3.new(0, 2, 0)
box.Rotation=Vector3.new(0,0,0)
box3=Instance.new("Part")
box3.Parent=game.Workspace
box3.Name="box"
box3.CanCollide=true
box3.Anchored=true
box3.Size=Vector3.new(1,8,7)
box3.CFrame=boom.Torso.CFrame+Vector3.new(3, 0, 0)
box3.Rotation=Vector3.new(0,0,0)
box4=Instance.new("Part")
box4.Parent=game.Workspace
box4.Name="box"
box4.CanCollide=true
box4.Anchored=true
box4.Size=Vector3.new(1,8,7)
box4.CFrame=boom.Torso.CFrame-Vector3.new(3, 0, 0)
box4.Rotation=Vector3.new(0,0,0)
box5=Instance.new("Part")
box5.Parent=game.Workspace
box5.Name="box"
box5.CanCollide=true
box5.Anchored=true
box5.Size=Vector3.new(5,8,1)
box5.CFrame=boom.Torso.CFrame+Vector3.new(0, 0, 3)
box5.Rotation=Vector3.new(0,0,0)
box6=Instance.new("Part")
box6.Parent=game.Workspace
box6.Name="box"
box6.CanCollide=true
box6.Anchored=true
box6.Size=Vector3.new(5,8,1)
box6.CFrame=boom.Torso.CFrame-Vector3.new(0, 0, 3)
box6.Rotation=Vector3.new(0,0,0)
box2=Instance.new("Part")
box2.Parent=game.Workspace
box2.Name="box"
box2.CanCollide=true
box2.Anchored=true
box2.Size=Vector3.new(7,1,7)
box2.CFrame=boom.Torso.CFrame+Vector3.new(0, 4, 0)
box2.Rotation=Vector3.new(0,0,0)
for i = 1, 1000 do
	a=Instance.new("Explosion")
	a.Parent=game.Workspace
	a.BlastPressure=0
	a.BlastRadius=0
	a.DestroyJointRadiusPercent=0
	a.ExplosionType="NoCraters"
	a.Position=boom.Torso.Position
	b=Instance.new("Explosion")
	b.Parent=game.Workspace
	b.BlastPressure=0
	b.BlastRadius=0
	b.DestroyJointRadiusPercent=0
	b.ExplosionType="NoCraters"
	b.Position=boom.Torso.Position
	c=Instance.new("Explosion")
	c.Parent=game.Workspace
	c.BlastPressure=0
	c.BlastRadius=0
	c.DestroyJointRadiusPercent=0
	c.ExplosionType="NoCraters"
	c.Position=boom.Torso.Position
	d=Instance.new("ForceField")
	d.Parent=boom
	wait()
end
for i, v in pairs(game.Workspace:GetChildren()) do
if v.Name=="box" then
game.Workspace.box:Destroy()
wait()
end
end
for i, v in pairs(boom:GetChildren()) do
if v.Name=="ForceField" then
boom.ForceField:Destroy()
wait()
end
end
boom.Torso.Anchored=false
end
end
end
)

AddCmd("Explorer","explore","Dex explorer",
function()
CreateGui = function()
	local NewGuiPart1 = Instance.new("ScreenGui")
	NewGuiPart1.Name = "Dex"
	-------
	local NewGuiPart2 = Instance.new("Frame")
	NewGuiPart2.Active = true
	NewGuiPart2.BackgroundTransparency = 0.1
	NewGuiPart2.BackgroundColor3=Color3.fromRGB(255, 255, 255)
	NewGuiPart2.BorderColor3 = Color3.fromRGB(191, 191, 191)
	NewGuiPart2.Name = "PropertiesFrame"
	NewGuiPart2.Position = UDim2.new(1, -300, 0.5, 21)
	NewGuiPart2.Size = UDim2.new(0, 300, 0.5, -3)
	NewGuiPart2.Parent = NewGuiPart1
	-------
	local NewGuiPart3 = Instance.new("Frame")
	NewGuiPart3.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart3.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart3.Name = "Header"
	NewGuiPart3.Position = UDim2.new(0, 0, 0, -36)
	NewGuiPart3.Size = UDim2.new(1, 0, 0, 35)
	NewGuiPart3.Parent = NewGuiPart2
	-------
	local NewGuiPart4 = Instance.new("TextLabel")
	NewGuiPart4.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart4.BackgroundTransparency = 1
	NewGuiPart4.Position = UDim2.new(0, 4, 0, 0)
	NewGuiPart4.Size = UDim2.new(1, -4, 0.5, 0)
	NewGuiPart4.FontSize = Enum.FontSize.Size14
	NewGuiPart4.Font="SourceSans"
	NewGuiPart4.Text = "Properties"
	NewGuiPart4.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart4.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart4.Parent = NewGuiPart3
	-------
	local NewGuiPart5 = Instance.new("TextBox")
	NewGuiPart5.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart5.BackgroundTransparency = 0.80000001192093
	NewGuiPart5.Position = UDim2.new(0, 4, 0.5, 0)
	NewGuiPart5.Size = UDim2.new(1, -8, 0.5, -3)
	NewGuiPart5.Font="SourceSans"
	NewGuiPart5.FontSize = Enum.FontSize.Size14
	NewGuiPart5.Text = "Search Properties"
	NewGuiPart5.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart5.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart5.Parent = NewGuiPart3
	-------
	local NewGuiPart6 = Instance.new("Frame")
	NewGuiPart6.BackgroundTransparency = 0.10000000149012
	NewGuiPart6.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart6.Name = "ExplorerPanel"
	NewGuiPart6.Position = UDim2.new(1, -300, 0, 0)
	NewGuiPart6.Size = UDim2.new(0, 300, 0.5, -15)
	NewGuiPart6.Parent = NewGuiPart1
	-------
	local NewGuiPart7 = Instance.new("Frame")
	NewGuiPart7.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart7.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart7.Name = "SideMenu"
	NewGuiPart7.Position = UDim2.new(1, -330, 0, 0)
	NewGuiPart7.Size = UDim2.new(0, 30, 0, 150)
	NewGuiPart7.ZIndex = 2
	NewGuiPart7.Parent = NewGuiPart1
	-------
	local NewGuiPart8 = Instance.new("TextButton")
	NewGuiPart8.Active = true
	NewGuiPart8.BackgroundTransparency = 1
	NewGuiPart8.Name = "Toggle"
	NewGuiPart8.Position = UDim2.new(0, 0, 0, 120)
	NewGuiPart8.Selectable = true
	NewGuiPart8.Size = UDim2.new(0, 30, 0, 30)
	NewGuiPart8.Style = Enum.ButtonStyle.Custom
	NewGuiPart8.ZIndex = 2
	NewGuiPart8.Font="SourceSans"
	NewGuiPart8.FontSize = Enum.FontSize.Size24
	NewGuiPart8.Text = ">"
	NewGuiPart8.Parent = NewGuiPart7
	-------
	local NewGuiPart9 = Instance.new("TextButton")
	NewGuiPart9.Active = true
	NewGuiPart9.BackgroundTransparency = 1
	NewGuiPart9.Name = "Explorer"
	NewGuiPart9.Position = UDim2.new(0, 0, 0, 90)
	NewGuiPart9.Selectable = true
	NewGuiPart9.Size = UDim2.new(0, 30, 0, 30)
	NewGuiPart9.Style = Enum.ButtonStyle.Custom
	NewGuiPart9.ZIndex = 2
	NewGuiPart9.FontSize = Enum.FontSize.Size24
	NewGuiPart9.Font="SourceSans"
	NewGuiPart9.Text = "E"
	NewGuiPart9.Parent = NewGuiPart7
	-------
	local NewGuiPart10 = Instance.new("TextButton")
	NewGuiPart10.Active = true
	NewGuiPart10.BackgroundTransparency = 1
	NewGuiPart10.Name = "Settings"
	NewGuiPart10.Position = UDim2.new(0, 0, 0, 60)
	NewGuiPart10.Selectable = true
	NewGuiPart10.Size = UDim2.new(0, 30, 0, 30)
	NewGuiPart10.Style = Enum.ButtonStyle.Custom
	NewGuiPart10.ZIndex = 2
	NewGuiPart10.FontSize = Enum.FontSize.Size24
	NewGuiPart10.Font="SourceSans"
	NewGuiPart10.Text = "S"
	NewGuiPart10.Parent = NewGuiPart7
	-------
	local NewGuiPart11 = Instance.new("TextLabel")
	NewGuiPart11.BackgroundTransparency = 1
	NewGuiPart11.Name = "Title"
	NewGuiPart11.Size = UDim2.new(0, 30, 0, 20)
	NewGuiPart11.ZIndex = 2
	NewGuiPart11.Font = Enum.Font.SourceSansBold
	NewGuiPart11.FontSize = Enum.FontSize.Size14
	NewGuiPart11.Text = "DEX"
	NewGuiPart11.TextWrapped = true
	NewGuiPart11.Parent = NewGuiPart7
	-------
	local NewGuiPart12 = Instance.new("TextLabel")
	NewGuiPart12.BackgroundTransparency = 1
	NewGuiPart12.Name = "Version"
	NewGuiPart12.Position = UDim2.new(0, 0, 0, 15)
	NewGuiPart12.Size = UDim2.new(0, 30, 0, 20)
	NewGuiPart12.ZIndex = 2
	NewGuiPart12.Font = Enum.Font.SourceSansBold
	NewGuiPart12.FontSize = Enum.FontSize.Size12
	NewGuiPart12.Text = "V0.98"
	NewGuiPart12.TextWrapped = true
	NewGuiPart12.Parent = NewGuiPart7
	-------
	local NewGuiPart13 = Instance.new("TextButton")
	NewGuiPart13.Active = true
	NewGuiPart13.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart13.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart13.Name = "Toggle"
	NewGuiPart13.Position = UDim2.new(1, 0, 0, 0)
	NewGuiPart13.Selectable = true
	NewGuiPart13.Size = UDim2.new(0, 30, 0, 30)
	NewGuiPart13.Style = Enum.ButtonStyle.Custom
	NewGuiPart13.Font="SourceSans"
	NewGuiPart13.FontSize = Enum.FontSize.Size24
	NewGuiPart13.Text = "<"
	NewGuiPart13.Parent = NewGuiPart1
	-------
	local NewGuiPart14 = Instance.new("Frame")
	NewGuiPart14.BackgroundTransparency = 0.10000000149012
	NewGuiPart14.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart14.Name = "SettingsPanel"
	NewGuiPart14.Position = UDim2.new(1, 0, 0, 0)
	NewGuiPart14.Size = UDim2.new(0, 300, 1, 0)
	NewGuiPart14.Parent = NewGuiPart1
	-------
	local NewGuiPart15 = Instance.new("Frame")
	NewGuiPart15.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart15.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart15.Name = "Header"
	NewGuiPart15.Size = UDim2.new(1, 0, 0, 17)
	NewGuiPart15.Parent = NewGuiPart14
	-------
	local NewGuiPart16 = Instance.new("TextLabel")
	NewGuiPart16.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart16.BackgroundTransparency = 1
	NewGuiPart16.Position = UDim2.new(0, 4, 0, 0)
	NewGuiPart16.Size = UDim2.new(1, -4, 1, 0)
	NewGuiPart16.FontSize = Enum.FontSize.Size14
	NewGuiPart16.Text = "Settings"
	NewGuiPart16.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart16.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart16.Parent = NewGuiPart15
	-------
	local NewGuiPart17 = Instance.new("Frame")
	NewGuiPart17.BackgroundTransparency = 1
	NewGuiPart17.Name = "ClickSelect"
	NewGuiPart17.Position = UDim2.new(0, 0, 0, 18)
	NewGuiPart17.Size = UDim2.new(1, 0, 0, 30)
	NewGuiPart17.Parent = NewGuiPart14
	-------
	local NewGuiPart18 = Instance.new("TextLabel")
	NewGuiPart18.BackgroundTransparency = 0.5
	NewGuiPart18.Name = "Name"
	NewGuiPart18.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart18.FontSize = Enum.FontSize.Size14
	NewGuiPart18.Text = "Click Part to Select"
	NewGuiPart18.Parent = NewGuiPart17
	-------
	local NewGuiPart19 = Instance.new("TextButton")
	NewGuiPart19.Active = true
	NewGuiPart19.BackgroundTransparency = 0.5
	NewGuiPart19.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart19.Name = "Change"
	NewGuiPart19.Position = UDim2.new(0.5, 0, 0, 0)
	NewGuiPart19.Selectable = true
	NewGuiPart19.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart19.Style = Enum.ButtonStyle.Custom
	NewGuiPart19.FontSize = Enum.FontSize.Size18
	NewGuiPart19.Text = "OFF"
	NewGuiPart19.Parent = NewGuiPart17
	-------
	local NewGuiPart20 = Instance.new("Frame")
	NewGuiPart20.BackgroundTransparency = 1
	NewGuiPart20.Name = "ClearProperties"
	NewGuiPart20.Position = UDim2.new(0, 0, 0, 78)
	NewGuiPart20.Size = UDim2.new(1, 0, 0, 30)
	NewGuiPart20.Parent = NewGuiPart14
	-------
	local NewGuiPart21 = Instance.new("TextLabel")
	NewGuiPart21.BackgroundTransparency = 0.5
	NewGuiPart21.Name = "Name"
	NewGuiPart21.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart21.FontSize = Enum.FontSize.Size14
	NewGuiPart21.Text = "Clear Property on Focus"
	NewGuiPart21.Parent = NewGuiPart20
	-------
	local NewGuiPart22 = Instance.new("TextButton")
	NewGuiPart22.Active = true
	NewGuiPart22.BackgroundTransparency = 0.5
	NewGuiPart22.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart22.Name = "Change"
	NewGuiPart22.Position = UDim2.new(0.5, 0, 0, 0)
	NewGuiPart22.Selectable = true
	NewGuiPart22.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart22.Style = Enum.ButtonStyle.Custom
	NewGuiPart22.FontSize = Enum.FontSize.Size18
	NewGuiPart22.Text = "OFF"
	NewGuiPart22.Parent = NewGuiPart20
	-------
	local NewGuiPart23 = Instance.new("Frame")
	NewGuiPart23.BackgroundTransparency = 1
	NewGuiPart23.Name = "SelectionBox"
	NewGuiPart23.Position = UDim2.new(0, 0, 0, 48)
	NewGuiPart23.Size = UDim2.new(1, 0, 0, 30)
	NewGuiPart23.Parent = NewGuiPart14
	-------
	local NewGuiPart24 = Instance.new("TextLabel")
	NewGuiPart24.BackgroundTransparency = 0.5
	NewGuiPart24.Name = "Name"
	NewGuiPart24.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart24.FontSize = Enum.FontSize.Size14
	NewGuiPart24.Text = "Selection Box"
	NewGuiPart24.Parent = NewGuiPart23
	-------
	local NewGuiPart25 = Instance.new("TextButton")
	NewGuiPart25.Active = true
	NewGuiPart25.BackgroundTransparency = 0.5
	NewGuiPart25.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart25.Name = "Change"
	NewGuiPart25.Position = UDim2.new(0.5, 0, 0, 0)
	NewGuiPart25.Selectable = true
	NewGuiPart25.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart25.Style = Enum.ButtonStyle.Custom
	NewGuiPart25.FontSize = Enum.FontSize.Size18
	NewGuiPart25.Text = "OFF"
	NewGuiPart25.Parent = NewGuiPart23
	-------
	local NewGuiPart26 = Instance.new("Frame")
	NewGuiPart26.BackgroundTransparency = 1
	NewGuiPart26.Name = "SelectUngrouped"
	NewGuiPart26.Position = UDim2.new(0, 0, 0, 108)
	NewGuiPart26.Size = UDim2.new(1, 0, 0, 30)
	NewGuiPart26.Parent = NewGuiPart14
	-------
	local NewGuiPart27 = Instance.new("TextLabel")
	NewGuiPart27.BackgroundTransparency = 0.5
	NewGuiPart27.Name = "Name"
	NewGuiPart27.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart27.FontSize = Enum.FontSize.Size14
	NewGuiPart27.Text = "Select Ungrouped"
	NewGuiPart27.Parent = NewGuiPart26
	-------
	local NewGuiPart28 = Instance.new("TextButton")
	NewGuiPart28.Active = true
	NewGuiPart28.BackgroundTransparency = 0.5
	NewGuiPart28.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart28.Name = "Change"
	NewGuiPart28.Position = UDim2.new(0.5, 0, 0, 0)
	NewGuiPart28.Selectable = true
	NewGuiPart28.Size = UDim2.new(0.5, 0, 1, 0)
	NewGuiPart28.Style = Enum.ButtonStyle.Custom
	NewGuiPart28.FontSize = Enum.FontSize.Size18
	NewGuiPart28.Text = "ON"
	NewGuiPart28.Parent = NewGuiPart26
	-------
	local NewGuiPart29 = Instance.new("Frame")
	NewGuiPart29.Active = true
	NewGuiPart29.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart29.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart29.Name = "SaveInstance"
	NewGuiPart29.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
	NewGuiPart29.Size = UDim2.new(0, 350, 0, 20)
	NewGuiPart29.Visible = false
	NewGuiPart29.ZIndex = 2
	NewGuiPart29.Draggable = true
	NewGuiPart29.Parent = NewGuiPart1
	-------
	local NewGuiPart30 = Instance.new("TextLabel")
	NewGuiPart30.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart30.BackgroundTransparency = 1
	NewGuiPart30.Name = "Title"
	NewGuiPart30.Size = UDim2.new(1, 0, 1, 0)
	NewGuiPart30.ZIndex = 2
	NewGuiPart30.FontSize = Enum.FontSize.Size14
	NewGuiPart30.Text = "Save Instance"
	NewGuiPart30.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart30.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart30.Parent = NewGuiPart29
	-------
	local NewGuiPart31 = Instance.new("Frame")
	NewGuiPart31.BackgroundTransparency = 0.10000000149012
	NewGuiPart31.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart31.Name = "MainWindow"
	NewGuiPart31.Size = UDim2.new(1, 0, 0, 200)
	NewGuiPart31.Parent = NewGuiPart29
	-------
	local NewGuiPart32 = Instance.new("TextButton")
	NewGuiPart32.Active = true
	NewGuiPart32.BackgroundTransparency = 0.5
	NewGuiPart32.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart32.Name = "Save"
	NewGuiPart32.Position = UDim2.new(0.075000003, 0, 1, -40)
	NewGuiPart32.Selectable = true
	NewGuiPart32.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart32.Style = Enum.ButtonStyle.Custom
	NewGuiPart32.FontSize = Enum.FontSize.Size18
	NewGuiPart32.Text = "Save"
	NewGuiPart32.Parent = NewGuiPart31
	-------
	local NewGuiPart33 = Instance.new("TextLabel")
	NewGuiPart33.BackgroundTransparency = 1
	NewGuiPart33.Name = "Desc"
	NewGuiPart33.Position = UDim2.new(0, 0, 0, 20)
	NewGuiPart33.Size = UDim2.new(1, 0, 0, 40)
	NewGuiPart33.FontSize = Enum.FontSize.Size14
	NewGuiPart33.Text = "This will save an instance to your PC. Type in the name for your instance. (.rbxmx will be added automatically.)"
	NewGuiPart33.TextWrapped = true
	NewGuiPart33.Parent = NewGuiPart31
	-------
	local NewGuiPart34 = Instance.new("TextButton")
	NewGuiPart34.Active = true
	NewGuiPart34.BackgroundTransparency = 0.5
	NewGuiPart34.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart34.Name = "Cancel"
	NewGuiPart34.Position = UDim2.new(0.524999976, 0, 1, -40)
	NewGuiPart34.Selectable = true
	NewGuiPart34.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart34.Style = Enum.ButtonStyle.Custom
	NewGuiPart34.FontSize = Enum.FontSize.Size18
	NewGuiPart34.Text = "Cancel"
	NewGuiPart34.Parent = NewGuiPart31
	-------
	local NewGuiPart35 = Instance.new("TextBox")
	NewGuiPart35.BackgroundTransparency = 0.20000000298023
	NewGuiPart35.Name = "FileName"
	NewGuiPart35.Position = UDim2.new(0.075000003, 0, 0.400000006, 0)
	NewGuiPart35.Size = UDim2.new(0.850000024, 0, 0, 30)
	NewGuiPart35.FontSize = Enum.FontSize.Size18
	NewGuiPart35.Text = ""
	NewGuiPart35.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart35.Parent = NewGuiPart31
	-------
	local NewGuiPart36 = Instance.new("TextButton")
	NewGuiPart36.Active = true
	NewGuiPart36.BackgroundTransparency = 0.60000002384186
	NewGuiPart36.Name = "SaveObjects"
	NewGuiPart36.Position = UDim2.new(0.075000003, 0, 0.625, 0)
	NewGuiPart36.Selectable = true
	NewGuiPart36.Size = UDim2.new(0, 20, 0, 20)
	NewGuiPart36.Style = Enum.ButtonStyle.Custom
	NewGuiPart36.ZIndex = 2
	NewGuiPart36.FontSize = Enum.FontSize.Size18
	NewGuiPart36.Text = ""
	NewGuiPart36.TextColor3 = Color3.new(1, 1, 1)
	NewGuiPart36.Parent = NewGuiPart31
	-------
	local NewGuiPart37 = Instance.new("TextLabel")
	NewGuiPart37.BackgroundColor3 = Color3.new(0.380392, 0.380392, 0.380392)
	NewGuiPart37.BackgroundTransparency = 0.40000000596046
	NewGuiPart37.BorderSizePixel = 0
	NewGuiPart37.Name = "enabled"
	NewGuiPart37.Position = UDim2.new(0, 3, 0, 3)
	NewGuiPart37.Size = UDim2.new(0, 14, 0, 14)
	NewGuiPart37.FontSize = Enum.FontSize.Size14
	NewGuiPart37.Text = ""
	NewGuiPart37.Parent = NewGuiPart36
	-------
	local NewGuiPart38 = Instance.new("TextLabel")
	NewGuiPart38.BackgroundTransparency = 1
	NewGuiPart38.Name = "Desc2"
	NewGuiPart38.Position = UDim2.new(0.075000003, 30, 0.625, 0)
	NewGuiPart38.Size = UDim2.new(0.925000012, -30, 0, 20)
	NewGuiPart38.FontSize = Enum.FontSize.Size14
	NewGuiPart38.Text = "Save 'Object' type values"
	NewGuiPart38.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart38.Parent = NewGuiPart31
	-------
	local NewGuiPart39 = Instance.new("Frame")
	NewGuiPart39.Active = true
	NewGuiPart39.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart39.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart39.Name = "Confirmation"
	NewGuiPart39.Position = UDim2.new(0.300000012, 0, 0.349999994, 0)
	NewGuiPart39.Size = UDim2.new(0, 350, 0, 20)
	NewGuiPart39.Visible = false
	NewGuiPart39.ZIndex = 3
	NewGuiPart39.Draggable = true
	NewGuiPart39.Parent = NewGuiPart1
	-------
	local NewGuiPart40 = Instance.new("TextLabel")
	NewGuiPart40.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart40.BackgroundTransparency = 1
	NewGuiPart40.Name = "Title"
	NewGuiPart40.Size = UDim2.new(1, 0, 1, 0)
	NewGuiPart40.ZIndex = 3
	NewGuiPart40.FontSize = Enum.FontSize.Size14
	NewGuiPart40.Text = "Confirm"
	NewGuiPart40.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart40.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart40.Parent = NewGuiPart39
	-------
	local NewGuiPart41 = Instance.new("Frame")
	NewGuiPart41.BackgroundTransparency = 0.10000000149012
	NewGuiPart41.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart41.Name = "MainWindow"
	NewGuiPart41.Size = UDim2.new(1, 0, 0, 150)
	NewGuiPart41.ZIndex = 2
	NewGuiPart41.Parent = NewGuiPart39
	-------
	local NewGuiPart42 = Instance.new("TextButton")
	NewGuiPart42.Active = true
	NewGuiPart42.BackgroundTransparency = 0.5
	NewGuiPart42.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart42.Name = "Yes"
	NewGuiPart42.Position = UDim2.new(0.075000003, 0, 1, -40)
	NewGuiPart42.Selectable = true
	NewGuiPart42.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart42.Style = Enum.ButtonStyle.Custom
	NewGuiPart42.ZIndex = 2
	NewGuiPart42.FontSize = Enum.FontSize.Size18
	NewGuiPart42.Text = "Yes"
	NewGuiPart42.Parent = NewGuiPart41
	-------
	local NewGuiPart43 = Instance.new("TextLabel")
	NewGuiPart43.BackgroundTransparency = 1
	NewGuiPart43.Name = "Desc"
	NewGuiPart43.Position = UDim2.new(0, 0, 0, 20)
	NewGuiPart43.Size = UDim2.new(1, 0, 0, 40)
	NewGuiPart43.ZIndex = 2
	NewGuiPart43.FontSize = Enum.FontSize.Size14
	NewGuiPart43.Text = "The file, FILENAME, already exists. Overwrite?"
	NewGuiPart43.TextWrapped = true
	NewGuiPart43.Parent = NewGuiPart41
	-------
	local NewGuiPart44 = Instance.new("TextButton")
	NewGuiPart44.Active = true
	NewGuiPart44.BackgroundTransparency = 0.5
	NewGuiPart44.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart44.Name = "No"
	NewGuiPart44.Position = UDim2.new(0.524999976, 0, 1, -40)
	NewGuiPart44.Selectable = true
	NewGuiPart44.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart44.Style = Enum.ButtonStyle.Custom
	NewGuiPart44.ZIndex = 2
	NewGuiPart44.FontSize = Enum.FontSize.Size18
	NewGuiPart44.Text = "No"
	NewGuiPart44.Parent = NewGuiPart41
	-------
	local NewGuiPart45 = Instance.new("Frame")
	NewGuiPart45.Active = true
	NewGuiPart45.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart45.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart45.Name = "Caution"
	NewGuiPart45.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
	NewGuiPart45.Size = UDim2.new(0, 350, 0, 20)
	NewGuiPart45.Visible = false
	NewGuiPart45.ZIndex = 5
	NewGuiPart45.Draggable = true
	NewGuiPart45.Parent = NewGuiPart1
	-------
	local NewGuiPart46 = Instance.new("TextLabel")
	NewGuiPart46.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart46.BackgroundTransparency = 1
	NewGuiPart46.Name = "Title"
	NewGuiPart46.Size = UDim2.new(1, 0, 1, 0)
	NewGuiPart46.ZIndex = 5
	NewGuiPart46.FontSize = Enum.FontSize.Size14
	NewGuiPart46.Text = "Caution"
	NewGuiPart46.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart46.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart46.Parent = NewGuiPart45
	-------
	local NewGuiPart47 = Instance.new("Frame")
	NewGuiPart47.BackgroundTransparency = 0.10000000149012
	NewGuiPart47.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart47.Name = "MainWindow"
	NewGuiPart47.Size = UDim2.new(1, 0, 0, 150)
	NewGuiPart47.ZIndex = 4
	NewGuiPart47.Parent = NewGuiPart45
	-------
	local NewGuiPart48 = Instance.new("TextLabel")
	NewGuiPart48.BackgroundTransparency = 1
	NewGuiPart48.Name = "Desc"
	NewGuiPart48.Position = UDim2.new(0, 0, 0, 20)
	NewGuiPart48.Size = UDim2.new(1, 0, 0, 42)
	NewGuiPart48.ZIndex = 4
	NewGuiPart48.FontSize = Enum.FontSize.Size14
	NewGuiPart48.Text = "The file, FILENAME, already exists. Overwrite?"
	NewGuiPart48.TextWrapped = true
	NewGuiPart48.Parent = NewGuiPart47
	-------
	local NewGuiPart49 = Instance.new("TextButton")
	NewGuiPart49.Active = true
	NewGuiPart49.BackgroundTransparency = 0.5
	NewGuiPart49.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart49.Name = "Ok"
	NewGuiPart49.Position = UDim2.new(0.300000012, 0, 1, -40)
	NewGuiPart49.Selectable = true
	NewGuiPart49.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart49.Style = Enum.ButtonStyle.Custom
	NewGuiPart49.ZIndex = 4
	NewGuiPart49.FontSize = Enum.FontSize.Size18
	NewGuiPart49.Text = "Ok"
	NewGuiPart49.Parent = NewGuiPart47
	-------
	local NewGuiPart50 = Instance.new("Frame")
	NewGuiPart50.Active = true
	NewGuiPart50.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart50.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart50.Name = "CallRemote"
	NewGuiPart50.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
	NewGuiPart50.Size = UDim2.new(0, 350, 0, 20)
	NewGuiPart50.Visible = false
	NewGuiPart50.ZIndex = 2
	NewGuiPart50.Draggable = true
	NewGuiPart50.Parent = NewGuiPart1
	-------
	local NewGuiPart51 = Instance.new("TextLabel")
	NewGuiPart51.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart51.BackgroundTransparency = 1
	NewGuiPart51.Name = "Title"
	NewGuiPart51.Size = UDim2.new(1, 0, 1, 0)
	NewGuiPart51.ZIndex = 2
	NewGuiPart51.FontSize = Enum.FontSize.Size14
	NewGuiPart51.Text = "Call Remote"
	NewGuiPart51.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart51.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart51.Parent = NewGuiPart50
	-------
	local NewGuiPart52 = Instance.new("Frame")
	NewGuiPart52.BackgroundTransparency = 0.10000000149012
	NewGuiPart52.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart52.Name = "MainWindow"
	NewGuiPart52.Size = UDim2.new(1, 0, 0, 200)
	NewGuiPart52.Parent = NewGuiPart50
	-------
	local NewGuiPart53 = Instance.new("TextLabel")
	NewGuiPart53.BackgroundTransparency = 1
	NewGuiPart53.Name = "Desc"
	NewGuiPart53.Position = UDim2.new(0, 0, 0, 20)
	NewGuiPart53.Size = UDim2.new(1, 0, 0, 20)
	NewGuiPart53.FontSize = Enum.FontSize.Size14
	NewGuiPart53.Text = "Arguments"
	NewGuiPart53.TextWrapped = true
	NewGuiPart53.Parent = NewGuiPart52
	-------
	local NewGuiPart54 = Instance.new("ScrollingFrame")
	NewGuiPart54.BackgroundTransparency = 1
	NewGuiPart54.Name = "Arguments"
	NewGuiPart54.Position = UDim2.new(0, 0, 0, 40)
	NewGuiPart54.Selectable = true
	NewGuiPart54.Size = UDim2.new(1, 0, 0, 80)
	NewGuiPart54.BottomImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart54.CanvasSize = UDim2.new(0, 0, 0, 0)
	NewGuiPart54.MidImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart54.TopImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart54.ClipsDescendants = true
	NewGuiPart54.Parent = NewGuiPart52
	-------
	local NewGuiPart55 = Instance.new("TextButton")
	NewGuiPart55.Active = true
	NewGuiPart55.BackgroundTransparency = 0.60000002384186
	NewGuiPart55.Name = "DisplayReturned"
	NewGuiPart55.Position = UDim2.new(0.075000003, 0, 0.625, 0)
	NewGuiPart55.Selectable = true
	NewGuiPart55.Size = UDim2.new(0, 20, 0, 20)
	NewGuiPart55.Style = Enum.ButtonStyle.Custom
	NewGuiPart55.ZIndex = 2
	NewGuiPart55.FontSize = Enum.FontSize.Size18
	NewGuiPart55.Text = ""
	NewGuiPart55.TextColor3 = Color3.new(1, 1, 1)
	NewGuiPart55.Parent = NewGuiPart52
	-------
	local NewGuiPart56 = Instance.new("TextLabel")
	NewGuiPart56.BackgroundColor3 = Color3.new(0.380392, 0.380392, 0.380392)
	NewGuiPart56.BackgroundTransparency = 0.40000000596046
	NewGuiPart56.BorderSizePixel = 0
	NewGuiPart56.Name = "enabled"
	NewGuiPart56.Position = UDim2.new(0, 3, 0, 3)
	NewGuiPart56.Size = UDim2.new(0, 14, 0, 14)
	NewGuiPart56.Visible = false
	NewGuiPart56.FontSize = Enum.FontSize.Size14
	NewGuiPart56.Text = ""
	NewGuiPart56.Parent = NewGuiPart55
	-------
	local NewGuiPart57 = Instance.new("TextLabel")
	NewGuiPart57.BackgroundTransparency = 1
	NewGuiPart57.Name = "Desc2"
	NewGuiPart57.Position = UDim2.new(0.075000003, 30, 0.625, 0)
	NewGuiPart57.Size = UDim2.new(0.925000012, -30, 0, 20)
	NewGuiPart57.FontSize = Enum.FontSize.Size14
	NewGuiPart57.Text = "Display values returned"
	NewGuiPart57.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart57.Parent = NewGuiPart52
	-------
	local NewGuiPart58 = Instance.new("TextButton")
	NewGuiPart58.Active = true
	NewGuiPart58.BackgroundTransparency = 0.5
	NewGuiPart58.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart58.Name = "Add"
	NewGuiPart58.Position = UDim2.new(0.800000012, 0, 0.625, 0)
	NewGuiPart58.Selectable = true
	NewGuiPart58.Size = UDim2.new(0, 20, 0, 20)
	NewGuiPart58.Style = Enum.ButtonStyle.Custom
	NewGuiPart58.Font = Enum.Font.SourceSansBold
	NewGuiPart58.FontSize = Enum.FontSize.Size24
	NewGuiPart58.Text = "+"
	NewGuiPart58.Parent = NewGuiPart52
	-------
	local NewGuiPart59 = Instance.new("TextButton")
	NewGuiPart59.Active = true
	NewGuiPart59.BackgroundTransparency = 0.5
	NewGuiPart59.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart59.Name = "Subtract"
	NewGuiPart59.Position = UDim2.new(0.899999976, 0, 0.625, 0)
	NewGuiPart59.Selectable = true
	NewGuiPart59.Size = UDim2.new(0, 20, 0, 20)
	NewGuiPart59.Style = Enum.ButtonStyle.Custom
	NewGuiPart59.Font = Enum.Font.SourceSansBold
	NewGuiPart59.FontSize = Enum.FontSize.Size24
	NewGuiPart59.Text = "-"
	NewGuiPart59.Parent = NewGuiPart52
	-------
	local NewGuiPart60 = Instance.new("Frame")
	NewGuiPart60.BackgroundTransparency = 0.5
	NewGuiPart60.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart60.Name = "ArgumentTemplate"
	NewGuiPart60.Size = UDim2.new(1, 0, 0, 20)
	NewGuiPart60.Visible = false
	NewGuiPart60.Parent = NewGuiPart52
	-------
	local NewGuiPart61 = Instance.new("TextButton")
	NewGuiPart61.Active = true
	NewGuiPart61.BackgroundTransparency = 0.89999997615814
	NewGuiPart61.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart61.Name = "Type"
	NewGuiPart61.Selectable = true
	NewGuiPart61.Size = UDim2.new(0.400000006, 0, 0, 20)
	NewGuiPart61.Style = Enum.ButtonStyle.Custom
	NewGuiPart61.FontSize = Enum.FontSize.Size18
	NewGuiPart61.Text = "Script"
	NewGuiPart61.Parent = NewGuiPart60
	-------
	local NewGuiPart62 = Instance.new("TextBox")
	NewGuiPart62.BackgroundTransparency = 0.89999997615814
	NewGuiPart62.Name = "Value"
	NewGuiPart62.Position = UDim2.new(0.400000006, 0, 0, 0)
	NewGuiPart62.Size = UDim2.new(0.600000024, -12, 0, 20)
	NewGuiPart62.FontSize = Enum.FontSize.Size14
	NewGuiPart62.Text = ""
	NewGuiPart62.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart62.Parent = NewGuiPart60
	-------
	local NewGuiPart63 = Instance.new("TextButton")
	NewGuiPart63.Active = true
	NewGuiPart63.BackgroundTransparency = 0.5
	NewGuiPart63.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart63.Name = "Cancel"
	NewGuiPart63.Position = UDim2.new(0.524999976, 0, 1, -40)
	NewGuiPart63.Selectable = true
	NewGuiPart63.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart63.Style = Enum.ButtonStyle.Custom
	NewGuiPart63.FontSize = Enum.FontSize.Size18
	NewGuiPart63.Text = "Cancel"
	NewGuiPart63.Parent = NewGuiPart52
	-------
	local NewGuiPart64 = Instance.new("TextButton")
	NewGuiPart64.Active = true
	NewGuiPart64.BackgroundTransparency = 0.5
	NewGuiPart64.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart64.Name = "Ok"
	NewGuiPart64.Position = UDim2.new(0.075000003, 0, 1, -40)
	NewGuiPart64.Selectable = true
	NewGuiPart64.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart64.Style = Enum.ButtonStyle.Custom
	NewGuiPart64.FontSize = Enum.FontSize.Size18
	NewGuiPart64.Text = "Call"
	NewGuiPart64.Parent = NewGuiPart52
	-------
	local NewGuiPart65 = Instance.new("Frame")
	NewGuiPart65.Active = true
	NewGuiPart65.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
	NewGuiPart65.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
	NewGuiPart65.Name = "TableCaution"
	NewGuiPart65.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
	NewGuiPart65.Size = UDim2.new(0, 350, 0, 20)
	NewGuiPart65.Visible = false
	NewGuiPart65.ZIndex = 2
	NewGuiPart65.Draggable = true
	NewGuiPart65.Parent = NewGuiPart1
	-------
	local NewGuiPart66 = Instance.new("Frame")
	NewGuiPart66.BackgroundTransparency = 0.10000000149012
	NewGuiPart66.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart66.Name = "MainWindow"
	NewGuiPart66.Size = UDim2.new(1, 0, 0, 150)
	NewGuiPart66.Parent = NewGuiPart65
	-------
	local NewGuiPart67 = Instance.new("TextButton")
	NewGuiPart67.Active = true
	NewGuiPart67.BackgroundTransparency = 0.5
	NewGuiPart67.BorderColor3 = Color3.new(0, 0, 0)
	NewGuiPart67.Name = "Ok"
	NewGuiPart67.Position = UDim2.new(0.300000012, 0, 1, -40)
	NewGuiPart67.Selectable = true
	NewGuiPart67.Size = UDim2.new(0.400000006, 0, 0, 30)
	NewGuiPart67.Style = Enum.ButtonStyle.Custom
	NewGuiPart67.FontSize = Enum.FontSize.Size18
	NewGuiPart67.Text = "Ok"
	NewGuiPart67.Parent = NewGuiPart66
	-------
	local NewGuiPart68 = Instance.new("ScrollingFrame")
	NewGuiPart68.BackgroundTransparency = 1
	NewGuiPart68.Name = "TableResults"
	NewGuiPart68.Position = UDim2.new(0, 0, 0, 20)
	NewGuiPart68.Selectable = true
	NewGuiPart68.Size = UDim2.new(1, 0, 0, 80)
	NewGuiPart68.BottomImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart68.CanvasSize = UDim2.new(0, 0, 0, 0)
	NewGuiPart68.MidImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart68.TopImage = "rbxasset://textures/blackBkg_square.png"
	NewGuiPart68.ClipsDescendants = true
	NewGuiPart68.Parent = NewGuiPart66
	-------
	local NewGuiPart69 = Instance.new("Frame")
	NewGuiPart69.BackgroundTransparency = 0.5
	NewGuiPart69.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
	NewGuiPart69.Name = "TableTemplate"
	NewGuiPart69.Size = UDim2.new(1, 0, 0, 20)
	NewGuiPart69.Visible = false
	NewGuiPart69.Parent = NewGuiPart66
	-------
	local NewGuiPart70 = Instance.new("TextLabel")
	NewGuiPart70.BackgroundTransparency = 0.89999997615814
	NewGuiPart70.Name = "Type"
	NewGuiPart70.Size = UDim2.new(0.400000006, 0, 0, 20)
	NewGuiPart70.FontSize = Enum.FontSize.Size18
	NewGuiPart70.Text = "Script"
	NewGuiPart70.Parent = NewGuiPart69
	-------
	local NewGuiPart71 = Instance.new("TextLabel")
	NewGuiPart71.BackgroundTransparency = 0.89999997615814
	NewGuiPart71.Name = "Value"
	NewGuiPart71.Position = UDim2.new(0.400000006, 0, 0, 0)
	NewGuiPart71.Size = UDim2.new(0.600000024, -12, 0, 20)
	NewGuiPart71.FontSize = Enum.FontSize.Size14
	NewGuiPart71.Text = "Script"
	NewGuiPart71.Parent = NewGuiPart69
	-------
	local NewGuiPart72 = Instance.new("TextLabel")
	NewGuiPart72.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
	NewGuiPart72.BackgroundTransparency = 1
	NewGuiPart72.Name = "Title"
	NewGuiPart72.Size = UDim2.new(1, 0, 1, 0)
	NewGuiPart72.ZIndex = 2
	NewGuiPart72.FontSize = Enum.FontSize.Size14
	NewGuiPart72.Text = "Caution"
	NewGuiPart72.TextColor3 = Color3.new(0, 0, 0)
	NewGuiPart72.TextXAlignment = Enum.TextXAlignment.Left
	NewGuiPart72.Parent = NewGuiPart65

	return NewGuiPart1
end

local D_E_X = CreateGui()

local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
what.Name = "GetOption"
local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
what.Name = "SetOption"
local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
what.Name = "GetSelection"
local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
what.Name = "SetSelection"
local what = Instance.new("BindableEvent",D_E_X.ExplorerPanel)
what.Name = "SelectionChanged"

local what = Instance.new("BindableFunction",D_E_X.PropertiesFrame)
what.Name = "GetApi"
local what = Instance.new("BindableFunction",D_E_X.PropertiesFrame)
what.Name = "GetAwaiting"
local what = Instance.new("BindableEvent",D_E_X.PropertiesFrame)
what.Name = "SetAwaiting"

local what = Instance.new("BindableFunction",D_E_X.SettingsPanel)
what.Name = "GetSetting"

D_E_X.Parent = game.Players.LocalPlayer.PlayerGui

spawn(function()
	local Gui = D_E_X

local SideMenu = Gui:WaitForChild("SideMenu")
local OpenToggleButton = Gui:WaitForChild("Toggle")
local CloseToggleButton = SideMenu:WaitForChild("Toggle")
local ExplorerButton = SideMenu:WaitForChild("Explorer")
local SettingsButton = SideMenu:WaitForChild("Settings")

local SelectionBox = Instance.new("SelectionBox")
SelectionBox.Parent = Gui

local ExplorerPanel = Gui:WaitForChild("ExplorerPanel")
local PropertiesFrame = Gui:WaitForChild("PropertiesFrame")
local SettingsPanel = Gui:WaitForChild("SettingsPanel")

local SettingsListener = SettingsPanel:WaitForChild("GetSetting")

local ClickSelectOption = SettingsPanel:WaitForChild("ClickSelect"):WaitForChild("Change")
local SelectionBoxOption = SettingsPanel:WaitForChild("SelectionBox"):WaitForChild("Change")
local ClearPropsOption = SettingsPanel:WaitForChild("ClearProperties"):WaitForChild("Change")
local SelectUngroupedOption = SettingsPanel:WaitForChild("SelectUngrouped"):WaitForChild("Change")

local SelectionChanged = ExplorerPanel:WaitForChild("SelectionChanged")
local GetSelection = ExplorerPanel:WaitForChild("GetSelection")
local SetSelection = ExplorerPanel:WaitForChild("SetSelection")

local Player = game:GetService("Players").LocalPlayer

local CurrentWindow = "Explorer"

local Settings = {
	ClickSelect = false,
	SelBox = false,
	ClearProps = false,
	SelectUngrouped = true
}

function ReturnSetting(set)
	if set == "ClearProps" then
		return Settings.ClearProps
	elseif set == "SelectUngrouped" then
		return Settings.SelectUngrouped
	end
end

OpenToggleButton.MouseButton1Up:connect(function()
	SideMenu:TweenPosition(UDim2.new(1, -330, 0, 0), "Out", "Quad", 0.5, true)

	if CurrentWindow == "Explorer" then
		ExplorerPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
		PropertiesFrame:TweenPosition(UDim2.new(1, -300, 0.5, 21), "Out", "Quad", 0.5, true)
	else
		SettingsPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
	end

	OpenToggleButton:TweenPosition(UDim2.new(1,0,0,0), "Out", "Quad", 0.5, true)
end)

CloseToggleButton.MouseButton1Up:connect(function()
	SideMenu:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)

	ExplorerPanel:TweenPosition(UDim2.new(1, 30, 0, 0), "Out", "Quad", 0.5, true)
	PropertiesFrame:TweenPosition(UDim2.new(1, 30, 0.5, 21), "Out", "Quad", 0.5, true)
	SettingsPanel:TweenPosition(UDim2.new(1, 30, 0, 0), "Out", "Quad", 0.5, true)

	OpenToggleButton:TweenPosition(UDim2.new(1,-30,0,0), "Out", "Quad", 0.5, true)
end)

ExplorerButton.MouseButton1Up:connect(function()
	if CurrentWindow ~= "Explorer" then
		CurrentWindow = "Explorer"

		ExplorerPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
		PropertiesFrame:TweenPosition(UDim2.new(1, -300, 0.5, 21), "Out", "Quad", 0.5, true)
		SettingsPanel:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)
	end
end)

SettingsButton.MouseButton1Up:connect(function()
	if CurrentWindow ~= "Settings" then
		CurrentWindow = "Settings"

		ExplorerPanel:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)
		PropertiesFrame:TweenPosition(UDim2.new(1, 0, 0.5, 21), "Out", "Quad", 0.5, true)
		SettingsPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
	end
end)

ClickSelectOption.MouseButton1Up:connect(function()
	if Settings.ClickSelect then
		Settings.ClickSelect = false
		ClickSelectOption.Text = "OFF"
	else
		Settings.ClickSelect = true
		ClickSelectOption.Text = "ON"
	end
end)

SelectionBoxOption.MouseButton1Up:connect(function()
	if Settings.SelBox then
		Settings.SelBox = false
		SelectionBox.Adornee = nil
		SelectionBoxOption.Text = "OFF"
	else
		Settings.SelBox = true
		SelectionBoxOption.Text = "ON"
	end
end)

ClearPropsOption.MouseButton1Up:connect(function()
	if Settings.ClearProps then
		Settings.ClearProps = false
		ClearPropsOption.Text = "OFF"
	else
		Settings.ClearProps = true
		ClearPropsOption.Text = "ON"
	end
end)

SelectUngroupedOption.MouseButton1Up:connect(function()
	if Settings.SelectUngrouped then
		Settings.SelectUngrouped = false
		SelectUngroupedOption.Text = "OFF"
	else
		Settings.SelectUngrouped = true
		SelectUngroupedOption.Text = "ON"
	end
end)

local function getSelection()
	local t = GetSelection:Invoke()
	if t and #t > 0 then
		return t[1]
	else
		return nil
	end
end

Mouse.Button1Down:connect(function()
	if CurrentWindow == "Explorer" and Settings.ClickSelect then
		local target = Mouse.Target
		if target then
			SetSelection:Invoke({target})
		end
	end
end)

SelectionChanged.Event:connect(function()
	if Settings.SelBox then
		local success,err = pcall(function()
			local selection = getSelection()
			SelectionBox.Adornee = selection
		end)
		if err then
			SelectionBox.Adornee = nil
		end
	end
end)

SettingsListener.OnInvoke = ReturnSetting
end)

spawn(function()
	-- initial states
local Option = {
	-- can modify object parents in the hierarchy
	Modifiable = false;
	-- can select objects
	Selectable = true;
}

-- MERELY

Option.Modifiable = true

-- END MERELY

-- general size of GUI objects, in pixels
local GUI_SIZE = 16
-- padding between items within each entry
local ENTRY_PADDING = 1
-- padding between each entry
local ENTRY_MARGIN = 1

local Input = game:GetService("UserInputService")
local HoldingCtrl = false
local HoldingShift = false

--[[

# Explorer Panel

A GUI panel that displays the game hierarchy.


## Selection Bindables

- `Function GetSelection ( )`

	Returns an array of objects representing the objects currently
	selected in the panel.

- `Function SetSelection ( Objects selection )`

	Sets the objects that are selected in the panel. `selection` is an array
	of objects.

- `Event SelectionChanged ( )`

	Fired after the selection changes.


## Option Bindables

- `Function GetOption ( string optionName )`

	If `optionName` is given, returns the value of that option. Otherwise,
	returns a table of options and their current values.

- `Function SetOption ( string optionName, bool value )`

	Sets `optionName` to `value`.

	Options:

	- Modifiable

		Whether objects can be modified by the panel.

		Note that modifying objects depends on being able to select them. If
		Selectable is false, then Actions will not be available. Reparenting
		is still possible, but only for the dragged object.

	- Selectable

		Whether objects can be selected.

		If Modifiable is false, then left-clicking will perform a drag
		selection.

## Updates

- 2013-09-18
	- Fixed explorer icons to match studio explorer.

- 2013-09-14
	- Added GetOption and SetOption bindables.
		- Option: Modifiable; sets whether objects can be modified by the panel.
		- Option: Selectable; sets whether objects can be selected.
	- Slight modification to left-click selection behavior.
	- Improved layout and scaling.

- 2013-09-13
	- Added drag to reparent objects.
		- Left-click to select/deselect object.
		- Left-click and drag unselected object to reparent single object.
		- Left-click and drag selected object to move reparent entire selection.
		- Right-click while dragging to cancel.

- 2013-09-11
	- Added explorer panel header with actions.
		- Added Cut action.
		- Added Copy action.
		- Added Paste action.
		- Added Delete action.
	- Added drag selection.
		- Left-click: Add to selection on drag.
		- Right-click: Add to or remove from selection on drag.
	- Ensured SelectionChanged fires only when the selection actually changes.
	- Added documentation and change log.
	- Fixed thread issue.

- 2013-09-09
	- Added basic multi-selection.
		- Left-click to set selection.
		- Right-click to add to or remove from selection.
	- Removed "Selection" ObjectValue.
		- Added GetSelection BindableFunction.
		- Added SetSelection BindableFunction.
		- Added SelectionChanged BindableEvent.
	- Changed font to SourceSans.

- 2013-08-31
	- Improved GUI sizing based off of `GUI_SIZE` constant.
	- Automatic font size detection.

- 2013-08-27
	- Initial explorer panel.


## Todo

- Sorting
	- by ExplorerOrder
	- by children
	- by name
- Drag objects to reparent

]]

local ENTRY_SIZE = GUI_SIZE + ENTRY_PADDING*2
local ENTRY_BOUND = ENTRY_SIZE + ENTRY_MARGIN
local HEADER_SIZE = ENTRY_SIZE*2

local FONT = 'SourceSans'
local FONT_SIZE do
	local size = {8,9,10,11,12,14,18,24,36,48}
	local s
	local n = math.huge
	for i = 1,#size do
		if size[i] <= GUI_SIZE then
			FONT_SIZE = i - 1
		end
	end
end

local GuiColor = {
	Background      = Color3.new(233/255, 233/255, 233/255);
	Border          = Color3.new(149/255, 149/255, 149/255);
	Selected        = Color3.new( 96/255, 140/255, 211/255);
	BorderSelected  = Color3.new( 86/255, 125/255, 188/255);
	Text            = Color3.new(  0/255,   0/255,   0/255);
	TextDisabled    = Color3.new(128/255, 128/255, 128/255);
	TextSelected    = Color3.new(255/255, 255/255, 255/255);
	Button          = Color3.new(221/255, 221/255, 221/255);
	ButtonBorder    = Color3.new(149/255, 149/255, 149/255);
	ButtonSelected  = Color3.new(255/255,   0/255,   0/255);
	Field           = Color3.new(255/255, 255/255, 255/255);
	FieldBorder     = Color3.new(191/255, 191/255, 191/255);
	TitleBackground = Color3.new(178/255, 178/255, 178/255);
}

----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
---- Icon map constants

local MAP_ID = 418720155

-- Indices based on implementation of Icon function.
local ACTION_CUT         = 160
local ACTION_COPY        = 161
local ACTION_PASTE       = 162
local ACTION_DELETE      = 163
local ACTION_SORT        = 164
local ACTION_CUT_OVER    = 174
local ACTION_COPY_OVER   = 175
local ACTION_PASTE_OVER  = 176
local ACTION_DELETE_OVER = 177
local ACTION_SORT_OVER   = 178

local NODE_COLLAPSED      = 165
local NODE_EXPANDED       = 166
local NODE_COLLAPSED_OVER = 179
local NODE_EXPANDED_OVER  = 180

local ExplorerIndex = {
	["Accessory"] = 32;
	["Accoutrement"] = 32;
	["AdService"] = 73;
	["Animation"] = 60;
	["AnimationController"] = 60;
	["AnimationTrack"] = 60;
	["Animator"] = 60;
	["ArcHandles"] = 56;
	["AssetService"] = 72;
	["Attachment"] = 34;
	["Backpack"] = 20;
	["BadgeService"] = 75;
	["BallSocketConstraint"] = 89;
	["BillboardGui"] = 64;
	["BinaryStringValue"] = 4;
	["BindableEvent"] = 67;
	["BindableFunction"] = 66;
	["BlockMesh"] = 8;
	["BloomEffect"] = 90;
	["BlurEffect"] = 90;
	["BodyAngularVelocity"] = 14;
	["BodyForce"] = 14;
	["BodyGyro"] = 14;
	["BodyPosition"] = 14;
	["BodyThrust"] = 14;
	["BodyVelocity"] = 14;
	["BoolValue"] = 4;
	["BoxHandleAdornment"] = 54;
	["BrickColorValue"] = 4;
	["Camera"] = 5;
	["CFrameValue"] = 4;
	["CharacterMesh"] = 60;
	["Chat"] = 33;
	["ClickDetector"] = 41;
	["CollectionService"] = 30;
	["Color3Value"] = 4;
	["ColorCorrectionEffect"] = 90;
	["ConeHandleAdornment"] = 54;
	["Configuration"] = 58;
	["ContentProvider"] = 72;
	["ContextActionService"] = 41;
	["CoreGui"] = 46;
	["CoreScript"] = 18;
	["CornerWedgePart"] = 1;
	["CustomEvent"] = 4;
	["CustomEventReceiver"] = 4;
	["CylinderHandleAdornment"] = 54;
	["CylinderMesh"] = 8;
	["CylindricalConstraint"] = 89;
	["Debris"] = 30;
	["Decal"] = 7;
	["Dialog"] = 62;
	["DialogChoice"] = 63;
	["DoubleConstrainedValue"] = 4;
	["Explosion"] = 36;
	["FileMesh"] = 8;
	["Fire"] = 61;
	["Flag"] = 38;
	["FlagStand"] = 39;
	["FloorWire"] = 4;
	["Folder"] = 70;
	["ForceField"] = 37;
	["Frame"] = 48;
	["GamePassService"] = 19;
	["Glue"] = 34;
	["GuiButton"] = 52;
	["GuiMain"] = 47;
	["GuiService"] = 47;
	["Handles"] = 53;
	["HapticService"] = 84;
	["Hat"] = 45;
	["HingeConstraint"] = 89;
	["Hint"] = 33;
	["HopperBin"] = 22;
	["HttpService"] = 76;
	["Humanoid"] = 9;
	["ImageButton"] = 52;
	["ImageLabel"] = 49;
	["InsertService"] = 72;
	["IntConstrainedValue"] = 4;
	["IntValue"] = 4;
	["JointInstance"] = 34;
	["JointsService"] = 34;
	["Keyframe"] = 60;
	["KeyframeSequence"] = 60;
	["KeyframeSequenceProvider"] = 60;
	["Lighting"] = 13;
	["LineHandleAdornment"] = 54;
	["LocalScript"] = 18;
	["LogService"] = 87;
	["MarketplaceService"] = 46;
	["Message"] = 33;
	["Model"] = 2;
	["ModuleScript"] = 71;
	["Motor"] = 34;
	["Motor6D"] = 34;
	["MoveToConstraint"] = 89;
	["NegateOperation"] = 78;
	["NetworkClient"] = 16;
	["NetworkReplicator"] = 29;
	["NetworkServer"] = 15;
	["NumberValue"] = 4;
	["ObjectValue"] = 4;
	["Pants"] = 44;
	["ParallelRampPart"] = 1;
	["Part"] = 1;
	["ParticleEmitter"] = 69;
	["PartPairLasso"] = 57;
	["PathfindingService"] = 37;
	["Platform"] = 35;
	["Player"] = 12;
	["PlayerGui"] = 46;
	["Players"] = 21;
	["PlayerScripts"] = 82;
	["PointLight"] = 13;
	["PointsService"] = 83;
	["Pose"] = 60;
	["PrismaticConstraint"] = 89;
	["PrismPart"] = 1;
	["PyramidPart"] = 1;
	["RayValue"] = 4;
	["ReflectionMetadata"] = 86;
	["ReflectionMetadataCallbacks"] = 86;
	["ReflectionMetadataClass"] = 86;
	["ReflectionMetadataClasses"] = 86;
	["ReflectionMetadataEnum"] = 86;
	["ReflectionMetadataEnumItem"] = 86;
	["ReflectionMetadataEnums"] = 86;
	["ReflectionMetadataEvents"] = 86;
	["ReflectionMetadataFunctions"] = 86;
	["ReflectionMetadataMember"] = 86;
	["ReflectionMetadataProperties"] = 86;
	["ReflectionMetadataYieldFunctions"] = 86;
	["RemoteEvent"] = 80;
	["RemoteFunction"] = 79;
	["ReplicatedFirst"] = 72;
	["ReplicatedStorage"] = 72;
	["RightAngleRampPart"] = 1;
	["RocketPropulsion"] = 14;
	["RodConstraint"] = 89;
	["RopeConstraint"] = 89;
	["Rotate"] = 34;
	["RotateP"] = 34;
	["RotateV"] = 34;
	["RunService"] = 66;
	["ScreenGui"] = 47;
	["Script"] = 6;
	["ScrollingFrame"] = 48;
	["Seat"] = 35;
	["Selection"] = 55;
	["SelectionBox"] = 54;
	["SelectionPartLasso"] = 57;
	["SelectionPointLasso"] = 57;
	["SelectionSphere"] = 54;
	["ServerScriptService"] = 0;
	["ServerStorage"] = 74;
	["Shirt"] = 43;
	["ShirtGraphic"] = 40;
	["SkateboardPlatform"] = 35;
	["Sky"] = 28;
	["SlidingBallConstraint"] = 89;
	["Smoke"] = 59;
	["Snap"] = 34;
	["Sound"] = 11;
	["SoundService"] = 31;
	["Sparkles"] = 42;
	["SpawnLocation"] = 25;
	["SpecialMesh"] = 8;
	["SphereHandleAdornment"] = 54;
	["SpotLight"] = 13;
	["SpringConstraint"] = 89;
	["StarterCharacterScripts"] = 82;
	["StarterGear"] = 20;
	["StarterGui"] = 46;
	["StarterPack"] = 20;
	["StarterPlayer"] = 88;
	["StarterPlayerScripts"] = 82;
	["Status"] = 2;
	["StringValue"] = 4;
	["SunRaysEffect"] = 90;
	["SurfaceGui"] = 64;
	["SurfaceLight"] = 13;
	["SurfaceSelection"] = 55;
	["Team"] = 24;
	["Teams"] = 23;
	["TeleportService"] = 81;
	["Terrain"] = 65;
	["TerrainRegion"] = 65;
	["TestService"] = 68;
	["TextBox"] = 51;
	["TextButton"] = 51;
	["TextLabel"] = 50;
	["Texture"] = 10;
	["TextureTrail"] = 4;
	["Tool"] = 17;
	["TouchTransmitter"] = 37;
	["TrussPart"] = 1;
	["UnionOperation"] = 77;
	["UserInputService"] = 84;
	["Vector3Value"] = 4;
	["VehicleSeat"] = 35;
	["VelocityMotor"] = 34;
	["WedgePart"] = 1;
	["Weld"] = 34;
	["Workspace"] = 19;
}

----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------

function Create(ty,data)
	local obj
	if type(ty) == 'string' then
		obj = Instance.new(ty)
	else
		obj = ty
	end
	for k, v in pairs(data) do
		if type(k) == 'number' then
			v.Parent = obj
		else
			obj[k] = v
		end
	end
	return obj
end

local barActive = false
local activeOptions = {}

function createDDown(dBut, callback,...)
	if barActive then
		for i,v in pairs(activeOptions) do
			v:Destroy()
		end
		activeOptions = {}
		barActive = false
		return
	else
		barActive = true
	end
	local slots = {...}
	local base = dBut
	for i,v in pairs(slots) do
		local newOption = base:Clone()
		newOption.ZIndex = 5
		newOption.Name = "Option "..tostring(i)
		newOption.Parent = base.Parent.Parent.Parent
		newOption.BackgroundTransparency = 0
		newOption.ZIndex = 2
		table.insert(activeOptions,newOption)
		newOption.Position = UDim2.new(-0.4, dBut.Position.X.Offset, dBut.Position.Y.Scale, dBut.Position.Y.Offset + (#activeOptions * dBut.Size.Y.Offset))
		newOption.Text = slots[i]
		newOption.MouseButton1Down:connect(function()
			dBut.Text = slots[i]
			callback(slots[i])
			for i,v in pairs(activeOptions) do
				v:Destroy()
			end
			activeOptions = {}
			barActive = false
		end)
	end
end

-- Connects a function to an event such that it fires asynchronously
function Connect(event,func)
	return event:connect(function(...)
		local a = {...}
		spawn(function() func(unpack(a)) end)
	end)
end

-- returns the ascendant ScreenGui of an object
function GetScreen(screen)
	if screen == nil then return nil end
	while not screen:IsA("ScreenGui") do
		screen = screen.Parent
		if screen == nil then return nil end
	end
	return screen
end

do
	local ZIndexLock = {}
	-- Sets the ZIndex of an object and its descendants. Objects are locked so
	-- that SetZIndexOnChanged doesn't spawn multiple threads that set the
	-- ZIndex of the same object.
	function SetZIndex(object,z)
		if not ZIndexLock[object] then
			ZIndexLock[object] = true
			if object:IsA'GuiObject' then
				object.ZIndex = z
			end
			local children = object:GetChildren()
			for i = 1,#children do
				SetZIndex(children[i],z)
			end
			ZIndexLock[object] = nil
		end
	end

	function SetZIndexOnChanged(object)
		return object.Changed:connect(function(p)
			if p == "ZIndex" then
				SetZIndex(object,object.ZIndex)
			end
		end)
	end
end

---- IconMap ----
-- Image size: 256px x 256px
-- Icon size: 16px x 16px
-- Padding between each icon: 2px
-- Padding around image edge: 1px
-- Total icons: 14 x 14 (196)
local Icon do
	local iconMap = 'http://www.roblox.com/asset/?id=' .. MAP_ID
	game:GetService('ContentProvider'):Preload(iconMap)
	local iconDehash do
		-- 14 x 14, 0-based input, 0-based output
		local f=math.floor
		function iconDehash(h)
			return f(h/14%14),f(h%14)
		end
	end

	function Icon(IconFrame,index)
		local row,col = iconDehash(index)
		local mapSize = Vector2.new(256,256)
		local pad,border = 2,1
		local iconSize = 16

		local class = 'Frame'
		if type(IconFrame) == 'string' then
			class = IconFrame
			IconFrame = nil
		end

		if not IconFrame then
			IconFrame = Create(class,{
				Name = "Icon";
				BackgroundTransparency = 1;
				ClipsDescendants = true;
				Create('ImageLabel',{
					Name = "IconMap";
					Active = false;
					BackgroundTransparency = 1;
					Image = iconMap;
					Size = UDim2.new(mapSize.x/iconSize,0,mapSize.y/iconSize,0);
				});
			})
		end

		IconFrame.IconMap.Position = UDim2.new(-col - (pad*(col+1) + border)/iconSize,0,-row - (pad*(row+1) + border)/iconSize,0)
		return IconFrame
	end
end

----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
---- ScrollBar
do
	-- AutoButtonColor doesn't always reset properly
	local function ResetButtonColor(button)
		local active = button.Active
		button.Active = not active
		button.Active = active
	end

	local function ArrowGraphic(size,dir,scaled,template)
		local Frame = Create('Frame',{
			Name = "Arrow Graphic";
			BorderSizePixel = 0;
			Size = UDim2.new(0,size,0,size);
			Transparency = 1;
		})
		if not template then
			template = Instance.new("Frame")
			template.BorderSizePixel = 0
		end

		local transform
		if dir == nil or dir == 'Up' then
			function transform(p,s) return p,s end
		elseif dir == 'Down' then
			function transform(p,s) return UDim2.new(0,p.X.Offset,0,size-p.Y.Offset-1),s end
		elseif dir == 'Left' then
			function transform(p,s) return UDim2.new(0,p.Y.Offset,0,p.X.Offset),UDim2.new(0,s.Y.Offset,0,s.X.Offset) end
		elseif dir == 'Right' then
			function transform(p,s) return UDim2.new(0,size-p.Y.Offset-1,0,p.X.Offset),UDim2.new(0,s.Y.Offset,0,s.X.Offset) end
		end

		local scale
		if scaled then
			function scale(p,s) return UDim2.new(p.X.Offset/size,0,p.Y.Offset/size,0),UDim2.new(s.X.Offset/size,0,s.Y.Offset/size,0) end
		else
			function scale(p,s) return p,s end
		end

		local o = math.floor(size/4)
		if size%2 == 0 then
			local n = size/2-1
			for i = 0,n do
				local t = template:Clone()
				local p,s = scale(transform(
					UDim2.new(0,n-i,0,o+i),
					UDim2.new(0,(i+1)*2,0,1)
				))
				t.Position = p
				t.Size = s
				t.Parent = Frame
			end
		else
			local n = (size-1)/2
			for i = 0,n do
				local t = template:Clone()
				local p,s = scale(transform(
					UDim2.new(0,n-i,0,o+i),
					UDim2.new(0,i*2+1,0,1)
				))
				t.Position = p
				t.Size = s
				t.Parent = Frame
			end
		end
		if size%4 > 1 then
			local t = template:Clone()
			local p,s = scale(transform(
				UDim2.new(0,0,0,size-o-1),
				UDim2.new(0,size,0,1)
			))
			t.Position = p
			t.Size = s
			t.Parent = Frame
		end
		return Frame
	end


	local function GripGraphic(size,dir,spacing,scaled,template)
		local Frame = Create('Frame',{
			Name = "Grip Graphic";
			BorderSizePixel = 0;
			Size = UDim2.new(0,size.x,0,size.y);
			Transparency = 1;
		})
		if not template then
			template = Instance.new("Frame")
			template.BorderSizePixel = 0
		end

		spacing = spacing or 2

		local scale
		if scaled then
			function scale(p) return UDim2.new(p.X.Offset/size.x,0,p.Y.Offset/size.y,0) end
		else
			function scale(p) return p end
		end

		if dir == 'Vertical' then
			for i=0,size.x-1,spacing do
				local t = template:Clone()
				t.Size = scale(UDim2.new(0,1,0,size.y))
				t.Position = scale(UDim2.new(0,i,0,0))
				t.Parent = Frame
			end
		elseif dir == nil or dir == 'Horizontal' then
			for i=0,size.y-1,spacing do
				local t = template:Clone()
				t.Size = scale(UDim2.new(0,size.x,0,1))
				t.Position = scale(UDim2.new(0,0,0,i))
				t.Parent = Frame
			end
		end

		return Frame
	end

	local mt = {
		__index = {
			GetScrollPercent = function(self)
				return self.ScrollIndex/(self.TotalSpace-self.VisibleSpace)
			end;
			CanScrollDown = function(self)
				return self.ScrollIndex + self.VisibleSpace < self.TotalSpace
			end;
			CanScrollUp = function(self)
				return self.ScrollIndex > 0
			end;
			ScrollDown = function(self)
				self.ScrollIndex = self.ScrollIndex + self.PageIncrement
				self:Update()
			end;
			ScrollUp = function(self)
				self.ScrollIndex = self.ScrollIndex - self.PageIncrement
				self:Update()
			end;
			ScrollTo = function(self,index)
				self.ScrollIndex = index
				self:Update()
			end;
			SetScrollPercent = function(self,percent)
				self.ScrollIndex = math.floor((self.TotalSpace - self.VisibleSpace)*percent + 0.5)
				self:Update()
			end;
		};
	}
	mt.__index.CanScrollRight = mt.__index.CanScrollDown
	mt.__index.CanScrollLeft = mt.__index.CanScrollUp
	mt.__index.ScrollLeft = mt.__index.ScrollUp
	mt.__index.ScrollRight = mt.__index.ScrollDown

	function ScrollBar(horizontal)
		-- create row scroll bar
		local ScrollFrame = Create('Frame',{
			Name = "ScrollFrame";
			Position = horizontal and UDim2.new(0,0,1,-GUI_SIZE) or UDim2.new(1,-GUI_SIZE,0,0);
			Size = horizontal and UDim2.new(1,0,0,GUI_SIZE) or UDim2.new(0,GUI_SIZE,1,0);
			BackgroundTransparency = 1;
			Create('ImageButton',{
				Name = "ScrollDown";
				Position = horizontal and UDim2.new(1,-GUI_SIZE,0,0) or UDim2.new(0,0,1,-GUI_SIZE);
				Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
				BackgroundColor3 = GuiColor.Button;
				BorderColor3 = GuiColor.Border;
				--BorderSizePixel = 0;
			});
			Create('ImageButton',{
				Name = "ScrollUp";
				Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
				BackgroundColor3 = GuiColor.Button;
				BorderColor3 = GuiColor.Border;
				--BorderSizePixel = 0;
			});
			Create('ImageButton',{
				Name = "ScrollBar";
				Size = horizontal and UDim2.new(1,-GUI_SIZE*2,1,0) or UDim2.new(1,0,1,-GUI_SIZE*2);
				Position = horizontal and UDim2.new(0,GUI_SIZE,0,0) or UDim2.new(0,0,0,GUI_SIZE);
				AutoButtonColor = false;
				BackgroundColor3 = Color3.new(0.94902, 0.94902, 0.94902);
				BorderColor3 = GuiColor.Border;
				--BorderSizePixel = 0;
				Create('ImageButton',{
					Name = "ScrollThumb";
					AutoButtonColor = false;
					Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
					BackgroundColor3 = GuiColor.Button;
					BorderColor3 = GuiColor.Border;
					--BorderSizePixel = 0;
				});
			});
		})

		local graphicTemplate = Create('Frame',{
			Name="Graphic";
			BorderSizePixel = 0;
			BackgroundColor3 = GuiColor.Border;
		})
		local graphicSize = GUI_SIZE/2

		local ScrollDownFrame = ScrollFrame.ScrollDown
			local ScrollDownGraphic = ArrowGraphic(graphicSize,horizontal and 'Right' or 'Down',true,graphicTemplate)
			ScrollDownGraphic.Position = UDim2.new(0.5,-graphicSize/2,0.5,-graphicSize/2)
			ScrollDownGraphic.Parent = ScrollDownFrame
		local ScrollUpFrame = ScrollFrame.ScrollUp
			local ScrollUpGraphic = ArrowGraphic(graphicSize,horizontal and 'Left' or 'Up',true,graphicTemplate)
			ScrollUpGraphic.Position = UDim2.new(0.5,-graphicSize/2,0.5,-graphicSize/2)
			ScrollUpGraphic.Parent = ScrollUpFrame
		local ScrollBarFrame = ScrollFrame.ScrollBar
		local ScrollThumbFrame = ScrollBarFrame.ScrollThumb
		do
			local size = GUI_SIZE*3/8
			local Decal = GripGraphic(Vector2.new(size,size),horizontal and 'Vertical' or 'Horizontal',2,graphicTemplate)
			Decal.Position = UDim2.new(0.5,-size/2,0.5,-size/2)
			Decal.Parent = ScrollThumbFrame
		end

		local Class = setmetatable({
			GUI = ScrollFrame;
			ScrollIndex = 0;
			VisibleSpace = 0;
			TotalSpace = 0;
			PageIncrement = 1;
		},mt)

		local UpdateScrollThumb
		if horizontal then
			function UpdateScrollThumb()
				ScrollThumbFrame.Size = UDim2.new(Class.VisibleSpace/Class.TotalSpace,0,0,GUI_SIZE)
				if ScrollThumbFrame.AbsoluteSize.x < GUI_SIZE then
					ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,0,GUI_SIZE)
				end
				local barSize = ScrollBarFrame.AbsoluteSize.x
				ScrollThumbFrame.Position = UDim2.new(Class:GetScrollPercent()*(barSize - ScrollThumbFrame.AbsoluteSize.x)/barSize,0,0,0)
			end
		else
			function UpdateScrollThumb()
				ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,Class.VisibleSpace/Class.TotalSpace,0)
				if ScrollThumbFrame.AbsoluteSize.y < GUI_SIZE then
					ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,0,GUI_SIZE)
				end
				local barSize = ScrollBarFrame.AbsoluteSize.y
				ScrollThumbFrame.Position = UDim2.new(0,0,Class:GetScrollPercent()*(barSize - ScrollThumbFrame.AbsoluteSize.y)/barSize,0)
			end
		end

		local lastDown
		local lastUp
		local scrollStyle = {BackgroundColor3=GuiColor.Border,BackgroundTransparency=0}
		local scrollStyle_ds = {BackgroundColor3=GuiColor.Border,BackgroundTransparency=0.7}

		local function Update()
			local t = Class.TotalSpace
			local v = Class.VisibleSpace
			local s = Class.ScrollIndex
			if v <= t then
				if s > 0 then
					if s + v > t then
						Class.ScrollIndex = t - v
					end
				else
					Class.ScrollIndex = 0
				end
			else
				Class.ScrollIndex = 0
			end

			if Class.UpdateCallback then
				if Class.UpdateCallback(Class) == false then
					return
				end
			end

			local down = Class:CanScrollDown()
			local up = Class:CanScrollUp()
			if down ~= lastDown then
				lastDown = down
				ScrollDownFrame.Active = down
				ScrollDownFrame.AutoButtonColor = down
				local children = ScrollDownGraphic:GetChildren()
				local style = down and scrollStyle or scrollStyle_ds
				for i = 1,#children do
					Create(children[i],style)
				end
			end
			if up ~= lastUp then
				lastUp = up
				ScrollUpFrame.Active = up
				ScrollUpFrame.AutoButtonColor = up
				local children = ScrollUpGraphic:GetChildren()
				local style = up and scrollStyle or scrollStyle_ds
				for i = 1,#children do
					Create(children[i],style)
				end
			end
			ScrollThumbFrame.Visible = down or up
			UpdateScrollThumb()
		end
		Class.Update = Update

		SetZIndexOnChanged(ScrollFrame)

		local MouseDrag = Create('ImageButton',{
			Name = "MouseDrag";
			Position = UDim2.new(-0.25,0,-0.25,0);
			Size = UDim2.new(1.5,0,1.5,0);
			Transparency = 1;
			AutoButtonColor = false;
			Active = true;
			ZIndex = 10;
		})

		local scrollEventID = 0
		ScrollDownFrame.MouseButton1Down:connect(function()
			scrollEventID = tick()
			local current = scrollEventID
			local up_con
			up_con = MouseDrag.MouseButton1Up:connect(function()
				scrollEventID = tick()
				MouseDrag.Parent = nil
				ResetButtonColor(ScrollDownFrame)
				up_con:disconnect(); drag = nil
			end)
			MouseDrag.Parent = GetScreen(ScrollFrame)
			Class:ScrollDown()
			wait(0.2) -- delay before auto scroll
			while scrollEventID == current do
				Class:ScrollDown()
				if not Class:CanScrollDown() then break end
				wait()
			end
		end)

		ScrollDownFrame.MouseButton1Up:connect(function()
			scrollEventID = tick()
		end)

		ScrollUpFrame.MouseButton1Down:connect(function()
			scrollEventID = tick()
			local current = scrollEventID
			local up_con
			up_con = MouseDrag.MouseButton1Up:connect(function()
				scrollEventID = tick()
				MouseDrag.Parent = nil
				ResetButtonColor(ScrollUpFrame)
				up_con:disconnect(); drag = nil
			end)
			MouseDrag.Parent = GetScreen(ScrollFrame)
			Class:ScrollUp()
			wait(0.2)
			while scrollEventID == current do
				Class:ScrollUp()
				if not Class:CanScrollUp() then break end
				wait()
			end
		end)

		ScrollUpFrame.MouseButton1Up:connect(function()
			scrollEventID = tick()
		end)

		if horizontal then
			ScrollBarFrame.MouseButton1Down:connect(function(x,y)
				scrollEventID = tick()
				local current = scrollEventID
				local up_con
				up_con = MouseDrag.MouseButton1Up:connect(function()
					scrollEventID = tick()
					MouseDrag.Parent = nil
					ResetButtonColor(ScrollUpFrame)
					up_con:disconnect(); drag = nil
				end)
				MouseDrag.Parent = GetScreen(ScrollFrame)
				if x > ScrollThumbFrame.AbsolutePosition.x then
					Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
					wait(0.2)
					while scrollEventID == current do
						if x < ScrollThumbFrame.AbsolutePosition.x + ScrollThumbFrame.AbsoluteSize.x then break end
						Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
						wait()
					end
				else
					Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
					wait(0.2)
					while scrollEventID == current do
						if x > ScrollThumbFrame.AbsolutePosition.x then break end
						Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
						wait()
					end
				end
			end)
		else
			ScrollBarFrame.MouseButton1Down:connect(function(x,y)
				scrollEventID = tick()
				local current = scrollEventID
				local up_con
				up_con = MouseDrag.MouseButton1Up:connect(function()
					scrollEventID = tick()
					MouseDrag.Parent = nil
					ResetButtonColor(ScrollUpFrame)
					up_con:disconnect(); drag = nil
				end)
				MouseDrag.Parent = GetScreen(ScrollFrame)
				if y > ScrollThumbFrame.AbsolutePosition.y then
					Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
					wait(0.2)
					while scrollEventID == current do
						if y < ScrollThumbFrame.AbsolutePosition.y + ScrollThumbFrame.AbsoluteSize.y then break end
						Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
						wait()
					end
				else
					Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
					wait(0.2)
					while scrollEventID == current do
						if y > ScrollThumbFrame.AbsolutePosition.y then break end
						Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
						wait()
					end
				end
			end)
		end

		if horizontal then
			ScrollThumbFrame.MouseButton1Down:connect(function(x,y)
				scrollEventID = tick()
				local mouse_offset = x - ScrollThumbFrame.AbsolutePosition.x
				local drag_con
				local up_con
				drag_con = MouseDrag.MouseMoved:connect(function(x,y)
					local bar_abs_pos = ScrollBarFrame.AbsolutePosition.x
					local bar_drag = ScrollBarFrame.AbsoluteSize.x - ScrollThumbFrame.AbsoluteSize.x
					local bar_abs_one = bar_abs_pos + bar_drag
					x = x - mouse_offset
					x = x < bar_abs_pos and bar_abs_pos or x > bar_abs_one and bar_abs_one or x
					x = x - bar_abs_pos
					Class:SetScrollPercent(x/(bar_drag))
				end)
				up_con = MouseDrag.MouseButton1Up:connect(function()
					scrollEventID = tick()
					MouseDrag.Parent = nil
					ResetButtonColor(ScrollThumbFrame)
					drag_con:disconnect(); drag_con = nil
					up_con:disconnect(); drag = nil
				end)
				MouseDrag.Parent = GetScreen(ScrollFrame)
			end)
		else
			ScrollThumbFrame.MouseButton1Down:connect(function(x,y)
				scrollEventID = tick()
				local mouse_offset = y - ScrollThumbFrame.AbsolutePosition.y
				local drag_con
				local up_con
				drag_con = MouseDrag.MouseMoved:connect(function(x,y)
					local bar_abs_pos = ScrollBarFrame.AbsolutePosition.y
					local bar_drag = ScrollBarFrame.AbsoluteSize.y - ScrollThumbFrame.AbsoluteSize.y
					local bar_abs_one = bar_abs_pos + bar_drag
					y = y - mouse_offset
					y = y < bar_abs_pos and bar_abs_pos or y > bar_abs_one and bar_abs_one or y
					y = y - bar_abs_pos
					Class:SetScrollPercent(y/(bar_drag))
				end)
				up_con = MouseDrag.MouseButton1Up:connect(function()
					scrollEventID = tick()
					MouseDrag.Parent = nil
					ResetButtonColor(ScrollThumbFrame)
					drag_con:disconnect(); drag_con = nil
					up_con:disconnect(); drag = nil
				end)
				MouseDrag.Parent = GetScreen(ScrollFrame)
			end)
		end

		function Class:Destroy()
			ScrollFrame:Destroy()
			MouseDrag:Destroy()
			for k in pairs(Class) do
				Class[k] = nil
			end
			setmetatable(Class,nil)
		end

		Update()

		return Class
	end
end

----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
----------------------------------------------------------------
---- Explorer panel

local explorerPanel = D_E_X.ExplorerPanel
Create(explorerPanel,{
	BackgroundColor3 = GuiColor.Field;
	BorderColor3 = GuiColor.Border;
	Active = true;
})

local SettingsRemote = explorerPanel.Parent:WaitForChild("SettingsPanel"):WaitForChild("GetSetting")
local GetApiRemote = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("GetApi")
local GetAwaitRemote = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("GetAwaiting")
local bindSetAwaiting = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("SetAwaiting")

local SaveInstanceWindow = explorerPanel.Parent:WaitForChild("SaveInstance")
local ConfirmationWindow = explorerPanel.Parent:WaitForChild("Confirmation")
local CautionWindow = explorerPanel.Parent:WaitForChild("Caution")
local TableCautionWindow = explorerPanel.Parent:WaitForChild("TableCaution")

local RemoteWindow = explorerPanel.Parent:WaitForChild("CallRemote")

local CurrentSaveInstanceWindow
local CurrentRemoteWindow

local lastSelectedNode

local listFrame = Create('Frame',{
	Name = "List";
	BackgroundTransparency = 1;
	ClipsDescendants = true;
	Position = UDim2.new(0,0,0,HEADER_SIZE);
	Size = UDim2.new(1,-GUI_SIZE,1,-HEADER_SIZE);
	Parent = explorerPanel;
})

local scrollBar = ScrollBar(false)
scrollBar.PageIncrement = 1
Create(scrollBar.GUI,{
	Position = UDim2.new(1,-GUI_SIZE,0,HEADER_SIZE);
	Size = UDim2.new(0,GUI_SIZE,1,-HEADER_SIZE);
	Parent = explorerPanel;
})

local scrollBarH = ScrollBar(true)
scrollBarH.PageIncrement = GUI_SIZE
Create(scrollBarH.GUI,{
	Position = UDim2.new(0,0,1,-GUI_SIZE);
	Size = UDim2.new(1,-GUI_SIZE,0,GUI_SIZE);
	Visible = false;
	Parent = explorerPanel;
})

local headerFrame = Create('Frame',{
	Name = "Header";
	BackgroundColor3 = GuiColor.Background;
	BorderColor3 = GuiColor.Border;
	Position = UDim2.new(0,0,0,0);
	Size = UDim2.new(1,0,0,HEADER_SIZE);
	Parent = explorerPanel;
	Create('TextLabel',{
		Text = "Explorer";
		BackgroundTransparency = 1;
		TextColor3 = GuiColor.Text;
		TextXAlignment = 'Left';
		Font = FONT;
		FontSize = FONT_SIZE;
		Position = UDim2.new(0,4,0,0);
		Size = UDim2.new(1,-4,0.5,0);
	});
})

local explorerFilter = 	Create('TextBox',{
	Text = "Filter Workspace";
	BackgroundTransparency = 0.8;
	TextColor3 = GuiColor.Text;
	TextXAlignment = 'Left';
	Font = FONT;
	FontSize = FONT_SIZE;
	Position = UDim2.new(0,4,0.5,0);
	Size = UDim2.new(1,-8,0.5,-2);
});
explorerFilter.Parent = headerFrame

SetZIndexOnChanged(explorerPanel)

local function CreateColor3(r, g, b) return Color3.new(r/255,g/255,b/255) end

local Styles = {
	Font = Enum.Font.Arial;
	Margin = 5;
	Black = CreateColor3(0,0,0);
	White = CreateColor3(255,255,255);
}

local DropDown = {
	Font = Styles.Font;
	FontSize = Enum.FontSize.Size14;
	TextColor = CreateColor3(0,0,0);
	TextColorOver = Styles.White;
	TextXAlignment = Enum.TextXAlignment.Left;
	Height = 20;
	BackColor = Styles.White;
	BackColorOver = CreateColor3(86,125,188);
	BorderColor = CreateColor3(216,216,216);
	BorderSizePixel = 2;
	ArrowColor = CreateColor3(160,160,160);
	ArrowColorOver = Styles.Black;
}

local Row = {
	Font = Styles.Font;
	FontSize = Enum.FontSize.Size14;
	TextXAlignment = Enum.TextXAlignment.Left;
	TextColor = Styles.Black;
	TextColorOver = Styles.White;
	TextLockedColor = CreateColor3(120,120,120);
	Height = 24;
	BorderColor = CreateColor3(216,216,216);
	BackgroundColor = Styles.White;
	BackgroundColorAlternate = CreateColor3(246,246,246);
	BackgroundColorMouseover = CreateColor3(211,224,244);
	TitleMarginLeft = 15;
}

local currentRightClickMenu
local CurrentInsertObjectWindow
local CurrentFunctionCallerWindow

local RbxApi

function ClassCanCreate(IName)
	local success,err = pcall(function() Instance.new(IName) end)
	if err then
		return false
	else
		return true
	end
end

function GetClasses()
	if RbxApi == nil then return {} end
	local classTable = {}
	for i,v in pairs(RbxApi.Classes) do
		if ClassCanCreate(v.Name) then
			table.insert(classTable,v.Name)
		end
	end
	return classTable
end

local function sortAlphabetic(t, property)
	table.sort(t,
		function(x,y) return x[property] < y[property]
	end)
end

local function FunctionIsHidden(functionData)
	local tags = functionData["tags"]
	for _,name in pairs(tags) do
		if name == "deprecated"
			or name == "hidden"
			or name == "writeonly" then
			return true
		end
	end
	return false
end

local function GetAllFunctions(className)
	local class = RbxApi.Classes[className]
	local functions = {}

	if not class then return functions end

	while class do
		if class.Name == "Instance" then break end
		for _,nextFunction in pairs(class.Functions) do
			if not FunctionIsHidden(nextFunction) then
				table.insert(functions, nextFunction)
			end
		end
		class = RbxApi.Classes[class.Superclass]
	end

	sortAlphabetic(functions, "Name")

	return functions
end

function GetFunctions()
	if RbxApi == nil then return {} end
	local List = SelectionVar():Get()

	if #List == 0 then return end

	local MyObject = List[1]

	local functionTable = {}
	for i,v in pairs(GetAllFunctions(MyObject.ClassName)) do
		table.insert(functionTable,v)
	end
	return functionTable
end

function CreateInsertObjectMenu(choices, currentChoice, readOnly, onClick)
	local totalSize = explorerPanel.Parent.AbsoluteSize.y
	if #choices == 0 then return end

	table.sort(choices, function(a,b) return a < b end)

	local frame = Instance.new("Frame")
	frame.Name = "InsertObject"
	frame.Size = UDim2.new(0, 200, 1, 0)
	frame.BackgroundTransparency = 1
	frame.Active = true

	local menu = nil
	local arrow = nil
	local expanded = false
	local margin = DropDown.BorderSizePixel;

	--[[
	local button = Instance.new("TextButton")
	button.Font = Row.Font
	button.FontSize = Row.FontSize
	button.TextXAlignment = Row.TextXAlignment
	button.BackgroundTransparency = 1
	button.TextColor3 = Row.TextColor
	if readOnly then
		button.TextColor3 = Row.TextLockedColor
	end
	button.Text = currentChoice
	button.Size = UDim2.new(1, -2 * Styles.Margin, 1, 0)
	button.Position = UDim2.new(0, Styles.Margin, 0, 0)
	button.Parent = frame
	--]]

	local function hideMenu()
		expanded = false
		--showArrow(DropDown.ArrowColor)
		if frame then
			--frame:Destroy()
			CurrentInsertObjectWindow.Visible = false
		end
	end

	local function showMenu()
		expanded = true
		menu = Instance.new("ScrollingFrame")
		menu.Size = UDim2.new(0,200,1,0)
		menu.CanvasSize = UDim2.new(0, 200, 0, #choices * DropDown.Height)
		menu.Position = UDim2.new(0, margin, 0, 0)
		menu.BackgroundTransparency = 0
		menu.BackgroundColor3 = DropDown.BackColor
		menu.BorderColor3 = DropDown.BorderColor
		menu.BorderSizePixel = DropDown.BorderSizePixel
		menu.TopImage = "rbxasset://textures/blackBkg_square.png"
		menu.MidImage = "rbxasset://textures/blackBkg_square.png"
		menu.BottomImage = "rbxasset://textures/blackBkg_square.png"
		menu.Active = true
		menu.ZIndex = 5
		menu.Parent = frame

		--local parentFrameHeight = script.Parent.List.Size.Y.Offset
		--local rowHeight = mouse.Y
		--if (rowHeight + menu.Size.Y.Offset) > parentFrameHeight then
		--	menu.Position = UDim2.new(0, margin, 0, -1 * (#choices * DropDown.Height) - margin)
		--end

		local function choice(name)
			onClick(name)
			hideMenu()
		end

		for i,name in pairs(choices) do
			local option = CreateRightClickMenuItem(name, function()
				choice(name)
			end,1)
			option.Size = UDim2.new(1, 0, 0, 20)
			option.Position = UDim2.new(0, 0, 0, (i - 1) * DropDown.Height)
			option.ZIndex = menu.ZIndex
			option.Parent = menu
		end
	end


	showMenu()


	return frame
end

function CreateFunctionCallerMenu(choices, currentChoice, readOnly, onClick)
	local totalSize = explorerPanel.Parent.AbsoluteSize.y
	if #choices == 0 then return end

	table.sort(choices, function(a,b) return a.Name < b.Name end)

	local frame = Instance.new("Frame")
	frame.Name = "InsertObject"
	frame.Size = UDim2.new(0, 200, 1, 0)
	frame.BackgroundTransparency = 1
	frame.Active = true

	local menu = nil
	local arrow = nil
	local expanded = false
	local margin = DropDown.BorderSizePixel;

	local function hideMenu()
		expanded = false
		--showArrow(DropDown.ArrowColor)
		if frame then
			--frame:Destroy()
			CurrentInsertObjectWindow.Visible = false
		end
	end

	local function showMenu()
		expanded = true
		menu = Instance.new("ScrollingFrame")
		menu.Size = UDim2.new(0,300,1,0)
		menu.CanvasSize = UDim2.new(0, 300, 0, #choices * DropDown.Height)
		menu.Position = UDim2.new(0, margin, 0, 0)
		menu.BackgroundTransparency = 0
		menu.BackgroundColor3 = DropDown.BackColor
		menu.BorderColor3 = DropDown.BorderColor
		menu.BorderSizePixel = DropDown.BorderSizePixel
		menu.TopImage = "rbxasset://textures/blackBkg_square.png"
		menu.MidImage = "rbxasset://textures/blackBkg_square.png"
		menu.BottomImage = "rbxasset://textures/blackBkg_square.png"
		menu.Active = true
		menu.ZIndex = 5
		menu.Parent = frame

		--local parentFrameHeight = script.Parent.List.Size.Y.Offset
		--local rowHeight = mouse.Y
		--if (rowHeight + menu.Size.Y.Offset) > parentFrameHeight then
		--	menu.Position = UDim2.new(0, margin, 0, -1 * (#choices * DropDown.Height) - margin)
		--end

		local function GetParameters(functionData)
			local paraString = ""
			paraString = paraString.."("
			for i,v in pairs(functionData.Arguments) do
				paraString = paraString..v.Type.." "..v.Name
				if i <