Advertisement
artbarte

HGL Gear GUI

Aug 17th, 2017
438
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.52 KB | None | 0 0
  1. local gui = game:GetObjects("rbxassetid://987945957")[1]
  2.  
  3. local main = gui.Main
  4. local scrollList = main.ScrollingFrame
  5. local assetMain = gui.AssetButton
  6. local assetImg = assetMain.ImageButton
  7. local assetTitle = assetMain.Title
  8.  
  9. gui.Parent = game.CoreGui
  10.  
  11.  
  12. local gearList = {
  13. F3X = 142785488,
  14. ["Body Swap"] = 78730532,
  15. Wand1 = 114020480,
  16. Wand2 = 49491716,
  17. Carpet = 477910063,
  18. GUI = 987974399,
  19.  
  20. }
  21.  
  22.  
  23. function drawAssets()
  24. for i,v in pairs(scrollList:GetChildren()) do if v:IsA("Frame") then v:Remove() end end
  25.  
  26. for i,v in pairs(gearList)do
  27. if gearList[i] ~= "" then
  28. local btn = assetMain:Clone()
  29. btn.Name = i
  30. btn.Parent = scrollList
  31. btn.Title.Text = i
  32. btn.ImageButton.Image = "http://www.roblox.com/Game/Tools/ThumbnailAsset.ashx?wd=420&ht=420&fmt=png&aid=" .. v
  33. btn.Visible = true
  34. btn.ImageButton.MouseButton1Click:connect(function ()
  35. game.ReplicatedStorage.Events.EquipGear:FireServer(v)
  36. wait(1)
  37. local GetBackpack = game.Players.LocalPlayer.Backpack:GetChildren() for i=1, #GetBackpack do if GetBackpack[i].ClassName == "Tool" then GetBackpack[i].CanBeDropped = true end end
  38. print(v)
  39. end)
  40. scrollList.CanvasSize = UDim2.new(0,0,0,#scrollList:GetChildren() * 150 / 3 -100)
  41. end
  42. end
  43. end
  44.  
  45. drawAssets()
  46.  
  47. main.Add.MouseButton1Click:connect(function()
  48. local link = main.gowno.Text
  49. local id = link:match("%d+")
  50. local name = link:match("%w*-%w*-*%w*-*%w*-*%w*-*%w*-*%w*-*%w*-*%w*-*")
  51. if link ~= nil then
  52. gearList[name] = id
  53. end
  54. drawAssets()
  55. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement