my explorer (not very harmful)

plr = owner
plrgui = plr.PlayerGui
char = plr.Character
toexplore = "Workspace"
toexplore2 = nil
exploringn = nil

local gui = Instance.new("ScreenGui",plrgui)
gui.Name = "youngmacka123BadlyMadeExplorerExploit"
gui.Enabled = true

local scroll = Instance.new("ScrollingFrame",gui)
scroll.Size = UDim2.new(0, 220, 0, 700)

function createtext(text, position)
	local thing = Instance.new("TextLabel",scroll)
	thing.Text = text
	thing.TextScaled = true
	thing.Position = position
	thing.BackgroundTransparency = 0
	thing.BorderSizePixel = 1
	thing.BorderMode = "Outline"
	thing.Size = UDim2.new(0, 200, 0, 50)
	return thing
end

function createbutton(text, position)
	local thing = Instance.new("TextButton",scroll)
	thing.Text = text
	thing.TextScaled = true
	thing.Position = position
	thing.BackgroundTransparency = 0
	thing.BorderSizePixel = 1
	thing.BorderMode = "Outline"
	thing.Size = UDim2.new(0, 200, 0, 50)
	thing.MouseButton1Click:connect(function()
		thing:Destroy()
		exploring:FindFirstChild(thing.Text):Destroy()
		refreshexplore(exploring)
	end)
	return thing
end

function createbox(text, position)
	local thing = Instance.new("TextBox",scroll)
	thing.Text = text
	thing.TextScaled = true
	thing.Position = position
	thing.BackgroundTransparency = 0
	thing.BorderSizePixel = 1
	thing.BorderMode = "Outline"
	thing.Size = UDim2.new(0, 200, 0, 50)
	return thing
end

exploring = game:FindFirstChild(toexplore)
last = "a"
for _,v in pairs (exploring:GetChildren()) do
	if last == "a" then
		local text = createbutton(v.Name, UDim2.new(0, 0, 0, 0))
		last = text
	else
		local newtext = createbutton(v.Name, last.Position + UDim2.new(0, 0, 0.025, 0))
		last = newtext
	end
end

function refreshexplore(exp)
	scroll:ClearAllChildren()
	last = "a"
	for _,v in pairs (exp:GetChildren()) do
		if last == "a" then
			local text = createbutton(v.Name, UDim2.new(0, 0, 0, 0))
			last = text
		else
			local newtext = createbutton(v.Name, last.Position + UDim2.new(0, 0, 0.025, 0))
			last = newtext
		end
	end
end

plr.Chatted:connect(function(message)
	if message:sub(1, 7) == "/e exp1" then
		toexplore = message:sub(9)
		exploring = game:FindFirstChild(toexplore)
		refreshexplore(exploring)
	end
	if message:sub(1, 7) == "/e exp2" then
		toexplore2 = message:sub(9)
		exploring = game:FindFirstChild(toexplore):FindFirstChild(toexplore2)
		refreshexplore(exploring)
	end
	if message:sub(1, 7) == "/e exp3" then
		toexplore2 = message:sub(9)
		exploringn = exploring:FindFirstChild(toexplore2)
		refreshexplore(exploringn)
	end
end)