DEXLTH

BbG1

Jul 19th, 2019
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.33 KB | None | 0 0
  1. -- BloxBurg Gui Created by LuckyMMB @ V3rmillion.net --
  2. -- Discord https://discord.gg/GKzJnUC --
  3.  
  4. AntiAFKMode = "Nothing"
  5.  
  6. -- Objects
  7.  
  8. local BloxGUI = Instance.new("ScreenGui")
  9. local MainFrame = Instance.new("Frame")
  10. local Close = Instance.new("TextButton")
  11. local AntiAFK = Instance.new("TextButton")
  12. local Kick = Instance.new("TextButton")
  13. local IceCream = Instance.new("TextButton")
  14. local IceCreamFrame = Instance.new("Frame")
  15. local IceCreamHeader = Instance.new("TextLabel")
  16. local StartIceCream = Instance.new("TextButton")
  17. local LightsOn = Instance.new("TextButton")
  18. local InfoScreen = Instance.new("TextButton")
  19. local InfoFrame = Instance.new("Frame")
  20. local InfoText1 = Instance.new("TextLabel")
  21.  
  22. -- Properties
  23.  
  24. BloxGUI.Name = "BloxGUI"
  25. BloxGUI.Parent = game.CoreGui
  26. local BloxCORE = game.CoreGui["BloxGUI"]
  27. local MainFrame = Instance.new("Frame")
  28. local AntiAFK = Instance.new("TextButton")
  29. local Icecream = Instance.new("TextButton")
  30.  
  31. MainFrame.Name = "MainFrame"
  32. MainFrame.Parent = BloxGUI
  33. MainFrame.Active = true
  34. MainFrame.BackgroundColor3 = Color3.new(0, 0, 0)
  35. MainFrame.BackgroundTransparency = 1
  36. MainFrame.Position = UDim2.new(0.5, -355, 0, -27)
  37. MainFrame.Size = UDim2.new(0, 695, 0, 20)
  38. MainFrame.Selectable = true
  39.  
  40. Close.Name = "Close"
  41. Close.Parent = MainFrame
  42. Close.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  43. Close.BorderColor3 = Color3.new(0, 1, 0)
  44. Close.Position = UDim2.new(0, 0, 0, 0)
  45. Close.Size = UDim2.new(0, 20, 0, 20)
  46. Close.Font = Enum.Font.Fantasy
  47. Close.FontSize = Enum.FontSize.Size18
  48. Close.Text = "X"
  49. Close.TextColor3 = Color3.new(1, 0, 0)
  50. Close.TextSize = 17
  51. Close.TextScaled = true
  52. Close.TextWrapped = true
  53.  
  54. IceCream.Name = "IceCream"
  55. IceCream.Parent = MainFrame
  56. IceCream.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  57. IceCream.TextColor3 = Color3.new(1, 1, 1)
  58. IceCream.BorderColor3 = Color3.new(0, 1, 0)
  59. IceCream.Position = UDim2.new(0, 25, 0, 0)
  60. IceCream.Size = UDim2.new(0, 170, 0, 20)
  61. IceCream.Font = Enum.Font.Fantasy
  62. IceCream.FontSize = Enum.FontSize.Size18
  63. IceCream.Text = "Ben's IceCream Money"
  64. IceCream.TextSize = 17
  65.  
  66. IceCreamFrame.Name = "IceCreamFrame"
  67. IceCreamFrame.Parent = MainFrame
  68. IceCreamFrame.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
  69. IceCreamFrame.BackgroundTransparency = 0.5
  70. IceCreamFrame.BorderColor3 = Color3.new(0, 0, 0)
  71. IceCreamFrame.Position = UDim2.new(0, -35, 0, 30)
  72. IceCreamFrame.Size = UDim2.new(0, 290, 0, 210)
  73. IceCreamFrame.Visible = false
  74.  
  75. IceCreamHeader.Name = "IceCreamHeader"
  76. IceCreamHeader.Parent = IceCreamFrame
  77. IceCreamHeader.BackgroundColor3 = Color3.new(1, 1, 1)
  78. IceCreamHeader.BackgroundTransparency = 0.15
  79. IceCreamHeader.BorderColor3 = Color3.new(1, 1, 1)
  80. IceCreamHeader.Position = UDim2.new(0, 5, 0, 5)
  81. IceCreamHeader.Size = UDim2.new(0, 280, 0, 165)
  82. IceCreamHeader.Font = Enum.Font.SourceSans
  83. IceCreamHeader.FontSize = Enum.FontSize.Size18
  84. IceCreamHeader.Text = "1. Click Start Money Farming\n\n2. Grab a cup manually and give it to the person [Only need to do this the first time]\n\n3. Stand near the cups, it may take a few times to get it right before cups equip automatically\n\n4. Keep from timing out after 20 minutes idle and enjoy the Money"
  85. IceCreamHeader.TextColor3 = Color3.new(0, 0, 0)
  86. IceCreamHeader.TextSize = 16
  87. IceCreamHeader.TextWrapped = true
  88. IceCreamHeader.TextYAlignment = Enum.TextYAlignment.Top
  89.  
  90. StartIceCream.Name = "StartIceCream"
  91. StartIceCream.Parent = IceCreamFrame
  92. StartIceCream.BackgroundColor3 = Color3.new(0.18, 0.18, 0.18)
  93. StartIceCream.BorderColor3 = Color3.new(0.5, 0.5, 0.5)
  94. StartIceCream.Position = UDim2.new(0, 50, 0, 175)
  95. StartIceCream.Size = UDim2.new(0, 180, 0, 30)
  96. StartIceCream.Font = Enum.Font.Fantasy
  97. StartIceCream.FontSize = Enum.FontSize.Size18
  98. StartIceCream.Text = "Start Money Farming"
  99. StartIceCream.TextColor3 = Color3.new(1, 1, 1)
  100. StartIceCream.TextWrapped = true
  101. StartIceCream.TextSize = 17
  102.  
  103. LightsOn.Name = "LightsOn"
  104. LightsOn.Parent = MainFrame
  105. LightsOn.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  106. LightsOn.TextColor3 = Color3.new(1, 1, 1)
  107. LightsOn.BorderColor3 = Color3.new(0, 1, 0)
  108. LightsOn.Position = UDim2.new(0, 200, 0, 0)
  109. LightsOn.Size = UDim2.new(0, 80, 0, 20)
  110. LightsOn.Font = Enum.Font.Fantasy
  111. LightsOn.FontSize = Enum.FontSize.Size18
  112. LightsOn.Text = "Lights On"
  113. LightsOn.TextSize = 17
  114.  
  115. Kick.Name = "Kick"
  116. Kick.Parent = MainFrame
  117. Kick.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  118. Kick.TextColor3 = Color3.new(1, 1, 1)
  119. Kick.BorderColor3 = Color3.new(0, 1, 0)
  120. Kick.Position = UDim2.new(0, 430, 0, 0)
  121. Kick.Size = UDim2.new(0, 50, 0, 20)
  122. Kick.Font = Enum.Font.Fantasy
  123. Kick.FontSize = Enum.FontSize.Size18
  124. Kick.Text = "Kick"
  125. Kick.TextSize = 17
  126.  
  127. AntiAFK.Name = "AntiAFK"
  128. AntiAFK.Parent = MainFrame
  129. AntiAFK.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  130. AntiAFK.BorderColor3 = Color3.new(0, 1, 0)
  131. AntiAFK.Position = UDim2.new(0, 485, 0, 0)
  132. AntiAFK.Size = UDim2.new(0, 160, 0, 20)
  133. AntiAFK.BackgroundTransparency = 0
  134. AntiAFK.Font = Enum.Font.Fantasy
  135. AntiAFK.FontSize = Enum.FontSize.Size18
  136. AntiAFK.Text = "Start AFK Message"
  137. AntiAFK.TextColor3 = Color3.new(1, 1, 1)
  138. AntiAFK.TextSize = 17
  139.  
  140. InfoScreen.Name = "InfoScreen"
  141. InfoScreen.Parent = MainFrame
  142. InfoScreen.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  143. InfoScreen.BorderColor3 = Color3.new(0, 1, 0)
  144. InfoScreen.Position = UDim2.new(0, 650, 0, 0)
  145. InfoScreen.Size = UDim2.new(0, 45, 0, 20)
  146. InfoScreen.BackgroundTransparency = 0
  147. InfoScreen.Font = Enum.Font.Fantasy
  148. InfoScreen.FontSize = Enum.FontSize.Size18
  149. InfoScreen.TextColor3 = Color3.new(1, 1, 1)
  150. InfoScreen.Text = "Info"
  151. InfoScreen.TextSize = 17
  152. InfoScreen.TextWrapped = true
  153.  
  154. InfoFrame.Name = "InfoFrame"
  155. InfoFrame.Parent = MainFrame
  156. InfoFrame.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
  157. InfoFrame.BorderColor3 = Color3.new(0, 0, 0)
  158. InfoFrame.BackgroundTransparency = 0.5
  159. InfoFrame.Position = UDim2.new(0, 578, 0, 30)
  160. InfoFrame.Size = UDim2.new(0, 200, 0, 130)
  161. InfoFrame.Visible = false
  162.  
  163. InfoText1.Name = "InfoText1"
  164. InfoText1.Parent = InfoFrame
  165. InfoText1.BackgroundColor3 = Color3.new(0, 0, 0)
  166. InfoText1.BorderColor3 = Color3.new(0, 0, 0)
  167. InfoText1.BackgroundTransparency = 1
  168. InfoText1.Position = UDim2.new(0, 5, 0, 5)
  169. InfoText1.Size = UDim2.new(0, 190, 0, 120)
  170. InfoText1.TextColor3 = Color3.new(1, 1, 1)
  171. InfoText1.Font = Enum.Font.Fantasy
  172. InfoText1.FontSize = Enum.FontSize.Size18
  173. InfoText1.Text = "This Gui was created by [email protected]\nDiscord https://discord.gg/GKzJnUC"
  174. InfoText1.TextSize = 14
  175. InfoText1.TextWrapped = true
  176. InfoText1.TextYAlignment = Enum.TextYAlignment.Top
  177.  
  178. --- Menus ---
  179.  
  180. local Menus = {
  181. [IceCream] = IceCreamFrame;
  182. [InfoScreen] = InfoFrame;
  183. }
  184. for button,frame in pairs(Menus) do
  185. button.MouseButton1Click:connect(function()
  186. if frame.Visible then
  187. frame.Visible = false
  188. return
  189. end
  190. for k,v in pairs(Menus) do
  191. v.Visible = v == frame
  192. end
  193. end)
  194. end
  195.  
  196. --- Close ---
  197.  
  198. Close.MouseButton1Down:connect(function()
  199. BloxGUI:Destroy()
  200. end)
  201.  
  202. --- Notify Function ---
  203.  
  204. function notify(msg)
  205. game.StarterGui:SetCore('SendNotification', {
  206. Title = 'BloxBurg LuckyGUI';
  207. Text = msg;
  208. Duration = 5;
  209. })
  210. end
  211.  
  212. --- Ben's Icecream Money ---
  213.  
  214. StartIceCream.MouseButton1Click:Connect(function()
  215. function handle()
  216. game.ReplicatedStorage.DataEvent:FireServer({Type = 'TakeIceCreamCup'})
  217. wait(.1)
  218. local plr = game:GetService'Players'.LocalPlayer.Name
  219. local flavours = {'Vanilla', 'Chocolate', 'Strawberry'}
  220. local extra = {'Sprinkles', 'Nuts', 'Caramel'}
  221. local stuff
  222. local event = game.ReplicatedStorage.DataEvent
  223.  
  224. local send_valid = function()
  225. for k,v in next, workspace.BensIceCream.CustomerTargets:GetChildren()do
  226. if v.Occupied.Value ~= nil then
  227. return v
  228. end
  229. end
  230. end
  231.  
  232. for s,j in next, workspace.SpawnedCharacters:GetChildren() do
  233. if j.Name:find('BensIceCream') then
  234. local char = j
  235. local p = send_valid()
  236. if p.Occupied.Value:FindFirstChild('Order') then
  237. stuff = {}
  238. for _,x in next, p.Occupied.Value.Order:GetChildren()do
  239. table.insert(stuff, x.Value)
  240. end
  241. end
  242. end
  243. end
  244.  
  245. local ball = function()
  246. if workspace[plr]:FindFirstChild('Ice Cream Cup'):WaitForChild'Ball1'.Transparency == 1 then
  247. return workspace[plr]:FindFirstChild('Ice Cream Cup').Ball1
  248. elseif workspace[plr]:FindFirstChild('Ice Cream Cup'):WaitForChild'Ball2'.Transparency == 1 then
  249. return workspace[plr]:FindFirstChild('Ice Cream Cup').Ball2
  250. end
  251. end
  252.  
  253. table.foreach(flavours, function(s,l)
  254. for k,v in next, stuff do
  255. if l:lower() == v:lower() then
  256. local new = ball()
  257. event:FireServer({
  258. Type = "AddIceCreamScoop",
  259. Taste = v,
  260. Ball = new,
  261. })
  262. new.Transparency = 0
  263. end
  264. end
  265. end)
  266.  
  267. table.foreach(extra, function(s,l)
  268. for k,v in next, stuff do
  269. if l:lower() == v:lower() then
  270. event:FireServer({
  271. Type = "AddIceCreamTopping",
  272. Taste = l
  273. })
  274. end
  275. end
  276. end)
  277. wait()
  278. for k,v in next, workspace.BensIceCream.CustomerTargets:GetChildren()do
  279. if v.Occupied.Value ~= nil then
  280. game.ReplicatedStorage.DataEvent:FireServer({Type = 'FinishOrder', Workstation = v})
  281. end
  282. end
  283. end
  284.  
  285. IceCream.BackgroundColor3 = Color3.new(0, 0.5, 0)
  286. StartIceCream.BackgroundColor3 = Color3.new(0, 0.5, 0)
  287. StartIceCream.Text = "IceCream Money Active"
  288. notify'IceCream Money Farming Started'
  289. for k,v in next, workspace.BensIceCream.CustomerTargets:GetChildren()do
  290. v.Occupied:GetPropertyChangedSignal('Value'):Connect(function()
  291. handle()
  292. end)
  293. end
  294. end)
  295.  
  296. --- Kick From House ---
  297.  
  298. Kick.MouseButton1Click:Connect(function()
  299. local oldLoc = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
  300. game.ReplicatedStorage.DataFunction:InvokeServer({Type="EnterBuild"})
  301. wait(0.01)
  302. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = oldLoc
  303. notify'All players kicked from house'
  304. end)
  305.  
  306. --- LightsOn ---
  307.  
  308. LightsOn.MouseButton1Click:Connect(function()
  309. local plot = game.Workspace.Plots:FindFirstChild("Plot_"..game.Players.LocalPlayer.Name)
  310. for i,v in pairs(plot.House.Objects:children()) do
  311. if v.Type.Value == "Lighting" then
  312. if not v.ObjectData.IsOn.Value then
  313. game.ReplicatedStorage.DataEvent:FireServer({Type="Interact", Path=1, Target=v})
  314. end
  315. end
  316. end
  317. for ii,wall in pairs(plot.House.Walls:children()) do
  318. if wall:FindFirstChild("ItemHolder") then
  319. for i,v in pairs(wall.ItemHolder:children()) do
  320. if v.Type.Value == "Lighting" then
  321. if v:FindFirstChild("ObjectData") then
  322. if not v.ObjectData.IsOn.Value then
  323. game.ReplicatedStorage.DataEvent:FireServer({Type="Interact", Path=1, Target=v})
  324. end
  325. end
  326. end
  327. end
  328. end
  329. end
  330. end)
  331.  
  332. --- Anti AFK ---
  333.  
  334. AntiAFK.MouseButton1Click:Connect(function()
  335. if AntiAFKMode == "On" then
  336. AntiAFKMode = "Nothing"
  337. AntiAFK.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
  338. AntiAFK.Text = "Start AFK Message"
  339. notify'Afk message turned off'
  340. else
  341. AntiAFKMode = "On"
  342. AntiAFK.BackgroundColor3 = Color3.new(0, 0.5, 0)
  343. AntiAFK.Text = "Stop AFK Message"
  344. notify'Afk message turned on'
  345. while AntiAFKMode == "On" do
  346. wait(300)
  347. game.ReplicatedStorage.DefaultChatSystemChatEvents.SayMessageRequest:FireServer("I'm afk", "All")
  348. game.Players:Chat("/e point")
  349. end
  350. end
  351. end)
Add Comment
Please, Sign In to add comment