Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --// services
- local StarterGui = game:GetService("StarterGui")
- local ReplicatedStorage = game:GetService("ReplicatedStorage")
- local Players = game:GetService("Players")
- local UserInputService = game:GetService("UserInputService")
- --// check if being used in the right game
- if game.PlaceId == 4639625707 then
- StarterGui:SetCore("SendNotification", {
- Title = "DayDream Hub",
- Text = "Successfully injected!"
- })
- else
- StarterGui:SetCore("SendNotification", {
- Title = "DayDream Hub",
- Text = "Cannot inject into this game."
- })
- end
- --// variables
- local plr = Players.LocalPlayer
- local tycoons = workspace.Tycoon.Tycoons
- local team = plr.Team.Name
- --local plrTycoon = tycoons:FindFirstChild(team)
- --// functions
- local function teleportToPart(targetPart: BasePart)
- local player = game.Players.LocalPlayer
- if player and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
- local offset = targetPart.CFrame.RightVector * 2 -- Move 2 studs to the right
- player.Character.HumanoidRootPart.CFrame = targetPart.CFrame + offset
- end
- end
- local function teleportPlayer(targetCFrame)
- local player = game.Players.LocalPlayer
- if player and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
- player.Character.HumanoidRootPart.CFrame = targetCFrame
- end
- end
- local function returnToTycoon()
- local plrTycoon = tycoons:FindFirstChild(team)
- teleportPlayer(plrTycoon.Floor.BaseCheckMax.CFrame-Vector3.new(0,10,0))
- end
- --// main
- local UILib = loadstring(game:HttpGet("https://pastebin.com/raw/CJiNH6WA"))()
- local window = UILib.new("DayDream Hub | War Tycoon", Color3.new(0.0509804, 0.313725, 0.0352941))
- local gamePage = window.newPage("Game", true)
- local AFC = false
- local farmCratesToggle = gamePage:Toggle("Farm Crates", false, function(v)
- if v then
- AFC = true
- local plrTycoon = tycoons:FindFirstChild(team)
- local char = game.Players.LocalPlayer.Character
- local crates = workspace["Game Systems"]["Crate Workspace"]
- local function checkForCrates()
- pcall(function()
- for _, crate in pairs(crates:GetChildren()) do
- teleportToPart(crate)
- task.wait(1)
- local prompt:ProximityPrompt = crate:FindFirstChild("StealPrompt")
- local attempt = 0
- repeat
- attempt += 1
- prompt:InputHoldBegin()
- task.wait(0.4)
- prompt:InputHoldEnd()
- task.wait(1)
- until not prompt.Enabled or attempt == 5
- teleportPlayer(plrTycoon.Floor.BaseCheckMax.CFrame-Vector3.new(0,10,0))
- task.wait(1)
- teleportPlayer(plrTycoon.Essentials["Oil Collector"]["Crate Collector"].Metal.CFrame)
- task.wait(0.5)
- local prompt:ProximityPrompt = plrTycoon.Essentials["Oil Collector"].CratePromptPart.SellPrompt
- prompt:InputHoldBegin()
- task.wait(1.1)
- prompt:InputHoldEnd()
- task.wait(1)
- if not AFC then
- returnToTycoon()
- break
- end
- end
- end)
- end
- while AFC do
- for _, tycoon in pairs(tycoons:GetChildren()) do
- teleportPlayer(tycoon.Floor.BaseCheckMax.CFrame-Vector3.new(0107,0))
- task.wait(2)
- checkForCrates()
- task.wait(1)
- if not AFC then
- returnToTycoon()
- break
- end
- end
- end
- else
- AFC = false
- end
- end)
- local BE = false
- local buyEverythingToggle = gamePage:Toggle("Buy Everything", false, function(v)
- if v then
- local plrTycoon = tycoons:FindFirstChild(team)
- BE = true
- local function endsWithRebirth(s)
- return s:match("rebirths?$") ~= nil
- end
- while BE do
- local unpurchasedButtons = plrTycoon:FindFirstChild("UnpurchasedButtons")
- for _, v in pairs(unpurchasedButtons:GetChildren()) do
- pcall(function()
- local billFrame = v.Neon.UI.BillboardGui.Frame
- local priceLabel = billFrame:FindFirstChild("Price")
- if priceLabel then
- local txt = priceLabel.Text
- if string.sub(txt, 1, 1) == "$" or endsWithRebirth(txt) then
- teleportPlayer(v.Neon.CFrame)
- end
- end
- end)
- if not BE then
- break
- end
- task.wait(0.1)
- end
- task.wait()
- end
- else
- BE = false
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement