Advertisement
Guest User

Untitled

a guest
May 24th, 2018
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.98 KB | None | 0 0
  1. -- Objects
  2.  
  3. local DogeScreenGui = Instance.new("ScreenGui")
  4. local DogeFrame = Instance.new("Frame")
  5. local Open = Instance.new("TextButton")
  6. local Close = Instance.new("TextButton")
  7. local InfiniteYield = Instance.new("TextButton")
  8.  
  9. -- Properties
  10.  
  11. DogeScreenGui.Name = "DogeScreenGui"
  12. DogeScreenGui.Parent = game.CoreGui
  13.  
  14. DogeFrame.Name = "DogeFrame"
  15. DogeFrame.Parent = DogeScreenGui
  16. DogeFrame.BackgroundColor3 = Color3.new(1, 1, 1)
  17. DogeFrame.Visible = false
  18. DogeFrame.BorderSizePixel = 0
  19. DogeFrame.Position = UDim2.new(0, 0, 0.0478087664, 0)
  20. DogeFrame.Size = UDim2.new(0, 362, 0, 345)
  21.  
  22. Open.Name = "Open"
  23. Open.Parent = DogeScreenGui
  24. Open.BackgroundColor3 = Color3.new(1, 1, 1)
  25. Open.BorderSizePixel = 0
  26. Open.Position = UDim2.new(0, 0, 0.788844645, 0)
  27. Open.Size = UDim2.new(0, 126, 0, 50)
  28. Open.Font = Enum.Font.SourceSans
  29. Open.Text = "Open"
  30. Open.TextColor3 = Color3.new(0, 0, 0)
  31. Open.TextSize = 40
  32.  
  33. Close.Name = "Close"
  34. Close.Parent = DogeScreenGui
  35. Close.BackgroundColor3 = Color3.new(1, 1, 1)
  36. Close.BorderSizePixel = 0
  37. Close.Position = UDim2.new(0, 0, 0.788844645, 0)
  38. Close.Visible = false
  39. Close.Size = UDim2.new(0, 126, 0, 50)
  40. Close.Font = Enum.Font.SourceSans
  41. Close.Text = "Close"
  42. Close.TextColor3 = Color3.new(0, 0, 0)
  43. Close.TextSize = 40
  44. Close.TextWrapped = true
  45.  
  46. InfiniteYield.Name = "Infinite Yield"
  47. InfiniteYield.Parent = DogeFrame
  48. InfiniteYield.BackgroundColor3 = Color3.new(1, 1, 1)
  49. InfiniteYield.BorderSizePixel = 4
  50. InfiniteYield.Position = UDim2.new(0.0469613262, 0, 0.211594209, 0)
  51. InfiniteYield.Size = UDim2.new(0, 99, 0, 50)
  52. InfiniteYield.Font = Enum.Font.SourceSans
  53. InfiniteYield.Text = "Infinite Yield"
  54. InfiniteYield.TextColor3 = Color3.new(0, 0, 0)
  55. InfiniteYield.TextSize = 21
  56. InfiniteYield.TextWrapped = true
  57.  
  58. Open.MouseButton1Down:connect(function()
  59. DogeFrame.Visible = true
  60. Open.Visible = false
  61. Close.Visible = true
  62. end)
  63.  
  64. Close.MouseButton1Down:connect(function()
  65. DogeFrame.Visible = false
  66. Open.Visible = true
  67. Close.Visible = false
  68. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement