Advertisement
Quangdunght1

Melon Simulator

Sep 17th, 2019
243
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.57 KB | None | 0 0
  1. ocal MS = Instance.new("ScreenGui")
  2. local MainFrame = Instance.new("Frame")
  3. local Title = Instance.new("TextLabel")
  4. local Close = Instance.new("TextButton")
  5. local Frame = Instance.new("Frame")
  6. local Created = Instance.new("TextLabel")
  7. local Farm = Instance.new("TextButton")
  8. local Sell = Instance.new("TextButton")
  9. local Rebirth = Instance.new("TextButton")
  10. local Mini = Instance.new("TextButton")
  11.  
  12. --Properties:
  13.  
  14. MS.Name = "MS"
  15. MS.Parent = game.CoreGui
  16.  
  17. MainFrame.Name = "MainFrame"
  18. MainFrame.Parent = MS
  19. MainFrame.Active = true
  20. MainFrame.BackgroundColor3 = Color3.new(0.22, 0.22, 0.22)
  21. MainFrame.BackgroundTransparency = 0
  22. MainFrame.BorderColor3 = Color3.new(1, 1, 1)
  23. MainFrame.Position = UDim2.new(0, 325, 0, 125)
  24. MainFrame.Selectable = true
  25. MainFrame.Draggable = true
  26. MainFrame.Size = UDim2.new(0, 175, 0, 25)
  27.  
  28. Title.Name = "Title"
  29. Title.Parent = MainFrame
  30. Title.BackgroundColor3 = Color3.new(1, 1, 1)
  31. Title.BackgroundTransparency = 1
  32. Title.Position = UDim2.new(0, 15, 0, 0)
  33. Title.Size = UDim2.new(0, 145, 0, 25)
  34. Title.Font = Enum.Font.GothamBold
  35. Title.Text = "Melon Simulator GUI"
  36. Title.TextColor3 = Color3.new(1, 1, 1)
  37. Title.TextSize = 14
  38. Title.TextScaled = true
  39.  
  40. Created.Name = "Created"
  41. Created.Parent = MainFrame
  42. Created.BackgroundTransparency = 0
  43. Created.BackgroundColor3 = Color3.new(0.85,0.255,0.127)
  44.  
  45. Created.BorderColor3 = Color3.new(1, 1, 1)
  46. Created.Position = UDim2.new(0, 15, 0, 120)
  47. Created.Size = UDim2.new(0, 145, 0, 25)
  48. Created.Font = Enum.Font.GothamBold
  49. Created.Text = "Created By: Virquill"
  50. Created.TextColor3 = Color3.new(1, 1, 1)
  51.  
  52. Created.TextSize = 14
  53. Created.TextScaled = true
  54.  
  55. Close.Name = "Close"
  56. Close.Parent = MainFrame
  57. Close.BackgroundColor3 = Color3.new(1, 1, 1)
  58. Close.BackgroundTransparency = 1
  59. Close.BorderSizePixel = 0
  60. Close.Position = UDim2.new(0, 155, 0, 0)
  61. Close.Size = UDim2.new(0, 20, 0, 20)
  62. Close.Font = Enum.Font.GothamBold
  63. Close.Text = "X"
  64. Close.TextColor3 = Color3.new(1, 0, 0)
  65. Close.TextSize = 14
  66.  
  67. Frame.Parent = MainFrame
  68. Frame.BackgroundColor3 = Color3.new(0.85,0.255,0.127)
  69. Frame.BackgroundTransparency = 0
  70. Frame.BorderColor3 = Color3.new(1, 1, 1)
  71. Frame.Position = UDim2.new(0, 0, 0, 25)
  72. Frame.Size = UDim2.new(0, 175, 0, 100)
  73.  
  74.  
  75. Farm.Name = "Farm"
  76. Farm.Parent = Frame
  77. Farm.BackgroundColor3 = Color3.new(0, 0, 0)
  78. Farm.BackgroundTransparency = 0.5
  79. Farm.BorderColor3 = Color3.new(1, 1, 1)
  80. Farm.Position = UDim2.new(0, 10, 0, 10)
  81. Farm.Size = UDim2.new(0, 75, 0, 20)
  82. Farm.Font = Enum.Font.GothamBold
  83. Farm.Text = "FARM OFF"
  84. Farm.TextColor3 = Color3.new(1, 0, 0)
  85. Farm.TextSize = 14
  86.  
  87. Sell.Name = "Sell"
  88. Sell.Parent = Frame
  89. Sell.BackgroundColor3 = Color3.new(0, 0, 0)
  90. Sell.BackgroundTransparency = 0.5
  91. Sell.BorderColor3 = Color3.new(1, 1, 1)
  92. Sell.Position = UDim2.new(0, 90, 0, 10)
  93. Sell.Size = UDim2.new(0, 75, 0, 20)
  94. Sell.Font = Enum.Font.GothamBold
  95. Sell.Text = "SELL: OFF"
  96. Sell.TextColor3 = Color3.new(1, 0, 0)
  97. Sell.TextSize = 14
  98.  
  99.  
  100.  
  101. Rebirth.Name = "Rebirth"
  102. Rebirth.Parent = Frame
  103. Rebirth.BackgroundColor3 = Color3.new(0, 0, 0)
  104. Rebirth.BackgroundTransparency = 0.5
  105. Rebirth.BorderColor3 = Color3.new(1, 1, 1)
  106. Rebirth.Position = UDim2.new(0, 2, 0, 50)
  107. Rebirth.Size = UDim2.new(0, 170, 0, 20)
  108. Rebirth.Font = Enum.Font.GothamBold
  109. Rebirth.Text = "REBIRTH: OFF"
  110. Rebirth.TextColor3 = Color3.new(1, 0, 0)
  111. Rebirth.TextScaled = true
  112. Rebirth.TextSize = 14
  113.  
  114. Mini.Name = "Mini"
  115. Mini.Parent = MainFrame
  116. Mini.BackgroundColor3 = Color3.new(1, 1, 1)
  117. Mini.BackgroundTransparency = 1
  118. Mini.BorderSizePixel = 0
  119. Mini.Size = UDim2.new(0, 20, 0, 20)
  120. Mini.Font = Enum.Font.GothamBold
  121. Mini.Text = "-"
  122. Mini.TextColor3 = Color3.new(1, 0, 0)
  123. Mini.TextSize = 14
  124.  
  125. -- Scripts:
  126.  
  127. local r = game:GetService('Workspace').Events['AddBite12']
  128. local rs = game:GetService('RunService').RenderStepped
  129. local plr = game.Players.LocalPlayer
  130. local char = plr.Character.HumanoidRootPart
  131. local mini = true
  132.  
  133. _G.sell = false
  134. _G.egg = false
  135. _G.shiny = false
  136. _G.farm = false
  137. _G.display = true
  138. _G.rebirth = false
  139.  
  140. Close.MouseButton1Down:connect(function()
  141. MS:Destroy()
  142. end)
  143.  
  144. Mini.MouseButton1Down:connect(function()
  145. if mini == true then
  146. mini = false
  147. Frame.Visible = false
  148. Mini.TextColor3 = Color3.new(0, 0.666667, 0)
  149. else
  150. mini = true
  151. Frame.Visible = true
  152. Mini.TextColor3 = Color3.new(1, 0, 0)
  153. end
  154. end)
  155.  
  156.  
  157. Farm.MouseButton1Down:connect(function()
  158. if _G.farm == true then
  159. _G.farm = false
  160. Farm.TextColor3 = Color3.new(1, 0, 0)
  161. Farm.Text = "FARM: OFF"
  162. else
  163. _G.farm = true
  164. Farm.TextColor3 = Color3.new(0, 0.666667, 0)
  165. Farm.Text = "FARM: ON"
  166. while rs:wait() and _G.farm == true do
  167. for i = 1,10 do
  168. r:FireServer("", game.Workspace.Events.AddBite12)
  169. end
  170. end
  171. end
  172. end)
  173.  
  174. Sell.MouseButton1Down:connect(function()
  175. if _G.sell == true then
  176. _G.sell = false
  177. Sell.TextColor3 = Color3.new(1, 0, 0)
  178. Sell.Text = "SELL: OFF"
  179. else
  180. _G.sell = true
  181. Sell.TextColor3 = Color3.new(0, 0.666667, 0)
  182. Sell.Text = "SELL: ON"
  183. while _G.sell == true do
  184. game.Workspace.Map.Sell.SellPart.CanCollide = false
  185. game.Workspace.Map.Sell.SellPart.Transparency = 1
  186. game.Workspace.Map.Sell.SellPart.CFrame = char.CFrame + Vector3.new(0,math.random(-1,1),0)
  187. wait(0.1)
  188. end
  189. end
  190. end)
  191.  
  192.  
  193. Rebirth.MouseButton1Down:connect(function()
  194. if _G.rebirth == true then
  195. _G.rebirth = false
  196. Rebirth.TextColor3 = Color3.new(1, 0, 0)
  197. Rebirth.Text = "REBIRTH: OFF"
  198. else
  199. _G.rebirth = true
  200. Rebirth.TextColor3 = Color3.new(0, 0.666667, 0)
  201. Rebirth.Text = "REBIRTH: ON"
  202. while _G.rebirth == true do
  203. wait(0.1)
  204. local rebirths = 1
  205. game.Workspace.Events.Rebirth:FireServer(rebirths)
  206. end
  207. end
  208. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement