UnMineral War Tycoon GUI by Pepelol23272 TheRobloxPlayer2509

--[[
    GUI made by Pepelol23272 on v3rm (TheRobloxPlayer2509)
    GUI to lua plugin by W_intry (https://www.roblox.com/library/1343400903/Gui-to-Lua-Converter-Revamped)
    Functions, code and scripts by Pepelol23272 on v3rm (TheRobloxPlayer2509)
    Programmed in Roblox Studio with the help of Dex Explorer V3

    Tested with my custom executor, Synapse X, ProtoSmasher and Proxo

    Scripted at 20/10/2019
--]]

math.randomseed(tick())

local function TableToString(Table)
    if not Table then return end
    local desiredString
    for i,v in pairs(Table) do
        if not desiredString then
            desiredString = tostring(v)
        else
            desiredString = desiredString.. tostring(v)
        end
    end
    print(desiredString)
    return desiredString
end

local function GenerateRandomString()
    local stringTable = {}
    for i = 1, math.random(8, 16) do
        local luckyNumber = math.random(1, 2)
        if luckyNumber == 1 then
            stringTable[#stringTable + 1] = string.upper(tostring(string.char(math.random(97, 122))))
        else
            stringTable[#stringTable + 1] = string.lower(tostring(string.char(math.random(97, 122))))
        end
    end
    return stringTable
end

print("UnMineral War Tycoon GUI by Pepelol23272 on v3rm (TheRobloxPlayer2509)")
wait(.03)
print("Starting up system")
wait()
pcall(function()
    local NewMsg = Instance.new("Message", workspace)
    local IdkWhatIsThisLol1 = GenerateRandomString()
    local IdkWhatIsThisLol2 = TableToString(IdkWhatIsThisLol1)
    NewMsg.Name = tostring(IdkWhatIsThisLol2)
    NewMsg.Text = "Done loading! Tip: Press F9 to view your current power (Must purchase Wall2 first!)"
    wait(3)
    NewMsg.Text = "GUI and all scripts made by Pepelol23272 on v3rm (TheRobloxPlayer2509). Join my Discord server! wPtHUBn"
    game:GetService("Debris"):AddItem(NewMsg, 5)
end)

-- Instances:

local UnMineralWarTycoon = Instance.new("ScreenGui")
local BG = Instance.new("Frame")
local Title = Instance.new("TextLabel")
local Manual = Instance.new("TextButton")
local DryIce = Instance.new("TextButton")
local AutoCollect = Instance.new("TextButton")
local AutoBuy = Instance.new("TextButton")
local BringUpgrade = Instance.new("TextButton")
local Heal = Instance.new("TextButton")
local BypassedSpeed = Instance.new("TextButton")
local ResetLighting = Instance.new("TextButton")
local UIAspectRatioConstraint = Instance.new("UIAspectRatioConstraint")
local Credit = Instance.new("TextLabel")
local Toggle = Instance.new("TextButton")

--Properties:
local GeneratedRawTable = GenerateRandomString()
local GeneratedString = TableToString(GeneratedRawTable)
UnMineralWarTycoon.Name = GeneratedString
UnMineralWarTycoon.Parent = game:GetService("CoreGui")
UnMineralWarTycoon.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
UnMineralWarTycoon.ResetOnSpawn = false

BG.Name = "BG"
BG.Parent = UnMineralWarTycoon
BG.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
BG.BackgroundTransparency = 0.30000001192093
BG.Position = UDim2.new(0.112276375, 0, 0.218604654, 0)
BG.Size = UDim2.new(0.174999997, 0, 0.5, 0)

Title.Name = "Title"
Title.Parent = BG
Title.BackgroundColor3 = Color3.new(1, 1, 1)
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0.0500000007, 0, 0, 0)
Title.Size = UDim2.new(0.899999976, 0, 0.150000006, 0)
Title.Font = Enum.Font.SourceSansBold
Title.Text = "UnMineral War Tycoon"
Title.TextColor3 = Color3.new(0.666667, 1, 0)
Title.TextScaled = true
Title.TextSize = 14
Title.TextWrapped = true

Manual.Name = "Manual"
Manual.Parent = BG
Manual.BackgroundColor3 = Color3.new(1, 0, 0)
Manual.Position = UDim2.new(0.0250000004, 0, 0.150000006, 0)
Manual.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
Manual.Font = Enum.Font.SourceSansBold
Manual.Text = "Spam Manual Mine: Off"
Manual.TextColor3 = Color3.new(0, 0, 0)
Manual.TextScaled = true
Manual.TextSize = 14
Manual.TextWrapped = true

DryIce.Name = "DryIce"
DryIce.Parent = BG
DryIce.BackgroundColor3 = Color3.new(1, 0, 0)
DryIce.Position = UDim2.new(0.524999976, 0, 0.150000006, 0)
DryIce.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
DryIce.Font = Enum.Font.SourceSansBold
DryIce.Text = "Spam Water Tank: Off"
DryIce.TextColor3 = Color3.new(0, 0, 0)
DryIce.TextScaled = true
DryIce.TextSize = 14
DryIce.TextWrapped = true

AutoCollect.Name = "AutoCollect"
AutoCollect.Parent = BG
AutoCollect.BackgroundColor3 = Color3.new(1, 0, 0)
AutoCollect.Position = UDim2.new(0.0250000004, 0, 0.324999988, 0)
AutoCollect.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
AutoCollect.Font = Enum.Font.SourceSansBold
AutoCollect.Text = "Auto Collect: Off"
AutoCollect.TextColor3 = Color3.new(0, 0, 0)
AutoCollect.TextScaled = true
AutoCollect.TextSize = 14
AutoCollect.TextWrapped = true

AutoBuy.Name = "AutoBuy"
AutoBuy.Parent = BG
AutoBuy.BackgroundColor3 = Color3.new(1, 0, 0)
AutoBuy.Position = UDim2.new(0.524999976, 0, 0.324999988, 0)
AutoBuy.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
AutoBuy.Font = Enum.Font.SourceSansBold
AutoBuy.Text = "Auto Buy: Off"
AutoBuy.TextColor3 = Color3.new(0, 0, 0)
AutoBuy.TextScaled = true
AutoBuy.TextSize = 14
AutoBuy.TextWrapped = true

BringUpgrade.Name = "BringUpgrade"
BringUpgrade.Parent = BG
BringUpgrade.BackgroundColor3 = Color3.new(1, 1, 0)
BringUpgrade.Position = UDim2.new(0.0250000004, 0, 0.675000012, 0)
BringUpgrade.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
BringUpgrade.Font = Enum.Font.SourceSansBold
BringUpgrade.Text = "Create OP Upgrader"
BringUpgrade.TextColor3 = Color3.new(0, 0, 0)
BringUpgrade.TextScaled = true
BringUpgrade.TextSize = 14
BringUpgrade.TextWrapped = true

Heal.Name = "Heal"
Heal.Parent = BG
Heal.BackgroundColor3 = Color3.new(1, 1, 0)
Heal.Position = UDim2.new(0.524999976, 0, 0.5, 0)
Heal.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
Heal.Font = Enum.Font.SourceSansBold
Heal.Text = "Heal Yourself"
Heal.TextColor3 = Color3.new(0, 0, 0)
Heal.TextScaled = true
Heal.TextSize = 14
Heal.TextWrapped = true

BypassedSpeed.Name = "BypassedSpeed"
BypassedSpeed.Parent = BG
BypassedSpeed.BackgroundColor3 = Color3.new(1, 0, 0)
BypassedSpeed.Position = UDim2.new(0.0250000004, 0, 0.5, 0)
BypassedSpeed.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
BypassedSpeed.Font = Enum.Font.SourceSansBold
BypassedSpeed.Text = "Bypassed Speed: Off"
BypassedSpeed.TextColor3 = Color3.new(0, 0, 0)
BypassedSpeed.TextScaled = true
BypassedSpeed.TextSize = 14
BypassedSpeed.TextWrapped = true

ResetLighting.Name = "ResetLighting"
ResetLighting.Parent = BG
ResetLighting.BackgroundColor3 = Color3.new(1, 1, 0)
ResetLighting.Position = UDim2.new(0.524999976, 0, 0.675000012, 0)
ResetLighting.Size = UDim2.new(0.449999988, 0, 0.150000006, 0)
ResetLighting.Font = Enum.Font.SourceSansBold
ResetLighting.Text = "Reset Lighting"
ResetLighting.TextColor3 = Color3.new(0, 0, 0)
ResetLighting.TextScaled = true
ResetLighting.TextSize = 14
ResetLighting.TextWrapped = true

UIAspectRatioConstraint.Parent = BG
UIAspectRatioConstraint.AspectRatio = 0.87961238622665

Credit.Name = "Credit"
Credit.Parent = BG
Credit.BackgroundColor3 = Color3.new(1, 1, 1)
Credit.BackgroundTransparency = 1
Credit.Position = UDim2.new(0.0500000007, 0, 0.850000024, 0)
Credit.Size = UDim2.new(0.899999976, 0, 0.150000006, 0)
Credit.Font = Enum.Font.SourceSansBold
Credit.Text = "GUI and all scripts made by Pepelol23272 on v3rm (TheRobloxPlayer2509)"
Credit.TextColor3 = Color3.new(0.666667, 1, 0)
Credit.TextScaled = true
Credit.TextSize = 14
Credit.TextWrapped = true

Toggle.Name = "Toggle"
Toggle.Parent = UnMineralWarTycoon
Toggle.BackgroundColor3 = Color3.new(1, 1, 0)
Toggle.Position = UDim2.new(0, 0, 0.9, 0)
Toggle.Size = UDim2.new(0.0500000007, 0, 0.0500000007, 0)
Toggle.Font = Enum.Font.SourceSansBold
Toggle.Text = "Toggle"
Toggle.TextColor3 = Color3.new(0, 0, 0)
Toggle.TextSize = 14

local AutoBuyEnabled = false
local AutoCollectEnabled = false
local BypassedSpeedEnabled = false
local AutoManualMineEnabled = false
local AutoWaterTankEnabled = false

local function InsertFakeScript(ancestor)
    return Instance.new("LocalScript", ancestor)
end

local ToggleScript = InsertFakeScript(Toggle)
ToggleScript.Parent.MouseButton1Click:Connect(function()
    BG.Visible = not BG.Visible
end)

local AutoBuyScript = InsertFakeScript(AutoBuy)
AutoBuyScript.Parent.MouseButton1Click:Connect(function()
    if AutoBuyEnabled then
        AutoBuyEnabled = false
        AutoBuy.Text = "Auto Buy: Off"
        AutoBuy.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    else
        AutoBuyEnabled = true
        AutoBuy.Text = "Auto Buy: On"
        AutoBuy.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
    end
end)

local AutoCollectScript = InsertFakeScript(AutoCollect)
AutoCollectScript.Parent.MouseButton1Click:Connect(function()
    if AutoCollectEnabled then
        AutoCollectEnabled = false
        AutoCollect.Text = "Auto Collect: Off"
        AutoCollect.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    else
        AutoCollectEnabled = true
        AutoCollect.Text = "Auto Collect: On"
        AutoCollect.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
    end
end)

local ManualScript = InsertFakeScript(Manual)
ManualScript.Parent.MouseButton1Click:Connect(function()
    if AutoManualMineEnabled then
        AutoManualMineEnabled = false
        Manual.Text = "Spam Manual Mine: Off"
        Manual.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    else
        AutoManualMineEnabled = true
        Manual.Text = "Spam Manual Mine: On"
        Manual.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
    end
end)

local WaterScript = InsertFakeScript(DryIce)
WaterScript.Parent.MouseButton1Click:Connect(function()
    if AutoWaterTankEnabled then
        AutoWaterTankEnabled = false
        DryIce.Text = "Spam Water Tank: Off"
        DryIce.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    else
        AutoWaterTankEnabled = true
        DryIce.Text = "Spam Water Tank: On"
        DryIce.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
    end
end)

local SpeedScript = InsertFakeScript(BypassedSpeed)
SpeedScript.Parent.MouseButton1Click:Connect(function()
    if BypassedSpeedEnabled then
        BypassedSpeedEnabled = false
        BypassedSpeed.Text = "Bypassed Speed: Off"
        BypassedSpeed.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    else
        BypassedSpeedEnabled = true
        BypassedSpeed.Text = "Bypassed Speed: On"
        BypassedSpeed.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
    end
end)

local HealScript = InsertFakeScript(Heal)
local HealDebounce = true
HealScript.Parent.MouseButton1Click:Connect(function()
    pcall(function()
        if not HealDebounce then return end
        HealDebounce = false
        local SavedLoc = workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.Position
        coroutine.resume(coroutine.create(function()
            wait(1)
            workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.Position = SavedLoc
            workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.CanCollide = true
            workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.Transparency = 0
            wait(.5)
            HealDebounce = true
        end))
        workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.CanCollide = false
        workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.Transparency = 1
        wait(.03)
        workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.H1.Part.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
    end)
end)

local ResetLightingScript = InsertFakeScript(ResetLighting)
local ResetLightingUsed = false
ResetLightingScript.Parent.MouseButton1Click:Connect(function()
    pcall(function()
        if ResetLightingUsed then return end
        ResetLightingUsed = true
        for i,v in pairs(game.Lighting:GetChildren()) do
            if v:IsA("ColorCorrectionEffect") or v:IsA("Sky") or v:IsA("BlurEffect") or v:IsA("BloomEffect") or v:IsA("SunRaysEffect") then
                v:Destroy()
            end
        end
        game.Lighting.Ambient = Color3.fromRGB(255, 255, 255)
        game.Lighting.Brightness = 1
        game.Lighting.ClockTime = 14
        game.Lighting.ColorShift_Bottom = Color3.fromRGB(255, 255, 255)
        game.Lighting.ColorShift_Top = Color3.fromRGB(255, 255, 255)
        game.Lighting.ExposureCompensation = 0
        game.Lighting.FogColor = Color3.fromRGB(255, 255, 255)
        game.Lighting.FogEnd = 999999999
        game.Lighting.GeographicLatitude = 41.733
        game.Lighting.OutdoorAmbient = Color3.fromRGB(255, 255, 255)
        game.Lighting.GlobalShadows = true

        game.Lighting.Changed:Connect(function()
            game.Lighting.Ambient = Color3.fromRGB(255, 255, 255)
            game.Lighting.Brightness = 1
            game.Lighting.ClockTime = 14
            game.Lighting.ColorShift_Bottom = Color3.fromRGB(255, 255, 255)
            game.Lighting.ColorShift_Top = Color3.fromRGB(255, 255, 255)
            game.Lighting.ExposureCompensation = 0
            game.Lighting.FogColor = Color3.fromRGB(255, 255, 255)
            game.Lighting.FogEnd = 999999999
            game.Lighting.GeographicLatitude = 41.733
            game.Lighting.OutdoorAmbient = Color3.fromRGB(255, 255, 255)
            game.Lighting.GlobalShadows = true
        end)
    end)
end)

local CreateOPUpgraderScript = InsertFakeScript(BringUpgrade)
CreateOPUpgraderScript.Parent.MouseButton1Click:Connect(function()
    for i,v in pairs(workspace.Tycoons:GetDescendants()) do
        pcall(function()
            if v.Name == "Upgrade" and v.Parent:IsA("Model") and v:IsA("BasePart") then
                v.CanCollide = false
                v.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
            end
        end)
    end
end)

coroutine.resume(coroutine.create(function()
    while wait(1) do
        if AutoWaterTankEnabled then
            pcall(function()
                fireclickdetector(workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.bWaterTank.button.ClickDetector)
            end)
        end
        if AutoBuyEnabled then
            for i,v in pairs(workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].Buttons:GetDescendants()) do
                pcall(function()
                    if v.Name == "Head" and v.Parent:IsA("Model") and v.Object.Name ~= "Prem" and v.Object.Name ~= "VIP" then
                        v.CanCollide = false
                        v.Transparency = 1
                        v.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
                    end
                end)
            end
        end
        if AutoCollectEnabled then
            pcall(function()
                workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].Essentials.cashCollector.Giver.CanCollide = false
                workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].Essentials.cashCollector.Giver.Transparency = 1
                workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].Essentials.cashCollector.Giver.Position = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
            end)
        end
        pcall(function()
            print(workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.Wall2.CurrentPowerDisplay.Display.SurfaceGui.CashLabel.Text)
        end)
    end
end))

while wait(.03) do
    if BypassedSpeedEnabled then
        pcall(function()
            game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 30
        end)
    end
    if AutoManualMineEnabled then
        fireclickdetector(workspace.Tycoons[game.Players.LocalPlayer.Name.. "'s Tycoon"].PurchasedObjects.Clicker1.Button.ClickDetector)
    end
end