local Modal = loadstring(game:HttpGet("https://github.com/BloxCrypto/Modal/releases/download/v1.0-beta/main.lua"))()
local Window = Modal:CreateWindow({
Title = "Game Company Tycoon",
SubTitle = "By: TheBoyWhoCried",
Size = UDim2.fromOffset(400, 300),
MinimumSize = Vector2.new(250, 200),
Transparency = 0.35,
Icon = "https://www.roblox.com/headshot-thumbnail/image?userId=" .. game.Players.LocalPlayer.UserId .. "&width=420&height=420&format=png",
})
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local Connections = {}
local MyTycoon = nil
local function FindMyTycoon()
if workspace:FindFirstChild("Tycoon") and workspace.Tycoon:FindFirstChild("Tycoons") then
for i = 1, 6 do
local tycoon = workspace.Tycoon.Tycoons:FindFirstChild("Company " .. i)
if tycoon then
local owner = tycoon:FindFirstChild("Owner")
if owner and tostring(owner.Value) == tostring(LocalPlayer.Name) then
MyTycoon = tycoon
return tycoon
end
end
end
end
return nil
end
local function FindClickDetector(obj)
if obj:FindFirstChild("ClickDetector") then
return obj.ClickDetector
end
for _, child in pairs(obj:GetChildren()) do
local detector = FindClickDetector(child)
if detector then
return detector
end
end
return nil
end
local function AutoClickMonitor()
return game:GetService("RunService").Heartbeat:Connect(function()
task.wait(0.1)
if MyTycoon then
local purchasedObjects = MyTycoon:FindFirstChild("PurchasedObjects")
if purchasedObjects then
for _, computer in pairs(purchasedObjects:GetChildren()) do
local clickDetector = FindClickDetector(computer)
if clickDetector then
fireclickdetector(clickDetector)
break
end
end
end
end
end)
end
local function AutoCollectSafeMoney()
return game:GetService("RunService").Heartbeat:Connect(function()
task.wait(0.1)
if MyTycoon then
local purchasedObjects = MyTycoon:FindFirstChild("PurchasedObjects")
if purchasedObjects then
local safe = purchasedObjects:FindFirstChild("Safe")
if safe then
local safeInner = safe:FindFirstChild("Safe")
if safeInner then
local collectCash = safeInner:FindFirstChild("CollectCash")
if collectCash then
fireproximityprompt(collectCash)
end
end
end
end
end
end)
end
FindMyTycoon()
local Main = Window:AddTab("Main")
Main:New("Toggle")({
Title = "Auto Click Monitor",
Description = "Automatically click the starter computer monitor",
DefaultValue = false,
Callback = function(Value)
if Connections["Auto Click Monitor"] then
Connections["Auto Click Monitor"]:Disconnect()
Connections["Auto Click Monitor"] = nil
end
if Value then
if not MyTycoon then
FindMyTycoon()
end
if MyTycoon then
Connections["Auto Click Monitor"] = AutoClickMonitor()
end
end
end,
})
Main:New("Title")({
Title = "⚠️ Note: You must be near the safe to auto collect money",
})
Main:New("Toggle")({
Title = "Auto Collect Safe Money",
Description = "Automatically collect money from the safe",
DefaultValue = false,
Callback = function(Value)
if Connections["Auto Collect Safe Money"] then
Connections["Auto Collect Safe Money"]:Disconnect()
Connections["Auto Collect Safe Money"] = nil
end
if Value then
if not MyTycoon then
FindMyTycoon()
end
if MyTycoon then
Connections["Auto Collect Safe Money"] = AutoCollectSafeMoney()
end
end
end,
})
Window:SetTab("Main")
Window:SetTheme("Dark")
Comments
dont work.