task.wait(10)

getgenv().RebirthConfig = getgenv().RebirthConfig or {
    TargetRebirth = 1,          -- Rebirth level cần đạt
    FPS = 15,                  -- FPS limit để giảm CPU/GPU khi chạy nhiều tab
    Disable3D = true,          -- Bật black screen + tắt 3D để tiết kiệm RAM/GPU
    MuteAudio = true,          -- Tắt âm thanh để giảm CPU
    KillAnimations = true,     -- Tắt animation người khác + thú băng chuyền
    RebirthTimeout = 1800,     -- Thời gian tối đa trước khi kick nếu bị kẹt
    Webhook = "",              -- Discord webhook nếu cần
    -- ★ KICK REBIRTH 1: UseChange=false → kick như cũ. true → gọi client:ChangeToFolder(From, To, false, nil) thay vì kick.
    UseChange = false,         -- bật để CHUYỂN FOLDER thay vì kick khi đạt rebirth 1
    From = "",                 -- field 1 (from) — folder nguồn
    To = ""                    -- field 2 (to)   — folder đích
}

-- ===================================================================
-- FPS BOOT / BLACK SCREEN
-- ===================================================================

do
    if not game:IsLoaded() then game.Loaded:Wait() end
    if game.PlaceId == 109983668079237 then
        warn("[Kaitun] Đang ở Main (109983668079237) → load sabhop.txt (bỏ grind)")
        pcall(function()
            loadstring(game:HttpGet("https://quanhscript.com/sabscan.txt"))()
        end)
        return
    end
end

wait(10)  -- (chỉ tới đây nếu CHƯA đạt rebirth → chạy grind bình thường)

spawn(function()
    getgenv().HOBEO_API_KEY = "4a24bf313b614c0f4ce9b6384688469d4435c4bff89ae7c6d3927c217ccb7127"
    pcall(function()
        loadstring(game:HttpGet("https://files.hobeotrack.com/Loader.lua"))()
    end)
end)

spawn(function()
    task.wait(90 * 60)
    SafeKick(game.Players.LocalPlayer, "Over Time")
end)

do
    if not game:IsLoaded() then
        game.Loaded:Wait()
    end

    local Players = game:GetService("Players")
    local RunService = game:GetService("RunService")
    local Lighting = game:GetService("Lighting")
    local Workspace = game:GetService("Workspace")
    local SoundService = game:GetService("SoundService")
    local StarterGui = game:GetService("StarterGui")
    local UserInputService = game:GetService("UserInputService")

    local LocalPlayer = Players.LocalPlayer
    local PlayerGui = LocalPlayer and LocalPlayer:WaitForChild("PlayerGui", 30)
    local Terrain = Workspace:FindFirstChildOfClass("Terrain")

    local cfg = getgenv().RebirthConfig or {}
    local fps = tonumber(cfg.FPS or 20) or 20
    local disable3D = cfg.Disable3D == true

    local blackGui
    local blackFrame
    local blackStatus
    local blackToggleButton
    local renderEnabled = true
    local blackVisible = true

    local function updateBlackToggleButton()
        if not blackToggleButton or not blackToggleButton.Parent then
            return
        end

        if blackVisible then
            blackToggleButton.Text = "BLACK: ON"
            blackToggleButton.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
        else
            blackToggleButton.Text = "BLACK: OFF"
            blackToggleButton.BackgroundColor3 = Color3.fromRGB(55, 55, 55)
        end
    end

    local function oneLine(txt)
        txt = tostring(txt or "Đang khởi động...")
        txt = txt:gsub("\r", " ")
        txt = txt:gsub("\n+", " | ")
        txt = txt:gsub("%s+", " ")
        txt = txt:gsub("^%s+", "")
        txt = txt:gsub("%s+$", "")
        if #txt > 260 then
            txt = txt:sub(1, 257) .. "..."
        end
        if txt == "" then
            txt = "Đang chạy..."
        end
        return txt
    end

    local function applyBlackVisible(enabled)
        blackVisible = enabled == true
        if blackFrame then
            blackFrame.Visible = blackVisible
        end
        updateBlackToggleButton()
    end

    local function apply3D(enabled)
        renderEnabled = enabled == true
        pcall(function()
            RunService:Set3dRenderingEnabled(renderEnabled)
        end)
    end

    local function createBlackScreen()
        if not PlayerGui or blackGui then
            return
        end

        pcall(function()
            local old = PlayerGui:FindFirstChild("RWB_BlackScreen")
            if old then
                old:Destroy()
            end

            blackGui = Instance.new("ScreenGui")
            blackGui.Name = "RWB_BlackScreen"
            blackGui.ResetOnSpawn = false
            blackGui.IgnoreGuiInset = true
            blackGui.DisplayOrder = 2147483647
            blackGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
            blackGui.Parent = PlayerGui

            blackFrame = Instance.new("Frame")
            blackFrame.Name = "BlackFrame"
            blackFrame.Size = UDim2.new(1, 0, 1, 0)
            blackFrame.Position = UDim2.new(0, 0, 0, 0)
            blackFrame.BackgroundColor3 = Color3.new(0, 0, 0)
            blackFrame.BackgroundTransparency = 0
            blackFrame.BorderSizePixel = 0
            blackFrame.ZIndex = 1
            blackFrame.Parent = blackGui

            blackStatus = Instance.new("TextLabel")
            blackStatus.Name = "Status"
            blackStatus.AnchorPoint = Vector2.new(0.5, 0.5)
            blackStatus.Position = UDim2.new(0.5, 0, 0.5, 0)
            blackStatus.Size = UDim2.new(1, -80, 0, 32)
            blackStatus.BackgroundTransparency = 1
            blackStatus.Text = "Đang khởi động kaitun..."
            blackStatus.TextColor3 = Color3.fromRGB(255, 255, 255)
            blackStatus.TextStrokeTransparency = 0.65
            blackStatus.TextSize = 18
            blackStatus.Font = Enum.Font.GothamBold
            blackStatus.TextXAlignment = Enum.TextXAlignment.Center
            blackStatus.TextYAlignment = Enum.TextYAlignment.Center
            blackStatus.TextWrapped = false
            blackStatus.TextTruncate = Enum.TextTruncate.AtEnd
            blackStatus.ZIndex = 2
            blackStatus.Parent = blackFrame

            blackToggleButton = Instance.new("TextButton")
            blackToggleButton.Name = "ToggleBlackScreen"
            blackToggleButton.AnchorPoint = Vector2.new(1, 0)
            blackToggleButton.Position = UDim2.new(1, -14, 0, 14)
            blackToggleButton.Size = UDim2.new(0, 122, 0, 32)
            blackToggleButton.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
            blackToggleButton.BackgroundTransparency = 0.12
            blackToggleButton.BorderSizePixel = 0
            blackToggleButton.AutoButtonColor = true
            blackToggleButton.Text = "BLACK: ON"
            blackToggleButton.TextColor3 = Color3.fromRGB(255, 255, 255)
            blackToggleButton.TextStrokeTransparency = 0.75
            blackToggleButton.TextSize = 14
            blackToggleButton.Font = Enum.Font.GothamBold
            blackToggleButton.ZIndex = 5
            blackToggleButton.Parent = blackGui

            local toggleCorner = Instance.new("UICorner")
            toggleCorner.CornerRadius = UDim.new(0, 8)
            toggleCorner.Parent = blackToggleButton

            local toggleStroke = Instance.new("UIStroke")
            toggleStroke.Color = Color3.fromRGB(255, 255, 255)
            toggleStroke.Thickness = 1
            toggleStroke.Transparency = 0.35
            toggleStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border
            toggleStroke.Parent = blackToggleButton

            blackToggleButton.Activated:Connect(function()
                local nextVisible = not blackVisible
                applyBlackVisible(nextVisible)

                if nextVisible then
                    if disable3D then
                        apply3D(false)
                    end
                else
                    apply3D(true)
                end
            end)

            applyBlackVisible(blackVisible)
        end)
    end

    createBlackScreen()

    local currentBlackLine = "Đang khởi động kaitun..."
    local lastBlackRefresh = 0

    local function refreshBlackStatus(force)
        if not blackStatus or not blackStatus.Parent then
            return
        end

        local now = os.clock()
        if not force and now - lastBlackRefresh < 0.35 then
            return
        end
        lastBlackRefresh = now

        local line = currentBlackLine
        local currentFps = tonumber(getgenv().__RWB_CurrentFPS)
        local targetFps = tonumber(getgenv().__RWB_TargetFPS or fps)

        if currentFps and targetFps and targetFps > 0 then
            line = line .. " | FPS: " .. tostring(math.floor(currentFps + 0.5)) .. "/" .. tostring(targetFps)
        end

        blackStatus.Text = line
    end

    getgenv().__RWB_UpdateBlackStatus = function(txt)
        local line = oneLine(txt)
        currentBlackLine = line

        pcall(function()
            if not blackGui or not blackGui.Parent then
                createBlackScreen()
            end
            refreshBlackStatus(true)
        end)
    end

    getgenv().__RWB_SetBlackScreen = function(enabled)
        createBlackScreen()
        enabled = enabled == true
        applyBlackVisible(enabled)


        if enabled then
            if disable3D then
                apply3D(false)
            end
        else
            apply3D(true)
        end
    end

    getgenv().__RWB_Set3D = function(enabled)
        apply3D(enabled == true)
    end

    local targetFps = math.max(1, math.floor(tonumber(fps) or 20))
    local lastCapApply = 0
    local fpsAccum = 0
    local fpsFrames = 0
    local fpsLastSample = os.clock()

    local function readTargetFps()
        local liveCfg = getgenv().RebirthConfig or {}
        local value = tonumber(liveCfg.FPS or targetFps or 20) or 20
        value = math.max(1, math.floor(value))
        return value
    end

    local function applyFpsCap(force)
        targetFps = readTargetFps()
        getgenv().__RWB_TargetFPS = targetFps

        if targetFps > 0 and type(setfpscap) == "function" then
            local now = os.clock()
            if force or now - lastCapApply >= 2 then
                pcall(function()
                    setfpscap(targetFps)
                end)
                lastCapApply = now
            end
        end
    end

    applyFpsCap(true)

    pcall(function()
        RunService.Heartbeat:Connect(function(dt)
            fpsAccum += tonumber(dt) or 0
            fpsFrames += 1

            local now = os.clock()
            if now - fpsLastSample >= 1 then
                if fpsAccum > 0 and fpsFrames > 0 then
                    getgenv().__RWB_CurrentFPS = fpsFrames / fpsAccum
                end

                fpsAccum = 0
                fpsFrames = 0
                fpsLastSample = now

                local liveTarget = readTargetFps()
                if liveTarget ~= targetFps then
                    applyFpsCap(true)
                elseif tonumber(getgenv().__RWB_CurrentFPS or 0) > targetFps + 5 then
                    applyFpsCap(true)
                end

                refreshBlackStatus(false)
            end
        end)
    end)

    task.spawn(function()
        while task.wait(5) do
            applyFpsCap(false)
            refreshBlackStatus(false)
        end
    end)

    apply3D(not disable3D)

    pcall(function()
        local userGameSettings = UserSettings():GetService("UserGameSettings")
        userGameSettings.SavedQualityLevel = Enum.SavedQualitySetting.QualityLevel1
        userGameSettings.MasterVolume = 0
    end)

    pcall(function()
        settings().Rendering.QualityLevel = Enum.QualityLevel.Level01
    end)

    pcall(function()
        StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.Chat, false)
        StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.PlayerList, false)
        StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.Backpack, false)
        StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.EmotesMenu, false)
    end)

    pcall(function()
        Lighting.GlobalShadows = false
        Lighting.FogEnd = 9e9
        Lighting.Brightness = 0
        Lighting.EnvironmentDiffuseScale = 0
        Lighting.EnvironmentSpecularScale = 0
        Lighting.ShadowSoftness = 0
    end)

    pcall(function()
        local sun = Lighting:FindFirstChild("SunRays")
        if not sun then
            sun = Instance.new("SunRaysEffect")
            sun.Name = "SunRays"
            sun.Parent = Lighting
        end
        sun.Enabled = false
    end)

    pcall(function()
        for _, e in ipairs(Lighting:GetChildren()) do
            if e:IsA("BlurEffect")
                or e:IsA("SunRaysEffect")
                or e:IsA("ColorCorrectionEffect")
                or e:IsA("BloomEffect")
                or e:IsA("DepthOfFieldEffect") then
                e.Enabled = false
            elseif e:IsA("Atmosphere") then
                e.Density = 0
                e.Haze = 0
                e.Glare = 0
            elseif e:IsA("Sky") then
                pcall(function() e.CelestialBodiesShown = false end)
                pcall(function() e.StarCount = 0 end)
            end
        end
    end)

    pcall(function()
        if Terrain then
            Terrain.WaterWaveSize = 0
            Terrain.WaterWaveSpeed = 0
            Terrain.WaterReflectance = 0
            Terrain.WaterTransparency = 1
        end
    end)

    local function isBlackGui(v)
        return blackGui and (v == blackGui or v:IsDescendantOf(blackGui))
    end

    local function isMyCharacter(v)
        local char = LocalPlayer and LocalPlayer.Character
        return char and v:IsDescendantOf(char)
    end

    local function optimizeObject(v)
        if not v or not v.Parent or isBlackGui(v) then
            return
        end

        if isMyCharacter(v) then
            return
        end

        pcall(function()
            if v:IsA("BasePart") then
                v.CastShadow = false
                v.Reflectance = 0
                v.Material = Enum.Material.Plastic
                if v:IsA("MeshPart") then
                    v.TextureID = ""
                end
            elseif v:IsA("Decal") or v:IsA("Texture") then
                v.Transparency = 1
            elseif v:IsA("SurfaceAppearance") then
                pcall(function() v.ColorMap = "" end)
                pcall(function() v.MetalnessMap = "" end)
                pcall(function() v.NormalMap = "" end)
                pcall(function() v.RoughnessMap = "" end)
            elseif v:IsA("SpecialMesh") then
                v.TextureId = ""
            elseif v:IsA("ParticleEmitter") then
                v.Enabled = false
                v.Rate = 0
                v.Lifetime = NumberRange.new(0)
            elseif v:IsA("Trail") or v:IsA("Beam") then
                v.Enabled = false
            elseif v:IsA("PointLight") or v:IsA("SpotLight") or v:IsA("SurfaceLight") then
                v.Enabled = false
                v.Brightness = 0
            elseif v:IsA("Fire") or v:IsA("Smoke") or v:IsA("Sparkles") then
                v.Enabled = false
            elseif v:IsA("Explosion") then
                v.BlastPressure = 0
                v.BlastRadius = 0
            elseif v:IsA("Sound") then
                v.Volume = 0
                pcall(function() v.Playing = false end)
            elseif v:IsA("BillboardGui") then
                if v:IsDescendantOf(Workspace) then
                    v.Enabled = false
                end
            elseif v:IsA("TextLabel") or v:IsA("TextButton") or v:IsA("TextBox") then
                local inWorkspace = v:IsDescendantOf(Workspace)
                local inPlayerGui = PlayerGui and v:IsDescendantOf(PlayerGui)
                if inWorkspace or (inPlayerGui and cfg.HideAllGuiText == true) then
                    v.TextTransparency = 1
                    v.TextStrokeTransparency = 1
                    if not v:IsA("TextButton") then
                        v.BackgroundTransparency = 1
                    end
                end
            elseif v:IsA("ProximityPrompt") then
                pcall(function()
                    if v.MaxActivationDistance and v.MaxActivationDistance < 10 then
                        v.MaxActivationDistance = 10
                    end
                end)
            elseif v:IsA("Humanoid") then
                pcall(function()
                    v.DisplayDistanceType = Enum.HumanoidDisplayDistanceType.None
                end)
            elseif v:IsA("ScreenGui") then
                if PlayerGui and v:IsDescendantOf(PlayerGui) then
                    if v.Name == "Notifications"
                        or v.Name == "DamageCounter"
                        or v.Name == "Popups"
                        or v.Name == "Effects" then
                        v.Enabled = false
                    end
                end
            elseif v:IsA("Highlight") then
                v.Enabled = false
            end
        end)
    end

    pcall(function()
        task.spawn(function()
            local roots = { Workspace, Lighting }
            if cfg.DeepOptimizePlayerGui == true and PlayerGui then
                table.insert(roots, PlayerGui)
            end

            local batch = 0
            local batchSize = tonumber(cfg.InitialOptimizeChunk or cfg.OptimizeChunk or 60) or 60
            if batchSize < 20 then
                batchSize = 20
            end

            for _, root in ipairs(roots) do
                if root then
                    for _, v in ipairs(root:GetDescendants()) do
                        optimizeObject(v)
                        batch += 1
                        if batch >= batchSize then
                            batch = 0
                            task.wait()
                        end
                    end
                end
            end
        end)
    end)

    local queue = {}
    local queued = {}
    local processing = false
    local scheduled = false
    local head = 1

    local function processQueue()
        scheduled = false
        if processing then
            return
        end
        processing = true

        while head <= #queue do
            for _ = 1, 50 do
                local v = queue[head]
                if not v then
                    break
                end
                queue[head] = nil
                head += 1
                queued[v] = nil
                optimizeObject(v)
            end
            task.wait()
        end

        queue = {}
        head = 1
        processing = false
    end

    local function enqueue(v)
        if not v or queued[v] or isBlackGui(v) then
            return
        end
        queued[v] = true
        table.insert(queue, v)
        if not scheduled then
            scheduled = true
            task.defer(processQueue)
        end
    end

    pcall(function()
        game.DescendantAdded:Connect(function(v)
            enqueue(v)
        end)
    end)


    pcall(function()
        UserInputService.InputBegan:Connect(function(input, gameProcessed)
            if gameProcessed then
                return
            end

            if input.KeyCode == Enum.KeyCode.RightControl then
                local nextVisible = not blackVisible
                applyBlackVisible(nextVisible)

                if nextVisible then
                    if disable3D then
                        apply3D(false)
                    end
                else
                    apply3D(true)
                end
            end
        end)
    end)
end


do
    if not game:IsLoaded() then
        game.Loaded:Wait()
    end

    local Sync = require(game.ReplicatedStorage:WaitForChild("Packages"):WaitForChild("Synchronizer"))
    local patched = 0

    for name, fn in pairs(Sync) do
        if typeof(fn) ~= "function" then continue end
        if isexecutorclosure(fn) then continue end

        local ok, ups = pcall(debug.getupvalues, fn)
        if not ok then continue end

        for idx, val in pairs(ups) do
            if typeof(val) == "function" and not isexecutorclosure(val) then
                local ok2, innerUps = pcall(debug.getupvalues, val)
                if ok2 then
                    local hasBoolean = false
                    for _, v in pairs(innerUps) do
                        if typeof(v) == "boolean" then
                            hasBoolean = true
                            break
                        end
                    end
                    if hasBoolean then
                        debug.setupvalue(fn, idx, newcclosure(function() end))
                        patched += 1
                    end
                end
            end
        end
    end
end
game:GetService("Players").LocalPlayer:FindFirstChild("PlayerGui")

-- ===================================================================
-- END FPS BOOT MERGED FROM KAITUNSAB.txt
-- ===================================================================

-- ★ SafeKick: bật cờ để clear-loop trong GuiManager:HideAll KHÔNG nuốt màn kick.
getgenv().__KaitunKicking = false
local function SafeKick(plr, reason)
    getgenv().__KaitunKicking = true
    pcall(function() plr:Kick(reason) end)
end

wait(10)  -- (chỉ tới đây nếu CHƯA đạt rebirth → chạy grind bình thường)

spawn(function()
    getgenv().HOBEO_API_KEY = "1341b4fa0882f065a40547e81229fe18bcdf23bea545a9eb1a258ac3cf68cd24"
    pcall(function()
        loadstring(game:HttpGet("https://files.hobeotrack.com/Loader.lua"))()
    end)
end)

spawn(function()
    task.wait(90 * 60)
    SafeKick(game.Players.LocalPlayer, "Over Time")
end)

task.spawn(function()
    while true do task.wait(20)
        local LP = game:GetService("Players").LocalPlayer
        local function getRebirth()
            local ls = LP:FindFirstChild("leaderstats")
            if ls then
                for _, n in ipairs({"Rebirth","Rebirths","Rebirth Level","RebirthLevel","Prestige"}) do
                    local v = ls:FindFirstChild(n)
                    if v and v:IsA("ValueBase") then return tonumber(v.Value) end
                end
            end
            for _, n in ipairs({"Rebirth","Rebirths","RebirthLevel","Prestige"}) do
                local a = LP:GetAttribute(n)
                if a ~= nil then return tonumber(a) end
            end
            return nil
        end
        local rb = getRebirth()
        if rb == 1 then
            local rc = getgenv().RebirthConfig or {}
            if rc.UseChange == true then
                -- ★ CHUYỂN FOLDER thay vì kick: client:ChangeToFolder(From, To, false, nil)
                pcall(function() getgenv().client:ChangeToFolder(rc.From, rc.To, false, nil) end)
            else
                SafeKick(LP, "rebirth 1")   -- kick như cũ
            end
            return   -- ★ xử lý 1 lần rồi thoát monitor (ko lặp mỗi 20s — kick thì rời, change thì ko spam)
        end
    end
end)

-- ===================================================================
-- CORE SYSTEM (DO NOT MODIFY BELOW)
-- ===================================================================
local a={}
local b={}
local c=require;
local function require(d)
    if typeof(d)~="string" then return c(d) end;
    local e=d:gsub("%.luau$","")
    if b[e] then return b[e] end;
    if a[e] then b[e]=a[e]() return b[e] end;
    local f,g=pcall(c,d)
    if f then return g end;
    error("Module not found: "..tostring(d))
end;

a["Animal/Calculator"]=function()
    local h=require("Network/Relay")
    local i=require("Animal/Metadata")
    local j={}
    function j:GetAnimalData(k,l)if not k or not k.Index then return nil end;local m={UUID=k.UUID or k.UID,Name=k.Index,Mutation=k.Mutation,Gain=j:GetGain(k),Value=h:GetValue(k.Index,k.Mutation),Fuse=k.Machine and k.Machine.Active or false,Rebirth=i:GetRebirthRequirement(k.Index),Origin=l or"Base"}if k.Timer then m.Type="Lucky Block"m.LuckyBlockEndTime=os.time()+math.floor(k.Timer)end;return m end;
    function j:GetGain(k)if not k or not k.Index then return 0 end;local n=i:GetGeneration(k.Index)local o=1+i:GetMutationModifier(k.Mutation)if k.Traits then for _,p in pairs(k.Traits)do o=o+i:GetTraitModifier(p)end end;return math.floor(n*o)end;
    function j:GetBestValue(q)local r,s=0,nil;if typeof(q)~="table"then return 0,nil end;for _,t in pairs(q)do local u=t.Value or 0;if u>r then r=u;s=t end end;return r,s end;
    return j 
end;

a["Animal/Metadata"]=function()
    local v=require("Core/Services")
    local i={}
    local function w(x)return v.MetaTable.Animals and v.MetaTable.Animals[x]end;
    function i:GetPrice(y)local z=w(y)return z and z.Price or math.huge end;
    function i:GetGeneration(y)local z=w(y)return z and z.Generation or 0 end;
    function i:GetMutationModifier(A)if not A then return 0 end;local z=v.MetaTable.Mutations and v.MetaTable.Mutations[A]return z and z.Modifier or 0 end;
    function i:GetTraitModifier(p)if not p then return 0 end;local z=v.MetaTable.Traits and v.MetaTable.Traits[p]return z and z.MultiplierModifier or 0 end;
    function i:GetRebirthRequirement(y)return v.RebirthRequirements and v.RebirthRequirements[y]end;
    function i:GetRebirthMeta(B)local C=v.MetaTable;local D=C.Rebirth and C.Rebirth[B]local E={}if D and D.Requirements and D.Requirements.RequiredCharacters then for _,F in pairs(D.Requirements.RequiredCharacters)do local G=tostring(F)E[G]=(E[G]or 0)+1 end end;local H=D and D.Requirements and D.Requirements.Cash or math.huge;return{Animals=E,Cost=H}end;
    return i 
end;

a["AutoRebirth/Actions"]=function()
    local v=require("Core/Services")
    local I=require("Core/Config")
    local J=require("Core/Pathfinding")
    local K=require("Core/Prompts")
    local L={}
    local M="RF/Rebirth/RequestRebirth"
    local function N(Instance)return Instance and Instance.Parent~=nil end;
    local function O()local P=v.Players.LocalPlayer.Character;return P and P:FindFirstChild("Humanoid")end;
    function L:Interact(Q,R)if not N(R)then return false end;local S=J:MoveTo(Q or R,I.PromptRetries)if not N(R)then return false end;if not S then local T=v.Players.LocalPlayer.Character;local U=T and T:FindFirstChild("HumanoidRootPart")local V=J:GetTargetPos(Q or R)if U and V and(U.Position-V).Magnitude<=25 then S=true end end;if S then return K:FirePrompt(R,I.PromptRetries)end;return false end;
    function L:LockBase(W)if not N(W)then return false end;local X=W:FindFirstChild("Purchases")local Y=X and X:FindFirstChild("PlotBlock",true)local Z=Y and Y:FindFirstChild("Main")if not Z then return false end;if J:MoveTo(Z,2)then local a0=O()for _=1,4 do if a0 then a0.Jump=true end;task.wait(0.3)end;return true end;return false end;
    function L:Collect(W,aL)if not N(W)then return end;local a0=O()if a0 then a0.Jump=true end;local a1=W:FindFirstChild("AnimalPodiums")if not a1 then return end;for _,a2 in ipairs(a1:GetChildren())do local occ=true;if aL then local idx=tonumber(a2.Name)local e=idx and aL[idx]occ=(typeof(e)=="table")end;if occ then local a3=a2:FindFirstChild("Hitbox",true)if a3 and N(a3)then J:MoveTo(a3,1)end end end end;
    function L:DoRebirth()local aN=require(v.Net)local ab=nil;pcall(function()ab=aN:RemoteFunction("Rebirth/RequestRebirth")end)if ab then local ok,success=pcall(function()return ab:InvokeServer()end)if ok and success==true then return true end end;return false end;
    function L:SpinWheel()local ac=v.Players.LocalPlayer;local pg=ac:FindFirstChild("PlayerGui")if not pg then return false end;for _,gui in ipairs(pg:GetChildren())do if gui.Name:match("Wheel$")then local inner=gui:FindFirstChild(gui.Name)local btns=inner and inner:FindFirstChild("Buttons")local b=btns and btns:FindFirstChild("Spin")if b then pcall(firesignal,b.Activated)return true end end end;local net=v.Net;if net then for _,r in ipairs(net:GetChildren())do if r:IsA("RemoteEvent")and r.Name:match("EventService/Spin$")then pcall(function()r:FireServer()end)return true end end end;return false end;
    function L:PatchSort()local Net=v.Net;if Net:FindFirstChild("__SortPatched")then return end;local ad=Net:FindFirstChild("RE/InventoryService/Sort")if ad then ad.Name="hi"end;if not Net:FindFirstChild("RE/InventoryService/Sort")then local dm=Instance.new("RemoteEvent")dm.Name="RE/InventoryService/Sort"pcall(function()dm.Parent=Net end)end;local fl=Instance.new("BoolValue")fl.Name="__SortPatched"pcall(function()fl.Parent=Net end)end;
    function L:QueryAll()for _,ae in ipairs(workspace:GetDescendants())do if ae:IsA("BasePart")and not ae.CanQuery then ae.CanQuery=true end end;return workspace.DescendantAdded:Connect(function(ae)if ae:IsA("BasePart")and not ae.CanQuery then ae.CanQuery=true end end)end;
    function L:Rejoin()local ac=v.Players.LocalPlayer;pcall(v.TeleportService.TeleportCancel,v.TeleportService)pcall(v.TeleportService.Teleport,v.TeleportService,game.PlaceId,ac)end;
    function L:DeleteLaser(W)if W and W:FindFirstChild("Laser")then W.Laser:Destroy()end end;
    function L:LowerBase(W)if W and W.PrimaryPart and math.floor(W.PrimaryPart.Position.Y)==-10 then W:PivotTo(W:GetPivot()*CFrame.new(0,-1,0))end end;
    return L 
end;

a["AutoRebirth/Analyzer"]=function()
    local I=require("Core/Config")
    local i=require("Animal/Metadata")
    local j=require("Animal/Calculator")
    local af=require("Data/Carpet")
    local ag=require("Data/RemoteData")
    local K=require("Core/Prompts")
    local v=require("Core/Services")
    local ah={Cache={PlayerData={},BaseData={},NeedsMoreRoom=false,MissingAnimals={},RequiredAnimals={},OwnedCounts={},HighestOwnedGain=0,TotalGPS=0}}
    function ah:Update(ai)local ac=ai.Player;local aj=ai.PlotName;self.Cache.PlayerData=ag:RequestData(ac)or self.Cache.PlayerData;self.Cache.BaseData=ag:RequestData(aj)or self.Cache.BaseData;local ak={}local al=0;local am=0;local an=0;local ao=self.Cache.BaseData.AnimalList;if typeof(ao)=="table"then for _,ap in ipairs(ao)do local G;if typeof(ap)=="string"and ap~="Empty"then G=ap elseif typeof(ap)=="table"then G=tostring(ap.Index)al=al+1;local aq=j:GetGain(ap)am=am+aq;if aq>an then an=aq end end;if G and(typeof(ap)~="table"or not ap.Mutation)then ak[G]=(ak[G]or 0)+1 end end end;self.Cache.OwnedCounts=ak;self.Cache.TotalPodiums=al;self.Cache.NeedsMoreRoom=al>=I.MaxPodiums;self.Cache.TotalGPS=am;self.Cache.HighestOwnedGain=an;local ar=i:GetRebirthMeta(I.RebirthTarget).Animals;local as={}for G,at in pairs(ar)do local au=ak[G]or 0;if au<at then as[G]=at-au end end;self.Cache.MissingAnimals=as;self.Cache.RequiredAnimals=ar end;
    function ah:GetBestPurchase()local av=self.Cache.PlayerData.Coins or 0;local as=self.Cache.MissingAnimals;local q=af:GetAnimals()or{}local aw,ax=nil,0;for _,t in pairs(q)do if typeof(t)=="table"and t.Instance and as[t.Index]and not t.Mutation then local ay=i:GetPrice(t.Index)if ay<=av and ay>0 then local R=K:FindPromptByKeyCode(t.Instance,Enum.KeyCode.E)if R then return{Type="Missing",Instance=t.Instance,Prompt=R,Gain=0}end end end end;if not self.Cache.NeedsMoreRoom then local az=self.Cache.HighestOwnedGain/2.5;local cands={}for _,t in pairs(q)do if typeof(t)=="table"and t.Instance then local ay=i:GetPrice(t.Index)if ay<=av and ay>0 then local aq=j:GetGain({Index=t.Index,Mutation=t.Mutation,Traits=t.Traits})if aq>0 and aq>=az then local R=K:FindPromptByKeyCode(t.Instance,Enum.KeyCode.E)if R then table.insert(cands,{Instance=t.Instance,Prompt=R,Gain=aq})end end end end end;if #cands>0 then table.sort(cands,function(x,y)return x.Gain>y.Gain end)local pick=cands[math.random(1,math.min(#cands,5))]return{Type="Best",Instance=pick.Instance,Prompt=pick.Prompt}end end;return nil end;
    function ah:GetPodiumToSell()local W=workspace.Plots:FindFirstChild(self.Cache.PlayerData.LastPlot)local a1=W and W:FindFirstChild("AnimalPodiums")if not a1 then return nil end;local aA=self.Cache.BaseData.AnimalList;local ar=self.Cache.RequiredAnimals;local ak=self.Cache.OwnedCounts;local aB={}for _,a2 in ipairs(a1:GetChildren())do local aC=tonumber(a2.Name)local ap=aC and aA[aC]if ap and typeof(ap)=="table"then local R=K:FindPromptByKeyCode(a2,Enum.KeyCode.F)if R then local x=tostring(ap.Index)local aD=ar[x]or 0;local au=ak[x]or 0;local aE=not ap.Mutation and aD>0 and au<=aD;table.insert(aB,{Podium=a2,Prompt=R,Gain=j:GetGain(ap),Index=x,Locked=aE})end end end;table.sort(aB,function(aF,aG)return aF.Gain<aG.Gain end)local aH=next(self.Cache.MissingAnimals)~=nil;local az=self.Cache.HighestOwnedGain*0.5;for _,a9 in ipairs(aB)do if not a9.Locked then if aH or a9.Gain<az then return a9 end;return nil end end;return nil end;
    function ah:IsRebirthReady()local av=self.Cache.PlayerData.Coins or 0;local aI=i:GetRebirthMeta(I.RebirthTarget)local H=aI.Cost/2;if next(self.Cache.MissingAnimals)then return false end;return av>=H end;
    return ah 
end;

a["AutoRebirth/Manager"]=function()
    local v=require("Core/Services")
    local I=require("Core/Config")
    local aJ=require("Core/GuiManager")
    local aK=require("Core/TaskManager")
    local ag=require("Data/RemoteData")
    local L=require("AutoRebirth/Actions")
    local aM=require("AutoRebirth/TaskQueue")
    local aN=require("AutoRebirth/Tasks")
    local ah=require("AutoRebirth/Analyzer")
    local aO={}
    function aO:EnableAntiRagdoll(T)local a0=T:WaitForChild("Humanoid")local aP=T:WaitForChild("HumanoidRootPart")local aQ={}table.insert(aQ,a0.StateChanged:Connect(function()local aR=a0:GetState()if aR==Enum.HumanoidStateType.Physics or aR==Enum.HumanoidStateType.Ragdoll or aR==Enum.HumanoidStateType.FallingDown then a0:ChangeState(Enum.HumanoidStateType.Running)for _,a7 in ipairs(T:GetDescendants())do if a7:IsA("BallSocketConstraint")or a7:IsA("BodyVelocity")then a7:Destroy()end end end end))local aS=v.Net:FindFirstChild("RE/CombatService/ApplyImpulse")if aS then table.insert(aQ,aS.OnClientEvent:Connect(function()pcall(function()aP.AssemblyLinearVelocity=Vector3.zero end)end))end;local aT=true;task.spawn(function()while aT do local aU=aP.AssemblyLinearVelocity;if aU.X*aU.X+aU.Y*aU.Y+aU.Z*aU.Z>2500 then aP.AssemblyLinearVelocity=Vector3.zero end;task.wait(0.1)end end)return function()aT=false;for _,aV in ipairs(aQ)do aV:Disconnect()end end end;
    function aO:StartAutoConfirm()aK:CreateTask("AutoConfirm",function()local ac=v.Players.LocalPlayer;while task.wait(0.5)do local aW=ac.PlayerGui:FindFirstChild("Confirmation",true)if aW then local aX=aW:FindFirstChild("Yes",true)local aY=pcall(function()return aW.Visible end)and aW.Visible;local aZ=pcall(function()return aW.Enabled end)and aW.Enabled;if aX and(aY or aZ)then pcall(firesignal,aX.MouseButton1Click)end end end end)end;
    function aO:Start()
        pcall(function()L:PatchSort()end)
        local a_;pcall(function()a_=L:QueryAll()end)
        pcall(function()self:StartAutoConfirm()end)
        local ac=v.Players.LocalPlayer;
        local T=ac.Character or ac.CharacterAdded:Wait()
        local b1=self:EnableAntiRagdoll(T)
        aJ:Set("Farming")
        local function b2()b1()if a_ then a_:Disconnect()end;aK:StopTask("AutoConfirm")end;
        local b3=ag:RequestData(ac)
        local aj=b3 and b3.LastPlot;
        if not aj then b2()return end;
        local W=workspace.Plots:WaitForChild(aj,30)
        if not W then b2()return end;
        pcall(function()L:DeleteLaser(W)end)
        pcall(function()L:LowerBase(W)end)
        aN:Init(aM,{Player=ac,PlotName=aj,BaseModel=W})
        local b4=false;
        task.spawn(function()
            while not b4 do 
                ah:Update({Player=ac,PlotName=aj})
                aJ:UpdateStats(string.format("Cash: <font color='#FFD700'>$%d</font> · GPS: <font color='#00FF00'>+%d</font> · Action: %s",ah.Cache.PlayerData.Coins or 0,ah.Cache.TotalGPS,aM:Status()))
                task.wait(1)
            end 
        end)
        while not b4 do 
            local b5=ag:RequestData(ac)
            if b5 and(b5.Rebirth or 0)>=I.RebirthTarget then b4=true end;
            task.wait(5)
        end;
        b2()
    end;
    return aO 
end;

a["AutoRebirth/TaskQueue"]=function()
    local b6=setthreadidentity or setidentity or set_thread_identity;
    local aM={CurrentTask=nil,Pending={}}
    function aM:Request(b7,b8)self.Pending[b7.Name]={Priority=b7.Priority or 0,Execute=b8}task.defer(function()self:Process()end)end;
    function aM:Process()if self.CurrentTask then return end;local b9,ba=nil,nil;for G,bb in pairs(self.Pending)do if not ba or bb.Priority>ba.Priority then b9=G;ba=bb end end;if b9 then self.Pending[b9]=nil;self.CurrentTask=b9;print("[TaskQueue] → "..b9)task.spawn(function()pcall(function()if b6 then b6(8)end end);local aa,bc=pcall(ba.Execute)if not aa then warn("[TaskQueue] "..b9 .." failed: "..tostring(bc))end;self.CurrentTask=nil;task.defer(function()self:Process()end)end)end end;
    function aM:Status()return self.CurrentTask or"Idle"end;
    return aM 
end;

a["AutoRebirth/Tasks"]=function()
    local I=require("Core/Config")
    local aJ=require("Core/GuiManager")
    local ag=require("Data/RemoteData")
    local af=require("Data/Carpet")
    local ah=require("AutoRebirth/Analyzer")
    local L=require("AutoRebirth/Actions")
    local aN={}
    function aN:Init(aM,ai)local function bd()ah:Update(ai)local be=ah.Cache.BaseData.BlockEndTime or 0;if be<os.time()then aM:Request({Name="LockBase",Priority=100},function()L:LockBase(ai.BaseModel)end)end;local b3=ah.Cache.PlayerData;if b3 and b3.LastPlot then local bf=b3.Coins or 0;if bf<I.LowCashThreshold and(ah.Cache.TotalPodiums or 0)==0 then aM:Request({Name="Rejoin",Priority=95},function()L:Rejoin()end)return end end;if ah:IsRebirthReady()then aM:Request({Name="Rebirth",Priority=90},function()aJ:Set("Rebirthing")L:DoRebirth()aJ:Set("Farming")end)return end;local bg=ah:GetBestPurchase()if bg then aM:Request({Name="Buy"..bg.Type,Priority=bg.Type=="Missing"and 80 or 70},function()L:Interact(bg.Instance,bg.Prompt)end)return end;if ah.Cache.NeedsMoreRoom then local bh=ah:GetPodiumToSell()if bh then aM:Request({Name="Sell",Priority=75},function()L:Interact(bh.Podium,bh.Prompt)end)end end end;local ac=ai.Player;local aj=ai.PlotName;ag:OnChanged(ac.Name,"Coins",bd)ag:OnChanged(aj,"BlockEndTime",bd)ag:OnChanged(aj,"AnimalList",bd)af:Subscribe(bd)task.spawn(function()while true do task.wait(15)aM:Request({Name="Collect",Priority=60},function()L:Collect(ai.BaseModel,ah.Cache.BaseData and ah.Cache.BaseData.AnimalList)end)end end)task.spawn(function()while true do local bi=os.date("*t").min;if bi<5 or bi>30 and bi<35 then aM:Request({Name="SpinWheel",Priority=85},function()L:SpinWheel()end)end;task.wait(10)end end)task.spawn(function()while true do task.wait(10)if aM:Status()=="Idle"then bd()end end end)end;
    return aN
end;

a["Core/ClientOptimizer"]=function()
    local dR={}
    function dR:Apply(dS)pcall(function()local dT=game:GetService("Lighting")local dU=game:GetService("SoundService")settings().Rendering.QualityLevel=Enum.QualityLevel.Level01;settings().Rendering.MeshPartDetailLevel=Enum.MeshPartDetailLevel.Level01;settings().Physics.ThrottleAdjustTime=0;local dV={[dT]={["Technology"]=Enum.Technology.Compatibility,["EnvironmentDiffuseScale"]=0,["EnvironmentSpecularScale"]=0,["GlobalShadows"]=false,["FogEnd"]=9e9,["Brightness"]=0},[workspace]={["LevelOfDetail"]=Enum.ModelLevelOfDetail.Disabled},[dU]={["RespectFilteringEnabled"]=false}}for Instance,dW in pairs(dV)do for dX,u in pairs(dW)do if sethiddenproperty then pcall(sethiddenproperty,Instance,dX,u)end end end;workspace.LevelOfDetail=Enum.ModelLevelOfDetail.Disabled;dU.RespectFilteringEnabled=false;dT.GlobalShadows=false;dT.FogEnd=9e9;dT.Brightness=0;dT:ClearAllChildren()pcall(function()local dY=workspace:FindFirstChildOfClass("Terrain")if dY then dY.WaterWaveSize=0;dY.WaterReflectance=0;dY.WaterTransparency=0;dY:Clear()end end)if not dS then return end;local dZ={Road=true,RenderedMovingAnimals=true,Debris=true}local d_={Texture=function(dF)dF.Texture=""end,Decal=function(dF)dF.Texture=""end,ImageLabel=function(dF)dF.Image=""end,ImageButton=function(dF)dF.Image=""end,MeshPart=function(dF)dF.TextureID=""end,SpecialMesh=function(dF)dF.TextureId=""end,Sky=function(dF)dF:Destroy()end,ParticleEmitter=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end,Trail=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end,Beam=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end,Fire=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end,Sparkles=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end,Smoke=function(dF)dF.Enabled=false;pcall(dF.Destroy,dF)end}local function e0(Instance)local e1=d_[Instance.ClassName]if e1 then e1(Instance)end end;local e2={}for e3 in pairs(dZ)do local Instance=workspace:WaitForChild(e3,2)if Instance then for _,e4 in ipairs(Instance:GetDescendants())do table.insert(e2,e4)end;Instance.DescendantAdded:Connect(function(e4)table.insert(e2,e4)end)end end;task.spawn(function()while true do if#e2>0 then local e5=math.clamp(math.ceil(#e2/5),1,200)for _=1,e5 do local e4=table.remove(e2)if e4 then e0(e4)end end end;task.wait()end end)end)end;
    return dR
end;

a["Core/LowMode"]=function()
    -- ★ LOW / CPU BOOST bổ sung (chạy SAU ClientOptimizer). Nhắm 2 thứ tốn CPU NHẤT mà tắt-3D KHÔNG cứu:
    --   (1) Animation: Animator vẫn step dù không render → tắt anim của NGƯỜI KHÁC + thú băng chuyền.
    --   (2) Âm thanh: Sound vẫn giải mã tốn CPU → mute toàn bộ.
    --   ⚠ KHÔNG đụng character của MÌNH (giữ pathfinding/jump), KHÔNG xoá model thú (cần ProximityPrompt để mua).
    local v=require("Core/Services")
    local LM={Conns={}}
    local function track(c) if c then table.insert(LM.Conns,c) end end
    local function muteSound(s) if s:IsA("Sound") then pcall(function() s.Volume=0;s.Playing=false end) end end
    -- clean 1 model: tắt Animate script + stop anim + mute sound (GIỮ model + prompt nguyên vẹn)
    local function clean(m,muteAudio,killAnim)
        if not m then return end
        pcall(function()
            if killAnim then
                local an=m:FindFirstChild("Animate")
                if an and an:IsA("BaseScript") then an.Disabled=true end
                for _,d in ipairs(m:GetDescendants()) do
                    if d:IsA("Animator") then for _,tr in ipairs(d:GetPlayingAnimationTracks()) do pcall(tr.Stop,tr,0) end end
                end
            end
            if muteAudio then for _,d in ipairs(m:GetDescendants()) do muteSound(d) end end
        end)
    end
    function LM:Apply(cfg)
        cfg=cfg or {}
        local muteAudio=cfg.MuteAudio~=false
        local killAnim=cfg.KillAnimations~=false
        if not (muteAudio or killAnim) then return end
        local me=v.Players.LocalPlayer
        -- 1) SoundService volume 0 (tắt master audio)
        if muteAudio then pcall(function()
            local SS=cloneref(game:GetService("SoundService"))
            SS.RespectFilteringEnabled=false
            if sethiddenproperty then pcall(sethiddenproperty,SS,"Volume",0) end
        end) end
        -- 2) quét workspace 1 LẦN mute sound có sẵn (không giữ connection blanket cho nhẹ)
        if muteAudio then pcall(function() for _,d in ipairs(workspace:GetDescendants()) do muteSound(d) end end) end
        -- 3) NGƯỜI KHÁC: tắt anim + mute (KHÔNG đụng mình); hook character mới
        local function hookPlayer(p)
            if p==me then return end
            if p.Character then clean(p.Character,muteAudio,killAnim) end
            track(p.CharacterAdded:Connect(function(c) task.wait(0.3) clean(c,muteAudio,killAnim) end))
        end
        for _,p in ipairs(v.Players:GetPlayers()) do hookPlayer(p) end
        track(v.Players.PlayerAdded:Connect(hookPlayer))
        -- 4) thú băng chuyền (RenderedMovingAnimals): tắt anim + mute, GIỮ model để vẫn mua được
        local rma=workspace:FindFirstChild("RenderedMovingAnimals")
        if rma then
            for _,m in ipairs(rma:GetChildren()) do clean(m,muteAudio,killAnim) end
            track(rma.ChildAdded:Connect(function(m) task.wait(0.2) clean(m,muteAudio,killAnim) end))
        end
    end
    return LM
end;

a["Core/Config"]=function()
    local cfg = getgenv().RebirthConfig or {}
    local I={}
    I.RelayUrl="http://127.0.0.1:3000"
    I.Webhook= cfg.Webhook or ""
    I.PlaceId=109983668079237;
    I.ValueThreshold=1000;
    I.NewPlayerThreshold=10000000;
    I.MinimumGain=10000000;
    I.MoonValueMaxAge=1800;
    I.RebirthTarget = cfg.TargetRebirth or 1;
    I.MaxPodiums=10;
    I.LowCashThreshold=25;
    I.PromptRetries=3;
    I.RebirthRetries=5;
    I.ActionTimeout=60;
    I.RebirthTimeout = cfg.RebirthTimeout or 1800;
    I.StartupDelay=getgenv().StartupDelay or 10;
    I.SetStartupDelay=300;
    return I
end;

a["Core/GuiManager"]=function()
    local v=require("Core/Services")
    local aJ={Gui=nil,CurrentState=nil,States={Waiting={BackgroundColor=Color3.fromRGB(25,42,86),TextColor=Color3.fromRGB(235,245,255),StrokeColor=Color3.fromRGB(10,20,40),Text="Waiting.."},Teleporting={BackgroundColor=Color3.fromRGB(22,160,133),TextColor=Color3.fromRGB(240,255,250),StrokeColor=Color3.fromRGB(5,60,50),Text="Teleporting.."},TeleportFailed={BackgroundColor=Color3.fromRGB(192,57,43),TextColor=Color3.fromRGB(255,240,240),StrokeColor=Color3.fromRGB(90,10,10),Text="Teleport Failed."},ShuttingDown={BackgroundColor=Color3.fromRGB(146,43,33),TextColor=Color3.fromRGB(255,240,240),StrokeColor=Color3.fromRGB(70,15,15),Text="Leaving the game."},Processing={BackgroundColor=Color3.fromRGB(46,134,222),TextColor=Color3.fromRGB(240,250,255),StrokeColor=Color3.fromRGB(20,60,120),Text="Processing.."},GettingServer={BackgroundColor=Color3.fromRGB(243,156,18),TextColor=Color3.fromRGB(255,250,240),StrokeColor=Color3.fromRGB(100,70,15),Text="Getting Servers.."},ServerReceived={BackgroundColor=Color3.fromRGB(243,156,18),TextColor=Color3.fromRGB(255,250,240),StrokeColor=Color3.fromRGB(100,70,15),Text="Servers Received."},Farming={BackgroundColor=Color3.fromRGB(138,49,221),TextColor=Color3.fromRGB(240,255,245),StrokeColor=Color3.fromRGB(20,80,40),Text="Farming.."},Rebirthing={BackgroundColor=Color3.fromRGB(142,68,173),TextColor=Color3.fromRGB(250,240,255),StrokeColor=Color3.fromRGB(60,20,80),Text="Rebirthing.."},Camping={BackgroundColor=Color3.fromRGB(39,60,117),TextColor=Color3.fromRGB(245,245,255),StrokeColor=Color3.fromRGB(15,30,60),Text="Camping..", Transparency=0.5}}}
    function aJ:Start()if not self.Gui then local e8=Instance.new("ScreenGui",gethui and gethui()or cloneref(game:GetService("CoreGui")))e8.DisplayOrder=99999;e8.IgnoreGuiInset=true;local e9=Instance.new("Frame",e8)e9.ZIndex=99999;e9.Position=UDim2.new(0,0,0,0)e9.Size=UDim2.new(1,0,1,0)e9.BackgroundColor3=Color3.fromRGB(0,0,0)e9.BackgroundTransparency=1;local ea=Instance.new("TextLabel",e9)ea.ZIndex=99999;ea.AnchorPoint=Vector2.new(0.5,0.5)ea.Position=UDim2.new(0.5,0,0.45,0)ea.Size=UDim2.new(0.6,0,0.1,0)ea.BackgroundTransparency=1;ea.TextColor3=Color3.fromRGB(255,255,255)ea.TextTransparency=1;ea.Font=Enum.Font.Gotham;ea.TextScaled=true;ea.RichText=true;ea.Text="Loading.."local eb=Instance.new("UIStroke")eb.Thickness=3;eb.Color=Color3.fromRGB(255,255,255)eb.Parent=ea;local ec=Instance.new("TextLabel",e9)ec.ZIndex=99999;ec.AnchorPoint=Vector2.new(0.5,0.5)ec.Position=UDim2.new(0.5,0,0.6,0)ec.Size=UDim2.new(0.8,0,0.05,0)ec.BackgroundTransparency=1;ec.TextColor3=Color3.fromRGB(255,255,255)ec.Font=Enum.Font.Code;ec.TextSize=18;ec.RichText=true;ec.Text=""local et=Instance.new("TextButton")et.Name="HideToggle"et.ZIndex=2147483647;et.AnchorPoint=Vector2.new(1,0)et.Position=UDim2.new(1,-10,0,10)et.Size=UDim2.new(0,110,0,34)et.BackgroundColor3=Color3.fromRGB(35,35,45)et.BackgroundTransparency=0.1;et.AutoButtonColor=true;et.TextColor3=Color3.fromRGB(255,255,255)et.Font=Enum.Font.GothamBold;et.TextSize=15;et.Text="Hide UI"et.Active=true;et.Selectable=true;local etc=Instance.new("UICorner")etc.CornerRadius=UDim.new(0,8)etc.Parent=et;local ets=Instance.new("UIStroke")ets.Thickness=2;ets.Color=Color3.fromRGB(255,255,255)ets.Transparency=0.5;ets.Parent=et;et.Parent=e8;et.MouseButton1Click:Connect(function()local vis=not e9.Visible;e9.Visible=vis;et.Text=vis and"Hide UI"or"Show UI"et.BackgroundColor3=vis and Color3.fromRGB(35,35,45)or Color3.fromRGB(45,120,60)end)self.Gui={ScreenGui=e8,Frame=e9,TextLabel=ea,Stroke=eb,Stats=ec,ToggleBtn=et}end end;
    function aJ:Set(ed,ee)local aR=self.States[ed]if not aR or not self.Gui then return end;self.Gui.Frame.BackgroundTransparency=0;self.Gui.TextLabel.TextTransparency=0;self.Gui.Frame.BackgroundColor3=aR.BackgroundColor;self.Gui.TextLabel.TextColor3=aR.TextColor;self.Gui.Stroke.Color=aR.StrokeColor;self.Gui.TextLabel.Text=aR.Text;self.Gui.Stats.Text=""if ee then self.Gui.Stats.Text=ee end;self.CurrentState=ed end;
    function aJ:UpdateStats(ee)if self.Gui then self.Gui.Stats.Text=ee end end;
    function aJ:GetState()return self.CurrentState end;
    function aJ:HideAll()pcall(function()v.StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.All,false)for _,aW in pairs(v.Players.LocalPlayer.PlayerGui:GetChildren())do if aW:IsA("ScreenGui")then aW.Enabled=false end;task.wait()end end)if not self.ClearConn then local ef=false;self.ClearConn=v.GuiService.ErrorMessageChanged:Connect(function()if getgenv().__KaitunKicking then return end;if ef then return end;ef=true;v.GuiService:ClearError()ef=false end)end end;
    return aJ 
end;

a["Core/Pathfinding"]=function()
    local v=require("Core/Services")
    local J={IsMoving=false,StopSignal=false}
    function J:GetTargetPos(Q)if typeof(Q)=="Vector3"then return Q end;if not Q then return nil end;if Q:IsA("BasePart")then return Q.Position end;if Q:IsA("Attachment")then return Q.WorldPosition end;if Q:IsA("ProximityPrompt")then local eg=Q.Parent;if eg:IsA("BasePart")then return eg.Position end;if eg:IsA("Attachment")then return eg.WorldPosition end;if eg:IsA("Model")or eg:IsA("PVInstance")then return eg:GetPivot().Position end end;if Q:IsA("Model")or Q:IsA("PVInstance")then return Q:GetPivot().Position end;return nil end;
    function J:Stop()self.StopSignal=true;self.IsMoving=false end;
    function J:MoveTo(Q,eh)eh=eh or 4;local ei,ej=20,os.clock()self.StopSignal=false;self.IsMoving=true;for _=1,eh do local ac=v.Players.LocalPlayer;local T=ac.Character;local a0=T and T:FindFirstChild("Humanoid")local aP=T and T:FindFirstChild("HumanoidRootPart")if not a0 or not aP then break end;while os.clock()-ej<ei and not self.StopSignal do local ek=self:GetTargetPos(Q)if not ek then break end;local el=(aP.Position-ek).Magnitude;if el<=7 then self.IsMoving=false;return true end;if el<30 then a0:MoveTo(ek)task.wait(0.1)else local d=v.PathfindingService:CreatePath({AgentRadius=3,AgentHeight=6,AgentCanJump=true})local bX=pcall(function()d:ComputeAsync(aP.Position,ek)end)if bX and d.Status==Enum.PathStatus.Success then local em=d:GetWaypoints()for en=2,#em do if self.StopSignal or(aP.Position-ek).Magnitude<25 then break end;local eo=em[en]if eo.Action==Enum.PathWaypointAction.Jump then a0.Jump=true end;a0:MoveTo(eo.Position)local ep=os.clock()while(aP.Position-eo.Position).Magnitude>4 and os.clock()-ep<1.5 do if self.StopSignal then break end;task.wait(0.1)end end end;task.wait(0.2)end end;if self.StopSignal then break end;task.wait(0.5)end;self.IsMoving=false;return false end;
    return J 
end;

a["Core/Prompts"]=function()
    local K={}
    function K:FindPromptByKeyCode(Instance,eq)if not Instance then return nil end;for _,er in ipairs(Instance:GetDescendants())do if er:IsA("ProximityPrompt")and er.KeyboardKeyCode==eq then return er end end;return nil end;
    function K:FirePrompt(R,eh)if not R or not R:IsA("ProximityPrompt")then return false end;pcall(function()R.RequiresLineOfSight=false;R.MaxActivationDistance=math.max(R.MaxActivationDistance or 10,30)end)for _=1,eh or 1 do if fireproximityprompt then pcall(fireproximityprompt,R,R.HoldDuration or 1)else R:InputHoldBegin()task.wait((R.HoldDuration or 0)+0.1)R:InputHoldEnd()end;task.wait(0.1)end;return true end;
    return K 
end;

a["Core/Services"]=function()
    local bk=game:GetService("ReplicatedStorage")
    local v={Players=cloneref(game:GetService("Players")),TeleportService=cloneref(game:GetService("TeleportService")),PathfindingService=cloneref(game:GetService("PathfindingService")),ReplicatedFirst=cloneref(game:GetService("ReplicatedFirst")),LogService=cloneref(game:GetService("LogService")),RunService=cloneref(game:GetService("RunService")),StarterGui=cloneref(game:GetService("StarterGui")),GuiService=cloneref(game:GetService("GuiService")),HttpService=cloneref(game:GetService("HttpService"))}
    function v:Init()local bS=bk:WaitForChild("Datas")local bT=bk:WaitForChild("Packages")local es=bk:WaitForChild("Controllers")local bY=bT:WaitForChild("Synchronizer")local et=es:WaitForChild("AnimalController")self.Net=bT:WaitForChild("Net")self.RequestDataRemote=bY:WaitForChild("RequestData")_,self.Synchronizer=pcall(require,bY)_,self.AnimalController=pcall(require,et)local c0={}for _,c2 in ipairs({"Animals","Mutations","Traits","Rebirth"})do local bX,eu=pcall(require,bS:WaitForChild(c2))c0[c2]=bX and eu or{}end;self.MetaTable=c0;self.RebirthRequirements={}for _,ev in pairs(c0.Rebirth)do if ev.Requirements and ev.Requirements.RequiredCharacters then for _,ew in pairs(ev.Requirements.RequiredCharacters)do self.RebirthRequirements[ew]=ev.RebirthNumber;self.RebirthRequirements[tostring(ew)]=ev.RebirthNumber;if typeof(ew)=="string"and tonumber(ew)then self.RebirthRequirements[tonumber(ew)]=ev.RebirthNumber end end end end end;
    return v 
end;

a["Core/TaskManager"]=function()
    local aK={ActiveTasks={},OnError=nil}
    function aK:CreateTask(G,bV)self:StopTask(G)local bW=task.spawn(function()local aa,bc=pcall(bV)if not aa and self.OnError then self.OnError(G,bc)end end)self.ActiveTasks[G]=bW;return bW end;
    function aK:StopTask(G)if self.ActiveTasks[G]then pcall(task.cancel,self.ActiveTasks[G])self.ActiveTasks[G]=nil end end;
    return aK 
end;

a["Data/Carpet"]=function()
    local v=require("Core/Services")
    local I=require("Core/Config")
    local j=require("Animal/Calculator")
    local af={SpawnConn=nil,DestroyConn=nil,SpawnCallbacks={},ChangeCallbacks={}}
    function af:Init()if not v.AnimalController then warn("Carpet: AnimalController not available")return end;if af.SpawnConn then af.SpawnConn:Disconnect()af.SpawnConn=nil end;if af.DestroyConn then af.DestroyConn:Disconnect()af.DestroyConn=nil end;af.SpawnConn=v.AnimalController.OnAnimalSpawn:Connect(function(t)if typeof(t)=="table"and t.Index then for _,eO in ipairs(af.SpawnCallbacks)do pcall(eO,t)end end;for _,eO in ipairs(af.ChangeCallbacks)do pcall(eO)end end)af.DestroyConn=v.AnimalController.OnAnimalDestroyed:Connect(function()for _,eO in ipairs(af.ChangeCallbacks)do pcall(eO)end end)end;
    function af:GetAnimals()return v.AnimalController:GetAnimals()end;
    function af:GetAnimalsWithRetry()local eP,eQ=nil,0;repeat eP=self:GetAnimals()if next(eP)then break end;task.wait(0.1)eQ=eQ+1 until next(eP)or eQ==10;return eP end;
    function af:Evaluate(q)local eu={}for _,t in pairs(q or{})do local bb=j:GetAnimalData(t,"Carpet")if bb then if bb.Gain>=I.MinimumGain or bb.Rebirth or bb.Value>=I.ValueThreshold then table.insert(eu,bb)end end end;return next(eu)and{Brainrots=eu}or nil end;
    function af:GetEvaluated()return self:Evaluate(self:GetAnimals())end;
    function af:OnSpawn(eR)table.insert(af.SpawnCallbacks,eR)end;
    function af:Subscribe(eR)table.insert(af.ChangeCallbacks,eR)end;
    return af 
end;

a["Data/RemoteData"]=function()
    local v=require("Core/Services")
    local ag={}
    function ag:RequestData(c4)local eS=v.Synchronizer;local c6=eS and eS:Get(c4)if typeof(c6)=="table"and c6.CacheTable then return c6.CacheTable end;local aa,eu=pcall(v.RequestDataRemote.InvokeServer,v.RequestDataRemote,c4)if aa and typeof(eu)=="table"then return eu end;return nil end;
    function ag:WaitForData(c4,c2,eT)local eU=0;eT=eT or 10;while eU<eT do local eV=self:RequestData(c4)if eV then if c2 then if eV[c2]~=nil then return eV end else return eV end end;eU=eU+1;task.wait(0.5)end;return nil end;
    function ag:GetChannel(c4)return v.Synchronizer and v.Synchronizer:Get(c4)end;
    function ag:OnChanged(c4,d,eR)local eW=self:GetChannel(c4)if eW then return eW:OnChanged(d,eR)end;return nil end;
    return ag 
end;

a["Network/Relay"]=function()
    local h={}
    function h:GetValue(f2,f3) return 0 end; 
    return h 
end;

a["Network/Webhook"]=function()
    local I=require("Core/Config")
    local v=require("Core/Services")
    local aL={}
    local fb={Message="",Size=0}
    local fc=0.25;
    function aL:Send(fd)if I.Webhook==""then return end;fb.Message=fb.Message..fd.."\n"fb.Size=fb.Size+1;if fb.Size==1 then task.spawn(function()task.wait(fc)local eE=fb.Message;fb.Message=""fb.Size=0;pcall(request,{Url=I.Webhook,Method="POST",Headers={["Content-Type"]="application/json"},Body=v.HttpService:JSONEncode({content=eE})})end)end end;
    return aL 
end;

-- ===================================================================
-- MAIN EXECUTION
-- ===================================================================
local fe=os.time()
local v=require("Core/Services")
local I=require("Core/Config")
local aK=require("Core/TaskManager")
local aJ=require("Core/GuiManager")
local ag=require("Data/RemoteData")
local af=require("Data/Carpet")
local dR=require("Core/ClientOptimizer")
local LM=require("Core/LowMode")
local ff=require("AutoRebirth/Manager")

local bX,bc=pcall(function()
    if not game:IsLoaded()then game.Loaded:Wait()end;
    local ac=game.Players.LocalPlayer or game.Players:GetPropertyChangedSignal("LocalPlayer"):Wait()and game.Players.LocalPlayer;
    v:Init()
    aJ:Start()
    aJ:HideAll()
    af:Init()
    
    v.LogService.MessageOut:Connect(function(fd,fh)
        if fh~=Enum.MessageType.MessageError then return end;
        local fi=fd:lower()
        if fi:find("not authorized")then 
            pcall(v.TeleportService.TeleportCancel,v.TeleportService)
            SafeKick(ac, "Captcha")
        end 
    end)
    
    local cfg = getgenv().RebirthConfig or {}
    local bb=ag:RequestData(ac)
    local fk=bb and bb.Rebirth or 0;
    local target = cfg.TargetRebirth or 1
    
    if fk < target then 
        if setfpscap then pcall(setfpscap, cfg.FPS or 15) end;
        
        if cfg.Disable3D then
            pcall(function()v.ReplicatedFirst:RemoveDefaultLoadingScreen()v.RunService:Set3dRenderingEnabled(false)end)
            dR:Apply(false)
        else
            dR:Apply(true)
        end

        pcall(function() LM:Apply(cfg) end)

        print("[AUTO REBIRTH] Starting to farm to Rebirth " .. tostring(target) .. "...")
        ff:Start() 
        
        print("[AUTO REBIRTH] Rebirth " .. tostring(target) .. " reached!")
        SafeKick(ac, "[SUCCESS] Account reached Rebirth " .. tostring(target) .. ".\nScript stopped to free RAM.")
    else
        SafeKick(ac, "[INFO] Account is already Rebirth " .. tostring(target) .. " or higher.\nNo need to run Auto Rebirth script.")
    end;
end)

if not bX then 
    warn("Boot failed: "..tostring(bc))
end;