Advertisement
zephpsian

Untitled

Sep 27th, 2019
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.36 KB | None | 0 0
  1. local ac = Instance.new("ScreenGui")
  2. local Frame = Instance.new("Frame")
  3. local whatdoicallthisagain = Instance.new("Frame")
  4. local toplabel = Instance.new("TextLabel")
  5. local uilayoutthing1 = Instance.new("Frame")
  6. local coolbutton = Instance.new("TextButton")
  7. local UIListLayout = Instance.new("UIListLayout")
  8. --Properties:
  9. ac.Name = "ac"
  10. ac.Parent = game:GetService("Players").LocalPlayer:WaitForChild("PlayerGui")
  11. ac.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  12.  
  13. whatdoicallthisagain.Name = "what do i call this again"
  14. whatdoicallthisagain.Parent = Frame
  15. whatdoicallthisagain.BackgroundColor3 = Color3.new(0.137255, 0.137255, 0.137255)
  16. whatdoicallthisagain.BorderSizePixel = 0
  17. whatdoicallthisagain.Size = UDim2.new(0, 0, 0, 0)
  18.  
  19. toplabel.Name = "toplabel"
  20. toplabel.Parent = whatdoicallthisagain
  21. toplabel.AnchorPoint = Vector2.new(0.5, 0.5)
  22. toplabel.BackgroundColor3 = Color3.new(1, 1, 1)
  23. toplabel.BackgroundTransparency = 1
  24. toplabel.Position = UDim2.new(0.5, 0, 0.5, 0)
  25. toplabel.Size = UDim2.new(0.800000012, 0, 0.5, 0)
  26. toplabel.Font = Enum.Font.Code
  27. toplabel.Text = ">w<"
  28. toplabel.TextColor3 = Color3.new(0.901961, 0.901961, 0.901961)
  29. toplabel.TextScaled = true
  30. toplabel.TextSize = 14
  31. toplabel.TextWrapped = true
  32.  
  33. uilayoutthing1.Name = "uilayoutthing1"
  34. uilayoutthing1.Parent = whatdoicallthisagain
  35. uilayoutthing1.BackgroundColor3 = Color3.new(0.0156863, 0.0156863, 0.0156863)
  36. uilayoutthing1.BackgroundTransparency = 0.5
  37. uilayoutthing1.BorderSizePixel = 0
  38. uilayoutthing1.Position = UDim2.new(0, 0, 1, 0)
  39. uilayoutthing1.Size = UDim2.new(1, 0, 1, 0)
  40.  
  41. coolbutton.Name = "coolbutton"
  42. coolbutton.Parent = uilayoutthing1
  43. coolbutton.AnchorPoint = Vector2.new(0.5, 0.5)
  44. coolbutton.BackgroundColor3 = Color3.new(1, 1, 1)
  45. coolbutton.BackgroundTransparency = 1
  46. coolbutton.Position = UDim2.new(0.5, 0, 0.5, 0)
  47. coolbutton.Size = UDim2.new(0.800000012, 0, 0.5, 0)
  48. coolbutton.Font = Enum.Font.Code
  49. coolbutton.Text = "click to print uwu"
  50. coolbutton.TextColor3 = Color3.new(0.901961, 0.901961, 0.901961)
  51. coolbutton.TextScaled = true
  52. coolbutton.TextSize = 14
  53. coolbutton.TextWrapped = true
  54.  
  55. UIListLayout.Parent = Frame
  56. UIListLayout.FillDirection = Enum.FillDirection.Horizontal
  57. UIListLayout.SortOrder = Enum.SortOrder.LayoutOrder
  58. UIListLayout.Padding = UDim.new(0, 5)
  59. -- Scripts:
  60.  
  61. local Bar = whatdoicallthisagain:Clone()
  62. local Button = Bar.uilayoutthing1:Clone()
  63. local Label = Bar.toplabel:Clone()
  64.  
  65. Bar:ClearAllChildren()
  66. ac:ClearAllChildren()
  67.  
  68. Frame.Parent = ac
  69. Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  70. Frame.BackgroundTransparency = 1
  71. Frame.BorderSizePixel = 0
  72. Frame.Position = UDim2.new(0.00999999978, 0, 0.0199999996, 0)
  73. Frame.Size = UDim2.new(0.980000019, 0, 0.0599999987, 0)
  74.  
  75. local Lib = {}
  76. local PosFrame = Frame
  77. do
  78. function Lib:NewBar(Text)
  79.  
  80. local Bar2 = Bar:Clone()
  81. local TopLabel = Label:Clone()
  82. TopLabel.Parent = Bar2
  83.  
  84. Bar2.Size = UDim2.new(0.15, 0,1, 0)
  85. Bar2.toplabel.Text = Text
  86. return Bar2
  87. end
  88.  
  89. function Lib:NewButton(Text, Func, Parent)
  90. local ExistingButtons = 0
  91. for _,gui in pairs(Parent:GetChildren()) do
  92. ExistingButtons = ExistingButtons + 1
  93. end
  94.  
  95. local Button2 = Button:Clone()
  96. Button2.coolbutton.Text = Text
  97. Button2.Parent = Parent
  98. Button2.Position = UDim2.new(0, 0, 1 * ExistingButtons, 0)
  99. Button2.coolbutton.MouseButton1Down:connect(function()
  100. loadstring(Func)()
  101. end)
  102. end
  103. end
  104.  
  105. return Lib
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement