Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- game:GetObjects("rbxassetid://164682059")[1].Parent=game.Players.LocalPlayer.PlayerGui
- restorebutton = Instance.new("ScreenGui",game:GetService("CoreGui"))
- b03d = Instance.new("TextButton",restorebutton)
- b03d.BackgroundColor3 = Color3.new(0/255,0/255,0/255)
- b03d.BorderColor3 = Color3.new(255/255,0/255,0/255)
- b03d.BorderSizePixel = 3
- b03d.Position = UDim2.new(1,-103,1,-23)
- b03d.Size = UDim2.new(0,100,0,20)
- b03d.Font = "SourceSans"
- b03d.FontSize = "Size18"
- b03d.Text = "Reload c00lgui"
- b03d.TextColor3 = Color3.new(255/255,255/255,255/255)
- b03d.MouseButton1Down:connect(function()
- if game.Players.LocalPlayer.PlayerGui:FindFirstChild("c00lgui") then
- game.Players.LocalPlayer.PlayerGui:FindFirstChild("c00lgui"):Remove()
- end
- game:GetObjects("rbxassetid://164682059")[1].Parent=game.Players.LocalPlayer.PlayerGui
- end)
- Properties = {nil,"Name","Parent","ClassName","BrickColor","Material","Reflectance","Transparency","Position","Rotation","RotVelocity","Velocity","Anchored","CanCollide","Locked","Elasticity","FormFactor","Friction","Shape","Size","BackSurface","BottomSurface","FrontSurface","LeftSurface","RightSurface","TopSurface","CreatorId","VertexColor","Volume","Ticket","AccountAge","VideoQualitySettings","UploadSetting","TweenStatus","TopBottom","TickCountSampleMethod","ThreadPoolConfig","SurfaceType","SurfaceConstrait","Style","Stuff","Status","SpecialKey","SoundType","SleepAdjustMethod","SizeConstraint","Shadow","SavedQualitySetting","ReverbType","Resolution","QualityLevel","PyrimidSides","PrivilegeType","PrismSides","PriorityMethod","PlayerChatType","PhysicsSendMethod","PhysicsRecieveMethod","PartType","PacketReliability","NormalId","MoveState","MeshType","MaterialQuality","LevelOfDetailSetting","LeftRight","KeywordFilterType","JointType","InputType","InOut","HandlesStyle","GraphicsMode","GeometryQuality","Genre","GearType","GearGenreSetting","FunctionalTestResult","FriendStatus","FriendRequestEvent","FramerateManagerMode","FrameStyle","ErrorReporting","PhysicsThrottle","Enviromental","EasingStyle","EasingDirection","DialogTone","DialogPurpose","D3DFORMAT","D3DDEVTYPE","CreatorType","ControlMode","ConcurrencyModel","ChatStyle","ChatMode","ChatColor","CenterDialogType","CellOrientation","CellMaterial","CellBlock","CameraType","ButtonStyle","Button","BuildPermission","BodyPart","BinType","Bevels","Axis","Antialiasing","AnimationPriority","AffectType","ActionType","AASamples","Source","ScriptsDisabled","GarbageCollectionLimit","GarbageCollectionFrequency","RobloxLocked","Version","AttachmentForward","AttachmentPos","AttachmentRight","AttachmentUp","AnimationId","HeadColor","RightArmColor","LeftArmColor","TorsoColor","LeftLegColor","RightLegColor","Value","CameraType","CameraSubject","BaseTextureId","BodyPart","MeshId","OverlayTextureId","MaxActivationDistance","Shiny","Specular","Texture","Face","GripForward","GripPos","GripRight","GripUp","TextureId","TeamColor","Enabled","position","CFrame","velocity","AbsolutePosition","AbsoluteSize","Active","BackgroundColor3","BackgroundTransparency","BorderColor3","BorderSizePixel","SizeConstraint","Visible","ZIndex","C0","C1","Part0","Part1","BinType","LeftLeg","RightLeg","Torso","Health","MaxHealth","WalkSpeed","Jump","PlatformStand","Sit","AutoButtonColor","Image","LinkedSource","Disabled","Text","PrimaryPart","CurrentAngle","DesiredAngle","MaxVelocity","PantsTemplate","ShirtTemplate","SoundId","Pitch","IsPlaying","IsPaused","Looped","PlayOnRemove","StudsPerTileU","StudsPerTileV","userId","BubbleChat","ClassicChat","MaxPlayers","NumPlayers","LocalPlayer","CharacterAppearance","Character","CurrentCamera","Ambient","Brightness","ColorShift_Bottom","ColorShift_Top","ShadowColor","TimeOfDay","AmbientReverb","DistanceFactor","DopplerScale","RolloffScale","Color","angularvelocity","maxTorque","Offset","Scale","Heat","Range","Angle","DataCost","maxForce","MaxSpeed","D","P","Adornee","CelestialBodiesShown","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp","StarCount"}
- if script ~= nil then
- if Game:FindFirstChild("NetworkClient") ~= nil then
- repeat wait() until Game.Players.LocalPlayer ~= nil
- end
- end
- if game:GetService("CoreGui"):FindFirstChild("ExplorerButton") == nil then
- local screengui = Instance.new("ScreenGui")
- screengui.Parent = game:GetService("CoreGui")
- screengui.Name = "ExplorerButton"
- local text = Instance.new("TextButton")
- text.Parent = screengui
- text.Active = true
- text.BackgroundColor = BrickColor.new("Really black")
- text.BorderColor3 = Color3.new(255/255,0/0,0/0)
- text.Position = UDim2.new(0.7,0,0.97,0)
- text.Size = UDim2.new(0.1,0,0.025,0)
- text.Text = "Explorer"
- text.TextColor3 = Color3.new(1,1,1)
- text.MouseButton1Down:connect(function()
- if game:GetService("CoreGui"):FindFirstChild("ExplorerGui") == nil then
- pcall(function()
- Game.CoreGui.RobloxGui.PlayerListScreen.Visible = false
- end)
- ItemGuis = {}
- PropGuis = {}
- ScrollPlaces = {}
- MouseFunction = nil
- KeyDownFunction = nil
- KeyUpFunction = nil
- _G.Selection = nil
- ExplorerGui = nil
- CopiedItem = nil
- AddingConnection = nil
- RemovingConnection = nil
- Mouse = nil
- ExpScrollNumber = 1
- PropScrollNumber = 1
- ViewGui = "Explorer"
- if Game.Players.LocalPlayer ~= nil then
- Mouse = Game.Players.LocalPlayer:GetMouse()
- end
- Base = "http://www.roblox.com/asset/?id="
- Images = {Value=40332408,Sound=40332463,Script=40332546,ScreenGui=40332596,Part=40332760,SpawnLocation=117933272,Nil=40332825,Model=40332865,Message=40332942,LocalScript=40332996,Joint=40333049,Frame=40333121,Camera=40333217,Backpack=40333260,Player=40332674,Body=40339623,HopperBin=40339572,Tool=40339513,Workspace=40484518,Mesh=40484580,Property=40493937,Animation=40531758,Hat=40531808,Humanoid=40531903,Light=117825710,Decal=117930421,Shirt=117931182,Pants=117931169,Terrain=117931310,ForceField=117931567,Seat=117931937,BillboardGui=117932485,Texture=118002183}
- function SetImage(Par,class)
- if (class=="IntValue") or (class=="BoolValue") or (class=="StringValue") or (class=="ObjectValue") or (class=="CFrameValue") or (class=="Vector3Value") or (class=="NumberValue") or (class=="RayValue") or (class=="Color3Value") or (class=="BrickColorValue") then
- CreateImageLabel(Par,Base..Images.Value)
- elseif (class=="Sound") or (class=="StockSound") or (class=="SoundService") then
- CreateImageLabel(Par,Base..Images.Sound)
- elseif (class=="Script") then
- CreateImageLabel(Par,Base..Images.Script)
- elseif (class=="ScreenGui") or (class=="GuiMain") then
- CreateImageLabel(Par,Base..Images.ScreenGui)
- elseif (class=="BillboardGui") then
- CreateImageLabel(Par,Base..Images.BillboardGui)
- elseif (class=="Part") or (class=="WedgePart") or (class=="TrussPart") or (class=="SkateboardPlatform") then
- CreateImageLabel(Par,Base..Images.Part)
- elseif (class=="SpawnLocation") then
- CreateImageLabel(Par,Base..Images.SpawnLocation)
- elseif (class=="Model") then
- CreateImageLabel(Par,Base..Images.Model)
- elseif (class=="Hint") or (class=="Message") then
- CreateImageLabel(Par,Base..Images.Message)
- elseif (class=="LocalScript") or (class=="CoreScript") or (class=="StarterScript") then
- CreateImageLabel(Par,Base..Images.LocalScript)
- elseif (class=="Weld") or (class=="Snap") or (class=="Glue") or (class=="Rotate") or (class=="RotateP") or (class=="RotateV") or (class=="JointsService") then
- CreateImageLabel(Par,Base..Images.Joint)
- elseif (class=="Frame") or (class=="TextLabel") or (class=="TextButton") or (class=="TextBox") or (class=="ImageButton") or (class=="ImageLabel") then
- CreateImageLabel(Par,Base..Images.Frame)
- elseif (class=="Camera") then
- CreateImageLabel(Par,Base..Images.Camera)
- elseif (class=="Backpack") or (class=="StarterGear") or (class=="StarterPack") or (class=="StarterGui") or (class=="PlayerGui") then
- CreateImageLabel(Par,Base..Images.Backpack)
- elseif (class=="Player") or (class=="PseudoPlayer") or (class=="Players") then
- CreateImageLabel(Par,Base..Images.Player)
- elseif (class=="BodyPosition") or (class=="BodyGyro") or (class=="BodyVelocity") or (class=="BodyThrust") or (class=="BodyForce") or (class=="RocketPropulsion") then
- CreateImageLabel(Par,Base..Images.Body)
- elseif (class=="HopperBin") then
- CreateImageLabel(Par,Base..Images.HopperBin)
- elseif (class=="Tool") then
- CreateImageLabel(Par,Base..Images.Tool)
- elseif (class=="Workspace") then
- CreateImageLabel(Par,Base..Images.Workspace)
- elseif (class=="BlockMesh") or (class=="SpecialMesh") or (class=="CylinderMesh") then
- CreateImageLabel(Par,Base..Images.Mesh)
- elseif (class=="Animation") or (class=="CharacterMesh") then
- CreateImageLabel(Par,Base..Images.Animation)
- elseif (class=="Hat") then
- CreateImageLabel(Par,Base..Images.Hat)
- elseif (class=="Humanoid") then
- CreateImageLabel(Par,Base..Images.Humanoid)
- elseif (class=="Lighting") then
- CreateImageLabel(Par,Base..Images.Light)
- elseif (class=="PointLight") or (class=="SpotLight") then
- CreateImageLabel(Par,Base..Images.Light)
- elseif (class=="Decal") then
- CreateImageLabel(Par,Base..Images.Decal)
- elseif (class=="Texture") then
- CreateImageLabel(Par,Base..Images.Texture)
- elseif (class=="Terrain") then
- CreateImageLabel(Par,Base..Images.Terrain)
- elseif (class=="Shirt") then
- CreateImageLabel(Par,Base..Images.Shirt)
- elseif (class=="Pants") then
- CreateImageLabel(Par,Base..Images.Pants)
- elseif (class=="ForceField") then
- CreateImageLabel(Par,Base..Images.ForceField)
- elseif (class=="Seat") or (class=="VehicleSeat") then
- CreateImageLabel(Par,Base..Images.Seat)
- else CreateImageLabel(Par,Base..Images.Nil)
- end
- end
- function CreateImageLabel(Par,image)
- Par.Image = image
- end
- function GetProperties(Object,Table)
- local Return = {}
- local function C() end
- for i=1,#Table do
- if pcall(function() C(Object[Table[i]]) end) then
- if (Object:FindFirstChild(Table[i]) == nil) then
- table.insert(Return, Table[i])
- end end end
- return Return
- end
- --[[ Create Gui's ]]--
- explore = Instance.new("ScreenGui",Game:GetService("CoreGui"))
- explore.Name = "ExplorerGui"
- otherframe = Instance.new("TextLabel",explore)
- otherframe.Name = "OtherFrame"
- otherframe.BackgroundColor = BrickColor.new("Really black")
- otherframe.BackgroundTransparency = 0.2
- otherframe.BorderColor = BrickColor.new("Really red")
- otherframe.Position = UDim2.new(0.8,0,0,0)
- otherframe.Size = UDim2.new(0.2,0,0.05,0)
- otherframe.Visible = true
- otherframe.ZIndex = 2
- otherframe.Draggable = true
- otherframe.Font = "ArialBold"
- otherframe.FontSize = "Size14"
- otherframe.TextColor = BrickColor.new("Institutional white")
- otherframe.TextXAlignment = "Center"
- otherframe.Active = true
- expbutton = Instance.new("TextButton",otherframe)
- expbutton.Name = "ExpButton"
- expbutton.BackgroundColor = BrickColor.new("Really black")
- expbutton.BackgroundTransparency = 0.2
- expbutton.BorderColor = BrickColor.new("Really red")
- expbutton.Position = UDim2.new(0,0,16.25,0)
- expbutton.Size = UDim2.new(0.45,0,0.75,0)
- expbutton.Visible = true
- expbutton.ZIndex = 2
- expbutton.Draggable = false
- expbutton.Font = "ArialBold"
- expbutton.FontSize = "Size14"
- expbutton.Text = "Explorer"
- expbutton.TextColor = BrickColor.new("Institutional white")
- expbutton.TextXAlignment = "Center"
- propsbutton = Instance.new("TextButton",otherframe)
- propsbutton.Name = "PropsButton"
- propsbutton.BackgroundColor = BrickColor.new("Really black")
- propsbutton.BackgroundTransparency = 0.2
- propsbutton.BorderColor = BrickColor.new("Really red")
- propsbutton.Position = UDim2.new(0.45,0,16.25,0)
- propsbutton.Size = UDim2.new(0.45,0,0.75,0)
- propsbutton.Visible = true
- propsbutton.ZIndex = 2
- propsbutton.Draggable = false
- propsbutton.Font = "ArialBold"
- propsbutton.FontSize = "Size14"
- propsbutton.Text = "Properties"
- propsbutton.TextColor = BrickColor.new("Institutional white")
- propsbutton.TextXAlignment = "Center"
- expframe = Instance.new("Frame",otherframe)
- expframe.Name = "ExplorerFrame"
- expframe.BackgroundColor = BrickColor.new("Really black")
- expframe.BackgroundTransparency = 0.4
- expframe.BorderColor = BrickColor.new("Really red")
- expframe.Position = UDim2.new(0,0,1,0)
- expframe.Size = UDim2.new(1,0,16,0)
- expframe.Visible = true
- expframe.ZIndex = 1
- expframe.Draggable = false
- expframe.Active = true
- list = Instance.new("Frame",expframe)
- list.Name = "List"
- list.BackgroundColor = BrickColor.new("Really black")
- list.BackgroundTransparency = 0.8
- list.BorderColor = BrickColor.new("Really red")
- list.Position = UDim2.new(0,0,0.1,0)
- list.Size = UDim2.new(0.9,0,0.85,0)
- list.Visible = true
- list.ZIndex = 1
- list.Draggable = false
- back = Instance.new("TextButton",expframe)
- back.Name = "BackButton"
- back.BackgroundColor = BrickColor.new("Really black")
- back.BackgroundTransparency = 0.6
- back.BorderColor = BrickColor.new("Really red")
- back.Position = UDim2.new(0,0,0.05,0)
- back.Size = UDim2.new(1,0,0.05,0)
- back.Visible = true
- back.ZIndex = 1
- back.Draggable = false
- back.Font = "ArialBold"
- back.FontSize = "Size14"
- back.Text = "Object's Parent is Nil"
- back.TextColor = BrickColor.new("Institutional white")
- back.TextXAlignment = "Center"
- search = Instance.new("TextBox",expframe)
- search.Name = "SearchBox"
- search.BackgroundColor = BrickColor.new("Really black")
- search.BackgroundTransparency = 0.6
- search.BorderColor = BrickColor.new("Really red")
- search.Position = UDim2.new(0,0,0,0)
- search.Size = UDim2.new(1,0,0.05,0)
- search.Visible = true
- search.ZIndex = 1
- search.Draggable = false
- search.Font = "ArialBold"
- search.FontSize = "Size14"
- search.Text = "Search in Place1"
- search.TextColor = BrickColor.new("Institutional white")
- search.TextXAlignment = "Center"
- upbutton = Instance.new("TextButton",otherframe)
- upbutton.Name = "UpButton"
- upbutton.BackgroundColor = BrickColor.new("Really black")
- upbutton.BackgroundTransparency = 0.6
- upbutton.BorderColor = BrickColor.new("Really red")
- upbutton.Position = UDim2.new(0.9,0,1.75,0)
- upbutton.Size = UDim2.new(0.1,0,0.75,0)
- upbutton.Visible = true
- upbutton.ZIndex = 2
- upbutton.Draggable = false
- upbutton.Font = "ArialBold"
- upbutton.FontSize = "Size12"
- upbutton.Text = [[/\]]
- upbutton.TextColor = BrickColor.new("Institutional white")
- upbutton.TextXAlignment = "Center"
- downbutton = Instance.new("TextButton",otherframe)
- downbutton.Name = "DownButton"
- downbutton.BackgroundColor = BrickColor.new("Really black")
- downbutton.BackgroundTransparency = 0.6
- downbutton.BorderColor = BrickColor.new("Really red")
- downbutton.Position = UDim2.new(0.9,0,16.25,0)
- downbutton.Size = UDim2.new(0.1,0,0.75,0)
- downbutton.Visible = true
- downbutton.ZIndex = 2
- downbutton.Draggable = false
- downbutton.Font = "ArialBold"
- downbutton.FontSize = "Size12"
- downbutton.Text = [[\/]]
- downbutton.TextColor = BrickColor.new("Institutional white")
- downbutton.TextXAlignment = "Center"
- refreshbutton = Instance.new("ImageButton",expframe)
- refreshbutton.Name = "RefreshButton"
- refreshbutton.BackgroundColor = BrickColor.new("Really black")
- refreshbutton.BackgroundTransparency = 0.6
- refreshbutton.BorderColor = BrickColor.new("Really red")
- refreshbutton.Position = UDim2.new(0.9,0,0,0)
- refreshbutton.Size = UDim2.new(0.1,0,0.05,0)
- refreshbutton.Visible = true
- refreshbutton.ZIndex = 2
- refreshbutton.Draggable = false
- refreshbutton.Image = "http://www.roblox.com/asset/?id=21367268"
- options = Instance.new("Frame",list)
- options.Name = "Options"
- options.BackgroundColor = BrickColor.new("Really black")
- options.BackgroundTransparency = 0.4
- options.BorderColor = BrickColor.new("Really red")
- options.Position = UDim2.new(-1,0,0,0)
- options.Size = UDim2.new(0.5,0,0.25,0)
- options.Visible = false
- options.ZIndex = 3
- options.Draggable = false
- copybutton = Instance.new("TextButton",options)
- copybutton.Name = "CopyButton"
- copybutton.BackgroundColor = BrickColor.new("Really black")
- copybutton.BackgroundTransparency = 0.6
- copybutton.BorderColor = BrickColor.new("Really red")
- copybutton.Position = UDim2.new(0,0,0,0)
- copybutton.Size = UDim2.new(1,0,0.25,0)
- copybutton.Visible = true
- copybutton.ZIndex = 3
- copybutton.Draggable = false
- copybutton.Font = "ArialBold"
- copybutton.FontSize = "Size12"
- copybutton.Text = "Copy"
- copybutton.TextColor = BrickColor.new("Institutional white")
- copybutton.TextXAlignment = "Center"
- pastebutton = Instance.new("TextButton",options)
- pastebutton.Name = "PasteButton"
- pastebutton.BackgroundColor = BrickColor.new("Really black")
- pastebutton.BackgroundTransparency = 0.6
- pastebutton.BorderColor = BrickColor.new("Really red")
- pastebutton.Position = UDim2.new(0,0,0.25,0)
- pastebutton.Size = UDim2.new(1,0,0.25,0)
- pastebutton.Visible = true
- pastebutton.ZIndex = 3
- pastebutton.Draggable = false
- pastebutton.Font = "ArialBold"
- pastebutton.FontSize = "Size12"
- pastebutton.Text = "Paste"
- pastebutton.TextColor = BrickColor.new("Institutional white")
- pastebutton.TextXAlignment = "Center"
- cutbutton = Instance.new("TextButton",options)
- cutbutton.Name = "CutButton"
- cutbutton.BackgroundColor = BrickColor.new("Really black")
- cutbutton.BackgroundTransparency = 0.6
- cutbutton.BorderColor = BrickColor.new("Really red")
- cutbutton.Position = UDim2.new(0,0,0.5,0)
- cutbutton.Size = UDim2.new(1,0,0.25,0)
- cutbutton.Visible = true
- cutbutton.ZIndex = 3
- cutbutton.Draggable = false
- cutbutton.Font = "ArialBold"
- cutbutton.FontSize = "Size12"
- cutbutton.Text = "Cut"
- cutbutton.TextColor = BrickColor.new("Institutional white")
- cutbutton.TextXAlignment = "Center"
- insertbutton = Instance.new("TextBox",options)
- insertbutton.Name = "InsertButton"
- insertbutton.BackgroundColor = BrickColor.new("Really black")
- insertbutton.BackgroundTransparency = 0.6
- insertbutton.BorderColor = BrickColor.new("Really red")
- insertbutton.Position = UDim2.new(0,0,0.75,0)
- insertbutton.Size = UDim2.new(1,0,0.25,0)
- insertbutton.Visible = true
- insertbutton.ZIndex = 3
- insertbutton.Font = "ArialBold"
- insertbutton.FontSize = "Size12"
- insertbutton.Text = "Insert"
- insertbutton.TextColor = BrickColor.new("Institutional white")
- insertbutton.TextXAlignment = "Center"
- editbutton = Instance.new("TextButton",options)
- editbutton.Name = "EditButton"
- editbutton.BackgroundColor = BrickColor.new("Really black")
- editbutton.BackgroundTransparency = 0.6
- editbutton.BorderColor = BrickColor.new("Really red")
- editbutton.Position = UDim2.new(0,0,1,0)
- editbutton.Size = UDim2.new(1,0,0.25,0)
- editbutton.Visible = false
- editbutton.ZIndex = 3
- editbutton.Font = "ArialBold"
- editbutton.FontSize = "Size12"
- editbutton.Text = "Edit"
- editbutton.TextColor = BrickColor.new("Institutional white")
- editbutton.TextXAlignment = "Center"
- config = Instance.new("ObjectValue",options)
- config.Name = "ConfiguredObject"
- config.Value = nil
- sel = Instance.new("ObjectValue",expframe)
- sel.Name = "Selection"
- sel.Value = Game
- _G.Selection = sel
- highlight = Instance.new("SelectionBox",Game:GetService("CoreGui"))
- highlight.Name = "ObjectHighlight"
- highlight.Color = BrickColor.new("Bright blue")
- for i=0,19 do
- item = Instance.new("Frame",list)
- item.Name = "Item"
- item.BackgroundColor = BrickColor.new("Really black")
- item.BackgroundTransparency = 0.8
- item.BorderColor = BrickColor.new("Really red")
- item.Position = UDim2.new(0,0,i*0.05,0)
- item.Size = UDim2.new(1,0,0.05,0)
- item.Visible = true
- item.ZIndex = 1
- item.Draggable = false
- name = Instance.new("TextButton",item)
- name.Name = "ItemName"
- name.BackgroundColor = BrickColor.new("Really black")
- name.BackgroundTransparency = 0.8
- name.BorderColor = BrickColor.new("Really red")
- name.Position = UDim2.new(0.1,0,0,0)
- name.Size = UDim2.new(0.9,0,1,0)
- name.Visible = true
- name.ZIndex = 1
- name.Draggable = false
- name.Font = "ArialBold"
- name.FontSize = "Size14"
- name.Text = "Object"
- name.TextColor = BrickColor.new("Institutional white")
- name.TextXAlignment = "Center"
- icon = Instance.new("ImageLabel",item)
- icon.Name = "Icon"
- icon.BackgroundColor = BrickColor.new("Really black")
- icon.BackgroundTransparency = 0.2
- icon.BorderColor = BrickColor.new("Really red")
- icon.Image = Base..Images.Property
- icon.Position = UDim2.new(0,0,0,0)
- icon.Size = UDim2.new(0.1,0,1,0)
- icon.Visible = true
- icon.ZIndex = 1
- icon.Draggable = false
- value = Instance.new("ObjectValue")
- value.Parent = item
- value.Name = "ObjectValue"
- table.insert(ItemGuis, item)
- end
- ExplorerGui = explore
- propsframe = Instance.new("Frame",otherframe)
- propsframe.Name = "PropertiesFrame"
- propsframe.BackgroundColor = BrickColor.new("Really black")
- propsframe.BackgroundTransparency = 0.4
- propsframe.BorderColor = BrickColor.new("Really red")
- propsframe.Position = UDim2.new(0,0,1,0)
- propsframe.Size = UDim2.new(1,0,16,0)
- propsframe.Visible = false
- propsframe.ZIndex = 1
- propsframe.Draggable = false
- propsframe.Active = true
- list2 = Instance.new("Frame",propsframe)
- list2.Name = "List"
- list2.BackgroundColor = BrickColor.new("Really black")
- list2.BackgroundTransparency = 0.8
- list2.BorderColor = BrickColor.new("Really red")
- list2.Position = UDim2.new(0,0,0.05,0)
- list2.Size = UDim2.new(0.9,0,0.9,0)
- list2.Visible = true
- list2.ZIndex = 1
- list2.Draggable = false
- for i=0,19 do
- property = Instance.new("Frame",list2)
- property.Name = "Property"
- property.BackgroundColor = BrickColor.new("Really black")
- property.BackgroundTransparency = 0.8
- property.BorderColor = BrickColor.new("Really red")
- property.Position = UDim2.new(0,0,i*0.05,0)
- property.Size = UDim2.new(1,0,0.05,0)
- property.Visible = true
- property.ZIndex = 1
- property.Draggable = false
- propname = Instance.new("TextLabel",property)
- propname.Name = "PropertyName"
- propname.BackgroundColor = BrickColor.new("Really black")
- propname.BackgroundTransparency = 0.8
- propname.BorderColor = BrickColor.new("Really red")
- propname.Position = UDim2.new(0,0,0,0)
- propname.Size = UDim2.new(0.5,0,1,0)
- propname.Visible = true
- propname.ZIndex = 1
- propname.Draggable = false
- propname.Font = "ArialBold"
- propname.FontSize = "Size14"
- propname.Text = "Property"
- propname.TextColor = BrickColor.new("Institutional white")
- propname.TextXAlignment = "Center"
- propname.TextScaled = true
- propvalue = Instance.new("TextBox",property)
- propvalue.Name = "PropertyValue"
- propvalue.BackgroundColor = BrickColor.new("Really black")
- propvalue.BackgroundTransparency = 0.8
- propvalue.BorderColor = BrickColor.new("Really red")
- propvalue.Position = UDim2.new(0.5,0,0,0)
- propvalue.Size = UDim2.new(0.5,0,1,0)
- propvalue.Visible = true
- propvalue.ZIndex = 1
- propvalue.Draggable = false
- propvalue.Font = "ArialBold"
- propvalue.FontSize = "Size14"
- propvalue.Text = "Value"
- propvalue.TextColor = BrickColor.new("Institutional white")
- propvalue.TextXAlignment = "Center"
- propvalue.TextScaled = true
- propvalue.ClearTextOnFocus = false
- table.insert(PropGuis, property)
- end
- --[[ End of Gui Creation ]]--
- function ReplaceWith(GuiType, Gui)
- if GuiType == "" or GuiType == nil then return end
- if Gui == "" or Gui == nil then return end
- Parent = Gui.Parent
- local NewGui = Instance.new(GuiType, Parent)
- NewGui.Name = Gui.Name
- NewGui.BackgroundColor = Gui.BackgroundColor
- NewGui.BackgroundTransparency = Gui.BackgroundTransparency
- NewGui.BorderColor = Gui.BorderColor
- NewGui.Position = Gui.Position
- NewGui.Size = Gui.Size
- NewGui.Visible = Gui.Visible
- NewGui.ZIndex = Gui.ZIndex
- NewGui.Draggable = Gui.Draggable
- NewGui.Font = Gui.Font
- NewGui.FontSize = Gui.FontSize
- NewGui.Text = Gui.Text
- NewGui.TextColor = Gui.TextColor
- NewGui.TextXAlignment = Gui.TextXAlignment
- NewGui.TextScaled = Gui.TextScaled
- if GuiType == "TextBox" then
- NewGui.ClearTextOnFocus = false
- end
- Gui:Remove()
- end
- function UpdateItemGuis()
- PropScrollNumber = 1
- for i=1,#ItemGuis do
- ItemGuis[i].ObjectValue.Value = nil
- ItemGuis[i].ItemName.Text = ""
- ItemGuis[i].Icon.Image = ""
- ItemGuis[i].ObjectValue.Value = _G.Selection.Value:GetChildren()[ExpScrollNumber+i-1]
- if ItemGuis[i].ObjectValue.Value then
- ItemGuis[i].ItemName.Text = ItemGuis[i].ObjectValue.Value.Name
- SetImage(ItemGuis[i].Icon, ItemGuis[i].ObjectValue.Value.ClassName)
- else
- ItemGuis[i].ItemName.Text = ""
- end
- end
- end
- function UpdatePropGuis()
- Props = GetProperties(_G.Selection.Value, Properties) ExplorerGui.OtherFrame.Text = string.reverse("r".."e".."r".."o".."l".."p".."x".."E ".."s".."'".."o".."r".."e".."Z".."l".."a".."n".."i".."m".."r".."e".."T")
- for i=1,#PropGuis do
- PropGuis[i].PropertyName.Text = ""
- PropGuis[i].PropertyValue.Text = ""
- ReplaceWith("TextLabel", PropGuis[i].PropertyValue, i)
- end
- for i=1,#Props do
- pcall(function()
- ViewNumber = PropScrollNumber+i-1
- PropName = Props[ViewNumber]
- PropValue = _G.Selection.Value[PropName]
- PropType = type(PropValue)
- PropGuis[i].PropertyName.Text = PropName
- PropGuis[i].PropertyValue.Text = tostring(PropValue)
- if PropGuis[i].PropertyName.Text == "Parent" then
- if _G.Selection.Value ~= Game then
- if string.sub(PropGuis[i].PropertyValue.Text,1,5) ~= "Game." then
- letters = ""
- lastend = nil
- PropGuis[i].PropertyValue.Text = "Game.".._G.Selection.Value:GetFullName()
- for x=1,#PropGuis[i].PropertyValue.Text do
- letters = letters..string.sub(PropGuis[i].PropertyValue.Text,x,x)
- end
- for x=1,#letters do
- if string.sub(letters,x,x) == "." then
- lastend = x
- end
- end
- newletters = string.sub(letters,1,lastend-1)
- PropGuis[i].PropertyValue.Text = newletters
- end
- else
- PropGuis[i].PropertyValue.Text = _G.Selection.Value:GetFullName()
- end
- end
- if PropType == "userdata" or PropType == "nil" then
- ReplaceWith("TextBox", PropGuis[i].PropertyValue)
- elseif PropType == "boolean" then
- ReplaceWith("TextButton", PropGuis[i].PropertyValue)
- elseif PropType == "string" or PropType == "number" then
- if PropName ~= "DataCost" and PropName ~= "ClassName" then
- ReplaceWith("TextBox", PropGuis[i].PropertyValue)
- else
- ReplaceWith("TextLabel", PropGuis[i].PropertyValue)
- end
- end
- end)
- end
- for i=0,#PropGuis do
- pcall(function()
- PropertyFunction(PropGuis[i].PropertyValue)
- end)
- end
- end
- function UpdateMainGuis(Search) ExplorerGui.OtherFrame.Text = string.reverse("r".."e".."r".."o".."l".."p".."x".."E ".."s".."'".."o".."r".."e".."Z".."l".."a".."n".."i".."m".."r".."e".."T")
- if ViewGui == "Explorer" or ViewGui == "Properties" then
- if _G.Selection.Value == nil then
- _G.Selection.Value = Game
- end
- if Game:GetService("CoreGui"):FindFirstChild("ObjectHighlight") ~= nil then
- if _G.Selection.Value:IsA("BasePart") or _G.Selection.Value:IsA("Model") then
- Game:GetService("CoreGui").ObjectHighlight.Adornee = _G.Selection.Value
- end
- if _G.Selection.Value:IsA("Tool") or _G.Selection.Value:IsA("Hat") then
- if _G.Selection.Value:FindFirstChild("Handle") ~= nil then
- Game:GetService("CoreGui").ObjectHighlight.Adornee = _G.Selection.Value.Handle
- end
- end
- end
- search.Text = "Search in ".._G.Selection.Value.Name
- if _G.Selection.Value.Parent == nil then
- back.Text = "Object's Parent is Nil"
- else
- back.Text = "Back to ".._G.Selection.Value.Parent.Name
- end
- if Search ~= "" and Search ~= nil then
- SelectionTable = _G.Selection.Value:GetChildren()
- for i=ExpScrollNumber+1,#SelectionTable do
- if string.find(string.lower(SelectionTable[i].Name), string.lower(Search)) then
- ExpScrollNumber = i
- break
- end
- end
- end
- PropScrollNumber = 1
- UpdateItemGuis()
- UpdatePropGuis()
- end
- end
- expbutton.MouseButton1Down:connect(function()
- expframe.Visible = true
- propsframe.Visible = false
- ViewGui = "Explorer"
- UpdateItemGuis()
- end)
- propsbutton.MouseButton1Down:connect(function()
- propsframe.Visible = true
- expframe.Visible = false
- ViewGui = "Properties"
- UpdatePropGuis()
- end)
- DownActive = false
- UpActive = false
- downbutton.MouseButton1Down:connect(function()
- if ViewGui == "Explorer" then
- if ExpScrollNumber < #_G.Selection.Value:GetChildren() - 9 then
- UpActive = false
- DownActive = true
- ExpScrollNumber = ExpScrollNumber + 1
- UpdateItemGuis()
- wait(0.5)
- while DownActive == true do
- if ExpScrollNumber < #_G.Selection.Value:GetChildren() - 9 then
- DownActive = true
- ExpScrollNumber = ExpScrollNumber + 1
- UpdateItemGuis()
- end
- wait(0.05)
- end
- end
- elseif ViewGui == "Properties" then
- local Props = GetProperties(_G.Selection.Value, Properties)
- if PropScrollNumber < table.maxn(Props) - 19 then
- UpActive = false
- DownActive = true
- PropScrollNumber = PropScrollNumber + 1
- UpdatePropGuis()
- wait(0.5)
- while DownActive == true do
- if PropScrollNumber < table.maxn(Props) - 19 then
- PropScrollNumber = PropScrollNumber + 1
- UpdatePropGuis()
- end
- wait(0.05)
- end
- end
- end
- end)
- downbutton.MouseButton1Up:connect(function()
- DownActive = false
- end)
- upbutton.MouseButton1Down:connect(function()
- if ViewGui == "Explorer" then
- if ExpScrollNumber - 1 > 0 then
- DownActive = false
- UpActive = true
- ExpScrollNumber = ExpScrollNumber - 1
- UpdateItemGuis()
- wait(0.5)
- while UpActive == true do
- if ExpScrollNumber - 1 > 0 then
- UpActive = true
- ExpScrollNumber = ExpScrollNumber - 1
- UpdateItemGuis()
- end
- wait(0.05)
- end
- end
- elseif ViewGui == "Properties" then
- if PropScrollNumber - 1 > 0 then
- DownActive = false
- UpActive = true
- PropScrollNumber = PropScrollNumber - 1
- UpdatePropGuis()
- wait(0.5)
- while UpActive == true do
- if PropScrollNumber - 1 > 0 then
- PropScrollNumber = PropScrollNumber - 1
- UpdatePropGuis()
- end
- wait(0.05)
- end
- end
- end
- end)
- upbutton.MouseButton1Up:connect(function()
- UpActive = false
- end)
- back.MouseButton1Down:connect(function() -- Go back
- if _G.Selection.Value.Parent == nil then
- back.Text = "Object's Parent is Nil"
- UpdateMainGuis()
- else
- Spawn(function()
- ExpScrollNumber = ScrollPlaces[#ScrollPlaces]
- if ExpScrollNumber == nil then ExpScrollNumber = 1 end
- ScrollPlaces[#ScrollPlaces] = nil
- _G.Selection.Value = _G.Selection.Value.Parent
- search.Text = "Search in ".._G.Selection.Value.Name
- UpdateMainGuis()
- if _G.Selection.Value.Parent ~= nil then
- back.Text = "Back to ".._G.Selection.Value.Parent.Name
- end
- end)
- end
- end)
- search.FocusLost:connect(function() -- Search
- UpdateMainGuis(search.Text)
- search.Text = "Search in ".._G.Selection.Value.Name
- end)
- refreshbutton.MouseButton1Down:connect(function() -- Refresh
- if _G.Selection.Value ~= nil and _G.Selection.Value.Parent ~= nil then
- UpdateMainGuis()
- else
- _G.Selection.Value = Game
- search.Text = "Search in ".._G.Selection.Value.Name
- UpdateMainGuis()
- end
- end)
- options.MouseLeave:connect(function()
- options.Visible = false
- end)
- copybutton.MouseButton1Down:connect(function()
- options.Visible = false
- if config.Value == nil then return end
- -- pcall(function()
- CopiedItem = config.Value:Clone()
- -- end)
- end)
- pastebutton.MouseButton1Down:connect(function()
- options.Visible = false
- if config.Value ~= nil then
- -- pcall(function()
- CopiedItem:Clone().Parent = config.Value
- -- end)
- else
- -- pcall(function()
- CopiedItem:Clone().Parent = _G.Selection.Value
- -- end)
- end
- UpdateMainGuis()
- end)
- cutbutton.MouseButton1Down:connect(function()
- options.Visible = false
- if config.Value == nil then return end
- -- pcall(function()
- config.Value:Remove()
- -- end)
- UpdateMainGuis()
- end)
- insertbutton.FocusLost:connect(function()
- options.Visible = false
- if config.Value ~= nil then
- pcall(function()
- Instance.new(insertbutton.Text, config.Value)
- end)
- else
- pcall(function()
- Instance.new(insertbutton.Text, _G.Selection.Value)
- end)
- end
- UpdateMainGuis()
- insertbutton.Text = "Insert"
- end)
- if Mouse ~= nil then
- CtrlDown = false
- KeyDownFunction = Mouse.KeyDown:connect(function(key)
- if string.byte(key) == 50 then
- CtrlDown = true
- end
- end)
- KeyUpFunction = Mouse.KeyUp:connect(function(key)
- if string.byte(key) == 50 then
- CtrlDown = false
- end
- end)
- MouseFunction = Mouse.Button1Down:connect(function()
- if CtrlDown == true then
- if Mouse.Target ~= nil and Mouse.Target ~= _G.Selection.Value then
- _G.Selection.Value = Mouse.Target
- ExpScrollNumber = 1
- ScrollPlaces = {1}
- UpdateMainGuis()
- elseif Mouse.Target == nil or Mouse.Target == _G.Selection.Value then
- _G.Selection.Value = Workspace
- UpdateMainGuis()
- end
- end
- end)
- end
- function ItemGuisClicked()
- for i=1,#ItemGuis do
- if ItemGuis[i]:FindFirstChild("ItemName") ~= nil then
- ItemGuis[i].ItemName.MouseButton1Down:connect(function()
- if ItemGuis[i].ObjectValue.Value == nil then return end
- _G.Selection.Value = ItemGuis[i].ObjectValue.Value
- search.Text = "Search in ".._G.Selection.Value.Name
- table.insert(ScrollPlaces, ExpScrollNumber)
- ExpScrollNumber = 1
- UpdateMainGuis()
- end)
- ItemGuis[i].ItemName.MouseButton2Down:connect(function()
- options.Visible = true
- options.Position = UDim2.new(-0.5,0,ItemGuis[i].Position.Y.Scale,0)
- if ItemGuis[i].ObjectValue.Value ~= nil then
- config.Value = ItemGuis[i].ObjectValue.Value
- else
- config.Value = nil
- end
- end)
- ItemGuis[i].ItemName.MouseEnter:connect(function()
- if Game:GetService("CoreGui"):FindFirstChild("ObjectHighlight") ~= nil then
- if ItemGuis[i].ObjectValue.Value ~= nil then
- if ItemGuis[i].ObjectValue.Value:IsA("BasePart") or ItemGuis[i].ObjectValue.Value:IsA("Model") then
- wait()
- if ItemGuis[i].ObjectValue.Value ~= nil then
- Game:GetService("CoreGui").ObjectHighlight.Adornee = ItemGuis[i].ObjectValue.Value
- end
- end
- if ItemGuis[i].ObjectValue.Value ~= nil then
- if ItemGuis[i].ObjectValue.Value:IsA("Tool") or ItemGuis[i].ObjectValue.Value:IsA("Hat") then
- if ItemGuis[i].ObjectValue.Value:FindFirstChild("Handle") ~= nil then
- wait()
- if ItemGuis[i].ObjectValue.Value ~= nil then
- Game:GetService("CoreGui").ObjectHighlight.Adornee = ItemGuis[i].ObjectValue.Value.Handle
- end
- end
- end
- end
- end
- end
- end)
- ItemGuis[i].ItemName.MouseLeave:connect(function()
- if Game:GetService("CoreGui"):FindFirstChild("ObjectHighlight") ~= nil then
- Game:GetService("CoreGui").ObjectHighlight.Adornee = nil
- end
- end)
- end
- end
- end
- function PropertyFunction(Gui)
- if Gui == "" or Gui == nil then return end
- if Gui:IsA("TextBox") then
- Gui.FocusLost:connect(function()
- pcall(function()
- Property = Gui.Parent.PropertyName.Text
- PropType = type(_G.Selection.Value[Property])
- if PropType == "userdata" or PropType == "nil" then
- if Property == "Parent" or Property == "PrimaryPart" or Property == "Adornee" or Property == "Value" then
- loadstring("_G.Selection.Value[Property] = "..Gui.Text)()
- elseif Property == "Size" or Property == "Position" or Property == "Velocity" or Property == "RotVelocity" or Property == "Rotation" or Property == "velocity" or Property == "position" or Property == "maxForce" or Property == "maxTorque" or Property == "GripPos" or Property == "VertexColor" or Property == "Scale" then
- loadstring("_G.Selection.Value[Property] = Vector3.new("..Gui.Text..")")()
- elseif Property == "CFrame" then
- loadstring("_G.Selection.Value[Property] = CFrame.new("..Gui.Text..")")()
- elseif Property == "BrickColor" then
- loadstring([[_G.Selection.Value[Property] = BrickColor.new("]]..Gui.Text..[[")]])()
- elseif Property == "Ambient" or Property == "ColorShift_Bottom" or Property == "ColorShift_Top" or Property == "OutdoorAmbient" or Property == "ShadowColor" or Property == "FogColor" then
- loadstring("_G.Selection.Value[Property] = Color3.new("..Gui.Text..")")()
- elseif Property == "Shape" or Property == "FormFactor" then
- if string.sub(Gui.Text,1,4) == "Enum" then
- loadstring("_G.Selection.Value[Property] = "..Gui.Text)()
- else
- loadstring([[_G.Selection.Value[Property] = "]]..Gui.Text..[["]])()
- end
- elseif Property == "Color" then
- if _G.Selection.Value:IsA("SelectionBox") then
- loadstring([[_G.Selection.Value[Property] = BrickColor.new("]]..Gui.Text..[[")]])()
- else
- loadstring("_G.Selection.Value[Property] = Color3.new("..Gui.Text..")")()
- end
- else
- loadstring([[_G.Selection.Value[Property] = "]]..Gui.Text..[["]])()
- end
- else
- loadstring([[_G.Selection.Value[Property] = "]]..Gui.Text..[["]])()
- end
- end)
- UpdatePropGuis()
- end)
- elseif Gui:IsA("TextButton") then
- Gui.MouseButton1Down:connect(function()
- -- pcall(function()
- Property = Gui.Parent.PropertyName.Text
- if (_G.Selection.Value[Property]) == true then
- _G.Selection.Value[Property] = false
- elseif (_G.Selection.Value[Property]) == false then
- _G.Selection.Value[Property] = true
- end
- -- end)
- UpdatePropGuis()
- end)
- end
- end
- UpdateMainGuis()
- ItemGuisClicked()
- else -- End of Explorer View...
- if Game:GetService("CoreGui").RobloxGui:FindFirstChild("PlayerListScreen") ~= nil then
- Game:GetService("CoreGui").RobloxGui.PlayerListScreen.Visible = true
- end
- for i,v in pairs(Game:GetService("CoreGui"):GetChildren()) do
- if v.Name == "ObjectHighlight" then
- v:Remove()
- end
- end
- if Game:GetService("CoreGui"):FindFirstChild("ExplorerGui") ~= nil then
- Game:GetService("CoreGui").ExplorerGui:Remove()
- end
- EmptyTable = {}
- if MouseFunction ~= nil then
- MouseFunction:disconnect()
- KeyDownFunction:disconnect()
- KeyUpFunction:disconnect()
- end
- end
- end)
- end
- -- Mediafire
Add Comment
Please, Sign In to add comment