View difference between Paste ID: m1rG2cV2 and 86L9Xaau

 TextProperties = {"ClassName", "Name", "Value", "Text", "Reflectance", "Transparency", "Heat", "TeamName", "WalkSpeed", "Health", "MaxHealth", "Size", "Position", "AccountAge", "RobloxLocked", "TeamColor", "userId", "Brightness", "Ambient", "TimeOfDay", "FieldOfView", "CameraType", "LinkedSource"}
 BoolProperties = {"Anchored", "CanCollide", "Disabled", "Jump", "Sit", "Visible", "Enabled", "Locked", "FilteringEnabled", "StreamingEnabled", "GlobalShadows"}
 BrickColorProperties = {"BrickColor", "Color", "TeamColor", "Texture", "Value"}
 s = Instance.new("ScreenGui", game.CoreGui)
 pgr = Instance.new("TextButton")
 pgr.Parent = s
 pgr.Size = UDim2.new(0,100,0,40)
 pgr.Position = UDim2.new(0,30,0,440)
 pgr.Text="Explorer"
 pgr.BackgroundTransparency = 0.3
 pgr.TextColor = BrickColor.new("White")
 pgr.BackgroundColor = BrickColor.new("Really Black")
 pgr.BorderColor = BrickColor.new("Black")
 pgr.Font = "ArialBold"
 pgr.FontSize = "Size14"
 pgr.TextStrokeColor3 = Color3.new(0/0,0/0,0/0)
 pgr.TextStrokeTransparency = 0.3
 pgr.BorderSizePixel = 1
 pgr.BorderColor = BrickColor.new("White")
 
 if game.CoreGui:findFirstChild("Explorer") then
 game.CoreGui:findFirstChild("Explorer"):Remove()
 end
 
 local Cloned
 local Deleted
 local DeleteParent
 local Player
 local Search
 local ScriptSearch
 local Gui
 local Cloned = nil
 local Deleted = nil
 local DeleteParent = nil
 local Current = 0
 local CurrentOption = 0
 
 function Clear()
 if Gui then
 Gui:Remove()
 end
 Current = 0
 CurrentOption = 0
 end
 
 function AddButton(N, Function, Color, Copy)
 if not N then
 error("RenderButton - No Name Specified")
 end
 if not Function then
 error("RenderButton - No Function Specified")
 end
 if not Color then
 Color = Color3.new(1, 1, 1)
 end
 if Copy == nil then
 Copy = true
 end
 P = Instance.new("TextButton")
 if Copy then
 P.Size = UDim2.new(0, 110, 0, 20)
 else
 P.Size = UDim2.new(0, 130, 0, 20)
 end
 P.Text = N.Name
 P.Name = N.Name
 P.Parent = Gui
 P.BackgroundColor3 = Color
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300, 0, 50+(20*((Current%30)-1)))
 P.MouseButton1Click:connect(function()
 Function(P)
 end)
 D = Instance.new("TextButton")
 D.Size = UDim2.new(0, 20, 0, 20)
 D.Text = "X"
 D.Name = N.Name
 D.Parent = Gui
 D.BackgroundColor3 = Color3.new(1, 0, 0)
 D.TextColor3 = Color3.new(0, 0, 0)
 D.BackgroundTransparency = 0.5
 D.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+130, 0, 50+(20*((Current%30)-1)))
 D.MouseButton1Click:connect(function()
 Deleted = N
 DeleteParent = N.Parent
 N.Parent = nil
 Clear()
 Search(DeleteParent)
 end)
 if Copy then
 C = Instance.new("TextButton")
 C.Size = UDim2.new(0, 20, 0, 20)
 C.Text = "C"
 C.Name = N.Name
 C.Parent = Gui
 C.BackgroundColor3 = Color3.new(0, 1, 0.5)
 C.TextColor3 = Color3.new(0, 0, 0)
 C.BackgroundTransparency = 0.5
 C.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+110, 0, 50+(20*((Current%30)-1)))
 C.MouseButton1Click:connect(function()
 Cloned = N
 Clear()
 Search(N.Parent)
 end)
 end
 Current = Current + 1
 return P
 end
 
 function AddOption(N, Function, Color, Text)
 if not N then
 error("RenderButton - No Name Specified")
 end
 if not Color then
 Color = Color3.new(1, 1, 1)
 end
 if Text == nil then
 Text = false
 end
 if Text then
 P = Instance.new("TextBox")
 else
 P = Instance.new("TextButton")
 end
 P.Text = N
 P.Name = N
 P.Parent = Gui
 P.BackgroundColor3 = Color
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Size = UDim2.new(0, 150, 0, 20)
 P.Position = UDim2.new(0, ((math.modf(CurrentOption/30))*150)+150, 0, 50+(20*((CurrentOption%30)-1)))
 if not Text and Function then
 P.MouseButton1Click:connect(function() Function(P) end)
 end
 CurrentOption = CurrentOption + 1
 return P
 end
 
 function AddTextOption(Obj, Prop)
 local Ob = Obj
 local Pro = Prop
 if type(Ob[Pro]) == "number" or type(Ob[Pro]) == "string" then
 CurrentOption = CurrentOption + 1
 local T = AddOption(Ob[Pro], nil, Color3.new(0.1, 0.4, 0.1), true)
 CurrentOption = CurrentOption - 2
 local O = AddOption("Change "..Pro..":", function() Ob[Pro] = T.Text end, Color3.new(0.1, 0.8, 0.1), false)
 CurrentOption = CurrentOption + 1
 end
 end
 
 function AddBrickColorOption(Obj, Prop)
 local Ob = Obj
 local Pro = Prop
 if BrickColor.new(tostring(Ob[Pro])) == Ob[Pro] then
 CurrentOption = CurrentOption + 1
 local T = AddOption(tostring(Ob[Pro]), nil, Color3.new(0.1, 0.4, 0.1), true)
 CurrentOption = CurrentOption - 2
 local O = AddOption("Change "..Pro..":", function() Ob[Pro] = BrickColor.new(T.Text) end, Color3.new(0.1, 0.8, 0.1), false)
 CurrentOption = CurrentOption + 1
 end
 end
 
 function AddBoolOption(Obj, Prop)
 local Ob = Obj
 local Pro = Prop
 if type(Ob[Pro]) == "boolean" then
 local O = AddOption(Pro..": "..tostring(Ob[Pro]), nil, Color3.new(0.1, 0.8, 0.1), false)
 O.MouseButton1Click:connect(function()
 if Ob[Pro] then
 Ob[Pro] = false
 O.Text = Pro..": false"
 else
 Ob[Pro] = true
 O.Text = Pro..": true"
 end
 end)
 end
 end
 
 function TestProperty(Obj, Property)
 Success = pcall(function()
 if Obj[Property] then
 return
 end
 end)
 return Success
 end
 
 function LoadOptions(Object)
 for Num, Prop in pairs(TextProperties) do
 if TestProperty(Object, Prop) then
 AddTextOption(Object, Prop)
 end
 end
 for Num, Prop in pairs(BoolProperties) do
 if TestProperty(Object, Prop) then
 AddBoolOption(Object, Prop)
 end
 end
 for Num, Prop in pairs(BrickColorProperties) do
 if TestProperty(Object, Prop) then
 AddBrickColorOption(Object, Prop)
 end
 end
 end
 
 function Search(Object)
 Gui = Instance.new("ScreenGui")
 Gui.Parent = game.CoreGui
 Gui.Name = "Explorer"
 if Object ~= game then
 AddOption("Back", function()
 Clear();
 Search(Object.Parent)
 end, Color3.new(0.5, 1, 1), false)
 end
 AddOption("Reload", function() Clear(); Search(Object); end, Color3.new(0.2, 1, 0.2), false)
 if Cloned then
 AddOption("Paste", function() Cloned:Clone().Parent = Object; Clear(); Search(Object); end, Color3.new(0.5, 1, 1), false)
 end
 if Deleted then
 AddOption("Undo", function() Deleted.Parent = DeleteParent; Deleted = nil; DeletedParent = nil; Clear(); Search(Object); end, Color3.new(1, 0.6, 0.1), false)
 end
 if Object:IsA("Player") then
 AddOption("Goto Character", function() Clear(); if Object.Character then Search(Object.Character); end end, Color3.new(1, 1, 1), false)
 end
 if Object:IsA("LocalScript") then
 AddOption("EditScript", function() Clear(); ScriptSearch(Object); end, Color3.new(1, 1, 1), false)
 end
 if Object:IsA("Terrain") then
 AddOption("Clear", function() Object:Clear(); end, Color3.new(1, 1, 1), false)
 end
 LoadOptions(Object)
 AddOption("Close", Clear, Color3.new(1, 0.2, 0), false)
 if not Object:IsA("Workspace") or not Object:IsA("Player") then
 for Num, Obj in pairs(Object:GetChildren()) do
 --if not Obj:IsA("BasePart") or not Object.Parent == game.Workspace then
 if true then
 if Obj:IsA("LocalScript") then
 AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 0, 0), true)
 elseif Obj:IsA("Script") or Obj:IsA("StarterScript") or Obj:IsA("CoreScript") then
 AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(0.5, 0.5, 0.8), true)
 elseif Obj.Parent == game then
 AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), false)
 else
 AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), true)
 end
 end
 end
 end
 function MoveUp(Place, Amount)
 for i,v in pairs(Place:GetChildren()) do
 if v:IsA("TextLabel") or v:IsA("TextBox") then
 v.Position = v.Position + UDim2.new(0,0,0,-Amount)
 end
 end
 end
 function MoveDown(Place, Amount)
 for i,v in pairs(Place:GetChildren()) do
 if v:IsA("TextLabel") or v:IsA("TextBox") then
 v.Position = v.Position + UDim2.new(0,0,0,Amount)
 end
 end
 end
 i=0
 function ScriptSearch(S)
 Script2 = S
 Script = Script2.Source
 Table = {}
 Enabled = true
 Gui = Instance.new("ScreenGui")
 Gui.Parent = game.CoreGui
 Gui.Name = "Explorer"
 while Enabled do
 Start, End = string.find(Script, '\n')
 print(Start, End)
 if Start and End then
 table.insert(Table, string.sub(Script, 1, End))
 New = string.sub(Script, End+1, string.len(Script))
 Script = New
 else
 Enabled = false
 table.insert(Table, string.sub(Script, 1, End))
 print("Finished")
 end
 end
 P = Instance.new("TextLabel")
 P.Size = UDim2.new(0, 500, 0, 20)
 P.Text = Script2.Name
 P.Name = "Script Line"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
 P.TextXAlignment = "Left"
 i=i+1
 New = {}
 for I,Val in pairs(Table) do
 print(Val)
 P = Instance.new("TextBox")
 P.ClearTextOnFocus = false
 P.Size = UDim2.new(0, 500, 0, 20)
 P.Text = Val
 P.Name = "Script Line"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
 P.TextXAlignment = "Left"
 table.insert(New, P)
 i=i+1
 end
 i=1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "^"
 P.Name = "Scroll"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 MoveUp(Gui, -20)
 end)
 i=i+1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "v"
 P.Name = "Scroll"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 MoveDown(Gui, -20)
 end)
 i=i+1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "^^"
 P.Name = "Scroll"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 MoveUp(Gui, -200)
 end)
 i=i+1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "vv"
 P.Name = "Scroll"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 1, 1)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 MoveDown(Gui, -200)
 end)
 i=i+1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "S"
 P.Name = "Save"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(0, 1, 0)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 StringS = ""
 for Num, Obj in pairs(New) do
 StringS = StringS..Obj.Text..'\n'
 end
 S.Source = StringS
 S.Disabled = true
 S.Disabled = false
 end)
 i=i+1
 P = Instance.new("TextButton")
 P.Size = UDim2.new(0, 20, 0, 20)
 P.Text = "x"
 P.Name = "Back"
 P.Parent = Gui
 P.BackgroundColor3 = Color3.new(1, 0.2, 0)
 P.TextColor3 = Color3.new(0, 0, 0)
 P.BackgroundTransparency = 0.5
 P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
 P.MouseButton1Click:connect(function()
 Clear()
 i=0
 Search(S)
 end)
 i=i+1
 end
 end
 
 pgr.MouseButton1Click:connect(function()
 Clear()
 Search(game)
 end)