Advertisement
Guest User

Untitled

a guest
Dec 9th, 2016
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.04 KB | None | 0 0
  1. ClassIcons = {BillboardGui = 67446520, CustomEventReceiver = 67237939,CustomEvent = 67237939, Player = 67439153, Dialog = 67438914, PlayerGui = 67345002, Backpack = 67237858, SkateboardPlatform = 67237806,Accoutrement = 67346841,Flag = 67345694, FlagStand = 67345697, ClickDetector = 67344903, DialogChoice = 67344924, Fire = 67344930, Sparkles = 67344994, Smoke = 67344884, Configuration = 67344907,SelectionBox = 67344979, SelectionPartLasso = 67344944, SelectionPointLasso = 67344944,Texture = 67345018, SoundService = 67345328, StarterGui = 67345002, Terrain = 67345471, Explosion = 64940743,TextLabel = 64941698,TextButton = 67237902,TextBox = 67237902,Sky = 67237823,ImageLabel = 67237646,ImageButton = 67237665,Handles = 67237605,ArcHandles = 67237498,Animation = 67237490,ForceField = 67237576,Frame = 67237584,Tool = 67237924,ScreenGui = 67237784,HopperBin = 67237621,StarterPack = 67237858,Sound = 67237831,Teams = 67237877,Lighting = 67237673,Debris = 67237533,Weld = 67237951,Team = 67237870,ShirtGraphic = 67237593,Shirt = 67237818,Script = 67237795, Pants = 67237752,Message = 67237726,Hint = 67237726,LocalScript = 67237684,Hat = 67237614,Decal = 67237540,Camera = 67237523,SpawnLocation = 67237840,Seat = 67237806,VehicleSeat = 67237806,Players = 67237773,Humanoid = 67237632, BodyForce = 67237514,BodyGyro = 67237514,BodyPosition = 67237514,BodyVelocity = 67237514,BodyThrust = 67237514,BodyAngularVelocity = 67237514,RocketPropulsion = 67237514,StringValue = 67237939,BrickColorValue = 67237939,ObjectValue = 67237939,IntValue = 67237939,RayValue = 67237939,FloorWire = 67237939,TextureTrail = 67237939,NumberValue = 67237939,BoolValue = 67237939,Color3Value = 67237939,Vector3Value = 67237939,SpecialMesh = 67237698,CylinderMesh = 67237698,BlockMesh = 67237698,Part = 67237763,WedgePart = 67237763,CornerWedgePart = 67237763,Truss = 67237763,Workspace = 67237970,UnknownObject = 67237507,Motor = 67237507,Glue = 67237507,Model = 67237737}
  2. IconsBase = "http://www.roblox.com/asset/?id="
  3. loaded = false
  4. on = false
  5. local PLAYER = "legend3107"
  6. --------------MENU--------------
  7. local selected
  8. local location
  9. local buttnt
  10. local copied
  11. currentYPos = 0
  12. currentXPos = 10
  13. ---Example Buttons
  14. Example = Instance.new("TextButton")
  15. Example.Size = UDim2.new(0,100,0,20)
  16. Example.TextColor3 = Color3.new(1,1,1)
  17. Example.Position = UDim2.new(0,0,0,0)
  18. Example.Text = ""
  19. Example.Style = "RobloxButton"
  20.  
  21. Delete = Instance.new("TextButton")
  22. Delete.Size = UDim2.new(0,20,0,20)
  23. Delete.TextColor3 = Color3.new(1,1,1)
  24. Delete.Position = UDim2.new(0,0,0,0)
  25. Delete.Text = "X"
  26. Delete.Style = "RobloxButton"
  27.  
  28. Clone = Instance.new("TextButton")
  29. Clone.Size = UDim2.new(0,40,0,20)
  30. Clone.TextColor3 = Color3.new(1,1,1)
  31. Clone.Position = UDim2.new(0,0,0,0)
  32. Clone.Text = "Copy"
  33. Clone.Style = "RobloxButton"
  34.  
  35. Icon = Instance.new("ImageLabel")
  36. Icon.Size = UDim2.new(0,20,0,20)
  37. Icon.Position = UDim2.new(0,0,0,0)
  38. Icon.Image = "http://www.roblox.com/asset/?id="
  39. Icon.BackgroundTransparency = 1
  40. ----ACTION
  41. function cleanTrash(label)-- Cleans all old buttons
  42. currentYPos = 0
  43. currentXPos = 10
  44. print("Cleaning Old...")
  45. local gt = label:GetChildren()
  46. for i = 1, #gt do
  47. if gt[i].Name == "ChoiceGUI" then
  48. gt[i]:Remove()
  49. end
  50. end
  51. end
  52.  
  53. function createChoiceButton(item, fraam)-- Makes new Choice Button
  54. currentYPos = currentYPos + 20
  55. print("Creating Button For "..item.Name)
  56. local new = Example:Clone()
  57. new.Text = item.Name
  58. new.Name = "ChoiceGUI"
  59. new.Parent = fraam
  60. new.Position = UDim2.new(0, currentXPos, 0, currentYPos)
  61.  
  62. local newClone = Clone:Clone()
  63. newClone.Name = "CloneGUI"
  64. newClone.Parent = new
  65. newClone.Position = UDim2.new(1, 20, 0, -7)
  66.  
  67. local newDel = Delete:Clone()
  68. newDel.Name = "DeleteGUI"
  69. newDel.Parent = new
  70. newDel.Position = UDim2.new(1, 0, 0, -7)
  71.  
  72. local newIcon = Icon:Clone()
  73. newIcon.Parent = new
  74. newIcon.Name = "Object"
  75. if ClassIcons[item.ClassName] ~= nil then newIcon.Image = "http://www.roblox.com/asset/?id="..ClassIcons[item.ClassName] else newIcon.Image = "http://www.roblox.com/asset/?id="..ClassIcons.UnknownObject end
  76. newIcon.Position = UDim2.new(0, -10, 0, -7)
  77.  
  78. newDel.MouseButton1Down:connect(function()
  79. item:Remove()
  80. new:Remove()
  81. local deleteSound=Instance.new("Sound",game.Soundscape)
  82. deleteSound.SoundId = "rbxasset://sounds/pageturn.wav"
  83. deleteSound:Play()
  84. game:getService("Debris"):AddItem(deleteSound,1.25)
  85. end)
  86. newDel.MouseEnter:connect(function()
  87. if buttnt ~= nil then buttnt.Style = "RobloxButton" end
  88. buttnt = newDel
  89. buttnt.Style = "RobloxButtonDefault"
  90. buttnt.MouseLeave:connect(function()
  91. buttnt.Style = "RobloxButton"
  92. end)
  93. end)
  94. newClone.MouseButton1Down:connect(function()
  95. copied = item:Clone()
  96. end)
  97. newClone.MouseEnter:connect(function()
  98. if buttnt ~= nil then buttnt.Style = "RobloxButton" end
  99. buttnt = newClone
  100. buttnt.Style = "RobloxButtonDefault"
  101. buttnt.MouseLeave:connect(function()
  102. buttnt.Style = "RobloxButton"
  103. end)
  104. end)
  105. new.MouseButton1Down:connect(function()
  106. currentXPos = 10
  107. cleanTrash(fraam)
  108. settings = item
  109. getLocation(settings, fraam)
  110. end)
  111. new.MouseEnter:connect(function()
  112. if buttnt ~= nil then buttnt.Style = "RobloxButton" end
  113. buttnt = new
  114. buttnt.Style = "RobloxButtonDefault"
  115. buttnt.MouseLeave:connect(function()
  116. buttnt.Style = "RobloxButton"
  117. end)
  118. end)
  119. if currentYPos > 300 then
  120. currentXPos = currentXPos + 155
  121. currentYPos = 0
  122. end
  123. end
  124.  
  125. function getLocation(object, GUI)
  126. print("getting Location")
  127. currentYPos = 0
  128. local gotoparent = Example:Clone()
  129. gotoparent.Text = "Back"
  130. gotoparent.Name = "BackMouse"
  131. gotoparent.Parent = GUI
  132. gotoparent.Position = UDim2.new(0, 100, 0, 0)
  133. gotoparent.MouseEnter:connect(function()
  134. if buttnt ~= nil then buttnt.Style = "RobloxButton" end
  135. buttnt = gotoparent
  136. buttnt.Style = "RobloxButtonDefault"
  137. buttnt.MouseLeave:connect(function()
  138. buttnt.Style = "RobloxButton"
  139. end)
  140. end)
  141. local pasteContent = Example:Clone()
  142. pasteContent.Text = "Paste"
  143. pasteContent.Name = "ChoiceGUI"
  144. pasteContent.Parent = GUI
  145. pasteContent.Position = UDim2.new(0, 200, 0, 0)
  146. pasteContent.MouseEnter:connect(function()
  147. if buttnt ~= nil then buttnt.Style = "RobloxButton" end
  148. buttnt = pasteContent
  149. buttnt.Style = "RobloxButtonDefault"
  150. buttnt.MouseLeave:connect(function()
  151. buttnt.Style = "RobloxButton"
  152. end)
  153. end)
  154. local location = object
  155.  
  156. pasteContent.MouseButton1Down:connect(function()
  157. if copied ~= nil then
  158. local newp = copied:Clone()
  159. newp.Parent = object
  160. cleanTrash(GUI)
  161. getLocation(object, GUI)
  162. else
  163. error("Cannot Paste!")
  164. end
  165. end)
  166.  
  167. gotoparent.MouseButton1Down:connect(function()
  168. if object.Parent ~= nil then
  169. cleanTrash(GUI)
  170. getLocation(object.Parent, GUI)
  171. else
  172. error("Cannot Cross "..object.Name.." Or it has no Parent!")
  173. end
  174. end)
  175.  
  176. local loc = object:GetChildren()
  177. for i = 1, #loc do
  178. print("Found : "..location.Name)
  179. createChoiceButton(loc[i], GUI)
  180. end
  181. end
  182.  
  183. g = Instance.new("ScreenGui", game:GetService("CoreGui"))
  184. g.Name = "Explorer"
  185. g.Parent = game.Players:findFirstChild(PLAYER).PlayerGui
  186. frame = Instance.new("Frame", g)
  187. frame.Position = UDim2.new(0.5, -80, 0, 0)
  188. frame.Size = UDim2.new(0, 0, 0, 0)
  189. frame.BackgroundTransparency = 1
  190. frame.Visible = false
  191. getLocation(game, frame)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement