-- Steal An Egg 1.2.2 — BobloNEXT UI migration -- Game modules and original control callbacks retained. -- Based exclusively on BobloNEXT/LLM-USAGE-PROMPT.md, 2026-10-18. -- Right Shift: toggle window. Ctrl + K: search. -- Configs and teleport cache require executor file APIs. local SCRIPT_SOURCE = [====[ -- Steal An Egg 1.2.2 — BobloNEXT UI migration -- Game modules and original control callbacks retained. -- Based exclusively on BobloNEXT/LLM-USAGE-PROMPT.md, 2026-10-18. -- Right Shift: toggle window. Ctrl + K: search. -- Configs and teleport cache require executor file APIs. repeat task.wait() until game:IsLoaded() local tbl tbl = { IsDetected = false, _unpack = function(arg, arg2, arg3) arg2 = arg2 or 1 arg3 = arg3 or #arg if arg2 > arg3 then return end return arg[arg2], tbl._unpack(arg, arg2 + 1, arg3) end, _pcall = function(arg, ...) local tbl2 = { ... } local ok, result = pcall(function() return arg(tbl._unpack(tbl2)) end) if not ok then return false, result end return true, result end, } local function fn() return true end local v, v2 = tbl._pcall(debug.info, fn, "f") if not v or v2 ~= fn then tbl.IsDetected = true LPH_CRASH() end local v3, v4 = tbl._pcall(debug.info, 2, "f") if not v3 or v4 ~= pcall then tbl.IsDetected = true LPH_CRASH() end local v5 = (cloneref or function(arg) return arg end)(game:GetService("RunService")) if v5:IsStudio() then tbl.IsDetected = true LPH_CRASH() end if v5:IsServer() then tbl.IsDetected = true LPH_CRASH() end if tbl.IsDetected then return end loadstring([[ function LPH_NO_VIRTUALIZE(f) return f end; function LPH_JIT_MAX(f) return f end; function LPH_JIT(f) return f end; function LPH_ENCNUM(n, ...) return n end; function LPH_ENCSTR(s, ...) return s end; function LPH_ENCFUNC(f, ...) return f end; function LPH_ENCBUF(b, ...) return b end; function LPH_ATTRIBUTES(...) end; function LPH_REWRITE(expr, ...) return expr end; function LPH_STACKALLOC(size, zeroOrOne) return {} end; function LPH_PRECHECK(...) end; function VM(...) end; function PRESET(...) end; function ENCRYPT(...) end; function OPTIMIZE(...) end; function ERROR_HANDLING(...) end; function TRANSFORM(...) end; NONE, OPAL, ONYX = 0, 1, 2; FAST, SECURE = 0, 1; CONTROL_FLOW, EXTRACT, INLINE, UNROLL, NO_UPVALUES, level = 0, 0, 0, 0, 0, 0; ]])() local function fn2() local function fn3() local v6 = cloneref local obj = setmetatable({}, { __mode = "v" }) return v6 and function(arg) if not arg then return nil end local debugId = arg:GetDebugId() or arg local v7 = obj[debugId] if v7 then return v7 end local v8 = v6(arg) obj[debugId] = v8 return v8 end or function(arg) return arg end end local v6 = fn3() local obj = setmetatable({}, { __index = function(arg, arg2) return v6(game:GetService(arg2)) end }) local players = obj.Players local replicatedStorage = obj.ReplicatedStorage local userInputService = obj.UserInputService local runService = obj.RunService local lighting = obj.Lighting local httpService = obj.HttpService local teleportService = obj.TeleportService local coreGui = obj.CoreGui local localPlayer = players.LocalPlayer local playerGui = localPlayer:WaitForChild("PlayerGui") local character = localPlayer.Character local humanoid = character and character:WaitForChild("Humanoid") or nil local humanoidRootPart = character and character:FindFirstChild("HumanoidRootPart") or nil local tbl2 = { Enabled = { IsTeleporting = false, ["Bypass Anti Teleport"] = true, ["Fast Switch Bat"] = true, ["Auto Treadmill"] = false, ["Auto Rift Sacrifice"] = false, ["Auto Reroll Rift Recipe"] = false, ["Prioritize Rift Recipe Eggs"] = false, ["Prioritize Rift Egg"] = false, }, Module = {}, Connections = {}, Cached = { Stuck = os.time(), JSON = {}, Count = { WalkSpeed = 0, NoClip = 0, Fail = 0 }, Image = {}, Temporary = {}, Task = {}, BlockedEggs = {}, }, Stored = { Data = {}, UI = {}, StateUpdate = {} }, } _G.LastAction = _G.LastAction or "Idle" local module = tbl2.Module local connections = tbl2.Connections local cached = tbl2.Cached local stored = tbl2.Stored local enabled = tbl2.Enabled -- BobloNEXT integration. Public APIs used here are documented in LLM-USAGE-PROMPT.md. local Runtime = { Unloaded = false, Ready = false, Paused = false, Bindings = {}, Defaults = {}, ConfigName = "StealAnEgg_" .. tostring(localPlayer.UserId), CachePath = "BobloNEXT-StealAnEgg.lua", QueueMarker = "BobloNEXT-StealAnEgg-autoload.txt", } local SOURCE_URL = "https://raw.githubusercontent.com/bobloscript/BobloNEXT/main/src.lua" local sourceOK, source = pcall(game.HttpGet, game, SOURCE_URL .. "?v=" .. tostring(os.clock())) if not sourceOK then error("[BobloNEXT] Library download failed: " .. tostring(source)) end local libraryChunk, libraryError = loadstring(source, "BobloNEXT") if not libraryChunk then error("[BobloNEXT] Library compile failed: " .. tostring(libraryError)) end local BobloNEXT = libraryChunk() Runtime.Library = BobloNEXT local function fn4(message, title) pcall(function() BobloNEXT:Notify({ Title = title or "Lennon hub", Text = tostring(message), Duration = 4 }) end) end function Runtime.Copy(text) local copy = setclipboard or toclipboard if not copy then fn4("Clipboard is unavailable in this executor.", "Clipboard") return end local ok, err = pcall(copy, text) if not ok then fn4(err, "Clipboard") end end function Runtime.Same(a, b) if type(a) ~= type(b) then return false end if type(a) ~= "table" then return a == b end if #a ~= #b then return false end for index, value in ipairs(a) do if value ~= b[index] then return false end end return true end function Runtime.Bind(parent, method, options) local callback = options.Callback local binding = { Method = method, Options = options, Callback = callback, HasValue = false } function binding.Apply(value, force) if Runtime.Unloaded or Runtime.Paused then return end if not force and binding.HasValue and Runtime.Same(binding.LastValue, value) then return end binding.LastValue = type(value) == "table" and table.clone(value) or value binding.HasValue = true local ok, err = pcall(callback, value) if not ok then warn("[BobloNEXT / " .. options.Text .. "] " .. tostring(err)) fn4(err, options.Text) end end options.Callback = function(value) -- Ignore a deferred notification for a value superseded by config loading. if binding.Control and not Runtime.Same(binding.Control:Get(), value) then return end if Runtime.Ready then binding.Apply(value) end end local control = parent[method](parent, options) binding.Control = control Runtime.Defaults[options.Flag] = type(options.Default) == "table" and table.clone(options.Default) or options.Default table.insert(Runtime.Bindings, binding) return control end function Runtime.ApplyControls() -- Restore filters and numeric settings before enabling automation. for _, toggles in ipairs({ false, true }) do for _, binding in ipairs(Runtime.Bindings) do if (binding.Method == "AddToggle") == toggles then binding.Apply(binding.Control:Get(), true) end end end end function Runtime.SaveConfig(quiet) local ran, ok, err = pcall(BobloNEXT.SaveConfig, BobloNEXT, Runtime.ConfigName) local success = ran and ok ~= false and ok ~= nil if not quiet then fn4(success and "Config saved." or tostring(ran and (err or "File APIs unavailable.") or ok), "Config") end return success end function Runtime.LoadConfig(quiet) Runtime.Paused = true local ran, ok, err = pcall(BobloNEXT.LoadConfig, BobloNEXT, Runtime.ConfigName) Runtime.Paused = false if Runtime.Ready then Runtime.ApplyControls() end local success = ran and ok ~= false and ok ~= nil if not quiet then fn4(success and "Config loaded." or tostring(ran and (err or "No saved config.") or ok), "Config") end return success end function Runtime.Queue(enabledNow) local queue = queue_on_teleport or queueonteleport or (syn and syn.queue_on_teleport) if type(writefile) ~= "function" then if enabledNow then fn4("Auto execute requires executor file APIs.", "Auto Execute") end return false end local wrote, writeError = pcall(writefile, Runtime.QueueMarker, enabledNow and "1" or "0") if not wrote then if enabledNow then fn4(writeError, "Auto Execute") end return false end if not enabledNow then return true end if type(queue) ~= "function" or type(isfile) ~= "function" or type(readfile) ~= "function" then fn4("Auto execute requires queue_on_teleport, isfile and readfile.", "Auto Execute") return false end local cachedOK, exists = pcall(isfile, Runtime.CachePath) if not cachedOK or not exists then fn4("Local script cache is unavailable. Run the complete downloaded script again.", "Auto Execute") return false end Runtime.SaveConfig(true) local queued, err = pcall(queue, string.format([[ local env = (getgenv and getgenv()) or _G if not env.__BobloNEXTStealAnEggAutoload and isfile and readfile and isfile(%q) and readfile(%q) == "1" and isfile(%q) then env.__BobloNEXTStealAnEggAutoload = true local chunk, compileError = loadstring(readfile(%q), "StealAnEgg-BobloNEXT") if chunk then chunk() else warn(compileError) end end ]], Runtime.QueueMarker, Runtime.QueueMarker, Runtime.CachePath, Runtime.CachePath)) if not queued then fn4(err, "Auto Execute") end return queued end function Runtime.Plain(text) return tostring(text or ""):gsub("<[^>]+>", ""):gsub("<", "<"):gsub(">", ">"):gsub("&", "&") end function Runtime.LiveReport(parent, title, initialText) -- The supplied prompt does not document paragraph update methods. -- Use documented Textbox:Set/Get for live, paginated reports instead. parent:AddParagraph({ Title = title, Text = "Live report. Browse pages or copy the full report." }) local report = { Title = title, Text = "", Page = 1, Lines = {}, Fields = {} } local pageField = parent:AddTextbox({ Text = "Report page", Default = "1 / 1" }) for index = 1, 6 do report.Fields[index] = parent:AddTextbox({ Text = "Line " .. tostring(index), Default = "" }) end function report.Render() local pages = math.max(1, math.ceil(#report.Lines / 6)) report.Page = math.clamp(report.Page, 1, pages) local pageText = report.Title .. " | " .. tostring(report.Page) .. " / " .. tostring(pages) if pageField:Get() ~= pageText then pageField:Set(pageText) end for index, field in ipairs(report.Fields) do local line = report.Lines[(report.Page - 1) * 6 + index] or "" if field:Get() ~= line then field:Set(line) end end end function report:Set(data) self.Title = tostring(data.Title or data[1] or self.Title) self.Text = Runtime.Plain(data.Text or data.Content or data[2] or "") self.Lines = string.split(self.Text, "\n") self.Render() end parent:AddButton({ Text = "Previous report page", Icon = "Lucide:chevron-left", Callback = function() report.Page = report.Page - 1 report.Render() end }) parent:AddButton({ Text = "Next report page", Icon = "Lucide:chevron-right", Callback = function() report.Page = report.Page + 1 report.Render() end }) parent:AddButton({ Text = "Copy full report", Icon = "Lucide:copy", Callback = function() Runtime.Copy(report.Title .. "\n" .. report.Text) end }) report:Set({ Title = title, Text = initialText }) return report end local fn6 = firesignal or getconnections and function(arg) for _, v7 in getconnections(arg) do if v7.Function then task.spawn(v7.Function) end end end or function() end local function fn7() local function fn8() return { Connections = function(arg, arg2, arg3) local connection = nil connection = arg:Connect(function(...) if Runtime.Unloaded then if connection then connection:Disconnect() end return end local ok, result = pcall(arg2, ...) if not ok then fn4(result, "") end end) if arg3 then connections[arg3] = connection end return connection end, Disconnect = function(arg) if connections[arg] then connections[arg]:Disconnect() connections[arg] = nil end end, StartLoop = function(arg, arg2) while not Runtime.Unloaded do if enabled[arg] then local ok, result = pcall(arg2) if not ok then fn4(result, arg) end end task.wait(0) end end, Fallback = function(arg, arg2, arg3) local n = cached.Count[arg2] or 0 if arg ~= nil then n += 1 cached.Count[arg2] = n end if n > 1 then if not enabled[arg2] then arg3() end end end, Notify = function(arg, arg2, arg3) pcall(function() game:GetService("StarterGui"):SetCore("SendNotification", { Title = tostring(arg or "Notice"), Text = tostring(arg2 or ""), Icon = "rbxassetid://0", Duration = arg3 or 4, }) end) end, } end local tbl4 = { Webhook = function(arg, arg2) local request_ = request or syn and syn.request or http and http.request or fluxus and fluxus.request or http_request if not request_ then return end request_({ Url = arg, Body = httpService:JSONEncode(arg2), Method = "POST", Headers = { ["Content-Type"] = "application/json" }, }) end, Utils = fn8(), } local function fn9() local tbl5 tbl5 = { Logs = {}, MaxLogs = 30, CurrentState = "IDLE_STANDBY", SubAction = "Initializing", ActiveTarget = "None", MovementOwner = "None", Timeouts = 0, Retries = 0, SuccessClaims = 0, Gui = nil, Fps = 60, Ping = 0, LastFpsUpdate = os.clock(), FrameCount = 0, Log = function(arg, arg2) if not arg or arg == "" then return end arg2 = arg2 or "INFO" local str = string.format("[%s] [%s] %s", os.date("%X"), arg2 == "STEAL" and "#00FF7F" or arg2 == "SAKURA" and "#FF69B4" or arg2 == "PLACE" and "#6495ED" or arg2 == "TREADMILL" and "#FFD700" or arg2 == "SELL" and "#FFA500" or arg2 == "FUSE" and "#BA55D3" or arg2 == "NAV" and "#00CED1" or arg2 == "ACTION" and "#00BFFF" or "#AAAAAA", arg2, tostring(arg)) table.insert(tbl5.Logs, 1, str) if #tbl5.Logs > tbl5.MaxLogs then table.remove(tbl5.Logs) end end, } local v7 = nil task.spawn(function() while true do local lastAction = _G.LastAction if lastAction and lastAction ~= "" and lastAction ~= v7 then v7 = lastAction local str if string.find(lastAction, "^Steal") then str = "STEAL" elseif string.find(lastAction, "^Sakura") then str = "SAKURA" elseif string.find(lastAction, "^Place") or string.find(lastAction, "^Pen") then str = "PLACE" elseif string.find(lastAction, "^Treadmill") then str = "TREADMILL" elseif string.find(lastAction, "^SafeZone") or string.find(lastAction, "^Nav") then str = "NAV" elseif string.find(lastAction, "^Sell") then str = "SELL" else str = "ACTION" if string.find(lastAction, "^Fuse") then str = "FUSE" end end tbl5.Log(lastAction, str) tbl5.SubAction = lastAction end task.wait(0.05) end end) tbl5.SetState = function(arg, arg2, arg3) if arg then tbl5.CurrentState = tostring(arg) end if arg2 then tbl5.SubAction = tostring(arg2) _G.LastAction = tostring(arg2) end if arg3 then tbl5.ActiveTarget = tostring(arg3) end end tbl5.CreateGui = function() if tbl5.Gui then return tbl5.Gui end local ok = pcall(function() return coreGui end) and coreGui or playerGui local screenGui = Instance.new("ScreenGui") screenGui.Name = "SHX_DebugInspector" screenGui.ResetOnSpawn = false screenGui.DisplayOrder = 9999 screenGui.Enabled = enabled["Debug Inspector"] or false local frame = Instance.new("Frame") frame.Name = "MainFrame" frame.Size = UDim2.fromOffset(360, 290) frame.Position = UDim2.new(0.02, 0, 0.2, 0) frame.BackgroundColor3 = Color3.fromRGB(16, 18, 24) frame.BackgroundTransparency = 0.15 frame.BorderSizePixel = 0 frame.Active = true frame.Draggable = true frame.Parent = screenGui local uiCorner = Instance.new("UICorner") uiCorner.CornerRadius = UDim.new(0, 8) uiCorner.Parent = frame local uiStroke = Instance.new("UIStroke") uiStroke.Color = Color3.fromRGB(0, 206, 209) uiStroke.Thickness = 1.2 uiStroke.Parent = frame local textLabel = Instance.new("TextLabel") textLabel.Size = UDim2.new(1, -20, 0, 28) textLabel.Position = UDim2.new(0, 10, 0, 4) textLabel.BackgroundTransparency = 1 textLabel.Font = Enum.Font.GothamBold textLabel.TextSize = 13 textLabel.TextColor3 = Color3.fromRGB(0, 255, 127) textLabel.TextXAlignment = Enum.TextXAlignment.Left textLabel.Text = "⚡ Lennon hub - DEBUG INSPECTOR" textLabel.Parent = frame local textLabel2 = Instance.new("TextLabel") textLabel2.Name = "StatsLabel" textLabel2.Size = UDim2.new(1, -20, 0, 100) textLabel2.Position = UDim2.new(0, 10, 0, 32) textLabel2.BackgroundColor3 = Color3.fromRGB(24, 28, 38) textLabel2.BackgroundTransparency = 0.5 textLabel2.Font = Enum.Font.Code textLabel2.TextSize = 11 textLabel2.TextColor3 = Color3.fromRGB(220, 230, 240) textLabel2.TextXAlignment = Enum.TextXAlignment.Left textLabel2.TextYAlignment = Enum.TextYAlignment.Top textLabel2.RichText = true textLabel2.Text = "Loading inspector data..." textLabel2.Parent = frame local uiCorner2 = Instance.new("UICorner") uiCorner2.CornerRadius = UDim.new(0, 6) uiCorner2.Parent = textLabel2 local scrollingFrame = Instance.new("ScrollingFrame") scrollingFrame.Name = "LogBox" scrollingFrame.Size = UDim2.new(1, -20, 0, 116) scrollingFrame.Position = UDim2.new(0, 10, 0, 136) scrollingFrame.BackgroundColor3 = Color3.fromRGB(12, 14, 20) scrollingFrame.BackgroundTransparency = 0.4 scrollingFrame.BorderSizePixel = 0 scrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 0) scrollingFrame.AutomaticCanvasSize = Enum.AutomaticSize.Y scrollingFrame.ScrollBarThickness = 4 scrollingFrame.Parent = frame local uiCorner3 = Instance.new("UICorner") uiCorner3.CornerRadius = UDim.new(0, 6) uiCorner3.Parent = scrollingFrame local textLabel3 = Instance.new("TextLabel") textLabel3.Name = "LogContent" textLabel3.Size = UDim2.new(1, -8, 1, 0) textLabel3.Position = UDim2.new(0, 4, 0, 4) textLabel3.BackgroundTransparency = 1 textLabel3.Font = Enum.Font.Code textLabel3.TextSize = 10 textLabel3.TextColor3 = Color3.fromRGB(180, 200, 220) textLabel3.TextXAlignment = Enum.TextXAlignment.Left textLabel3.TextYAlignment = Enum.TextYAlignment.Top textLabel3.AutomaticSize = Enum.AutomaticSize.Y textLabel3.TextWrapped = true textLabel3.RichText = true textLabel3.Text = "Logs initialized." textLabel3.Parent = scrollingFrame local textButton = Instance.new("TextButton") textButton.Size = UDim2.new(0.48, -10, 0, 22) textButton.Position = UDim2.new(0, 10, 0, 258) textButton.BackgroundColor3 = Color3.fromRGB(40, 45, 60) textButton.Font = Enum.Font.GothamBold textButton.TextSize = 11 textButton.TextColor3 = Color3.fromRGB(255, 100, 100) textButton.Text = "Clear Logs" textButton.Parent = frame local uiCorner4 = Instance.new("UICorner") uiCorner4.CornerRadius = UDim.new(0, 4) uiCorner4.Parent = textButton textButton.MouseButton1Click:Connect(function() tbl5.Logs = {} textLabel3.Text = "Logs cleared." end) local textButton2 = Instance.new("TextButton") textButton2.Size = UDim2.new(0.48, -10, 0, 22) textButton2.Position = UDim2.new(0.52, 0, 0, 258) textButton2.BackgroundColor3 = Color3.fromRGB(40, 45, 60) textButton2.Font = Enum.Font.GothamBold textButton2.TextSize = 11 textButton2.TextColor3 = Color3.fromRGB(100, 220, 255) textButton2.Text = "Copy Logs" textButton2.Parent = frame local uiCorner5 = Instance.new("UICorner") uiCorner5.CornerRadius = UDim.new(0, 4) uiCorner5.Parent = textButton2 textButton2.MouseButton1Click:Connect(function() local tbl6 = {} for _, log in ipairs(tbl5.Logs) do local v8 = string.gsub(log, "<[^>]+>", "") table.insert(tbl6, v8) end local str = table.concat(tbl6, "\n") if setclipboard then setclipboard(str) fn4("Logs copied to clipboard!", "Debug Inspector") end end) screenGui.Parent = ok tbl5.Gui = screenGui task.spawn(function() while true do if screenGui and screenGui.Enabled then tbl5.FrameCount = tbl5.FrameCount + 1 local now = os.clock() if now - tbl5.LastFpsUpdate >= 1 then tbl5.Fps = tbl5.FrameCount / (now - tbl5.LastFpsUpdate) tbl5.FrameCount = 0 tbl5.LastFpsUpdate = now pcall(function() local serverStatsItem = game:GetService("Stats").Network.ServerStatsItem serverStatsItem = serverStatsItem and serverStatsItem["Data Ping"] tbl5.Ping = serverStatsItem and math.round(serverStatsItem:GetValue()) or 0 end) end textLabel2.Text = string.format([[ STATE: %s | FPS: %d | PING: %dms ACTION: %s TARGET: %s STATS: Claimed: %d | Timeouts: %d | Retries: %d LOCK OWNER: %s]], tbl5.CurrentState == "STEALING" and "#00FF7F" or tbl5.CurrentState == "BOSS_FIGHT" and "#FF4500" or tbl5.CurrentState == "BOSS_PORTAL_ENTER" and "#9370DB" or tbl5.CurrentState == "SAKURA_FARM" and "#FF69B4" or tbl5.CurrentState == "PLACE_EGG" and "#6495ED" or tbl5.CurrentState == "TREADMILL" and "#FFD700" or tbl5.CurrentState == "EMERGENCY_SAFEZONE" and "#FF4500" or "#AAAAAA", tbl5.CurrentState, tbl5.Fps, tbl5.Ping, tbl5.SubAction, tbl5.ActiveTarget, tbl5.SuccessClaims or 0, tbl5.Timeouts or 0, tbl5.Retries or 0, tbl4.Movement and tbl4.Movement.GetOwner and tbl4.Movement.GetOwner() or "None") if #tbl5.Logs == 0 then textLabel3.Text = "No action logs yet..." else textLabel3.Text = table.concat(tbl5.Logs, "\n") end end task.wait(0.08) end end) return screenGui end tbl5.SetVisible = function(enabled2) local v8 = tbl5.CreateGui() if v8 then v8.Enabled = enabled2 end end return tbl5 end tbl4.DebugInspector = fn9() local function fn10() local currentCamera = workspace.CurrentCamera local contextActionService = obj.ContextActionService local flag = false local function fn11(arg) if not arg or not arg.Parent then return end pcall(function() arg:SetStateEnabled(Enum.HumanoidStateType.FallingDown, false) arg:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, false) arg:SetStateEnabled(Enum.HumanoidStateType.Physics, false) end) end local function fn12(arg) if not arg or not arg.Parent then return end for _, descendant in ipairs(arg:GetDescendants()) do if (descendant:IsA("BallSocketConstraint") or descendant:IsA("HingeConstraint")) and descendant.Name:find("RagdollConstraint") then pcall(descendant.Destroy, descendant) elseif descendant:IsA("Motor6D") and not descendant.Enabled then descendant.Enabled = true end end end local function fn13(arg) if connections.AntiKnockbackAdded then connections.AntiKnockbackAdded:Disconnect() connections.AntiKnockbackAdded = nil end connections.AntiKnockbackAdded = arg.DescendantAdded:Connect(function(descendant) if not enabled["Anti Knockback / Ragdoll"] then return end if (descendant:IsA("BallSocketConstraint") or descendant:IsA("HingeConstraint")) and descendant.Name:find("RagdollConstraint") then task.defer(function() if descendant and descendant.Parent then pcall(descendant.Destroy, descendant) end end) elseif descendant:IsA("Motor6D") then task.defer(function() if descendant and descendant.Parent and not descendant.Enabled then descendant.Enabled = true end end) end end) end local function fn14() if flag or not hookfunction then return end flag = true pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes local Remotes_ if remotes then Remotes_ = remotes else Remotes_ = ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) end local refresh = Remotes_ and Remotes_.RigSync and Remotes_.RigSync.Refresh if not refresh then return end local tbl5 = getconnections and getconnections(refresh.OnClientEvent) or {} for _, v7 in ipairs(tbl5) do local function_ = v7.Function if function_ and type(function_) == "function" then local info = debug.info and debug.info(function_, "s") or "" if info:find("ContentCatalog") or info:find("UGI") then local v8 = nil local function fn15(arg, ...) if enabled["Anti Knockback / Ragdoll"] and typeof(arg) == "string" then if arg:find("\"BeginRagdoll\"") or arg:find("\"BeginImpulse\"") then return end end return v8(arg, ...) end v8 = hookfunction v8 = v8(function_, fn15) end end end end) end local function fn15(arg) if not arg then return end local humanoid2 = arg:WaitForChild("Humanoid", 5) if humanoid2 then fn11(humanoid2) end fn12(arg) fn13(arg) end local function fn16() for _, v7 in ipairs({ "AntiKnockbackAdded", "AntiKnockbackChar" }) do if connections[v7] then connections[v7]:Disconnect() connections[v7] = nil end end end return { FreezeAndClone = function() if cached.Frozen then return end cached.Frozen = true cached.FrozenCFrame = currentCamera.CFrame cached.SavedParts = {} cached.SavedDecals = {} local archivable = character.Archivable character.Archivable = true cached.CharacterClone = character:Clone() character.Archivable = archivable cached.CharacterClone.Name = "Checkpoint" for _, descendant in ipairs(cached.CharacterClone:GetDescendants()) do if descendant:IsA("Script") or descendant:IsA("LocalScript") then descendant:Destroy() elseif descendant:IsA("BasePart") then descendant.Anchored = true descendant.CanCollide = false descendant.CanTouch = false descendant.CanQuery = false descendant.LocalTransparencyModifier = 0 if descendant.Name == "HumanoidRootPart" then descendant.Transparency = 1 end elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = 0 end end local humanoid2 = cached.CharacterClone:FindFirstChildOfClass("Humanoid") if humanoid2 then humanoid2.DisplayDistanceType = Enum.HumanoidDisplayDistanceType.None end cached.CharacterClone.Parent = workspace for _, descendant in ipairs(character:GetDescendants()) do if descendant:IsA("BasePart") then cached.SavedParts[descendant] = descendant.LocalTransparencyModifier descendant.LocalTransparencyModifier = 1 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then cached.SavedDecals[descendant] = descendant.Transparency descendant.Transparency = 1 end end currentCamera.CameraType = Enum.CameraType.Scriptable currentCamera.CFrame = cached.FrozenCFrame if connections.FreezeConnection then connections.FreezeConnection:Disconnect() end connections.FreezeConnection = runService.RenderStepped:Connect(function() if cached.Frozen and cached.FrozenCFrame then currentCamera.CameraType = Enum.CameraType.Scriptable currentCamera.CFrame = cached.FrozenCFrame end end) end, UnfreezeAndDeleteClone = function() if not cached.Frozen then return end cached.Frozen = false if connections.FreezeConnection then connections.FreezeConnection:Disconnect() connections.FreezeConnection = nil end local v7 = pairs local savedParts = cached.SavedParts or {} for k, savedPart in v7(savedParts) do if k and k.Parent and k:IsA("BasePart") then k.LocalTransparencyModifier = savedPart end end local v8 = pairs local savedDecals = cached.SavedDecals or {} for k, savedDecal in v8(savedDecals) do if k and k.Parent and (k:IsA("Decal") or k:IsA("Texture")) then k.Transparency = savedDecal end end cached.SavedParts = {} cached.SavedDecals = {} if cached.CharacterClone then cached.CharacterClone:Destroy() cached.CharacterClone = nil end cached.FrozenCFrame = nil local character2 = localPlayer.Character character2 = character2 and character2:FindFirstChildOfClass("Humanoid") currentCamera.CameraType = Enum.CameraType.Custom if character2 then currentCamera.CameraSubject = character2 end end, EnableNoInput = function() if cached.NoInputEnabled then return end cached.NoInputEnabled = true if not cached.Controls then cached.Controls = require(localPlayer:WaitForChild("PlayerScripts"):WaitForChild("PlayerModule")):GetControls() end if cached.ScreenText then cached.ScreenText.Enabled = true else cached.ScreenText = Instance.new("ScreenGui") cached.ScreenText.Name = "NoInputWarningGui" cached.ScreenText.ResetOnSpawn = false cached.ScreenText.IgnoreGuiInset = true cached.ScreenText.Parent = localPlayer:WaitForChild("PlayerGui") cached.ScreenTextLabel = Instance.new("TextLabel") cached.ScreenTextLabel.Name = "WarningText" cached.ScreenTextLabel.Size = UDim2.fromScale(1, 0.15) cached.ScreenTextLabel.Position = UDim2.fromScale(0, 0.42) cached.ScreenTextLabel.BackgroundTransparency = 1 cached.ScreenTextLabel.Text = "[START]" cached.ScreenTextLabel.TextScaled = true cached.ScreenTextLabel.Font = Enum.Font.GothamBold cached.ScreenTextLabel.TextColor3 = Color3.fromRGB(255, 255, 255) cached.ScreenTextLabel.TextStrokeTransparency = 0 cached.ScreenTextLabel.Parent = cached.ScreenText end cached.Controls:Disable() contextActionService:BindActionAtPriority("BlockAllPlayerInput", function() return Enum.ContextActionResult.Sink end, false, 999999, Enum.UserInputType.Keyboard, Enum.UserInputType.MouseButton1, Enum.UserInputType.MouseButton2, Enum.UserInputType.MouseButton3, Enum.UserInputType.MouseMovement, Enum.UserInputType.MouseWheel, Enum.UserInputType.Touch, Enum.UserInputType.Gamepad1, Enum.UserInputType.Gamepad2, Enum.UserInputType.Gamepad3, Enum.UserInputType.Gamepad4) end, DisableNoInput = function() if not cached.NoInputEnabled then return end cached.NoInputEnabled = false contextActionService:UnbindAction("BlockAllPlayerInput") if cached.Controls then cached.Controls:Enable() end if cached.ScreenText then cached.ScreenText.Enabled = false end end, SetHideOwnPets = function(arg) local clientRenderedAssets = workspace:FindFirstChild("ClientRenderedAssets") if not clientRenderedAssets then return end for _, child in ipairs(clientRenderedAssets:GetChildren()) do local userId = localPlayer.UserId if child:GetAttribute("OwnerUserId") == userId or string.find(child.Name, tostring(localPlayer.UserId), 1, true) == 1 then for _, descendant in ipairs(child:GetDescendants()) do if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = arg and 1 or 0 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = arg and 1 or 0 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = not arg end end end end end, SetHideOwnEggs = function(arg) for _, child in ipairs(workspace:GetChildren()) do if child.Name == "PlacedEggRenders" then for _, child2 in ipairs(child:GetChildren()) do local flag2 = string.find(child2.Name, tostring(localPlayer.UserId), 1, true) == 1 if not flag2 then local userId = localPlayer.UserId flag2 = child2:GetAttribute("OwnerUserId") == userId end if flag2 then for _, descendant in ipairs(child2:GetDescendants()) do if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = arg and 1 or 0 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = arg and 1 or 0 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = not arg end end end end end end end, SetHideOtherEggs = function(arg) for _, child in ipairs(workspace:GetChildren()) do if child.Name == "PlacedEggRenders" then for _, child2 in ipairs(child:GetChildren()) do local flag2 = string.find(child2.Name, tostring(localPlayer.UserId), 1, true) == 1 if not flag2 then local userId = localPlayer.UserId flag2 = child2:GetAttribute("OwnerUserId") == userId end if not flag2 then for _, descendant in ipairs(child2:GetDescendants()) do if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = arg and 1 or 0 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = arg and 1 or 0 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = not arg end end end end end end end, SetHideMoneyAnimation = function(arg) if not arg then return end local terrain = workspace:FindFirstChild("Terrain") if terrain then for _, child in ipairs(terrain:GetChildren()) do if child.Name == "SyncedIncomeCashAttachment" or child.Name == "SyncedIncomeCash" then child:Destroy() end end end end, ApplyReduceLag = function(arg) if arg then for _, descendant in pairs(workspace:GetDescendants()) do local isBasePart = descendant:IsA("BasePart") if isBasePart then isBasePart = not (descendant.Parent and descendant.Parent:FindFirstChildWhichIsA("Humanoid")) end if isBasePart then descendant.Material = Enum.Material.SmoothPlastic descendant.CastShadow = false descendant.Reflectance = 0 elseif descendant:IsA("Texture") or descendant:IsA("Decal") or descendant:IsA("ParticleEmitter") or descendant:IsA("Trail") then if not (localPlayer.Character and descendant:IsDescendantOf(localPlayer.Character)) then pcall(function() descendant.Transparency = 1 end) pcall(function() descendant.Enabled = false end) end end end pcall(function() lighting.GlobalShadows = false lighting.FogEnd = 9e9 end) end end, SetAntiKnockback = function(arg) fn16() if not arg then return end fn14() if localPlayer.Character then fn15(localPlayer.Character) end connections.AntiKnockbackChar = localPlayer.CharacterAdded:Connect(function(character2) fn15(character2) end) end, } end tbl4.Misc = fn10() local function fn11() local tbl5 tbl5 = { Ready = false, Network = nil, EggCmds = nil, AssetCmds = nil, PlotCmds = nil, Save = nil, BaseUpgradeClient = nil, AssetGenerationUtil = nil, AssetItemSerialization = nil, TreadmillUtil = nil, RebirthUtil = nil, Assets = nil, Rarity = nil, Treadmills = nil, Bases = nil, Rebirths = nil, Areas = nil, Trails = nil, SettingsCmds = nil, Remotes = nil, EggState = nil, PlotState = nil, Init = function() if replicatedStorage:FindFirstChild("Data") ~= nil or replicatedStorage:FindFirstChild("Shared") ~= nil then pcall(function() local shared = replicatedStorage:FindFirstChild("Shared") local data = replicatedStorage:FindFirstChild("Data") local client = replicatedStorage:FindFirstChild("Client") if shared and shared:FindFirstChild("Remotes") then tbl5.Remotes = require(shared.Remotes) end if shared and shared:FindFirstChild("Save") then tbl5.Save = require(shared.Save) end if data and data:FindFirstChild("Assets") then tbl5.Assets = require(data.Assets) end if data and data:FindFirstChild("Bases") then tbl5.Bases = require(data.Bases) end if data and data:FindFirstChild("Rarity") then tbl5.Rarity = require(data.Rarity) end if data and data:FindFirstChild("Treadmills") then tbl5.Treadmills = require(data.Treadmills) end if data and data:FindFirstChild("Areas") then tbl5.Areas = require(data.Areas) end if data and data:FindFirstChild("Trails") then tbl5.Trails = require(data.Trails) end if shared and shared:FindFirstChild("SettingsCmds") then tbl5.SettingsCmds = require(shared.SettingsCmds) end if client and client:FindFirstChild("EggState") then tbl5.EggState = require(client.EggState) end if client and client:FindFirstChild("PlotState") then tbl5.PlotState = require(client.PlotState) end end) tbl5.EggCmds = { GetAreaEggSnapshot = function() local ok, result = pcall(function() if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskFieldEggSnapshot then return tbl5.Remotes.EggWorld.AskFieldEggSnapshot:InvokeServer() end if tbl5.EggState and tbl5.EggState.ReadFieldEggs then return { Records = tbl5.EggState.ReadFieldEggs() } end end) return ok and type(result) == "table" and result or { Records = {} } end, GetRuntimeSnapshot = function() local ok, result = pcall(function() if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskLiveSnapshot then return tbl5.Remotes.EggWorld.AskLiveSnapshot:InvokeServer() end if tbl5.EggState and tbl5.EggState.ReadOwnedEggs then return tbl5.EggState.ReadOwnedEggs() end end) if ok and type(result) == "table" then if result.Records then return { result } end return result end return { { OwnerUserId = localPlayer.UserId, Records = {} } } end, RequestAreaEggSnapshot = function() local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.SyncFieldEggs then local v7 = tbl5.EggState.SyncFieldEggs() if type(v7) == "table" then return v7 end elseif tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskFieldEggSnapshot then return tbl5.Remotes.EggWorld.AskFieldEggSnapshot:InvokeServer() end end) return ok and type(result) == "table" and result or {} end, RequestRuntimeSnapshot = function() local ok, result = pcall(function() if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskLiveSnapshot then return tbl5.Remotes.EggWorld.AskLiveSnapshot:InvokeServer() end if tbl5.EggState and tbl5.EggState.SyncOwnedEggs then return tbl5.EggState.SyncOwnedEggs() end end) return ok and type(result) == "table" and result or {} end, RequestCarryAreaEgg = function(arg, arg2) local ok, result = pcall(function() if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskFieldEggCarry then return tbl5.Remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = arg, FirstAreaSlotKey = arg2 }) end return require(game:GetService("ReplicatedStorage").Shared.Remotes).EggWorld.AskFieldEggCarry:InvokeServer({ Uid = arg, FirstAreaSlotKey = arg2 }) end) return ok and result end, RequestDropHeldEgg = function(arg) local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.DropFieldEgg then return tbl5.EggState.DropFieldEgg(arg) end if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskFieldEggDrop then return tbl5.Remotes.EggWorld.AskFieldEggDrop:InvokeServer({ Reason = arg }) end end) return ok and result end, RequestPlaceEgg = function(arg, arg2, arg3) arg3 = typeof(arg3) == "CFrame" and arg3 local cframe if arg3 then cframe = arg3 else cframe = typeof(arg2) == "CFrame" and arg2 or CFrame.new() end if tbl5.EggState and tbl5.EggState.PlantEgg then local ok, result = pcall(function() return tbl5.EggState.PlantEgg(arg, cframe) end) if ok and result == true then return true end end local ReplicatedStorage = game:GetService("ReplicatedStorage") local networking = ReplicatedStorage:FindFirstChild("Packages") and ReplicatedStorage.Packages:FindFirstChild("Networking") local rfEggWorldAskPlaceEgg = networking and networking:FindFirstChild("RF/EggWorld/AskPlaceEgg") if rfEggWorldAskPlaceEgg then local ok, result = pcall(function() return rfEggWorldAskPlaceEgg:InvokeServer({ Uid = arg, LocalCFrame = cframe }) end) if ok and (result == true or type(result) == "table" and result.Outcome == true) then return true end end return false end, RequestHatchEgg = function(arg) local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.BeginHatch then return tbl5.EggState.BeginHatch(arg) end if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskHatch then return tbl5.Remotes.EggWorld.AskHatch:InvokeServer(arg) end end) return ok and result end, RequestCompleteHatchEgg = function(arg) local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.FinishHatch then return tbl5.EggState.FinishHatch(arg) end if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskFinishHatch then return tbl5.Remotes.EggWorld.AskFinishHatch:InvokeServer(arg) end end) return ok and result end, RequestEquipTool = function(arg) local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.WearEggTool then return tbl5.EggState.WearEggTool(arg) end if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskWearTool then return tbl5.Remotes.EggWorld.AskWearTool:InvokeServer(arg) end end) return ok and result end, RequestUnequipTool = function(arg) local ok, result = pcall(function() if tbl5.EggState and tbl5.EggState.DoffEggTool then return tbl5.EggState.DoffEggTool(arg) end if tbl5.Remotes and tbl5.Remotes.EggWorld and tbl5.Remotes.EggWorld.AskDoffTool then return tbl5.Remotes.EggWorld.AskDoffTool:InvokeServer(arg) end end) return ok and result end, IsLocalEggReady = function(arg) if tbl5.EggState and tbl5.EggState.IsReadyToHatch then return tbl5.EggState.IsReadyToHatch(arg) end return false end, } tbl5.PlotCmds = { GetPlotData = function() local localPlayer2 = localPlayer or game.Players.LocalPlayer local resolvePlot = tbl5.PlotState and tbl5.PlotState.ResolvePlot local v7 = nil if resolvePlot then v7 = tbl5.PlotState.ResolvePlot(localPlayer2) end if not v7 then local ok, result = pcall(function() return require(game:GetService("ReplicatedStorage").Client.PlotState) end) if ok and result and result.ResolvePlot then v7 = result.ResolvePlot(localPlayer2) end end if v7 and v7.CenterPoint and v7.PetArea then local plotFolder = v7.PlotFolder local toUpdate = plotFolder and plotFolder:FindFirstChild("ToUpdate") toUpdate = toUpdate and toUpdate:FindFirstChild("PetArea") or plotFolder and plotFolder:FindFirstChild("PetArea") or v7.PetArea return { PlotIndex = tonumber(v7.Slot) or 1, PlotFolder = plotFolder, CenterPoint = v7.CenterPoint, PetArea = toUpdate, RespawnPointCFrame = v7.RespawnPointCFrame, } end return nil end, GetPlotFromPart = function(arg) while arg and arg.Parent and arg.Parent ~= workspace.Plots do arg = arg.Parent end return arg end, } tbl5.GetPlot = tbl5.PlotCmds.GetPlotData tbl5.Network = setmetatable({}, { __index = function() return { FireServer = function() end, InvokeServer = function() end, } end }) tbl5.Ready = tbl5.Save ~= nil and tbl5.Assets ~= nil and tbl5.Remotes ~= nil return tbl5.Ready end local library = replicatedStorage:FindFirstChild("Library") local directory = replicatedStorage:FindFirstChild("Directory") if library then pcall(function() tbl5.Network = require(library.Client.Network) tbl5.EggCmds = require(library.Client.EggCmds) tbl5.AssetCmds = require(library.Client.AssetCmds) tbl5.PlotCmds = require(library.Client.PlotCmds) tbl5.Save = require(library.Client.Save) end) end if directory then pcall(function() tbl5.Assets = require(directory.Assets) tbl5.Rarity = require(directory.Rarity) tbl5.Treadmills = require(directory.Treadmills) tbl5.Bases = require(directory.Bases) tbl5.Areas = require(directory.Areas) end) end tbl5.Ready = tbl5.Save ~= nil and tbl5.Assets ~= nil return tbl5.Ready end, GetSave = function() if not tbl5.Save then local ok, save = pcall(function() return require(game:GetService("ReplicatedStorage").Shared.Save) end) if not ok or not save then ok, save = pcall(function() return require(game:GetService("ReplicatedStorage").Client.Save) end) end if ok and save then tbl5.Save = save end end if tbl5.Save and tbl5.Save.Get then local ok, result = pcall(function() return tbl5.Save.Get() end) if ok and type(result) == "table" then return result end end if tbl5.Save and tbl5.Save.Peek then local ok, result = pcall(function() return tbl5.Save.Peek() end) if ok and type(result) == "table" then return result end end return nil end, GetSaveWait = function() if not tbl5.Save then return nil end local v7 = tbl5.GetSave() local n = 0 while not v7 and n < 30 do task.wait(1) v7 = tbl5.GetSave() n += 1 end return v7 end, GetPlot = function() if not tbl5.PlotCmds then return nil end local ok, result = pcall(function() return tbl5.PlotCmds.GetPlotData() end) if ok and type(result) == "table" then return result end return nil end, GetMyUserId = function() return localPlayer.UserId end, GetAreas = function() if not tbl5.Areas or not tbl5.Areas.Directory then return {} end local tbl6 = {} for k in pairs(tbl5.Areas.Directory) do table.insert(tbl6, k) end table.sort(tbl6) return tbl6 end, } return tbl5 end tbl4.Game = fn11() local function fn12() local tbl5 tbl5 = { CurrentOwner = nil, OwnerPriority = 0, ClaimedAt = 0, CanClaim = function(arg, arg2) local now = os.clock() if tbl5.CurrentOwner == nil or tbl5.CurrentOwner == arg then return true end if now - tbl5.ClaimedAt > 20 then return true end return (arg2 or 0) > tbl5.OwnerPriority end, Claim = function(currentOwner, ownerPriority) local now = os.clock() if tbl5.CurrentOwner == nil or tbl5.CurrentOwner == currentOwner then tbl5.CurrentOwner = currentOwner local v7 = tbl5 ownerPriority = ownerPriority or 0 v7.OwnerPriority = ownerPriority tbl5.ClaimedAt = now return true end if now - tbl5.ClaimedAt > 20 then tbl5.CurrentOwner = currentOwner local v7 = tbl5 ownerPriority = ownerPriority or 0 v7.OwnerPriority = ownerPriority tbl5.ClaimedAt = now return true end if tbl5.OwnerPriority < (ownerPriority or 0) then tbl5.CurrentOwner = currentOwner tbl5.OwnerPriority = ownerPriority or 0 tbl5.ClaimedAt = now return true end return false end, Release = function(arg) if tbl5.CurrentOwner == arg then tbl5.CurrentOwner = nil tbl5.OwnerPriority = 0 tbl5.ClaimedAt = 0 end end, GetOwner = function() return tbl5.CurrentOwner end, Stop = function() end, } return tbl5 end tbl4.Movement = fn12() local function fn13() local tbl5 tbl5 = { Eggs = {}, EggsAt = 0, TargetUid = nil, Carrying = false, CarriedUid = nil, CarriedAssetCategory = nil, State = "Idle", LastPlaceAt = 0, LastReleaseAt = 0, CarryStartedAt = 0, ClaimedAt = 0, HatchedUids = {}, LastSnapshotAt = 0, IsPlacing = false, GetEggCapacityStatus = function() local save = tbl4.Game and tbl4.Game.Save local eggCmds = tbl4.Game and tbl4.Game.EggCmds if tbl4.Game then end local baseUpgradeLevel = (save and save.Get and save.Get() or save and save.Peek and save.Peek() or {}).BaseUpgradeLevel or 1 local maxPlaced = tbl4.PlaceEgg and tbl4.PlaceEgg.MaxPlaced or 30 local getRuntimeSnapshot = eggCmds and eggCmds.GetRuntimeSnapshot and eggCmds.GetRuntimeSnapshot() or {} local tbl6 = {} for _, v7 in ipairs(getRuntimeSnapshot) do if v7.OwnerUserId == localPlayer.UserId then tbl6 = v7.Records or {} break end end local tbl7 = {} local n = 0 for k, v7 in pairs(tbl6) do if v7.Placement == nil then table.insert(tbl7, k) else n += 1 end end local n2 = #tbl7 local flag = n >= maxPlaced return { baseLevel = baseUpgradeLevel, maxPlaced = maxPlaced, placedCount = n, unplacedCount = n2, unplacedUids = tbl7, isPenFull = flag, isInventoryFull = n2 >= 240, needsPlace = n2 > 0 and not flag, } end, RefreshEggs = function(arg) local flag = not arg if flag then local eggsAt = tbl5.EggsAt flag = os.clock() - eggsAt < 0.5 end if flag then return end tbl5.EggsAt = os.clock() local ok, result = pcall(function() local eggCmds = tbl4.Game and tbl4.Game.EggCmds return eggCmds and eggCmds.RequestAreaEggSnapshot and eggCmds.RequestAreaEggSnapshot() end) if ok and type(result) == "table" then local records = result.Records or result local records2 if type(records) == "table" and type(records.Records) == "table" then records2 = records.Records else records2 = records end tbl5.Eggs = records2 or {} end end, GetCarryState = function() if tbl5.Carrying then return true, tbl5.CarriedUid, tbl5.CarriedAssetCategory end local character2 = localPlayer.Character if character2 then for _, child in ipairs(character2:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("ItemType") == "AssetEgg" then local getAttribute = child.GetAttribute return true, child:GetAttribute("UID"), getAttribute(child, "AssetCategory") end end end local dropHeldEgg = playerGui:FindFirstChild("DropHeldEgg") if dropHeldEgg and dropHeldEgg.Enabled then return true, tbl5.CarriedUid, tbl5.CarriedAssetCategory end return false, nil, nil end, SyncCarry = function() local v7, v8, v9 = tbl5.GetCarryState() if tbl5.OptimisticCarry then if v7 then tbl5.OptimisticCarry = false tbl5.Carrying = true tbl5.CarriedUid = v8 tbl5.CarriedAssetCategory = v9 return end local optimisticAt = tbl5.OptimisticAt if optimisticAt then local optimisticAt2 = tbl5.OptimisticAt optimisticAt = os.clock() - optimisticAt2 > 4 end if optimisticAt then tbl5.OptimisticCarry = false tbl5.Carrying = false tbl5.CarriedUid = nil tbl5.CarriedAssetCategory = nil end return end tbl5.Carrying = v7 if v7 then tbl5.CarriedUid = v8 tbl5.CarriedAssetCategory = v9 else tbl5.CarriedUid = nil tbl5.CarriedAssetCategory = nil end end, } return tbl5 end tbl4.FarmState = fn13() local function fn14() local tbl5 = {} local farmState = tbl4.FarmState local movement = tbl4.Movement local tbl6 = { BlockedEggs = {}, Night = false } if tbl4.Game then end local Remotes_ = nil pcall(function() Remotes_ = require(game:GetService("ReplicatedStorage").Shared.Remotes) end) local tbl7 = {} local function fn15() if next(tbl7) then return tbl7 end local assets = tbl4.Game and tbl4.Game.Assets if not assets then pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") if ReplicatedStorage:FindFirstChild("Data") and ReplicatedStorage.Data:FindFirstChild("Assets") then assets = require(ReplicatedStorage.Data.Assets) elseif ReplicatedStorage:FindFirstChild("Directory") and ReplicatedStorage.Directory:FindFirstChild("Assets") then assets = require(ReplicatedStorage.Directory.Assets) end end) end local directory = assets and assets.Directory local flag if directory then flag = directory else flag = type(assets) == "table" and assets end local v7 = flag or nil if v7 and type(v7) == "table" then for k, v8 in pairs(v7) do tbl7[k] = v8 end end return tbl7 end local tbl8 = { common = 1, uncommon = 2, superrare = 2, rare = 3, epic = 4, legendary = 5, mythic = 6, ["squishy god"] = 6, brainrotgod = 6, rainbow = 6, prismatic = 6, cosmic = 7, secret = 8, eternal = 9, limited = 9, divine = 10, transcendent = 10, titan = 11, ["light & dark"] = 12, lightdark = 12, ["light and dark"] = 12, } local tbl9 = { "Common", "Uncommon", "Rare", "Epic", "Legendary", "Mythic", "Cosmic", "Secret", "Eternal", "Divine", "Titan", "Light & Dark", } local tbl10 = { chicken = 1, dog = 1, duckling = 1, frog = 1, jerboa = 1, bird = 2, catfish = 2, fennec = 2, ["burrowing owl"] = 3, camel = 3, chimpanzee = 3, dodo = 3, ["lava gecko"] = 3, parrotfish = 3, penguin = 3, raccoon = 3, toucan = 3, ["tung tung sahur"] = 3, turtle = 3, ["bananita dolphinita"] = 4, bear = 4, centapede = 4, crane = 4, crocodile = 4, fox = 4, ["lava frog"] = 4, swan = 4, swordfish = 4, ["tob tobi tob tob"] = 4, ["trulimero trulicina"] = 4, walrus = 4, axolotl = 5, ["baby aurora dragon"] = 5, ["brr brr patapim"] = 5, ["cosmic gecko"] = 5, crustacia = 5, ["flaming bull"] = 5, gorilla = 5, ["lava iguana"] = 5, ["mecha scorpio"] = 5, ["orangutini ananassini"] = 5, ["polar bear"] = 5, pterodactyl = 5, salamander = 5, scorpio = 5, shark = 5, snake = 5, spideron = 5, ankylosaurus = 6, ["belula beluga"] = 6, bladehide = 6, ["chillin chilli"] = 6, ["cosmic gorilla"] = 6, froggo = 6, mammoth = 6, ["mecha froggo"] = 6, orca = 6, ["red panda"] = 6, ["sabertooth tiger"] = 6, ["sand spider"] = 6, scorpion = 6, ["shadow dragon"] = 6, spider = 6, tiger = 6, ["beluga whale"] = 7, bronto = 7, crawler = 7, ["demon imp"] = 7, drilla = 7, hellhound = 7, ["king mammoth"] = 7, koi = 7, ["la vacca saturno saturnita"] = 7, leviathan = 7, ["mangolini parrochini"] = 7, mantaris = 7, ["mecha crawler"] = 7, rhinotaur = 7, ["royal sphinx"] = 7, ["snowy owl"] = 7, triceratops = 7, ["whale shark"] = 7, ["bombo croco"] = 8, cerberus = 8, ["cosmic dragon"] = 8, ["cosmic skeleton boss"] = 8, crocodon = 8, ["ember dragon"] = 8, gargoyle = 8, ["king snake"] = 8, kraken = 8, ["mecha crocodon"] = 8, minotaur = 8, ["mutant shark"] = 8, ["scorched dragon"] = 8, stag = 8, trex = 8, tralaledon = 8, yeti = 8, balrog = 9, ["el maja"] = 9, ["eternal lunar dragon"] = 9, ["gorilla king"] = 9, ["ice dragon"] = 9, krakenoid = 9, ["lava dragon"] = 9, ["mecha krakenoid"] = 9, mosasaurus = 9, ["oni tiger"] = 9, phoenix = 9, ["strawberry elephant"] = 9, ["void dragon"] = 9, ["archdemon dragon"] = 10, dreadscale = 10, kitsune = 10, ["mecha dreadscale"] = 10, nightflame = 10, unicorn = 10, } tbl5.AreaFilters = {} tbl5.SpecificEggFilters = {} tbl5.MinRarity = 7 tbl5.SafeZone = Vector3.new(515, 74.4, -362.8) tbl5.Priority = "Best Rarity" tbl5.ParseRarity = function(arg) if not arg then return 7 end if type(arg) == "number" then return math.clamp(math.floor(arg), 1, 12) end if type(arg) == "table" then arg = arg[1] or arg.Value or arg.Title or arg.Text or arg.Name end local str = tostring(arg or "7 - Cosmic") if str == "All" or string.find(str, "All", 1, true) then return 1 end local v7 = string.lower(str) for k, v8 in pairs({ common = 1, uncommon = 2, superrare = 2, rare = 3, epic = 4, legendary = 5, mythic = 6, ["squishy god"] = 6, brainrotgod = 6, rainbow = 6, prismatic = 6, cosmic = 7, secret = 8, eternal = 9, limited = 9, divine = 10, transcendent = 10, titan = 11, ["light & dark"] = 12, lightdark = 12, ["light and dark"] = 12, }) do if string.find(v7, k, 1, true) then return v8 end end local num = tonumber(string.match(str, "(%d+)")) if num then return math.clamp(num, 1, 12) end return 7 end tbl5.GetMinRarity = function() local minRarity = stored.Controllers and stored.Controllers["Min Rarity"] if minRarity and minRarity.Get then local ok, result = pcall(function() return minRarity:Get() end) if ok and result ~= nil then local v7 = tbl5.ParseRarity(result) tbl5.MinRarity = v7 return v7 end end return tbl5.MinRarity or 1 end tbl5.SyncFromControllers = function() if stored.Controllers then if stored.Controllers["Min Rarity"] and stored.Controllers["Min Rarity"].Get then pcall(function() tbl5.MinRarity = tbl5.ParseRarity(stored.Controllers["Min Rarity"]:Get()) end) end if stored.Controllers["Steal Priority"] and stored.Controllers["Steal Priority"].Get then pcall(function() local v7 = stored.Controllers["Steal Priority"]:Get() if v7 then tbl5.Priority = v7 end end) end if stored.Controllers["Target Areas"] and stored.Controllers["Target Areas"].Get then pcall(function() local v7 = stored.Controllers["Target Areas"]:Get() if v7 then tbl5.AreaFilters = v7 end end) end if stored.Controllers["Target Specific Eggs"] and stored.Controllers["Target Specific Eggs"].Get then pcall(function() local v7 = stored.Controllers["Target Specific Eggs"]:Get() if v7 then tbl5.SpecificEggFilters = v7 if tbl5.RebuildSpecificEggLookup then tbl5.RebuildSpecificEggLookup() end end end) end end end tbl5.IsAreaSelected = function(arg) if not tbl5.AreaFilters then return true end if tbl5.AreaFilters[arg] == true then return true end if tbl5.AreaFilters.All or tbl5.AreaFilters.Semua then return true end local n = 0 for k, areaFilter in pairs(tbl5.AreaFilters) do n += 1 if areaFilter == true and k == arg then return true end if type(k) == "number" and (areaFilter == arg or areaFilter == "All" or areaFilter == "Semua") then return true end end return n == 0 end tbl5.GetEggDisplayName = function(arg) if not arg then return "Unknown" end local v7 = fn15() if v7 and v7[arg] then local v8 = v7[arg] return v8.DisplayName or v8.Name or arg end return tostring(arg) end tbl5.GetEggRarityNumber = function(arg) if not arg then return 1 end if type(arg) == "number" then return arg end if type(arg.RarityNumber) == "number" then return arg.RarityNumber end local assetCategory = arg.AssetCategory or arg.Category or arg.Name if not assetCategory and type(arg) == "string" then assetCategory = arg end if not assetCategory then return 1 end local v7 = fn15() v7 = v7 and v7[assetCategory] if v7 then if v7.Rarity and type(v7.Rarity) == "table" then if type(v7.Rarity.Rank) == "number" then return v7.Rarity.Rank end if type(v7.Rarity.RarityNumber) == "number" then return v7.Rarity.RarityNumber end local displayName = v7.Rarity.DisplayName or v7.Rarity.Name or v7.Rarity._id if displayName and type(displayName) == "string" then local v8 = tbl8[string.lower(displayName)] if v8 then return v8 end end end if type(v7.Rank) == "number" then return v7.Rank end if type(v7.RarityNumber) == "number" then return v7.RarityNumber end if v7.Rarity and type(v7.Rarity) == "string" then local v8 = tbl8[string.lower(v7.Rarity)] if v8 then return v8 end end end local v8 = string.lower(tostring(assetCategory)) local v9 = tbl10[v8] if v9 then return v9 end local str = v8:gsub("[%s_%-]+", "") for k, v10 in pairs(tbl10) do if str == k:gsub("[%s_%-]+", "") or string.find(v8, k, 1, true) or string.find(k, v8, 1, true) then return v10 end end if arg.Rarity and type(arg.Rarity) == "string" then local v10 = tbl8[string.lower(arg.Rarity)] if v10 then return v10 end end return 1 end tbl5.GetEggRarityName = function(arg) if not arg then return "Common" end local v7 = fn15() if v7 and v7[arg] then local v8 = v7[arg] if v8.Rarity then if type(v8.Rarity) == "string" then return v8.Rarity end if type(v8.Rarity) == "table" then local displayName = v8.Rarity.DisplayName or v8.Rarity.Name if displayName then return displayName end end end end return tbl9[tbl5.GetEggRarityNumber(arg)] or "Common" end tbl5.GetEggFormattedName = function(arg) if not arg then return "Unknown" end local assetCategory = arg.AssetCategory or arg.Category or arg.Name or "Unknown" local v7 = tbl5.GetEggDisplayName(assetCategory) local v8 = tbl5.GetEggRarityName(assetCategory) return string.format("%s [%s]", v7, v8) end tbl5.SpecificEggLookup = {} tbl5.HasSpecificEggFilters = false tbl5.RebuildSpecificEggLookup = function() local specificEggLookup = {} local v7 = pairs local specificEggFilters = tbl5.SpecificEggFilters or {} local n = 0 local flag = false for k, specificEggFilter in v7(specificEggFilters) do if not (specificEggFilter == true and type(k) == "string") then k = nil if type(specificEggFilter) == "string" then k = specificEggFilter end end if k and #k > 0 then local v8 = string.lower(k) if v8 == "all" or v8 == "semua" then flag = true break else n += 1 specificEggLookup[v8] = true local str = (string.match(v8, "^(.-)%s*%[") or v8):gsub("^%s*(.-)%s*$", "%1") if #str > 0 then specificEggLookup[str] = true specificEggLookup[str:gsub("%s+", "")] = true end end end end if flag or n == 0 then tbl5.HasSpecificEggFilters = false tbl5.SpecificEggLookup = {} else tbl5.HasSpecificEggFilters = true tbl5.SpecificEggLookup = specificEggLookup end end tbl5.IsSpecificEggSelected = function(arg) if not tbl5.HasSpecificEggFilters then return true end if not arg then return false end local assetCategory = arg.AssetCategory if not assetCategory then return false end local specificEggLookup = tbl5.SpecificEggLookup if not specificEggLookup then return true end local v7 = string.lower(assetCategory) if specificEggLookup[v7] or specificEggLookup[v7:gsub("%s+", "")] then return true end local v8 = tbl5.GetEggDisplayName(assetCategory) if v8 then local v9 = string.lower(v8) if specificEggLookup[v9] or specificEggLookup[v9:gsub("%s+", "")] then return true end end return false end tbl5.GetEggWeight = function(arg) if not arg then return 0 end local n = tonumber(arg.AssetScale) or tonumber(arg.Scale) or 1 local assetCategory = arg.AssetCategory and tbl7 and tbl7[arg.AssetCategory] local n2 = 1 if assetCategory then local v7 = tbl7[arg.AssetCategory] if type(v7.ModelWeight) == "number" then n2 = v7.ModelWeight end end return n2 * n ^ 3 end tbl5.GetEggIncome = function(arg) if not arg then return 0 end local assetCategory = arg.AssetCategory and tbl7 and tbl7[arg.AssetCategory] local n = 0 if assetCategory then n = tonumber(tbl7[arg.AssetCategory].EarningRate) or 0 end if n <= 0 then return 0 end local n2 = tonumber(arg.AssetScale) or tonumber(arg.Scale) or 1 local n3 if n2 <= 5 then n3 = n2 ^ 1.85 else n3 = (n2 / 5) ^ 1.2 * 19.637875755794113 end return n * n3 end tbl5.CalculateEggScore = function(arg, arg2) local v7 = tbl5.GetEggRarityNumber(arg) local n = tonumber(arg.AssetScale) or tonumber(arg.Scale) or 1 local n2 = arg.State == "Dropped" and 50000000 or 0 local flag if arg.BaseMutation and arg.BaseMutation ~= "" then flag = true else local flag2 = type(arg.Mutations) == "table" and #arg.Mutations > 0 flag = false if flag2 then flag = true end end if tbl5.Priority == "Mutation" then return n2 + (flag and 10000000 or 0) + v7 * 100000 + n * 1000 - arg2 * 0.1 end if tbl5.Priority == "Best Weight" then local n3 = n2 + tbl5.GetEggWeight(arg) * 1000 + v7 * 10000 flag = flag and 5000 or 0 return n3 + flag - arg2 * 0.1 end if tbl5.Priority == "Highest Money/Sec" then local n3 = n2 + tbl5.GetEggIncome(arg) * 1000 + v7 * 10000 flag = flag and 5000 return n3 + (flag or 0) - arg2 * 0.1 end if tbl5.Priority == "Lowest Money/Sec" then local v8 = tbl5.GetEggIncome(arg) local n3 = n2 + v7 * 10000 flag = flag and 5000 or 0 return n3 + flag - v8 * 1000 - arg2 * 0.1 end return n2 + v7 * 1000000 + (flag and 50000 or 0) + n * 1000 - arg2 * 0.1 end local raycastParams = RaycastParams.new() raycastParams.FilterType = Enum.RaycastFilterType.Exclude tbl5.GetGroundPosition = function(arg) if not arg then return arg end if localPlayer.Character then raycastParams.FilterDescendantsInstances = { localPlayer.Character } end local hit = workspace:Raycast(Vector3.new(arg.X, arg.Y + 10, arg.Z), Vector3.new(0, -40, 0), raycastParams) if hit then local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") return Vector3.new(arg.X, hit.Position.Y + (humanoid2 and humanoid2.HipHeight > 0 and humanoid2.HipHeight + 0.8 or 2.8), arg.Z) end return arg end tbl5.GetSafeZone = function() local world = workspace:FindFirstChild("World") local build = world and world:FindFirstChild("Build") build = build and build:FindFirstChild("MainMap") build = build and build:FindFirstChild("SpawnTarget") if build then local position if build:IsA("BasePart") then position = build.Position elseif build:IsA("Attachment") then position = build.WorldPosition else position = nil if build:IsA("Model") then position = build.PrimaryPart position = position and position.Position end end if position then return position + Vector3.new(0, -5, 0) end end local areas = world and world:FindFirstChild("Areas") areas = areas and areas:FindFirstChild("StartArea") if areas then if areas:IsA("BasePart") then return areas.Position + Vector3.new(0, 2.5, 0) end if areas:IsA("Model") then local primaryPart = areas.PrimaryPart if primaryPart then return primaryPart.Position + Vector3.new(0, 2.5, 0) end end end return Vector3.new(515, 74.4, -362.8) end tbl5.GetSpawnTarget = tbl5.GetSafeZone tbl5.IsInSafeZone = function() local character2 = localPlayer.Character character2 = character2 and character2:FindFirstChild("HumanoidRootPart") local separationLine = workspace.World.Areas:FindFirstChild("SeparationLine") local startArea = workspace.World.Areas:FindFirstChild("StartArea") if not character2 or not separationLine or not startArea then return false end if not separationLine:IsA("BasePart") or not startArea:IsA("BasePart") then return false end local cFrame = separationLine.CFrame local flag = cFrame:PointToObjectSpace(character2.Position).Z >= 0 return cFrame:PointToObjectSpace(startArea.Position).Z >= 0 == flag end local ToolGameplayGuard = nil pcall(function() ToolGameplayGuard = require(replicatedStorage.Client.ToolGameplayGuard) end) tbl5.IsInSafeZoneArea = function() local ok, result = pcall(function() if ToolGameplayGuard and ToolGameplayGuard.IsInsideSafeZone then return ToolGameplayGuard.IsInsideSafeZone(localPlayer) end end) if ok and result ~= nil then return result == true end local ok2, result2 = pcall(function() if ToolGameplayGuard and ToolGameplayGuard.IsLocalInsideArena then return not ToolGameplayGuard.IsLocalInsideArena() end end) if ok2 and result2 ~= nil then return result2 == true end return tbl5.IsInSafeZone() end tbl5.IsGroundedInSafeZone = function(arg) local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return false end local v7 = arg or tbl5.GetSafeZone() local magnitude = (Vector3.new(humanoidRootPart2.Position.X, 0, humanoidRootPart2.Position.Z) - Vector3.new(v7.X, 0, v7.Z)).Magnitude local n = math.abs(humanoidRootPart2.Position.Y - v7.Y) return magnitude <= 30 and n <= 8 or tbl5.IsInSafeZoneArea() and magnitude <= 40 and n <= 8 end tbl5.BaseFor = function() return tbl5.GetSafeZone() end tbl5.Speed = 350 tbl5.FlightY = 78 tbl5.Timeout = 2.5 tbl5.IsStealing = false tbl5.GotEgg = false tbl5.ClaimHookDone = false tbl5.CarryHookDone = false tbl5.FailCounts = {} tbl5.EnsureAtSafeZone = function(arg) local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if not humanoidRootPart2 then return false end if humanoid2 then tbl5.ResetHumanoidState(humanoid2) end local v7 = tbl5.GetSafeZone() local magnitude = (humanoidRootPart2.Position - v7).Magnitude local flag = not arg local flag2 if flag then flag2 = magnitude <= 65 or tbl5.IsInSafeZone() else flag2 = flag end if flag2 then return true end _G.LastAction = string.format("Steal: Karakter di luar SafeZone (%.0f studs). Meluncur kembali via Tween...", magnitude) tbl5.TweenTo(Vector3.new(v7.X, tbl5.FlightY or 78, v7.Z), math.max(tbl5.Speed or 650, 750), { Owner = "Steal" }) tbl5.TweenTo(v7, math.max(tbl5.Speed or 650, 400), { Owner = "Steal" }) local humanoidRootPart3 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart3 then humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero humanoidRootPart3.AssemblyAngularVelocity = Vector3.zero end task.wait(0.25) return true end tbl5.EnsureClaimHook = function() if tbl5.ClaimHookDone then return end pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local EggState = ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) if EggState and EggState.FieldClaimed then EggState.FieldClaimed:Connect(function() farmState.ClaimedAt = os.clock() tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false end) tbl5.ClaimHookDone = true end local networking = ReplicatedStorage:FindFirstChild("Packages") and ReplicatedStorage.Packages:FindFirstChild("Networking") if networking then for _, child in ipairs(networking:GetChildren()) do local isRemoteEvent = child:IsA("RemoteEvent") local v7 if isRemoteEvent then v7 = string.find(child.Name, "Claim", 1, true) or string.find(child.Name, "FieldEggClaim", 1, true) else v7 = isRemoteEvent end if v7 then child.OnClientEvent:Connect(function() farmState.ClaimedAt = os.clock() tbl5.GotEgg = false farmState.Carrying = false end) end end end end) end tbl5.EnsureCarryHook = function() if tbl5.CarryHookDone then return end local function fn16(...) local v7 = ({ ... })[1] if type(v7) == "table" then local gotEgg = v7.IsCarrying == true tbl5.GotEgg = gotEgg farmState.Carrying = gotEgg if gotEgg then farmState.CarriedUid = tostring(v7.Uid or farmState.CarriedUid or "") if v7.AssetCategory then farmState.CarriedAssetCategory = v7.AssetCategory end else farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false end end end pcall(function() local networking = replicatedStorage:FindFirstChild("Packages") and replicatedStorage.Packages:FindFirstChild("Networking") networking = networking and networking:FindFirstChild("RE/EggWorld/FieldEggCarry") if networking and networking:IsA("RemoteEvent") then networking.OnClientEvent:Connect(fn16) end end) pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes or replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) if remotes and remotes.EggWorld and remotes.EggWorld.FieldEggCarry then remotes.EggWorld.FieldEggCarry.OnClientEvent:Connect(fn16) end end) pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local eggState = tbl4.Game and tbl4.Game.EggState local EggState if eggState then EggState = eggState else EggState = ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) end if EggState and EggState.CarryChanged then EggState.CarryChanged:Connect(function(arg) if arg and arg.IsCarrying ~= nil then tbl5.GotEgg = arg.IsCarrying farmState.Carrying = arg.IsCarrying if arg.IsCarrying then if arg.Uid then farmState.CarriedUid = arg.Uid end if arg.AssetCategory then farmState.CarriedAssetCategory = arg.AssetCategory end else farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false end end end) end end) tbl5.CarryHookDone = true end tbl5.EggInHand = function() local playerGui2 = playerGui or localPlayer and localPlayer:FindFirstChild("PlayerGui") local dropHeldEgg = playerGui2 and playerGui2:FindFirstChild("DropHeldEgg") if dropHeldEgg then local ok, result = pcall(function() return dropHeldEgg.Enabled end) if ok and result then return true end end return false end tbl5.IsCarryingTargetEgg = function(arg) if not arg or arg == "" then if farmState and farmState.Carrying then return true end if tbl5.GotEgg then return true end if tbl5.EggInHand() then return true end return false end local str = tostring(arg) if farmState and farmState.Carrying and farmState.CarriedUid == str then return true end if tbl5.GotEgg and farmState and farmState.CarriedUid == str then return true end local ok, result = pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local eggState = tbl4.Game and tbl4.Game.EggState or ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) if eggState and eggState.ReadFieldEgg then local v7 = eggState.ReadFieldEgg(str) if v7 and v7.CarrierUserId == localPlayer.UserId then return true end end return false end) if ok and result then return true end local ok2, result2 = pcall(function() local eggCmds = tbl4.Game and tbl4.Game.EggCmds local getAreaEggSnapshot = eggCmds and eggCmds.GetAreaEggSnapshot and eggCmds.GetAreaEggSnapshot() if getAreaEggSnapshot and type(getAreaEggSnapshot.Records) == "table" then for _, record in ipairs(getAreaEggSnapshot.Records) do if record.CarrierUserId == localPlayer.UserId and record.Uid == str then return true end end end return false end) if ok2 and result2 then return true end local character2 = localPlayer.Character if character2 then for _, child in ipairs(character2:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("ItemType") == "AssetEgg" then local attribute = child:GetAttribute("UID") if attribute and tostring(attribute) == str then return true end end end end local backpack = localPlayer:FindFirstChildOfClass("Backpack") if backpack then for _, child in ipairs(backpack:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("ItemType") == "AssetEgg" then local attribute = child:GetAttribute("UID") if attribute and tostring(attribute) == str then return true end end end end return false end tbl5.ImmortalConnections = { HealthChanged = nil, CharacterRemoving = nil, StateChanged = nil } tbl5.GoToSafeZone = function(arg, arg2) local character2 = localPlayer.Character local humanoidRootPart2 = character2 and character2:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return false end if tbl5.IsNightOrWallClosed and tbl5.IsNightOrWallClosed() and (not arg or arg < 100) or not arg then arg = 300 end local v7 = tbl5.GetSafeZone() if (humanoidRootPart2.Position - v7).Magnitude <= 15 then return true end local getPlot = tbl4.Game and tbl4.Game.GetPlot and tbl4.Game.GetPlot() or require(replicatedStorage.Library.Client.PlotCmds).GetPlotData() if tbl4.Treadmill and (tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() or enabled["Auto Treadmill"]) then local treadmillBottom = getPlot and getPlot.PlotFolder and getPlot.PlotFolder:FindFirstChild("TreadmillBottom") if treadmillBottom and (humanoidRootPart2.Position - treadmillBottom.Position).Magnitude < 15 then tbl4.Treadmill.ExitToSafeZone() task.wait(0.2) end end local humanoidRootPart3 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart3 then return false end if getPlot and getPlot.CenterPoint then local n = getPlot.CenterPoint.Position + Vector3.new(0, 2.8, 0) local magnitude = (humanoidRootPart3.Position - n).Magnitude if magnitude < 75 and (humanoidRootPart3.Position - v7).Magnitude > 18 and magnitude > 6 then tbl5.TweenTo(n, arg, { Owner = arg2 or "SafeZone" }) task.wait(0.1) end end local humanoidRootPart4 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart4 and (humanoidRootPart4.Position - v7).Magnitude > 15 then tbl5.TweenTo(v7, arg, { Owner = arg2 or "SafeZone" }) task.wait(0.1) end if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "SafeZone: Unstick from Treadmill" if tbl4.Treadmill.Unequip then tbl4.Treadmill.Unequip() end task.wait(0.05) end return true end tbl5.ResetHumanoidState = function(arg) if not arg then return end pcall(function() if arg.PlatformStand then arg.PlatformStand = false end if arg.Sit then arg.Sit = false end local state = arg:GetState() if state == Enum.HumanoidStateType.Ragdoll or state == Enum.HumanoidStateType.FallingDown or state == Enum.HumanoidStateType.Physics then arg:ChangeState(Enum.HumanoidStateType.GettingUp) arg:ChangeState(Enum.HumanoidStateType.Running) end local humanoidRootPart2 = arg.Parent and arg.Parent:FindFirstChild("HumanoidRootPart") if humanoidRootPart2 then humanoidRootPart2.CanCollide = true humanoidRootPart2.AssemblyLinearVelocity = Vector3.zero humanoidRootPart2.AssemblyAngularVelocity = Vector3.zero end end) end tbl5.GetWalkSpeed = function() local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") humanoid2 = humanoid2 and humanoid2.WalkSpeed if humanoid2 and humanoid2 > 0 then return humanoid2 end return 16 end tbl5.CachedRunAnimId = nil tbl5.CurrentRunTrack = nil tbl5.CurrentRunTracks = {} tbl5.RunAnimConnection = nil tbl5.CurrentAnimSpeed = 300 tbl5.GetRunAnimationId = function() if tbl5.CachedRunAnimId and tbl5.CachedRunAnimId ~= "" then return tbl5.CachedRunAnimId end local character2 = localPlayer.Character local animate = character2 and character2:FindFirstChild("Animate") if animate then local run = animate:FindFirstChild("run") local animation = run and (run:FindFirstChildWhichIsA("Animation") or run:FindFirstChild("RunAnim")) if animation and animation.AnimationId and animation.AnimationId ~= "" then tbl5.CachedRunAnimId = animation.AnimationId return animation.AnimationId end local walk = animate:FindFirstChild("walk") if walk then walk = walk:FindFirstChildWhichIsA("Animation") or walk:FindFirstChild("WalkAnim") end if walk and walk.AnimationId and walk.AnimationId ~= "" then tbl5.CachedRunAnimId = walk.AnimationId return walk.AnimationId end end character2 = character2 and character2:FindFirstChildOfClass("Humanoid") if character2 and character2.RigType == Enum.HumanoidRigType.R6 then tbl5.CachedRunAnimId = "rbxassetid://180426354" return "rbxassetid://180426354" end tbl5.CachedRunAnimId = "rbxassetid://913376220" return "rbxassetid://913376220" end tbl5.StartRunAnimation = function(arg) if not enabled["Run Animation"] then return end local character2 = localPlayer.Character if not character2 then return end local humanoid2 = character2:FindFirstChildOfClass("Humanoid") local currentAnimSpeed = tonumber(arg) or tonumber(tbl5.Speed) or 350 tbl5.CurrentAnimSpeed = currentAnimSpeed local v7 = tbl5.GetRunAnimationId() local flag if v7 then flag = not (tbl5.CurrentRunTrack and tbl5.CurrentRunTrack.IsPlaying) else flag = v7 end if flag then pcall(function() local animation = Instance.new("Animation") animation.AnimationId = v7 local animator = humanoid2 and (humanoid2:FindFirstChildOfClass("Animator") or humanoid2) if animator then local v8 = animator:LoadAnimation(animation) v8.Priority = Enum.AnimationPriority.Action4 v8.Looped = true v8:Play(0.1) v8:AdjustSpeed(math.clamp(currentAnimSpeed / 60, 1, 4.5)) tbl5.CurrentRunTrack = v8 end animation:Destroy() end) end if not tbl5.RunAnimConnection then local now = os.clock() tbl5.RunAnimConnection = runService.RenderStepped:Connect(function() if not enabled["Run Animation"] then return end local character3 = localPlayer.Character if not character3 then return end local n = math.clamp((tonumber(tbl5.CurrentAnimSpeed) or 300) * 0.05, 10, 22) local n2 = (os.clock() - now) * n if humanoid2 and humanoid2.RigType == Enum.HumanoidRigType.R6 or character3:FindFirstChild("Torso") ~= nil then local torso = character3:FindFirstChild("Torso") if torso then local rootJoint = torso:FindFirstChild("RootJoint") local neck = torso:FindFirstChild("Neck") local rightShoulder = torso:FindFirstChild("Right Shoulder") local leftShoulder = torso:FindFirstChild("Left Shoulder") local rightHip = torso:FindFirstChild("Right Hip") local leftHip = torso:FindFirstChild("Left Hip") local v8 = math.sin(n2) local n3 = math.abs(v8) * 0.25 if rootJoint then rootJoint.Transform = CFrame.new(0, n3, 0) * CFrame.Angles(0.17453292519943295, 0, -v8 * 0.08) end if neck then neck.Transform = CFrame.Angles(-0.087266462599716474, 0, 0) end if rightShoulder then rightShoulder.Transform = CFrame.Angles(v8 * 0.9, 0, 0.10471975511965978) end if leftShoulder then leftShoulder.Transform = CFrame.Angles(-v8 * 0.9, 0, -0.10471975511965978) end if rightHip then rightHip.Transform = CFrame.Angles(-v8 * 1, 0, 0) end if leftHip then leftHip.Transform = CFrame.Angles(v8 * 1, 0, 0) end end else local lowerTorso = character3:FindFirstChild("LowerTorso") local upperTorso = character3:FindFirstChild("UpperTorso") local head = character3:FindFirstChild("Head") local rightUpperArm = character3:FindFirstChild("RightUpperArm") local rightLowerArm = character3:FindFirstChild("RightLowerArm") local leftUpperArm = character3:FindFirstChild("LeftUpperArm") local leftLowerArm = character3:FindFirstChild("LeftLowerArm") local rightUpperLeg = character3:FindFirstChild("RightUpperLeg") local rightLowerLeg = character3:FindFirstChild("RightLowerLeg") local leftUpperLeg = character3:FindFirstChild("LeftUpperLeg") local leftLowerLeg = character3:FindFirstChild("LeftLowerLeg") local v8 = math.sin(n2) local n3 = math.abs(v8) * 0.25 if lowerTorso then local root = lowerTorso:FindFirstChild("Root") if root then root.Transform = CFrame.new(0, n3, 0) * CFrame.Angles(0.17453292519943295, 0, -v8 * 0.08) end end if upperTorso then local waist = upperTorso:FindFirstChild("Waist") if waist then waist.Transform = CFrame.Angles(0.087266462599716474, 0, v8 * 0.05) end end if head then local neck = head:FindFirstChild("Neck") if neck then neck.Transform = CFrame.Angles(-0.13962634015954636, 0, 0) end end if rightUpperArm then local rightShoulder = rightUpperArm:FindFirstChild("RightShoulder") if rightShoulder then rightShoulder.Transform = CFrame.Angles(v8 * 0.9, 0, 0.10471975511965978) end end if rightLowerArm then local rightElbow = rightLowerArm:FindFirstChild("RightElbow") if rightElbow then rightElbow.Transform = CFrame.Angles(math.clamp(-v8 * 0.8, 0, 1.2), 0, 0) end end if leftUpperArm then local leftShoulder = leftUpperArm:FindFirstChild("LeftShoulder") if leftShoulder then leftShoulder.Transform = CFrame.Angles(-v8 * 0.9, 0, -0.10471975511965978) end end if leftLowerArm then local leftElbow = leftLowerArm:FindFirstChild("LeftElbow") if leftElbow then leftElbow.Transform = CFrame.Angles(math.clamp(v8 * 0.8, 0, 1.2), 0, 0) end end if rightUpperLeg then local rightHip = rightUpperLeg:FindFirstChild("RightHip") if rightHip then rightHip.Transform = CFrame.Angles(-v8 * 1, 0, 0) end end if rightLowerLeg then local rightKnee = rightLowerLeg:FindFirstChild("RightKnee") if rightKnee then rightKnee.Transform = CFrame.Angles(math.clamp(v8 * 1.2, 0, 1.4), 0, 0) end end if leftUpperLeg then local leftHip = leftUpperLeg:FindFirstChild("LeftHip") if leftHip then leftHip.Transform = CFrame.Angles(v8 * 1, 0, 0) end end if leftLowerLeg then local leftKnee = leftLowerLeg:FindFirstChild("LeftKnee") if leftKnee then leftKnee.Transform = CFrame.Angles(math.clamp(-v8 * 1.2, 0, 1.4), 0, 0) end end end end) end end tbl5.StopRunAnimation = function() if tbl5.RunAnimConnection then pcall(function() tbl5.RunAnimConnection:Disconnect() end) tbl5.RunAnimConnection = nil end local character2 = localPlayer.Character if character2 then for _, descendant in ipairs(character2:GetDescendants()) do if descendant:IsA("Motor6D") then pcall(function() descendant.Transform = CFrame.identity end) end end end if tbl5.CurrentRunTracks then for _, currentRunTrack in ipairs(tbl5.CurrentRunTracks) do pcall(function() if currentRunTrack.IsPlaying then currentRunTrack:Stop(0.15) end currentRunTrack:Destroy() end) end tbl5.CurrentRunTracks = {} end if tbl5.CurrentRunTrack then pcall(function() if tbl5.CurrentRunTrack.IsPlaying then tbl5.CurrentRunTrack:Stop(0.15) end tbl5.CurrentRunTrack:Destroy() end) tbl5.CurrentRunTrack = nil end end tbl5.TweenTo = function(arg, arg2, arg3) local tbl11 = arg3 or {} local character2 = localPlayer.Character local humanoidRootPart2 = character2 and character2:FindFirstChild("HumanoidRootPart") local humanoid2 = character2 and character2:FindFirstChildOfClass("Humanoid") if not humanoidRootPart2 then return false end if humanoid2 then tbl5.ResetHumanoidState(humanoid2) end if tbl5.ApplyAntiTpBypass then tbl5.ApplyAntiTpBypass() else pcall(function() workspace:SetAttribute("ClientObbyAntiTp", false) end) end local speed = arg2 or tbl11.Owner == "Steal" and (tbl5.Speed or 350) or tbl5.GetWalkSpeed() local position = humanoidRootPart2.Position local magnitude = (arg - position).Magnitude if magnitude <= 0.5 then return true end local runAnimation = enabled["Run Animation"] local flag if runAnimation then flag = tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone" else flag = runAnimation end if flag then tbl5.StartRunAnimation(speed) end local n = magnitude / math.max(speed, 5) local now = os.clock() local vector = Vector3.new(arg.X - position.X, 0, arg.Z - position.Z) local unit = vector.Magnitude > 0.1 and vector.Unit or humanoidRootPart2.CFrame.LookVector pcall(function() for _, child in ipairs(character2:GetChildren()) do if child:IsA("BasePart") then child.CanCollide = false end end end) local n2 = 0 local n3 = 0 local vector2 = position local flag2 while true do local flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] local exitTo = nil local midFlightStealSlotKey, now2, n4, midFlightStealInterval, midFlightStealTarget, midFlightStealSlotKey2, midFlightStealTarget2, flag4, flag5, currentRunTrack, isPlaying, checkTreadmil, humanoid3, character3, n5, v7, n6, n7, cframe while true do flag2 = false if flag3 then break else local exitTo2 = nil local lastHitAt, flag6, targetEggUid, flag7 while true do if not (tbl11.Owner == "PlaceEgg" and not enabled["Auto Place Egg"]) then if not (tbl11.Owner == "Treadmill" and not enabled["Auto Treadmill"]) then local flag8 = tbl11.Owner == "Sell" if flag8 then flag8 = not (enabled["Auto Sell Pet"] or enabled["Auto Sell Egg"]) end if not flag8 then if not (tbl11.Owner == "ScrambleDrone" and not enabled["Auto Farm Drones"]) then local flag9, flag10 if tbl11.Owner and tbl11.Owner ~= "SafeZone" and tbl4.Movement then local v8 = tbl4.Movement.GetOwner() if not (v8 and v8 ~= tbl11.Owner) then flag9 = tbl11.AbortOnStealTarget and os.clock() - n2 >= 0.25 if flag9 then n2 = os.clock() flag10 = enabled["Auto Steal"] and tbl5.PickTarget and tbl5.PickTarget() ~= nil if not flag10 then lastHitAt = tbl11.AbortOnGuardHit and tbl5.LastHitAt flag6 = lastHitAt and tbl5.LastHitAt > now if not flag6 then targetEggUid = tbl11.AbortOnEggDrop and tbl11.TargetEggUid if targetEggUid then flag7 = not tbl5.IsCarryingTargetEgg(tbl11.TargetEggUid) and not tbl5.IsInSafeZone() if not flag7 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo2 = 13 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo2 = 14 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" if flag3 then flag3 = not enabled["Auto Steal"] flag2 = false if not flag3 then continue end else flag2 = false if not flag3 then continue end end end end end else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo2 = 12 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" if flag3 then flag3 = not enabled["Auto Steal"] flag2 = false if not flag3 then continue end else flag2 = false if not flag3 then continue end end end end end end else midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo2 = 10 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo2 = 11 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" if flag3 then flag3 = not enabled["Auto Steal"] flag2 = false if not flag3 then continue end else flag2 = false if not flag3 then continue end end end end end else exitTo2 = 9 break end end end end else lastHitAt = tbl11.AbortOnGuardHit and tbl5.LastHitAt flag6 = lastHitAt and tbl5.LastHitAt > now if not flag6 then targetEggUid = tbl11.AbortOnEggDrop and tbl11.TargetEggUid if targetEggUid then flag7 = not tbl5.IsCarryingTargetEgg(tbl11.TargetEggUid) and not tbl5.IsInSafeZone() if not flag7 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo2 = 7 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo2 = 8 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" if flag3 then flag3 = not enabled["Auto Steal"] flag2 = false if not flag3 then continue end else flag2 = false if not flag3 then continue end end end end end else exitTo2 = 6 break end end else exitTo2 = 5 break end end end end else flag9 = tbl11.AbortOnStealTarget and os.clock() - n2 >= 0.25 if flag9 then n2 = os.clock() flag10 = enabled["Auto Steal"] and tbl5.PickTarget and tbl5.PickTarget() ~= nil if not flag10 then lastHitAt = tbl11.AbortOnGuardHit and tbl5.LastHitAt flag6 = lastHitAt and tbl5.LastHitAt > now if not flag6 then targetEggUid = tbl11.AbortOnEggDrop and tbl11.TargetEggUid if targetEggUid then flag7 = not tbl5.IsCarryingTargetEgg(tbl11.TargetEggUid) and not tbl5.IsInSafeZone() if not flag7 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo2 = 4 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo2 = 14 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" if flag3 then flag3 = not enabled["Auto Steal"] flag2 = false if not flag3 then continue end else flag2 = false if not flag3 then continue end end end end end else exitTo2 = 3 break end end else exitTo2 = 2 break end end end else exitTo2 = 1 break end end end end end end break end if exitTo2 == 1 then lastHitAt = tbl11.AbortOnGuardHit and tbl5.LastHitAt flag6 = lastHitAt and tbl5.LastHitAt > now if not flag6 then targetEggUid = tbl11.AbortOnEggDrop and tbl11.TargetEggUid if targetEggUid then flag7 = not tbl5.IsCarryingTargetEgg(tbl11.TargetEggUid) and not tbl5.IsInSafeZone() if not flag7 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo = 3 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 16 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end end else exitTo = 2 break end end else exitTo = 1 break end end elseif exitTo2 == 2 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo = 5 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 13 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end end else exitTo = 4 break end elseif exitTo2 == 3 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 14 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end elseif exitTo2 == 4 then exitTo = 15 break elseif exitTo2 == 5 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then exitTo = 7 break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 8 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end end else exitTo = 6 break end elseif exitTo2 == 6 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 9 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end elseif exitTo2 == 7 then exitTo = 10 break elseif exitTo2 == 8 then exitTo = 16 break elseif exitTo2 == 9 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then exitTo = 11 break else runService.Heartbeat:Wait() flag3 = tbl11.Owner == "Steal" and not enabled["Auto Steal"] continue end end else if exitTo2 == 10 then exitTo = 12 elseif exitTo2 == 11 then exitTo = 13 elseif exitTo2 == 12 then exitTo = 14 elseif exitTo2 == 13 then exitTo = 15 elseif exitTo2 == 14 then exitTo = 16 end break end break end end if exitTo == 1 then midFlightStealSlotKey = tbl11.MidFlightStealTarget and tbl11.MidFlightStealSlotKey if midFlightStealSlotKey then now2 = os.clock() n4 = now2 - n3 midFlightStealInterval = tbl11.MidFlightStealInterval or 0.5 if midFlightStealInterval <= n4 then midFlightStealTarget = tbl11.MidFlightStealTarget midFlightStealSlotKey2 = tbl11.MidFlightStealSlotKey task.spawn(function() pcall(function() local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggCarry then remotes.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = midFlightStealTarget, FirstAreaSlotKey = midFlightStealSlotKey2 }) end end) end) n3 = now2 end end midFlightStealTarget2 = tbl11.AbortOnEggGrab and tbl11.MidFlightStealTarget if midFlightStealTarget2 then if tbl5.IsCarryingTargetEgg(tbl11.MidFlightStealTarget) then flag2 = true break else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then flag2 = true break else runService.Heartbeat:Wait() continue end end end else flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then flag2 = true break else runService.Heartbeat:Wait() continue end end end elseif exitTo == 2 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then flag2 = true break else runService.Heartbeat:Wait() continue end end elseif exitTo == 3 then flag2 = true break elseif exitTo == 4 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then flag2 = true break else runService.Heartbeat:Wait() continue end end elseif exitTo == 5 then flag2 = true break elseif exitTo == 6 then flag4 = enabled["Run Animation"] and (tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone") if flag4 then flag5 = not tbl5.RunAnimConnection if flag5 then currentRunTrack = tbl5.CurrentRunTrack isPlaying = currentRunTrack and tbl5.CurrentRunTrack.IsPlaying flag5 = not isPlaying end if flag5 then tbl5.StartRunAnimation(speed) end end checkTreadmil = tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() if checkTreadmil then humanoid3 = currentChar and currentChar:FindFirstChildOfClass("Humanoid") if humanoid3 then pcall(function() humanoid3.Jump = true humanoid3:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 then n5 = math.clamp((os.clock() - now) / n, 0, 1) v7 = position:Lerp(arg, n5) if (v7 - vector2).Magnitude > 35 then n6 = vector2 + (v7 - vector2).Unit * 35 else n6 = v7 end n7 = math.min(position.Y, arg.Y) if not (n6.Y < n7) then vector2 = n6 else vector2 = Vector3.new(n6.X, n7, n6.Z) end cframe = vector.Magnitude > 0.1 and CFrame.lookAt(vector2, vector2 + unit) or CFrame.new(vector2) character3.CFrame = cframe character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero if n5 >= 1 then flag2 = true break else runService.Heartbeat:Wait() continue end end else if exitTo == 7 then flag2 = true elseif exitTo == 8 then flag2 = true elseif exitTo == 9 then flag2 = true elseif exitTo == 10 then flag2 = true elseif exitTo == 11 then flag2 = true elseif exitTo == 12 then flag2 = true elseif exitTo == 13 then flag2 = true elseif exitTo == 14 then flag2 = true elseif exitTo == 15 then flag2 = true elseif exitTo == 16 then flag2 = true end break end break end if flag2 and humanoidRootPart2 and humanoidRootPart2.Parent then humanoidRootPart2.CFrame = vector.Magnitude > 0.1 and CFrame.lookAt(arg, arg + unit) or CFrame.new(arg) humanoidRootPart2.AssemblyLinearVelocity = Vector3.zero humanoidRootPart2.AssemblyAngularVelocity = Vector3.zero humanoidRootPart2.CanCollide = true end if humanoid2 and humanoid2.Parent then pcall(function() humanoid2:ChangeState(Enum.HumanoidStateType.Running) end) end if tbl11.Owner == "Steal" or tbl11.Owner == "SafeZone" then tbl5.StopRunAnimation() end if tbl11.Owner ~= "Treadmill" and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then if humanoid2 and humanoid2.Parent then pcall(function() humanoid2.Jump = true humanoid2:ChangeState(Enum.HumanoidStateType.Jumping) end) end pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskDoff then tbl4.Game.Remotes.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end return flag2 end tbl5.GlideTo = tbl5.TweenTo tbl5.ApplyAntiTpBypass = function() if enabled["Bypass Anti Teleport"] == false then return end pcall(function() workspace:SetAttribute("ClientObbyAntiTp", false) end) pcall(function() local playerScripts = localPlayer:FindFirstChild("PlayerScripts") if playerScripts then local obbyAntiTPClient = playerScripts:FindFirstChild("ObbyAntiTPClient") or playerScripts:FindFirstChild("AntiTP") or playerScripts:FindFirstChild("AntiTeleport") if obbyAntiTPClient and obbyAntiTPClient:IsA("LocalScript") and not obbyAntiTPClient.Disabled then obbyAntiTPClient.Disabled = true end end end) end tbl5.SafeTpPos = Vector3.new(512.7, 69, -362.5) tbl5.SafeXLimit = 548 tbl5.GraceUntil = 0 tbl5.LastHitAt = 0 tbl5.RigSyncHookDone = false tbl5.BaitBlacklist = {} tbl5.RagdollActive = false tbl5.GraceActive = function() return os.clock() < (tbl5.GraceUntil or 0) end tbl5.EnsureRigSyncHook = function() if tbl5.RigSyncHookDone then return end pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.RigSync and remotes.RigSync.Refresh then remotes.RigSync.Refresh.OnClientEvent:Connect(function(arg) if typeof(arg) ~= "string" then return end local ok, result = pcall(httpService.JSONDecode, httpService, arg) if not ok or typeof(result) ~= "table" then return end local action = result.Action local arguments = typeof(result.Arguments) == "table" and result.Arguments or {} if action == "BeginImpulse" or action == "BeginRagdoll" then local n = tonumber(arguments[1]) or 1 tbl5.GraceUntil = math.max(tbl5.GraceUntil or 0, os.clock() + math.clamp(n, 1, 5) + 0.5) tbl5.LastHitAt = os.clock() tbl5.RagdollActive = true elseif action == "EndRagdoll" then tbl5.RagdollActive = false tbl5.GraceUntil = math.max(tbl5.GraceUntil or 0, os.clock() + 1) end end) tbl5.RigSyncHookDone = true end end) end tbl5.GetEggTool = function() local character2 = localPlayer.Character if character2 then for _, child in ipairs(character2:GetChildren()) do if child:IsA("Tool") and (child:GetAttribute("ItemType") == "AssetEgg" or string.find(child.Name:lower(), "egg")) then return child end end end return nil end tbl5.UnequipAllTools = function() pcall(function() local character2 = localPlayer.Character if character2 then for _, child in ipairs(character2:GetChildren()) do local isTool = child:IsA("Tool") local flag if isTool then flag = child:GetAttribute("ItemType") == "AssetEgg" or string.find(child.Name:lower(), "egg") else flag = isTool end if flag then local backpack = localPlayer:FindFirstChildOfClass("Backpack") if backpack then child.Parent = backpack end end end end end) pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local eggState = tbl4.Game and tbl4.Game.EggState or ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) if eggState and eggState.DoffEggTool then eggState.DoffEggTool() end end) pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.EggWorld and remotes.EggWorld.AskDoffTool then remotes.EggWorld.AskDoffTool:InvokeServer() end end) end tbl5.FindDroppedFieldEgg = function(arg, arg2) local ReplicatedStorage = game:GetService("ReplicatedStorage") local eggState = tbl4.Game and tbl4.Game.EggState or ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) if not eggState or not eggState.ReadFieldEggs then return nil, math.huge end local ok, result = pcall(eggState.ReadFieldEggs) local v7, v8, v9 = ipairs(ok and result and (result.Records or result) or {}) local huge = math.huge local v10 = nil for _, v11 in v7, v8, v9 do local flag = v11.Uid == arg local flag2 if flag then flag2 = v11.State == "Dropped" or v11.State == "Slot" else flag2 = flag end flag2 = flag2 and (v11.CarrierUserId == nil or v11.CarrierUserId == localPlayer.UserId) if flag2 then local position = v11.BottomCFrame and v11.BottomCFrame.Position or v11.BoundsCFrame and v11.BoundsCFrame.Position if position then local magnitude = (position - arg2).Magnitude if magnitude < huge then huge = magnitude v10 = v11 end end end end return v10, huge end tbl5.TeleportToSafeZone = function() return tbl5.GoToSafeZone and tbl5.GoToSafeZone(300, "SafeZone") or false end tbl5.PickForestBaitEgg = function(arg) local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return nil end local now = os.clock() farmState.RefreshEggs(true) local v7, v8, v9 = pairs(farmState.Eggs or {}) local huge = math.huge local tbl11 = nil for _, v10 in v7, v8, v9 do if type(v10) == "table" and v10.Uid then local flag = v10.AreaId == "Forest" if not flag then flag = string.find(v10.Uid or "", "FirstArea", 1, true) ~= nil end if flag and (v10.State == "Slot" or v10.State == "Dropped") and v10.Uid ~= arg then local position = v10.BottomCFrame and v10.BottomCFrame.Position or v10.BoundsCFrame and v10.BoundsCFrame.Position or v10.Position or v10.CFrame and v10.CFrame.Position if position then local magnitude = (humanoidRootPart2.Position - position).Magnitude if tbl5.BaitBlacklist[v10.Uid] and now < tbl5.BaitBlacklist[v10.Uid] then magnitude += 500 end if magnitude < huge then huge = magnitude tbl11 = v10 end end end end end if not tbl11 then local areaEggSlotsClient = workspace:FindFirstChild("AreaEggSlotsClient") if areaEggSlotsClient then for _, child in ipairs(areaEggSlotsClient:GetChildren()) do if (child.Name:find("FirstArea", 1, true) or child.Name:find("Forest", 1, true)) and child.Name ~= arg then local hitbox = child:FindFirstChild("Hitbox") if hitbox then tbl11 = { Uid = child.Name, AreaId = "Forest", State = "Slot", BoundsCFrame = hitbox.CFrame, BottomCFrame = hitbox.CFrame, AssetCategory = "Egg", } huge = (humanoidRootPart2.Position - hitbox.Position).Magnitude break end end end end end return tbl11, huge end tbl5.TriggerForestStrike = function(arg) local guard = workspace:FindFirstChild("World") and workspace.World:FindFirstChild("Areas") and workspace.World.Areas:FindFirstChild("GuardAreas") and workspace.World.Areas.GuardAreas:FindFirstChild("Forest") and workspace.World.Areas.GuardAreas.Forest:FindFirstChild("Guard") local pivot = guard and guard:GetPivot() or CFrame.new() pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.GuardPatrol and remotes.GuardPatrol.ForestStrike then remotes.GuardPatrol.ForestStrike:FireServer({ EggUid = arg, GuardCFrame = pivot }) end end) end tbl5.PickClosestEgg = tbl5.PickForestBaitEgg tbl5.GrabWithEggStateSpam = function(arg, arg2, arg3, arg4, arg5) arg3 = arg3 or 3 local now = os.clock() local eggState = tbl4.Game and tbl4.Game.EggState local EggState if eggState then EggState = eggState else EggState = replicatedStorage:FindFirstChild("Client") and replicatedStorage.Client:FindFirstChild("EggState") and require(replicatedStorage.Client.EggState) end local remotes = tbl4.Game and tbl4.Game.Remotes local Remotes_2 if remotes then Remotes_2 = remotes else Remotes_2 = replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Remotes") and require(replicatedStorage.Shared.Remotes) end local networking = replicatedStorage:FindFirstChild("Packages") and replicatedStorage.Packages:FindFirstChild("Networking") local rfEggWorldAskFieldEggCarry = networking and networking:FindFirstChild("RF/EggWorld/AskFieldEggCarry") local flag = type(arg2) == "string" and #arg2 > 0 and arg2 or nil local carriedUid = tostring(arg) local function fn16() local character2 = localPlayer.Character return character2 and character2:FindFirstChild("HumanoidRootPart") end local function fn17() local v7 = fn16() if not v7 then return end local v8 = arg5 or tbl5.GetSafeZone() local flightY = tbl5.FlightY or 78 local vector = Vector3.new(v8.X - v7.Position.X, 0, v8.Z - v7.Position.Z) local unit = vector.Magnitude > 0.1 and vector.Unit or Vector3.new(1, 0, 0) local vector2 = Vector3.new(v7.Position.X + unit.X * 28, flightY, v7.Position.Z + unit.Z * 28) v7.CFrame = CFrame.lookAt(vector2, vector2 + unit) v7.AssemblyLinearVelocity = Vector3.zero v7.AssemblyAngularVelocity = Vector3.zero end local n = 0 local n2 = 0 while os.clock() - now < arg3 do if not enabled["Auto Steal"] then return false end if tbl5.IsCarryingTargetEgg(carriedUid) then tbl5.GotEgg = true farmState.Carrying = true farmState.CarriedUid = carriedUid fn17() return true end local now2 = os.clock() if now2 - n > 0.3 then local v7 = fn16() if v7 and arg4 and (v7.Position - arg4).Magnitude > 9 then tbl5.TweenTo(arg4, math.max(tbl5.Speed or 650, 750), { Owner = "Steal" }) n = now2 else n = now2 end end if EggState and EggState.CarryFieldEgg then local ok, result = pcall(function() return EggState.CarryFieldEgg(carriedUid, flag) end) if ok and result == true then tbl5.GotEgg = true farmState.Carrying = true farmState.CarriedUid = carriedUid fn17() return true end end if now2 - n2 > 0.14 then if rfEggWorldAskFieldEggCarry and rfEggWorldAskFieldEggCarry:IsA("RemoteFunction") then task.spawn(function() pcall(function() rfEggWorldAskFieldEggCarry:InvokeServer({ Uid = carriedUid, FirstAreaSlotKey = flag }) end) if not flag then pcall(function() rfEggWorldAskFieldEggCarry:InvokeServer({ Uid = carriedUid }) end) end end) end if Remotes_2 and Remotes_2.EggWorld and Remotes_2.EggWorld.AskFieldEggCarry then task.spawn(function() pcall(function() Remotes_2.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = carriedUid, FirstAreaSlotKey = flag }) end) if not flag then pcall(function() Remotes_2.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = carriedUid }) end) end end) n2 = now2 else n2 = now2 end end pcall(function() if fireproximityprompt then local areaEggSlotsClient = workspace:FindFirstChild("AreaEggSlotsClient") areaEggSlotsClient = areaEggSlotsClient and areaEggSlotsClient:FindFirstChild(carriedUid) if areaEggSlotsClient then for _, descendant in ipairs(areaEggSlotsClient:GetDescendants()) do if descendant:IsA("ProximityPrompt") and descendant.Enabled then fireproximityprompt(descendant, 0) end end end end end) task.wait(0.03) end local v7 = tbl5.IsCarryingTargetEgg(carriedUid) if v7 then tbl5.GotEgg = true farmState.Carrying = true farmState.CarriedUid = carriedUid fn17() end return v7 end tbl5.HopTo = function(arg, arg2) local tbl11 = arg2 or {} return tbl5.TweenTo(arg, tbl11.Speed or tbl5.GetWalkSpeed(), tbl11) end tbl5.HopOnce = tbl5.HopTo tbl5.StartSpam = function(arg) tbl5.TweenTo(arg, tbl5.Speed or 350, { Owner = "Steal" }) end tbl5.StopSpam = function() end tbl5.StartTeleport = tbl5.StartSpam tbl5.StopTeleport = tbl5.StopSpam tbl5.PlayRunAnimation = tbl5.StartRunAnimation tbl5.IsNight = function() local ok, result = pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Util") and replicatedStorage.Shared.Util:FindFirstChild("AreaEggCycle") then return require(replicatedStorage.Shared.Util.AreaEggCycle) end return require(replicatedStorage.Library.Util.AreaEggResetTimeUtil) end) if ok and type(result) == "table" then local serverTimeNow = workspace:GetServerTimeNow() if result.IsNightPhase then return result.IsNightPhase(serverTimeNow) == true end if result.IsNight then return result.IsNight(serverTimeNow) == true end end return false end tbl5.IsNightWallClosed = function() local ok, result = pcall(function() if replicatedStorage:FindFirstChild("Client") and replicatedStorage.Client:FindFirstChild("AreaEggResetWall") then return require(replicatedStorage.Client.AreaEggResetWall) end return require(replicatedStorage.Library.Client.AreaEggResetWall) end) if ok and type(result) == "table" then if result.IsSealed then return result.IsSealed() == true end if result.IsClosed then return result.IsClosed() == true end end local areas = workspace:FindFirstChild("World") and workspace.World:FindFirstChild("Areas") areas = areas and areas:FindFirstChild("WallStartVisual") if areas and areas:IsA("BasePart") and areas.Transparency < 0.9 and areas.Size.Y > 2 then return true end return false end tbl5.IsNightOrWallClosed = function() return tbl5.IsNight and tbl5.IsNight() or tbl5.IsNightWallClosed() end tbl5.WasNightOrClosed = true tbl5.PostResetBurstUntil = 0 tbl5.LastWorkAt = 0 tbl5.StealIdleGrace = 6 tbl5.MarkWork = function() tbl5.LastWorkAt = os.clock() end tbl5.HasRecentWork = function() return os.clock() - (tbl5.LastWorkAt or 0) < (tbl5.StealIdleGrace or 6) end tbl5.IsEggAvailable = function(arg) if not arg then return false end farmState.RefreshEggs(true) local v7 = ipairs local eggs = farmState.Eggs or {} for _, egg in v7(eggs) do if egg.Uid == arg then if (egg.State == "Slot" or egg.State == "Dropped") and (egg.CarrierUserId == nil or egg.CarrierUserId == localPlayer.UserId) then return true, egg end return false, egg end end return false, nil end tbl5.AutoPickTrackedUid = nil tbl5.AutoPickLastPos = nil tbl5.AutoPickWasCarrying = false tbl5.AutoPickRecovering = false tbl5.IsHoldingEgg = function() local v7, v8 = farmState.GetCarryState() if v7 then return true, v8 end if tbl5.EggInHand() then return true, nil end if tbl5.GetEggTool and tbl5.GetEggTool() then return true, nil end return false, nil end tbl5.DropCurrentEgg = function() tbl5.PlayerDropped = true pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local eggState = tbl4.Game and tbl4.Game.EggState or ReplicatedStorage:FindFirstChild("Client") and ReplicatedStorage.Client:FindFirstChild("EggState") and require(ReplicatedStorage.Client.EggState) if eggState and eggState.DropFieldEgg then eggState.DropFieldEgg("Manual") else local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) end if remotes and remotes.EggWorld and remotes.EggWorld.AskFieldEggDrop then remotes.EggWorld.AskFieldEggDrop:InvokeServer({ Reason = "Manual" }) end end end) pcall(function() local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if humanoid2 then tbl5.ResetHumanoidState(humanoid2) local getEggTool = tbl5.GetEggTool and tbl5.GetEggTool() if getEggTool then local backpack = localPlayer:FindFirstChildOfClass("Backpack") if backpack then getEggTool.Parent = backpack end end end end) pcall(function() local character2 = localPlayer.Character local backpack = localPlayer:FindFirstChildOfClass("Backpack") for _, v7 in ipairs({ character2, backpack }) do if v7 then for _, child in ipairs(v7:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("ItemType") == "AssetEgg" then child.Parent = workspace end end end end end) tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false tbl5.AutoPickWasCarrying = false tbl5.AutoPickTrackedUid = nil end tbl5.FireGrab = function(arg) if not arg or not arg.Uid then return end local resolveSlotKey = tbl5.ResolveSlotKey and tbl5.ResolveSlotKey(arg) or nil pcall(function() if fireproximityprompt then local areaEggSlotsClient = workspace:FindFirstChild("AreaEggSlotsClient") areaEggSlotsClient = areaEggSlotsClient and areaEggSlotsClient:FindFirstChild(arg.Uid) if areaEggSlotsClient then for _, descendant in ipairs(areaEggSlotsClient:GetDescendants()) do if descendant:IsA("ProximityPrompt") and descendant.Enabled then fireproximityprompt(descendant, 0) end end end end end) pcall(function() local eggCmds = tbl4.Game and tbl4.Game.EggCmds if Remotes_ and Remotes_.EggWorld and Remotes_.EggWorld.AskFieldEggCarry then return Remotes_.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = arg.Uid, FirstAreaSlotKey = resolveSlotKey }) end if eggCmds and eggCmds.RequestCarryAreaEgg then return eggCmds.RequestCarryAreaEgg(arg.Uid, resolveSlotKey) end end) end tbl5.PlayerDropped = false tbl5.PlayerDropHookDone = false tbl5.HookDropButton = function(arg) if not arg then return end local function fn16(descendant) if descendant:IsA("GuiButton") then descendant.Activated:Connect(function() tbl5.PlayerDropped = true end) end end for _, descendant in ipairs(arg:GetDescendants()) do fn16(descendant) end arg.DescendantAdded:Connect(fn16) end tbl5.EnsurePlayerDropHook = function() if tbl5.PlayerDropHookDone then return end tbl5.PlayerDropHookDone = true local playerGui2 = playerGui or localPlayer and localPlayer:FindFirstChild("PlayerGui") local dropHeldEgg = playerGui2 and playerGui2:FindFirstChild("DropHeldEgg") if dropHeldEgg then tbl5.HookDropButton(dropHeldEgg) end if playerGui2 then playerGui2.ChildAdded:Connect(function(child) if child.Name == "DropHeldEgg" then tbl5.HookDropButton(child) end end) end pcall(function() local eggState = tbl4.Game and tbl4.Game.EggState if eggState and type(eggState.DropFieldEgg) == "function" then local dropFieldEgg = eggState.DropFieldEgg local flag = false eggState.DropFieldEgg = function(...) tbl5.PlayerDropped = true if flag then return end flag = true local ok, result = pcall(dropFieldEgg, ...) flag = false return result end end end) end tbl5.AutoPickStep = function() tbl5.EnsurePlayerDropHook() local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") local v7, v8 = tbl5.IsHoldingEgg() if v7 then if not tbl5.AutoPickWasCarrying then tbl5.PlayerDropped = false end tbl5.AutoPickWasCarrying = true tbl5.AutoPickRecovering = false if v8 then tbl5.AutoPickTrackedUid = v8 elseif not tbl5.AutoPickTrackedUid then farmState.RefreshEggs(true) local v9 = ipairs local eggs = farmState.Eggs or {} for _, egg in v9(eggs) do if egg.CarrierUserId == localPlayer.UserId then tbl5.AutoPickTrackedUid = egg.Uid break end end end if humanoidRootPart2 then tbl5.AutoPickLastPos = humanoidRootPart2.Position end return end if not tbl5.AutoPickWasCarrying then return end if tbl5.PlayerDropped then tbl5.PlayerDropped = false tbl5.AutoPickWasCarrying = false tbl5.AutoPickTrackedUid = nil return end if tbl5.IsInSafeZone() then tbl5.AutoPickWasCarrying = false tbl5.AutoPickTrackedUid = nil return end local baitBlacklist = tbl5.AutoPickTrackedUid and tbl5.BaitBlacklist and tbl5.BaitBlacklist[tbl5.AutoPickTrackedUid] local flag if baitBlacklist then local v9 = tbl5.BaitBlacklist[tbl5.AutoPickTrackedUid] flag = os.clock() < v9 else flag = baitBlacklist end if flag then tbl5.AutoPickWasCarrying = false tbl5.AutoPickTrackedUid = nil return end if enabled["Auto Steal"] and tbl5.IsStealing then return end if tbl5.AutoPickRecovering then return end tbl5.AutoPickRecovering = true local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if humanoid2 then tbl5.ResetHumanoidState(humanoid2) end humanoidRootPart2 = humanoidRootPart2 and humanoidRootPart2.Position or tbl5.AutoPickLastPos local autoPickTrackedUid = tbl5.AutoPickTrackedUid _G.LastAction = "Auto Pick: Recovering Dropped Egg" movement.Claim("AutoPick", 90) while true do if enabled["Auto Pick Dropped Egg"] and not tbl2.Unloaded then if not tbl5.IsHoldingEgg() then farmState.RefreshEggs(true) local v9, flag2 if autoPickTrackedUid then local v10 = ipairs local eggs = farmState.Eggs or {} v9 = nil flag2 = false for _, egg in v10(eggs) do local flag3 = egg.Uid == autoPickTrackedUid and (egg.State == "Dropped" or egg.State == "Slot") local flag4 if flag3 then flag4 = egg.CarrierUserId == nil or egg.CarrierUserId == localPlayer.UserId else flag4 = flag3 end if flag4 then if egg.State ~= "Dropped" then v9 = egg else flag2 = true v9 = egg end break else v9 = nil end end else local v10, v11, v12 = ipairs(farmState.Eggs or {}) flag2 = false local huge = math.huge v9 = nil for _, v13 in v10, v11, v12 do if (v13.State == "Dropped" or v13.State == "Slot") and (v13.CarrierUserId == nil or v13.CarrierUserId == localPlayer.UserId) then if v13.State == "Dropped" then flag2 = true end local position = v13.BottomCFrame and v13.BottomCFrame.Position or v13.BoundsCFrame and v13.BoundsCFrame.Position local magnitude = position and humanoidRootPart2 and (position - humanoidRootPart2).Magnitude or 0 if v13.State == "Dropped" then magnitude -= 100 end if magnitude < huge then huge = magnitude v9 = v13 end end end end if v9 then local position = v9.BottomCFrame and v9.BottomCFrame.Position or v9.BoundsCFrame and v9.BoundsCFrame.Position local humanoidRootPart3 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if position and humanoidRootPart3 and (humanoidRootPart3.Position - position).Magnitude > 20 then if humanoid2 then tbl5.ResetHumanoidState(humanoid2) end humanoidRootPart3.CFrame = CFrame.new(position.X, position.Y + 2.8, position.Z) humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero humanoidRootPart3.AssemblyAngularVelocity = Vector3.zero end tbl5.FireGrab(v9) tbl5.FireGrab(v9) end local flag3 = not flag2 if flag3 then v9 = autoPickTrackedUid and v9 flag3 = not v9 end if not flag3 then task.wait() continue end end end break end movement.Release("AutoPick") if tbl5.IsHoldingEgg() then tbl5.GotEgg = true farmState.Carrying = true _G.LastAction = "Auto Pick: Egg Recovered" end tbl5.AutoPickWasCarrying = false tbl5.AutoPickRecovering = false end tbl5.IsEggInfested = function(arg) if not arg then return false end if arg.HasParasite == true then return true end if arg.Infested == true or arg.HasInfested == true or arg.IsInfested == true then return true end if arg.BaseMutation == "Parasite" or arg.BaseMutation == "MonsterParasite" then return true end if type(arg.Mutations) == "table" then for _, mutation in pairs(arg.Mutations) do if mutation == "Parasite" or mutation == "MonsterParasite" then return true end end end return false end tbl5.PickTarget = function() local scramble = tbl4.Scramble if (scramble and scramble.Config and scramble.Config.OrchestratorMode or "Prioritize Event") ~= "Steal Idle" and enabled["Auto Farm Drones"] and scramble and scramble.CanRun and scramble.CanRun() then return nil end farmState.RefreshEggs(os.clock() < (tbl5.PostResetBurstUntil or 0)) local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return nil end local now = os.clock() for k, blockedEgg in pairs(tbl6.BlockedEggs) do if blockedEgg <= now then tbl6.BlockedEggs[k] = nil end end local tbl11 = {} local v7 = pairs local eggs = farmState.Eggs or {} for _, egg in v7(eggs) do if type(egg) == "table" and egg.Uid then tbl11[egg.Uid] = true end end for k in pairs(tbl5.FailCounts) do if not tbl11[k] then tbl5.FailCounts[k] = nil end end local v8 = pairs local eggs2 = farmState.Eggs or {} for _, v9 in v8(eggs2) do local flag = type(v9) == "table" and v9.State == "Dropped" if flag then flag = (tbl5.FailCounts[v9.Uid] or 0) < 4 end if flag then tbl6.BlockedEggs[v9.Uid] = nil end end local flag = tbl5.HasSpecificEggFilters == true local prioritizeRiftEgg = enabled["Prioritize Rift Egg"] or enabled["Prioritize Rift Recipe Eggs"] local rift = tbl4.Rift if prioritizeRiftEgg and rift and rift.IsBannerDesired and not rift.IsBannerDesired() then prioritizeRiftEgg = false end local tbl12 = {} if prioritizeRiftEgg and rift then if rift.GetNeededRecipeEggCategories then pcall(function() tbl12 = rift.GetNeededRecipeEggCategories() or {} end) else local getState = rift.GetState and rift.GetState() if getState and getState.Requirements then for _, requirement in ipairs(getState.Requirements) do local str = tostring(type(requirement) == "table" and (requirement.Category or requirement.Id or requirement.Name) or requirement) if str then tbl12[str] = 1 end end end end end local getMinRarity = tbl5.GetMinRarity and tbl5.GetMinRarity() or tbl5.MinRarity or 1 local v9, v10, v11 = pairs(farmState.Eggs or {}) local n = -math.huge local v12 = nil for _, v13 in v9, v10, v11 do local uid = type(v13) == "table" and v13.Uid local flag2 if uid then flag2 = v13.State == "Slot" or v13.State == "Dropped" else flag2 = uid end if flag2 then local v14 = tbl5.IsSpecificEggSelected(v13) local v15 = tbl5.IsAreaSelected(v13.AreaId) local flag3 = tbl5.GetEggRarityNumber(v13) >= getMinRarity local assetCategory = prioritizeRiftEgg and v13.AssetCategory if assetCategory then assetCategory = (tbl12[tostring(v13.AssetCategory)] or 0) > 0 end if flag then v15 = v14 and v15 else v15 = flag3 and v15 or assetCategory end if v15 or assetCategory then local v16 = tbl6.BlockedEggs[v13.Uid] if not (v16 and now < v16) then local position = v13.BottomCFrame and v13.BottomCFrame.Position or v13.BoundsCFrame and v13.BoundsCFrame.Position or nil if position then local v17 = tbl5.CalculateEggScore(v13, (humanoidRootPart2.Position - position).Magnitude) local n2 if flag and v14 then n2 = v17 + 5e9 elseif assetCategory then n2 = v17 + 3e9 else n2 = v17 + 1e9 end if n < n2 then n = n2 v12 = v13 end end end end end end local flag2 = not v12 if flag2 then flag2 = #(farmState.Eggs or {}) == 0 end local v13 if flag2 then local areaEggSlotsClient = workspace:FindFirstChild("AreaEggSlotsClient") if areaEggSlotsClient then for _, child in ipairs(areaEggSlotsClient:GetChildren()) do local hitbox = child:FindFirstChild("Hitbox") local flag3 if hitbox then flag3 = not (tbl6.BlockedEggs[child.Name] and now < tbl6.BlockedEggs[child.Name]) else flag3 = hitbox end if flag3 then local attribute = child:GetAttribute("AssetCategory") or child.Name local tbl13 = { Uid = child.Name, AreaId = "Unknown", State = "Slot", BoundsCFrame = hitbox.CFrame, BottomCFrame = hitbox.CFrame, AssetCategory = attribute, } local v14 = tbl5.IsSpecificEggSelected(tbl13) local flag4 = tbl5.GetEggRarityNumber(tbl13) >= getMinRarity local flag5 if prioritizeRiftEgg then flag5 = (tbl12[tostring(attribute)] or 0) > 0 else flag5 = prioritizeRiftEgg end if not flag then v14 = flag4 or flag5 end if v14 then v12 = tbl13 break end end end v13 = v12 else v13 = v12 end else v13 = v12 end return v13 end local AreaEggSlotIdentity = nil pcall(function() AreaEggSlotIdentity = require(game:GetService("ReplicatedStorage").Shared.Util.AreaEggSlotIdentity) end) tbl5.ResolveSlotKey = function(arg) if not arg or not arg.Uid then return nil end if arg.State == "Dropped" then return nil end local nestId = arg.NestId or string.match(arg.Uid, "(Slot_%d+)") local areaId = arg.AreaId or "Forest" if nestId and AreaEggSlotIdentity and AreaEggSlotIdentity.LooksLikeFirstAreaUid and AreaEggSlotIdentity.LooksLikeFirstAreaUid(arg.Uid) then local ok, result = pcall(function() return AreaEggSlotIdentity.SlotKey(areaId, nestId) end) if ok and result then return result end end if nestId then return tostring(areaId) .. ":" .. tostring(nestId) end return nil end tbl5.Collect = function(arg) local ok, result = pcall(function() if tbl4.Game and tbl4.Game.EggState and tbl4.Game.EggState.ReadFieldEggs then return tbl4.Game.EggState.ReadFieldEggs() end return require(game:GetService("ReplicatedStorage").Client.EggState).ReadFieldEggs() end) local v7, v8, v9 = ipairs(ok and result and (result.Records or result) or {}) local n = 0 for _, v10 in v7, v8, v9 do if v10.State == arg then local v11 = tbl5.ResolveSlotKey(v10) local ok2, result2 = pcall(function() if Remotes_ and Remotes_.EggWorld and Remotes_.EggWorld.AskFieldEggCarry then return Remotes_.EggWorld.AskFieldEggCarry:InvokeServer({ Uid = v10.Uid, FirstAreaSlotKey = v11 }) end return require(game:GetService("ReplicatedStorage").Shared.Remotes).EggWorld.AskFieldEggCarry:InvokeServer({ Uid = v10.Uid, FirstAreaSlotKey = v11 }) end) if ok2 and (result2 == true or type(result2) == "table" and result2.Outcome == true) then n += 1 end end end return n end tbl5.IsActiveStealing = function() if not enabled["Auto Steal"] then return false end if tbl5.IsStealing then return true end if tbl5.IsNightOrWallClosed and tbl5.IsNightOrWallClosed() then return false end if farmState.GetCarryState() then return true end return tbl5.PickTarget() ~= nil end tbl5.ReturnEggToSafeZone = function(arg, arg2, arg3) arg2 = arg2 or tbl5.GetSafeZone() local function fn16() return tbl5.IsCarryingTargetEgg(arg.Uid) end local function fn17() return tbl5.IsGroundedInSafeZone and tbl5.IsGroundedInSafeZone(arg2) end if not fn16() then tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil return false end local claimedAt = farmState.ClaimedAt or 0 os.clock() _G.LastAction = string.format("Steal: Memulai transit ke SafeZone (Elevasi Y=%.0f)...", tbl5.FlightY or 78) local n = 0 local vector while enabled["Auto Steal"] do local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return false end if not fn16() then local flag = (farmState.ClaimedAt or 0) > claimedAt if flag then local claimedAt2 = farmState.ClaimedAt flag = os.clock() - claimedAt2 < 4 end if fn17() and flag then tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil return true end n += 1 if n > 5 then _G.LastAction = string.format("Steal: Recovery Gagal (%d/%d). Mengembalikan ke SafeZone...", n, 5) tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil tbl5.EnsureAtSafeZone(true) return false end _G.LastAction = string.format("Steal: [Recovery %d/%d] Telur terlepas! Mencari koordinat jatuhnya telur...", n, 5) local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if humanoid2 then tbl5.ResetHumanoidState(humanoid2) end local now = os.clock() while true do vector = nil if not (os.clock() - now < 0.4) then break else local v7 = tbl5.FindDroppedFieldEgg(arg.Uid, humanoidRootPart2.Position) if v7 then local position = v7.BottomCFrame and v7.BottomCFrame.Position or v7.BoundsCFrame and v7.BoundsCFrame.Position if position then vector = Vector3.new(position.X, position.Y + 2.5, position.Z) break else task.wait(0.04) end else task.wait(0.04) end end end if vector then local magnitude = (humanoidRootPart2.Position - vector).Magnitude if magnitude > 2.5 then _G.LastAction = string.format("Steal: Tween ke telur jatuh (%.1f studs)...", magnitude) tbl5.TweenTo(vector, math.max(tbl5.Speed or 650, 750), { Owner = "Steal" }) end end local grabWithEggStateSpam = tbl5.GrabWithEggStateSpam local uid = arg.Uid vector = vector or humanoidRootPart2.Position if grabWithEggStateSpam(uid, arg3, 2, vector, arg2) or fn16() then _G.LastAction = string.format("Steal: [Recovery %d/%d] Re-grab Sukses via Tween! Melanjutkan transit...", n, 5) else task.wait(0.04) end continue end local flightY = tbl5.FlightY or 78 local position = humanoidRootPart2.Position local vector2 = Vector3.new(arg2.X - position.X, 0, arg2.Z - position.Z) local magnitude = vector2.Magnitude local unit = magnitude > 0.1 and vector2.Unit or Vector3.new(1, 0, 0) if position.Y < flightY - 2 and magnitude > 15 then local n2 = math.min(30, magnitude * 0.5) tbl5.TweenTo(Vector3.new(position.X + unit.X * n2, flightY, position.Z + unit.Z * n2), math.max(tbl5.Speed or 650, 600), { Owner = "Steal", TargetEggUid = arg.Uid, AbortOnEggDrop = true }) end if fn16() then local vector3 = Vector3.new(arg2.X, flightY, arg2.Z) if (Vector3.new(humanoidRootPart2.Position.X, 0, humanoidRootPart2.Position.Z) - Vector3.new(arg2.X, 0, arg2.Z)).Magnitude > 8 then tbl5.TweenTo(vector3, tbl5.Speed or 650, { Owner = "Steal", TargetEggUid = arg.Uid, AbortOnEggDrop = true }) end end if fn16() then tbl5.TweenTo(Vector3.new(arg2.X, arg2.Y, arg2.Z), math.max(tbl5.Speed or 650, 400), { Owner = "Steal", TargetEggUid = arg.Uid, AbortOnEggDrop = true }) end if fn17() then _G.LastAction = "Steal: Karakter mendarat di SafeZone, menunggu claim server..." local now = os.clock() while os.clock() - now < 2.5 do local flag = (farmState.ClaimedAt or 0) > claimedAt if flag then local claimedAt2 = farmState.ClaimedAt flag = os.clock() - claimedAt2 < 4 end if not (flag or not fn16()) then task.wait(0.05) continue end break end local flag = (farmState.ClaimedAt or 0) > claimedAt if flag then local claimedAt2 = farmState.ClaimedAt flag = os.clock() - claimedAt2 < 4 end if not flag and not fn16() and fn17() then flag = true end if flag then tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil return true end end task.wait(0.04) end return false end tbl5.Step = function() if not enabled["Auto Steal"] then tbl4.Movement.Release("Steal") return end if enabled["Auto Farm Drones"] and tbl4.Scramble and tbl4.Scramble.CanRun and tbl4.Scramble.CanRun() then tbl5.IsStealing = false tbl5.GotEgg = false tbl4.Movement.Release("Steal") tbl5.StopRunAnimation() return end if farmState.IsPlacing or tbl4.PlaceEgg and tbl4.PlaceEgg.Busy or tbl4.Sell and tbl4.Sell.IsSelling then return end if tbl5.IsNightOrWallClosed and tbl5.IsNightOrWallClosed() then tbl5.WasNightOrClosed = true _G.LastAction = "Steal: Night/Wall Standby (SafeZone Prepare)" tbl5.IsStealing = false tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false tbl4.Movement.Release("Steal") tbl5.StopRunAnimation() if enabled["Auto Treadmill"] and tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then return end local n = 0 while true do if (not tbl5.IsInSafeZone() or tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil()) and n < 4 then if not (not enabled["Auto Steal"] or not tbl5.IsNightOrWallClosed()) then n += 1 if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "Steal: Night Exit Treadmill (" .. tostring(n) .. ")" tbl4.Treadmill.ExitToSafeZone() task.wait(0.05) end _G.LastAction = "Steal: Night Go SafeZone (" .. tostring(n) .. ")" tbl5.GoToSafeZone(300, "SafeZone") task.wait(0.08) continue end end break end return end local getCapacityStatus = tbl4.PlaceEgg and tbl4.PlaceEgg.GetCapacityStatus and tbl4.PlaceEgg.GetCapacityStatus() local canPlace = getCapacityStatus and getCapacityStatus.canPlace getCapacityStatus = getCapacityStatus and getCapacityStatus.unplacedCount or 0 if enabled["Auto Place Egg"] and tbl4.PlaceEgg and tbl4.PlaceEgg.Rule == "After Steal" and canPlace then tbl4.PlaceEgg.Step() return end if enabled["Auto Place Egg"] and tbl4.PlaceEgg and tbl4.PlaceEgg.Rule == "Egg Inventory Full" and getCapacityStatus >= 95 and canPlace then tbl4.PlaceEgg.Step() return end if tbl5.WasNightOrClosed then tbl5.WasNightOrClosed = false tbl5.PostResetBurstUntil = os.clock() + 20 farmState.RefreshEggs(true) end _G.LastAction = "Steal: Scan Target Egg" local v7 = tbl5.PickTarget() if not v7 then _G.LastAction = "Steal: Idle (No Target)" tbl5.IsStealing = false tbl5.GotEgg = false tbl4.Movement.Release("Steal") tbl5.StopRunAnimation() local getEggTool = tbl5.GetEggTool and tbl5.GetEggTool() if getEggTool then local backpack = localPlayer:FindFirstChildOfClass("Backpack") if backpack then getEggTool.Parent = backpack end end if enabled["Auto Place Egg"] and tbl4.PlaceEgg and tbl4.PlaceEgg.Rule == "Steal Idle" and canPlace then tbl4.PlaceEgg.Step() end if tbl4.Sell and tbl4.Sell.Step then tbl4.Sell.Step() end if os.clock() < (tbl5.PostResetBurstUntil or 0) then task.wait(0.05) else task.wait(0.5) end return end if not tbl4.Movement.Claim("Steal", 100) then return end tbl5.EnsureCarryHook() tbl5.EnsureClaimHook() tbl5.EnsureRigSyncHook() tbl5.ApplyAntiTpBypass() if stored.StateUpdate["Anti Knockback / Ragdoll"] and not enabled["Anti Knockback / Ragdoll"] then stored.StateUpdate["Anti Knockback / Ragdoll"]:Set(true) end if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "Steal: Exit Treadmill" tbl4.Treadmill.ExitToSafeZone() end tbl5.UnequipAllTools() tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false local position = v7.BottomCFrame and v7.BottomCFrame.Position or v7.BoundsCFrame and v7.BoundsCFrame.Position or nil if not position then tbl4.Movement.Release("Steal") return end local areaEggSlotsClient = workspace:FindFirstChild("AreaEggSlotsClient") and workspace.AreaEggSlotsClient:FindFirstChild(v7.Uid) areaEggSlotsClient = areaEggSlotsClient and areaEggSlotsClient:FindFirstChild("Hitbox") areaEggSlotsClient = areaEggSlotsClient and areaEggSlotsClient.Position local vector if areaEggSlotsClient then vector = areaEggSlotsClient else vector = Vector3.new(position.X, v7.BottomCFrame and v7.BottomCFrame.Position.Y + 1.8 or position.Y + 1.8, position.Z) end local resolveSlotKey = tbl5.ResolveSlotKey and tbl5.ResolveSlotKey(v7) or nil local v8 = tbl5.GetSafeZone() tbl5.IsStealing = true tbl5.GotEgg = false farmState.ClaimedAt = 0 local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if not humanoidRootPart2 or not humanoid2 then tbl5.IsStealing = false tbl4.Movement.Release("Steal") return end local magnitude = (humanoidRootPart2.Position - vector).Magnitude _G.LastAction = string.format("Steal: Target %s [%s] (%.0f studs)", tostring(v7.AssetCategory or "Egg"), tostring(v7.AreaId), magnitude) tbl5.EnsureAtSafeZone() local humanoidRootPart3 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart3 then tbl5.IsStealing = false tbl4.Movement.Release("Steal") return end if enabled["Auto Farm Drones"] and tbl4.Scramble and tbl4.Scramble.CanRun and tbl4.Scramble.CanRun() then tbl5.IsStealing = false tbl4.Movement.Release("Steal") return end local v9 = tbl5.PickForestBaitEgg(v7.Uid) local flag = not v9 if flag then flag = v7.AreaId == "Forest" if not flag then flag = string.find(v7.Uid or "", "FirstArea", 1, true) end end if flag then v9 = v7 end if not v9 then _G.LastAction = "Steal: Waiting for Forest Bait Egg to spawn..." task.wait(0.3) tbl5.IsStealing = false tbl4.Movement.Release("Steal") return end local position2 = v9.BottomCFrame and v9.BottomCFrame.Position or v9.BoundsCFrame and v9.BoundsCFrame.Position or v9.Position or v9.CFrame and v9.CFrame.Position local areaEggSlotsClient2 = workspace:FindFirstChild("AreaEggSlotsClient") and workspace.AreaEggSlotsClient:FindFirstChild(v9.Uid) areaEggSlotsClient2 = areaEggSlotsClient2 and areaEggSlotsClient2:FindFirstChild("Hitbox") areaEggSlotsClient2 = areaEggSlotsClient2 and areaEggSlotsClient2.Position or position2 and position2 + Vector3.new(0, 1.5, 0) or Vector3.new(595, 69, -325) local resolveSlotKey2 = tbl5.ResolveSlotKey and tbl5.ResolveSlotKey(v9) or nil local magnitude2 = (humanoidRootPart3.Position - areaEggSlotsClient2).Magnitude if magnitude2 > 120 then _G.LastAction = string.format("Steal: Jarak bait jauh (%.0f studs). Meluncur mendatar di Y=%.0f...", magnitude2, tbl5.FlightY or 78) tbl5.TweenTo(Vector3.new(areaEggSlotsClient2.X, tbl5.FlightY or 78, areaEggSlotsClient2.Z), math.max(tbl5.Speed or 650, 750), { Owner = "Steal" }) tbl5.TweenTo(areaEggSlotsClient2, math.max(tbl5.Speed or 650, 450), { Owner = "Steal" }) else _G.LastAction = string.format("Steal: [1/4] Snap ke Forest Bait Egg (%s)...", tostring(v9.AssetCategory or "Egg")) humanoidRootPart3.CFrame = CFrame.new(areaEggSlotsClient2) end humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero humanoidRootPart3.AssemblyAngularVelocity = Vector3.zero task.wait(0.25) local now = os.clock() local flag2 while true do flag2 = false if not (os.clock() - now < 2) then break else humanoidRootPart3.CFrame = CFrame.new(areaEggSlotsClient2) humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero local ok, result = pcall(function() local eggState = tbl4.Game and tbl4.Game.EggState or replicatedStorage:FindFirstChild("Client") and replicatedStorage.Client:FindFirstChild("EggState") and require(replicatedStorage.Client.EggState) if eggState and eggState.CarryFieldEgg then return eggState.CarryFieldEgg(v9.Uid, resolveSlotKey2) end end) if result == true or tbl5.IsHoldingEgg() then flag2 = true break else task.wait(0.05) end end end if flag2 or tbl5.IsHoldingEgg() then _G.LastAction = "Steal: [2/4] Trigger ForestStrike (Grace Impact)..." tbl5.RagdollActive = false tbl5.TriggerForestStrike(v9.Uid) local now2 = os.clock() while os.clock() - now2 < 1.2 do if not (tbl5.RagdollActive or tbl5.GraceActive()) then task.wait(0.04) continue end break end if v9.Uid ~= v7.Uid then if tbl5.BaitBlacklist then tbl5.BaitBlacklist[v9.Uid] = os.clock() + 4 end tbl5.DropCurrentEgg() tbl5.GotEgg = false farmState.Carrying = false farmState.CarriedUid = nil end _G.LastAction = string.format("Steal: [3/4] Teleport instant ke target egg %s (Jarak: %.0f studs)...", tostring(v7.AssetCategory or "Egg"), magnitude) humanoidRootPart3.CFrame = CFrame.new(vector) humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero humanoidRootPart3.AssemblyAngularVelocity = Vector3.zero local humanoid3 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if humanoid3 then tbl5.ResetHumanoidState(humanoid3) end task.wait(0.08) local humanoidRootPart4 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart4 then local magnitude3 = (humanoidRootPart4.Position - vector).Magnitude local magnitude4 = (humanoidRootPart4.Position - areaEggSlotsClient2).Magnitude if magnitude3 > 14 then if magnitude3 < magnitude4 or magnitude4 > 40 then _G.LastAction = string.format("Steal: Teleport mendarat setengah jalan (%.0f studs tersisa). Melanjutkan via TweenTo...", magnitude3) tbl5.TweenTo(vector, 300, { Owner = "Steal" }) task.wait(0.04) else humanoidRootPart4.CFrame = CFrame.new(vector) humanoidRootPart4.AssemblyLinearVelocity = Vector3.zero task.wait(0.05) end end end _G.LastAction = string.format("Steal: [4/4] Memulai grab spam untuk telur %s (UID: %s, SlotKey: %s)...", tostring(v7.AssetCategory or "Egg"), v7.Uid, tostring(resolveSlotKey)) local gotEgg = tbl5.GrabWithEggStateSpam(v7.Uid, resolveSlotKey, math.max(tbl5.Timeout or 3.5, 3.5), vector, v8) or tbl5.GotEgg or tbl5.IsCarryingTargetEgg(v7.Uid) if not gotEgg then local n = 0 while true do if not (tbl5.GotEgg or tbl5.IsCarryingTargetEgg(v7.Uid)) and n < 2 then local areaEggSlotsClient3 = workspace:FindFirstChild("AreaEggSlotsClient") and workspace.AreaEggSlotsClient:FindFirstChild(v7.Uid) local findDroppedFieldEgg = tbl5.FindDroppedFieldEgg and tbl5.FindDroppedFieldEgg(v7.Uid) if not areaEggSlotsClient3 and not findDroppedFieldEgg then _G.LastAction = "Steal: Target egg sudah tidak ada di map / dicuri player lain" break else local character2 = localPlayer.Character local humanoidRootPart5 = character2 and character2:FindFirstChild("HumanoidRootPart") character2 = character2 and character2:FindFirstChildOfClass("Humanoid") if not ((humanoidRootPart5 and (humanoidRootPart5.Position - vector).Magnitude or 999) > 35) then n += 1 _G.LastAction = string.format("Steal: Timeout retry (%d/%d) - Micro-validating location...", n, 2) local n2 = n == 1 and 0 or 1.5707963267948966 tbl5.TweenTo(vector + Vector3.new(math.cos(n2) * 3, 0.4, math.sin(n2) * 3), 300, { Owner = "Steal" }) if character2 then pcall(function() character2:MoveTo(vector) end) end tbl5.TweenTo(vector, 300, { Owner = "Steal" }) task.wait(0.08) gotEgg = tbl5.GrabWithEggStateSpam(v7.Uid, resolveSlotKey, 1.5, vector, v8) or tbl5.GotEgg or tbl5.IsCarryingTargetEgg(v7.Uid) continue end end end break end end if gotEgg then _G.LastAction = "Steal: Returning Egg to SafeZone..." if tbl5.ReturnEggToSafeZone(v7, v8, resolveSlotKey) then _G.LastAction = string.format("Steal: Successfully Stolen & Claimed %s!", tostring(v7.AssetCategory or "Egg")) tbl5.FailCounts[v7.Uid] = nil tbl6.BlockedEggs[v7.Uid] = os.clock() + 30 if tbl5.BaitBlacklist then tbl5.BaitBlacklist[v7.Uid] = os.clock() + 30 end if tbl4.DebugInspector then tbl4.DebugInspector.SuccessClaims = (tbl4.DebugInspector.SuccessClaims or 0) + 1 tbl4.DebugInspector.Log(string.format("Successfully Claimed %s!", tostring(v7.AssetCategory or "Egg")), "STEAL") end if tbl4.WebhookManager then tbl4.WebhookManager.QueueEggSteal(v7) end for i = #farmState.Eggs, 1, -1 do if farmState.Eggs[i].Uid == v7.Uid then table.remove(farmState.Eggs, i) break end end task.wait(0.15) tbl5.UnequipAllTools() local now3 = os.clock() while os.clock() - now3 < 1 do local playerGui2 = playerGui or localPlayer and localPlayer:FindFirstChild("PlayerGui") playerGui2 = playerGui2 and playerGui2:FindFirstChild("DropHeldEgg") if not (not playerGui2 or not playerGui2.Enabled) then task.wait(0.05) continue end break end tbl5.UnequipAllTools() tbl5.GotEgg = false tbl5.IsStealing = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false if tbl4.Sell and tbl4.Sell.Step then tbl4.Sell.Step() end task.wait(0.2) else _G.LastAction = "Steal: Failed to Deliver Egg. SafeZone Return..." tbl5.UnequipAllTools() tbl5.GotEgg = false tbl5.IsStealing = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false tbl5.EnsureAtSafeZone(true) end else _G.LastAction = "Steal: Failed to Grab Egg (Timeout). SafeZone Return..." if v7 and v7.Uid then tbl6.BlockedEggs[v7.Uid] = os.clock() + 5 if tbl5.BaitBlacklist then tbl5.BaitBlacklist[v7.Uid] = os.clock() + 5 end end tbl5.UnequipAllTools() tbl5.GotEgg = false tbl5.IsStealing = false farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false tbl5.EnsureAtSafeZone(true) end tbl5.IsStealing = false tbl5.StopRunAnimation() tbl4.Movement.Release("Steal") return end _G.LastAction = "Steal: Bait egg gagal diambil dalam 1.5 detik. Mencoba ulang bait..." if tbl5.BaitBlacklist then tbl5.BaitBlacklist[v9.Uid] = os.clock() + 2 end tbl5.IsStealing = false tbl4.Movement.Release("Steal") end return tbl5 end tbl4.Steal = fn14() local function fn15() local tbl5 = {} if tbl4.Game then end tbl5.Busy = false tbl5.LastRun = 0 tbl5.LastFinishAt = 0 tbl5.Rule = "Steal Idle" tbl5.MaxPlaced = 30 tbl5.FailCounts = {} tbl5.FailAt = {} tbl5.FailRetryCooldown = 45 tbl5.SelectionMode = "Choose Any Egg" tbl5.GetEggWeight = function(arg) if tbl4.Steal and tbl4.Steal.GetEggWeight then local ok, result = pcall(tbl4.Steal.GetEggWeight, arg) if ok and type(result) == "number" then return result end end return 0 end tbl5.GetEggIncome = function(arg) if not arg then return 0 end local assets = tbl4.Game and tbl4.Game.Assets local assetCategory = arg.AssetCategory and (assets and assets.Directory or assets or {})[arg.AssetCategory] local n = assetCategory and tonumber(assetCategory.EarningRate) or 0 if n <= 0 then return 0 end local n2 = tonumber(arg.AssetScale) or tonumber(arg.Scale) or 1 local n3 if n2 <= 5 then n3 = n2 ^ 1.85 else n3 = (n2 / 5) ^ 1.2 * 19.637875755794113 end return n * n3 end tbl5.SortByPriority = function(arg, arg2) if #arg < 2 then return arg end local prioritizeRiftEgg = enabled["Prioritize Rift Egg"] or enabled["Prioritize Rift Recipe Eggs"] local tbl6 = {} if prioritizeRiftEgg and tbl4.Rift and tbl4.Rift.GetMissingRequirements then pcall(function() tbl6 = tbl4.Rift.GetMissingRequirements() end) end local selectionMode = tbl5.SelectionMode or "Choose Any Egg" local getEggWeight = (selectionMode == "Highest KG" or selectionMode == "Lowest KG") and tbl5.GetEggWeight or tbl5.GetEggIncome local flag = selectionMode == "Highest KG" or selectionMode == "Highest Money/Sec" local tbl7 = {} local function fn16(arg3) if tbl7[arg3] == nil then local v7 = arg2 and arg2[arg3] local n = 0 if selectionMode ~= "Choose Any Egg" then n = getEggWeight(v7) or 0 if not flag then n = -n end end if v7 and v7.AssetCategory and tbl6[tostring(v7.AssetCategory)] then n += 1e12 end tbl7[arg3] = n end return tbl7[arg3] end table.sort(arg, function(arg3, arg4) local v7 = fn16(arg3) local v8 = fn16(arg4) if v7 == v8 then return tostring(arg3) < tostring(arg4) end return v7 > v8 end) return arg end tbl5.IsEggInfested = function(arg, arg2) if arg and arg.HasParasite == true then return true end if arg2 then local ok, result = pcall(function() return require(game:GetService("ReplicatedStorage").Client.EggState) end) if ok and result and result.FetchEggRecord then local v7 = result.FetchEggRecord(arg2) if v7 and v7.HasParasite == true then return true end end end return false end tbl5.LastCapCheck = 0 tbl5.CachedCapacity = nil tbl5.GetCapacityStatus = function(arg) local now = os.clock() if not arg and tbl5.CachedCapacity and now - tbl5.LastCapCheck < 1.5 then return tbl5.CachedCapacity end tbl5.LastCapCheck = now local eggCmds = tbl4.Game and tbl4.Game.EggCmds local save = tbl4.Game and tbl4.Game.Save if tbl4.Game then end local get = save and save.Get local n = 1 if get then local v7 = save.Get() local peek if v7 then peek = v7 else peek = save.Peek and save.Peek() end peek = peek or {} if type(peek) == "table" then n = peek.BaseUpgradeLevel or n if peek.EggInventory then end end end local maxPlaced = tbl5.MaxPlaced or 30 local getRuntimeSnapshot = eggCmds and eggCmds.GetRuntimeSnapshot and eggCmds.GetRuntimeSnapshot() or {} local tbl6 = {} for _, v7 in ipairs(getRuntimeSnapshot) do if v7.OwnerUserId == localPlayer.UserId then tbl6 = v7.Records or {} break end end local tbl7 = {} local n2 = 0 for k, v7 in pairs(tbl6) do if v7.Placement == nil then local n3 = tbl5.FailCounts[k] or 0 local flag = n3 >= 3 local flag2 if flag then flag2 = os.clock() - (tbl5.FailAt[k] or 0) >= (tbl5.FailRetryCooldown or 45) else flag2 = flag end if flag2 then tbl5.FailCounts[k] = nil tbl5.FailAt[k] = nil n3 = 0 end if n3 < 3 then table.insert(tbl7, k) end else n2 += 1 end end tbl5.SortByPriority(tbl7, tbl6) local flag = n2 >= maxPlaced local cachedCapacity = { baseLevel = n, maxPlaced = maxPlaced, placedCount = n2, unplacedUids = tbl7, unplacedCount = #tbl7, isPenFull = flag, canPlace = #tbl7 > 0 and not flag, } tbl5.CachedCapacity = cachedCapacity return cachedCapacity end tbl5.ShouldRunNow = function() if tbl5.Busy or tbl4.FarmState and tbl4.FarmState.IsPlacing then return true end if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then return false end if os.clock() - (tbl5.LastFinishAt or 0) < 2.5 then return false end local v7 = tbl5.GetCapacityStatus() if not v7 or not v7.canPlace then return false end if tbl5.Rule == "Egg Inventory Full" then return v7.unplacedCount >= 95 end if tbl5.Rule == "Steal Idle" then return not (tbl4.Steal and tbl4.Steal.IsActiveStealing and tbl4.Steal.IsActiveStealing()) and v7.canPlace end if tbl5.Rule == "After Steal" then return v7.canPlace end return false end tbl5.GetUnplacedUids = function() return tbl5.GetCapacityStatus().unplacedUids end tbl5.GetPlacedWorldPositions = function(arg) local eggCmds = tbl4.Game and tbl4.Game.EggCmds local getRuntimeSnapshot = eggCmds and eggCmds.GetRuntimeSnapshot and eggCmds.GetRuntimeSnapshot() or {} if not getRuntimeSnapshot or #getRuntimeSnapshot == 0 then local ok, result = pcall(function() return require(game:GetService("ReplicatedStorage").Client.EggState) end) if ok and result and result.ReadOwnedEggs then getRuntimeSnapshot = result.ReadOwnedEggs() end end local tbl6 = {} local v7 = ipairs getRuntimeSnapshot = getRuntimeSnapshot or {} for _, v8 in v7(getRuntimeSnapshot) do if v8.OwnerUserId == localPlayer.UserId then local v9 = pairs local records = v8.Records or {} for _, record in v9(records) do if record.Placement ~= nil then local localCFrame = record.Placement.LocalCFrame or record.Placement if typeof(localCFrame) == "string" then local tbl7 = {} for match in string.gmatch(localCFrame, "[-0-9%.e]+") do table.insert(tbl7, tonumber(match)) end if #tbl7 >= 3 then local cframe = CFrame.new(unpack(tbl7)) table.insert(tbl6, arg.CFrame:ToWorldSpace(cframe).Position) end elseif typeof(localCFrame) == "CFrame" then table.insert(tbl6, arg.CFrame:ToWorldSpace(localCFrame).Position) end end end return tbl6 end end return tbl6 end tbl5.FindNextFreeSlot = function(arg, arg2) local petArea = arg.PetArea local centerPoint = arg.CenterPoint local n = petArea.Size.X * 0.5 - 3.5 local n2 = petArea.Size.Z * 0.5 - 3.5 local n3 = -n2 while n3 <= n2 do local n4 = -n while n4 <= n do local v7 = petArea.CFrame:PointToWorldSpace(Vector3.new(n4, 0, n3)) local flag = false for _, v8 in ipairs(arg2) do if math.sqrt((v7.X - v8.X) ^ 2 + (v7.Z - v8.Z) ^ 2) < 4.8 then flag = true break end end if not flag then return v7, centerPoint.CFrame:ToObjectSpace(CFrame.new(v7)) end n4 += 5.5 end n3 += 5.5 end return nil end tbl5.Step = function() if tbl5.Busy then return end if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then return end if tbl4.Steal and tbl4.Steal.IsActiveStealing and tbl4.Steal.IsActiveStealing() then return end local v7 = tbl5.GetCapacityStatus() if v7.isPenFull or v7.unplacedCount == 0 then return end local plotCmds = tbl4.Game and tbl4.Game.PlotCmds local getPlotData = plotCmds and plotCmds.GetPlotData and plotCmds.GetPlotData() if not getPlotData or not getPlotData.PetArea or not getPlotData.CenterPoint then local ok, result = pcall(function() return require(game:GetService("ReplicatedStorage").Client.PlotState) end) if ok and result and result.ResolvePlot then local v8 = result.ResolvePlot(localPlayer) if v8 and v8.CenterPoint and v8.PetArea then getPlotData = { PlotIndex = tonumber(v8.Slot) or 1, PlotFolder = v8.PlotFolder, CenterPoint = v8.CenterPoint, PetArea = v8.PetArea, RespawnPointCFrame = v8.RespawnPointCFrame, } end end end if not getPlotData or not getPlotData.PetArea or not getPlotData.CenterPoint then return end local character2 = localPlayer.Character if not (character2 and character2:FindFirstChild("HumanoidRootPart")) then return end if not tbl4.Movement.Claim("PlaceEgg", 80) then return end if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "PlaceEgg: Exit Treadmill" tbl4.Treadmill.ExitToSafeZone() end tbl5.Busy = true tbl4.FarmState.IsPlacing = true _G.LastAction = "PlaceEgg: Init" local n = getPlotData.CenterPoint and getPlotData.CenterPoint.Position + Vector3.new(0, 2.8, 0) local n2 = getPlotData.PetArea.Position + Vector3.new(0, 2.8, 0) local function fn16() local character3 = localPlayer.Character local humanoidRootPart2 = character3 and character3:FindFirstChild("HumanoidRootPart") local magnitude = humanoidRootPart2 and (humanoidRootPart2.Position - n2).Magnitude or 999 local n3 = 0 while true do if magnitude > 14 and n3 < 4 then if enabled["Auto Place Egg"] then _G.LastAction = "PlaceEgg: Move to PetArea Pen (" .. tostring(n3 + 1) .. ")" if n and humanoidRootPart2 and (humanoidRootPart2.Position - n).Magnitude > 15 and magnitude > 20 then tbl4.Steal.TweenTo(n, 200, { Owner = "PlaceEgg" }) task.wait(0.05) end tbl4.Steal.TweenTo(n2, 200, { Owner = "PlaceEgg" }) task.wait(0.1) local character4 = localPlayer.Character humanoidRootPart2 = character4 and character4:FindFirstChild("HumanoidRootPart") magnitude = humanoidRootPart2 and (humanoidRootPart2.Position - n2).Magnitude or 999 n3 += 1 continue end end break end return magnitude <= 18 end _G.LastAction = "PlaceEgg: Move to Pen" if not fn16() then tbl5.Busy = false tbl4.FarmState.IsPlacing = false tbl4.Movement.Release("PlaceEgg") return end if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "PlaceEgg: Unstick from Treadmill" if tbl4.Treadmill.Unequip then tbl4.Treadmill.Unequip() end task.wait(0.05) end local v8 = tbl5.GetPlacedWorldPositions(getPlotData.CenterPoint) local placedCount = v7.placedCount for _, unplacedUid in ipairs(v7.unplacedUids) do if enabled["Auto Place Egg"] then if not (v7.maxPlaced <= placedCount) then if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then _G.LastAction = "PlaceEgg: Interrupted by Night (Returning SafeZone)" break else local v9, v10 = tbl5.FindNextFreeSlot(getPlotData, v8) if v9 then local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 or (humanoidRootPart2.Position - n2).Magnitude > 18 then _G.LastAction = "PlaceEgg: Lagback Detected! Returning to Pen" if not fn16() then continue end end if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then _G.LastAction = "PlaceEgg: Unstick from Treadmill" if tbl4.Treadmill.Unequip then tbl4.Treadmill.Unequip() end task.wait(0.05) end local eggCmds = tbl4.Game and tbl4.Game.EggCmds _G.LastAction = "PlaceEgg: Equip Tool (" .. tostring(unplacedUid) .. ")" if eggCmds and eggCmds.RequestEquipTool then pcall(function() eggCmds.RequestEquipTool(unplacedUid) end) end task.wait(0.2) _G.LastAction = "PlaceEgg: Request Place Egg (" .. tostring(unplacedUid) .. ")" local ok, result = pcall(function() if eggCmds and eggCmds.RequestPlaceEgg then return eggCmds.RequestPlaceEgg(unplacedUid, v10) end return require(game:GetService("ReplicatedStorage").Client.EggState).PlantEgg(unplacedUid, v10) end) if eggCmds and eggCmds.RequestUnequipTool then pcall(function() eggCmds.RequestUnequipTool(unplacedUid) end) end if ok and (result == true or type(result) == "table" and (result.Outcome == true or result.Success == true or result.Placed == true)) then placedCount += 1 table.insert(v8, v9) tbl5.FailCounts[unplacedUid] = nil tbl5.FailAt[unplacedUid] = nil else tbl5.FailCounts[unplacedUid] = (tbl5.FailCounts[unplacedUid] or 0) + 1 tbl5.FailAt[unplacedUid] = os.clock() if tbl5.FailCounts[unplacedUid] >= 3 then _G.LastAction = "PlaceEgg: Skip Failed Egg (" .. tostring(unplacedUid) .. ")" end end task.wait(0.15) continue end end end end break end pcall(function() local character3 = localPlayer.Character character3 = character3 and character3:FindFirstChildOfClass("Humanoid") if character3 then character3:UnequipTools() end end) pcall(function() local eggCmds = tbl4.Game and tbl4.Game.EggCmds if eggCmds and eggCmds.RequestRuntimeSnapshot then eggCmds.RequestRuntimeSnapshot() end end) local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart2 and n and (humanoidRootPart2.Position - n).Magnitude > 8 then _G.LastAction = "PlaceEgg: Return Center Corridor" tbl4.Steal.TweenTo(n, 120, { Owner = "PlaceEgg" }) task.wait(0.05) end _G.LastAction = "PlaceEgg: Completed" tbl5.Busy = false tbl4.FarmState.IsPlacing = false tbl5.LastRun = os.clock() tbl5.LastFinishAt = os.clock() tbl5.CachedCapacity = nil tbl4.Movement.Release("PlaceEgg") if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then tbl4.Steal.GoToSafeZone(300, "SafeZone") elseif enabled["Auto Treadmill"] and tbl4.Treadmill and tbl4.Treadmill.CanRun and tbl4.Treadmill.CanRun() then tbl4.Treadmill.Step() end end return tbl5 end tbl4.PlaceEgg = fn15() local function fn16() local tbl5 tbl5 = { UndergroundOffset = 1000, OriginalPositions = {}, OriginalProperties = {}, IsHidden = false, CollectInstances = function() local tbl6 = {} local plotCmds = tbl4.Game and tbl4.Game.PlotCmds local getPlot = tbl4.Game and tbl4.Game.GetPlot and tbl4.Game.GetPlot() or plotCmds and plotCmds.GetPlotData and plotCmds.GetPlotData() local plotIndex = getPlot and getPlot.PlotIndex local clientTreadmillRenders = workspace:FindFirstChild("__ClientTreadmillRenders") if clientTreadmillRenders then if plotIndex then local v7 = clientTreadmillRenders:FindFirstChild("TreadmillRender_" .. tostring(plotIndex)) if v7 then table.insert(tbl6, v7) end else for _, child in ipairs(clientTreadmillRenders:GetChildren()) do table.insert(tbl6, child) end end end if getPlot and getPlot.PlotFolder then local treadmillBottom = getPlot.PlotFolder:FindFirstChild("TreadmillBottom") if treadmillBottom then table.insert(tbl6, treadmillBottom) end local treadmillUpgrade = getPlot.PlotFolder:FindFirstChild("TreadmillUpgrade") if treadmillUpgrade then table.insert(tbl6, treadmillUpgrade) end for _, child in ipairs(getPlot.PlotFolder:GetChildren()) do if string.find(child.Name, "Treadmill", 1, true) and not table.find(tbl6, child) then table.insert(tbl6, child) end end end return tbl6 end, Hide = function() local v7 = tbl5.CollectInstances() for _, v8 in ipairs(v7) do if v8 and v8.Parent then if v8:IsA("Model") or v8:IsA("Tool") then if not tbl5.OriginalPositions[v8] then tbl5.OriginalPositions[v8] = v8:GetPivot() end local v9 = tbl5.OriginalPositions[v8] pcall(function() v8:PivotTo(v9 - Vector3.new(0, tbl5.UndergroundOffset, 0)) end) for _, descendant in ipairs(v8:GetDescendants()) do if descendant:IsA("BasePart") then if not tbl5.OriginalProperties[descendant] then tbl5.OriginalProperties[descendant] = { CanTouch = descendant.CanTouch, CanCollide = descendant.CanCollide } end descendant.CanTouch = false descendant.CanCollide = false end end elseif v8:IsA("BasePart") then if not tbl5.OriginalPositions[v8] then tbl5.OriginalPositions[v8] = v8.CFrame end if not tbl5.OriginalProperties[v8] then tbl5.OriginalProperties[v8] = { CanTouch = v8.CanTouch, CanCollide = v8.CanCollide } end v8.CFrame = tbl5.OriginalPositions[v8] - Vector3.new(0, tbl5.UndergroundOffset, 0) v8.CanTouch = false v8.CanCollide = false end end end tbl5.IsHidden = true end, Restore = function() for k, originalPosition in pairs(tbl5.OriginalPositions) do if k and k.Parent then pcall(function() if k:IsA("Model") or k:IsA("Tool") then k:PivotTo(originalPosition) elseif k:IsA("BasePart") then k.CFrame = originalPosition end end) if k:IsA("Model") or k:IsA("Tool") then for _, descendant in ipairs(k:GetDescendants()) do if descendant:IsA("BasePart") and tbl5.OriginalProperties[descendant] then local v7 = tbl5.OriginalProperties[descendant] descendant.CanTouch = v7.CanTouch descendant.CanCollide = v7.CanCollide end end elseif k:IsA("BasePart") and tbl5.OriginalProperties[k] then local v7 = tbl5.OriginalProperties[k] k.CanTouch = v7.CanTouch k.CanCollide = v7.CanCollide end end end tbl5.IsHidden = false end, } local MusicDirector = nil pcall(function() MusicDirector = require(game:GetService("ReplicatedStorage").Client.MusicDirector) end) local Hud = nil pcall(function() Hud = require(game:GetService("ReplicatedStorage").Client.Hud) end) local Remotes_ = nil pcall(function() Remotes_ = require(game:GetService("ReplicatedStorage").Shared.Remotes) end) local Treadmills = nil pcall(function() Treadmills = require(game:GetService("ReplicatedStorage").Data.Treadmills) end) local function checkTreadmil() if MusicDirector and MusicDirector.HasCustomTreadmill then local ok, result = pcall(MusicDirector.HasCustomTreadmill) if ok and result == true then return true end end if Hud and Hud.Frame then local ok, result = pcall(Hud.Frame, "Treadmill") if ok and result and result.Visible == true then return true end end if not hud and not MusicDirector then local assignedBeltShifted = Remotes_ and Remotes_.Treadmill and Remotes_.Treadmill.AssignedBeltShifted if assignedBeltShifted and getconnections then local directory = Treadmills and Treadmills.Directory if directory then for _, v7 in ipairs(getconnections(assignedBeltShifted.OnClientEvent)) do local function_ = v7.Function if type(function_) == "function" and debug and debug.getupvalue then local ok, result = pcall(debug.getupvalue, function_, 1) if ok and typeof(result) == "string" and directory[result] then return true end end end end end end return false end tbl5.CheckTreadmil = checkTreadmil tbl5.CheckTreadmill = checkTreadmil tbl5.IsOnTreadmill = checkTreadmil tbl5.CanRun = function() if not enabled["Auto Treadmill"] then return false end if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then return false end if enabled["Auto Steal"] then if tbl4.Steal and tbl4.Steal.IsActiveStealing and tbl4.Steal.IsActiveStealing() then return false end if tbl4.Steal and (tbl4.Steal.IsStealing or tbl4.FarmState and (tbl4.FarmState.Carrying or tbl4.FarmState.OptimisticCarry)) then return false end local steal = tbl4.Steal if steal then steal = os.clock() < (tbl4.Steal.PostResetBurstUntil or 0) end if steal then return false end if tbl4.Steal and tbl4.Steal.PickTarget and tbl4.Steal.PickTarget() ~= nil then return false end if tbl4.Steal and tbl4.Steal.HasRecentWork and tbl4.Steal.HasRecentWork() then return false end end if tbl4.FarmState and tbl4.FarmState.IsPlacing or tbl4.PlaceEgg and tbl4.PlaceEgg.Busy then return false end if enabled["Auto Place Egg"] and tbl4.PlaceEgg and tbl4.PlaceEgg.ShouldRunNow then if tbl4.PlaceEgg.ShouldRunNow() then return false end end if tbl4.Sell then if tbl4.Sell.IsSelling then return false end if enabled["Auto Sell Pet"] and tbl4.Sell.CollectPetUids then if #tbl4.Sell.CollectPetUids() > 0 then return false end end if enabled["Auto Sell Egg"] and tbl4.Sell.CollectEggUids then if #tbl4.Sell.CollectEggUids() > 0 then return false end end end if not tbl4.Movement.CanClaim("Treadmill", 40) then return false end return true end tbl5.Unequip = function() if not checkTreadmil() then return true end pcall(function() if Remotes_ and Remotes_.Treadmill and Remotes_.Treadmill.AskDoff then Remotes_.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) local n = 0 while checkTreadmil() and n < 30 do n += 1 task.wait(0.05) if checkTreadmil() and n % 5 == 0 then pcall(function() if Remotes_ and Remotes_.Treadmill and Remotes_.Treadmill.AskDoff then Remotes_.Treadmill.AskDoff:InvokeServer() elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Treadmills: RequestUnequip") then replicatedStorage.Network["Treadmills: RequestUnequip"]:InvokeServer() end end) end end return not checkTreadmil() end tbl5.ExitTreadmill = tbl5.Unequip tbl5.ExitToSafeZone = function() tbl4.Movement.Release("Treadmill") local character2 = localPlayer.Character local humanoidRootPart2 = character2 and character2:FindFirstChild("HumanoidRootPart") local humanoid2 = character2 and character2:FindFirstChildOfClass("Humanoid") local plotCmds = tbl4.Game and tbl4.Game.PlotCmds local getPlot = tbl4.Game and tbl4.Game.GetPlot and tbl4.Game.GetPlot() or plotCmds and plotCmds.GetPlotData and plotCmds.GetPlotData() local treadmillBottom = getPlot and getPlot.PlotFolder and getPlot.PlotFolder:FindFirstChild("TreadmillBottom") treadmillBottom = treadmillBottom and treadmillBottom.Position local flag = humanoidRootPart2 and treadmillBottom and (humanoidRootPart2.Position - treadmillBottom).Magnitude < 15 if not (checkTreadmil() or flag) then return end _G.LastAction = "Treadmill: Exit to SafeZone" tbl5.Unequip() local character3 = localPlayer.Character character3 = character3 and character3:FindFirstChild("HumanoidRootPart") if character3 and getPlot and getPlot.CenterPoint then character3.CFrame = CFrame.new(getPlot.CenterPoint.Position + Vector3.new(0, 2.8, 0)) character3.AssemblyLinearVelocity = Vector3.zero character3.AssemblyAngularVelocity = Vector3.zero end if humanoid2 then pcall(function() humanoid2:ChangeState(Enum.HumanoidStateType.Running) end) end if tbl4.Steal and tbl4.Steal.StopRunAnimation and not tbl4.Steal.IsStealing then tbl4.Steal.StopRunAnimation() end task.wait(0.05) end task.spawn(function() v6(game:GetService("ContextActionService")) local function fn17(arg) if not arg or arg:GetAttribute("ControllerJumpEnabled") then return end local playerModule = localPlayer:WaitForChild("PlayerScripts"):WaitForChild("PlayerModule") rawset(require(playerModule):GetControls(), "humanoid", arg) arg:GetPropertyChangedSignal("Jump"):Connect(function() if not arg.Jump then return end if checkTreadmil() then tbl5.Unequip() end end) arg:SetAttribute("ControllerJumpEnabled", true) end while task.wait(0.5) do local character2 = localPlayer.Character if character2 then local humanoid2 = character2:FindFirstChildOfClass("Humanoid") if humanoid2 then pcall(fn17, humanoid2) end end end end) task.spawn(function() local flag = false while task.wait(0.1) do local flag2 = false pcall(function() if checkTreadmil and checkTreadmil() then flag2 = true else local plotCmds = tbl4.Game and tbl4.Game.PlotCmds local getPlot = tbl4.Game and tbl4.Game.GetPlot and tbl4.Game.GetPlot() or plotCmds and plotCmds.GetPlotData and plotCmds.GetPlotData() local treadmillBottom = getPlot and getPlot.PlotFolder and getPlot.PlotFolder:FindFirstChild("TreadmillBottom") local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if treadmillBottom and humanoidRootPart2 and (humanoidRootPart2.Position - treadmillBottom.Position).Magnitude < 4.5 then flag2 = true end end end) if flag2 then local startRunAnimation = tbl4.Steal and tbl4.Steal.StartRunAnimation flag = true if startRunAnimation then if not tbl4.Steal.RunAnimConnection then tbl4.Steal.StartRunAnimation(tbl4.Steal.GetWalkSpeed and tbl4.Steal.GetWalkSpeed() or 24) end end elseif flag then local stopRunAnimation = not (tbl4.Steal and tbl4.Steal.IsStealing) and tbl4.Steal and tbl4.Steal.StopRunAnimation flag = false if stopRunAnimation then tbl4.Steal.StopRunAnimation() end end end end) tbl5.Step = function() if not enabled["Auto Treadmill"] then if checkTreadmil() then tbl5.ExitToSafeZone() end return end if not tbl5.CanRun() then if checkTreadmil() then tbl5.ExitToSafeZone() end if tbl4.Steal and tbl4.Steal.IsNightOrWallClosed and tbl4.Steal.IsNightOrWallClosed() then tbl4.Steal.GoToSafeZone(300, "SafeZone") end return end if not tbl4.Movement.Claim("Treadmill", 40) then return end local getPlot = tbl4.Game and tbl4.Game.GetPlot and tbl4.Game.GetPlot() local plotFolder = getPlot and getPlot.PlotFolder plotFolder = plotFolder and plotFolder:FindFirstChild("TreadmillBottom") if not plotFolder then tbl4.Movement.Release("Treadmill") return end local character2 = localPlayer.Character character2 = character2 and character2:FindFirstChild("HumanoidRootPart") if not character2 then tbl4.Movement.Release("Treadmill") return end local n = plotFolder.Position + Vector3.new(0, 2.8, 0) local magnitude = (character2.Position - n).Magnitude if magnitude <= 4.5 or checkTreadmil() then tbl4.Movement.Release("Treadmill") return end if not tbl4.Movement.Claim("Treadmill", 40) then return end local n2 = getPlot.CenterPoint and getPlot.CenterPoint.Position + Vector3.new(0, 2.8, 0) local getSafeZone = tbl4.Steal and tbl4.Steal.GetSafeZone and tbl4.Steal.GetSafeZone() local flag = n2 and (character2.Position - n2).Magnitude <= 80 local isInSafeZoneArea = tbl4.Steal and tbl4.Steal.IsInSafeZoneArea and tbl4.Steal.IsInSafeZoneArea() if not flag and not isInSafeZoneArea and getSafeZone and magnitude > 35 then _G.LastAction = "Treadmill: Return to SafeZone First" tbl4.Steal.TweenTo(getSafeZone, 300, { Owner = "Treadmill" }) task.wait(0.05) end local humanoidRootPart2 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if not humanoidRootPart2 then return end if n2 and (humanoidRootPart2.Position - n2).Magnitude > 15 and (humanoidRootPart2.Position - n).Magnitude > 12 then _G.LastAction = "Treadmill: Enter Plot Corridor" tbl4.Steal.TweenTo(n2, 120, { Owner = "Treadmill" }) task.wait(0.05) end local humanoidRootPart3 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart3 and (humanoidRootPart3.Position - n).Magnitude > 3.5 then _G.LastAction = "Treadmill: Move to Treadmill" tbl4.Steal.TweenTo(n, 120, { Owner = "Treadmill" }) end local humanoidRootPart4 = localPlayer.Character and localPlayer.Character:FindFirstChild("HumanoidRootPart") if humanoidRootPart4 and (humanoidRootPart4.Position - n).Magnitude <= 5 then local lookVector = plotFolder.CFrame.LookVector humanoidRootPart4.CFrame = CFrame.lookAt(n, n + lookVector) humanoidRootPart4.AssemblyLinearVelocity = Vector3.zero humanoidRootPart4.AssemblyAngularVelocity = Vector3.zero local humanoid2 = localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") if humanoid2 then pcall(function() humanoid2:ChangeState(Enum.HumanoidStateType.Running) humanoid2:Move(lookVector) end) end _G.LastAction = "Treadmill: Running on Treadmill" tbl4.Movement.Release("Treadmill") end end return tbl5 end tbl4.Treadmill = fn16() tbl4.MonsterEvents = {} local function fn17() local farmState = tbl4.FarmState return { Step = function() if not tbl4.Game.EggCmds then return end local ok, result = pcall(function() local v7 = tbl4.Game.EggCmds.GetRuntimeSnapshot() for _, v8 in ipairs(v7) do if v8.OwnerUserId == localPlayer.UserId then return v8.Records end end return {} end) if not ok or not result then return end local tbl5 = {} for k in pairs(result) do tbl5[k] = true end for k in pairs(farmState.HatchedUids) do if not tbl5[k] then farmState.HatchedUids[k] = nil end end for k, v7 in pairs(result) do if v7.Placement and not farmState.HatchedUids[k] then local flag = false if pcall(function() flag = tbl4.Game.EggCmds.IsLocalEggReady(k) end) and flag then _G.LastAction = "Hatch: Request Hatch Egg (" .. tostring(k) .. ")" local ok2, result2 = pcall(function() return tbl4.Game.EggCmds.RequestHatchEgg(k) end) if ok2 and result2 == true then _G.LastAction = "Hatch: Complete Hatch Egg (" .. tostring(k) .. ")" local ok3, result3 = pcall(function() return tbl4.Game.EggCmds.RequestCompleteHatchEgg(k) end) if ok3 and result3 == true then farmState.HatchedUids[k] = true end end end end end end } end tbl4.Hatch = fn17() local function fn18() local tbl5 tbl5 = { LastEquipAt = 0, Execute = function() local lastEquipAt = tbl5.LastEquipAt if os.clock() - lastEquipAt < 5.2 then return false, "cooldown" end tbl5.LastEquipAt = os.clock() _G.LastAction = "Equip: Request Equip Best Pets" local ok, result = pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Haul and tbl4.Game.Remotes.Haul.WearBest then return tbl4.Game.Remotes.Haul.WearBest:InvokeServer() end if replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("Backpack: EquipBest") then return replicatedStorage.Network["Backpack: EquipBest"]:InvokeServer() end end) return ok and result == true end, Step = function() if not enabled["Auto Equip Best"] then return end tbl5.Execute() end, } return tbl5 end tbl4.Equip = fn18() local function fn19() local tbl5 = {} local tbl6 = {} pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory or assets if directory then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) tbl5.MinRarity = 0 tbl5.MutationFilter = "Off" tbl5.LastFavoriteAt = 0 local function fn20() if next(tbl6) then return tbl6 end pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory local flag if directory then flag = directory else flag = type(assets) == "table" and assets end if flag and type(flag) == "table" then for k, v7 in pairs(flag) do tbl6[k] = v7 end end end) return tbl6 end tbl5.ResolveRarityNumber = function(arg) if not arg then return 1 end if type(arg) == "number" then return arg end if type(arg) == "table" then arg = arg.AssetCategory or arg.Category or arg.Name or arg.DisplayName or arg[1] end local v7 = fn20() v7 = v7 and v7[arg] if v7 then if v7.Rarity and type(v7.Rarity) == "table" then if type(v7.Rarity.Rank) == "number" then return v7.Rarity.Rank end if type(v7.Rarity.RarityNumber) == "number" then return v7.Rarity.RarityNumber end end if type(v7.Rank) == "number" then return v7.Rank end if type(v7.RarityNumber) == "number" then return v7.RarityNumber end end if tbl4.Steal and tbl4.Steal.GetEggRarityNumber then local ok, result = pcall(tbl4.Steal.GetEggRarityNumber, arg) if ok and type(result) == "number" and result > 0 then return result end end return 1 end tbl5.CollectUnfavoritedUids = function() local v7 = tbl4.Game.GetSave() if not v7 then return {} end local inventory = v7.Inventory or {} local tbl7 = {} local flag = tbl5.MinRarity and tbl5.MinRarity > 0 local flag2 = tbl5.MutationFilter and tbl5.MutationFilter ~= "Off" and tbl5.MutationFilter ~= "None" if not flag and not flag2 then return {} end for k, v8 in pairs(inventory) do local ok, result = pcall(function() return tbl4.Game.AssetItemSerialization.Deserialize(v8) end) if ok and result and not result.IsFavorite and result.Category then local v9 = tbl5.ResolveRarityNumber(result.Category) local tbl8 = {} local flag3 = type(result.Mutations) == "table" and #result.Mutations > 0 local flag4 = false if flag3 then for _, mutation in ipairs(result.Mutations) do table.insert(tbl8, mutation) end flag4 = true end if result.BaseMutation and result.BaseMutation ~= "" then flag4 = true if not table.find(tbl8, result.BaseMutation) then table.insert(tbl8, result.BaseMutation) end end local flag5 = true if flag then flag5 = v9 >= tbl5.MinRarity end local flag6 = true if flag2 then if tbl5.MutationFilter == "All Mutations" then flag6 = flag4 else flag6 = table.find(tbl8, tbl5.MutationFilter) ~= nil end end if flag and flag2 then flag6 = flag5 and flag6 elseif flag then flag6 = flag5 else local flag7 = false if not flag2 then flag6 = flag7 end end if flag6 then table.insert(tbl7, k) end end end return tbl7 end tbl5.Execute = function() if tbl4.Steal and tbl4.Steal.IsInSafeZone and not tbl4.Steal.IsInSafeZone() then return false, "not in safezone" end local v7 = tbl5.CollectUnfavoritedUids() if #v7 == 0 then return false, "no pets to favorite" end local n = 0 for _, v8 in ipairs(v7) do _G.LastAction = "Favorite: Set Favorite Pet (" .. tostring(v8) .. ")" pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.PetSatchel and tbl4.Game.Remotes.PetSatchel.WriteFavourite then tbl4.Game.Remotes.PetSatchel.WriteFavourite:FireServer(v8, true) elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("AssetInventory: SetFavorite") then replicatedStorage.Network["AssetInventory: SetFavorite"]:FireServer(v8, true) end end) n += 1 task.wait(0.08) end return true, n end tbl5.Step = function() if not enabled["Auto Favorite Pet"] then return end local lastFavoriteAt = tbl5.LastFavoriteAt if os.clock() - lastFavoriteAt < 3 then return end tbl5.LastFavoriteAt = os.clock() tbl5.Execute() end tbl5.LastFavEquippedAt = 0 tbl5.LastUnfavEquippedAt = 0 tbl5.CollectEquippedUids = function() local v7 = tbl4.Game.GetSave() if not v7 then return {} end local tbl7 = {} local tbl8 = {} local equippedAssets = v7.EquippedAssets or v7.EquippedPets or {} for _, equippedAsset in ipairs(equippedAssets) do if equippedAsset and not tbl7[equippedAsset] then tbl7[equippedAsset] = true table.insert(tbl8, equippedAsset) end end return tbl8 end tbl5.SetFavoriteEquipped = function(arg) local v7 = tbl4.Game.GetSave() if not v7 then return false, "no data" end local inventory = v7.Inventory or {} local equippedAssets = v7.EquippedAssets or v7.EquippedPets or {} local tbl7 = {} local n = 0 for _, equippedAsset in ipairs(equippedAssets) do if equippedAsset and not tbl7[equippedAsset] then tbl7[equippedAsset] = true local v8 = inventory[equippedAsset] if v8 and v8.IsFavorite ~= arg then _G.LastAction = (arg and "Favorite" or "Unfavorite") .. ": Equipped Pet (" .. tostring(equippedAsset) .. ")" pcall(function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.PetSatchel and tbl4.Game.Remotes.PetSatchel.WriteFavourite then tbl4.Game.Remotes.PetSatchel.WriteFavourite:FireServer(equippedAsset, arg) elseif replicatedStorage:FindFirstChild("Network") and replicatedStorage.Network:FindFirstChild("AssetInventory: SetFavorite") then replicatedStorage.Network["AssetInventory: SetFavorite"]:FireServer(equippedAsset, arg) end end) n += 1 task.wait(0.08) end end end return true, n end tbl5.StepFavEquipped = function() if not enabled["Auto Favourite Equiped Pets"] then return end local lastFavEquippedAt = tbl5.LastFavEquippedAt if os.clock() - lastFavEquippedAt < 3 then return end tbl5.LastFavEquippedAt = os.clock() tbl5.SetFavoriteEquipped(true) end tbl5.StepUnfavEquipped = function() if not enabled["Auto UnFavourite Equiped Pets"] then return end local lastUnfavEquippedAt = tbl5.LastUnfavEquippedAt if os.clock() - lastUnfavEquippedAt < 3 then return end tbl5.LastUnfavEquippedAt = os.clock() tbl5.SetFavoriteEquipped(false) end return tbl5 end tbl4.Favorite = fn19() local function fn20() local tbl5 = {} local tbl6 = {} local function fn21() if next(tbl6) then return tbl6 end pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory or type(assets) == "table" and assets if directory and type(directory) == "table" then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) return tbl6 end local tbl7 = { common = 1, uncommon = 2, superrare = 2, rare = 3, epic = 4, legendary = 5, mythic = 6, ["squishy god"] = 6, brainrotgod = 6, rainbow = 6, prismatic = 6, cosmic = 7, secret = 8, eternal = 9, limited = 9, divine = 10, transcendent = 10, titan = 11, ["light & dark"] = 12, lightdark = 12, ["light and dark"] = 12, } local assetEarnings = nil pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") assetEarnings = tbl4.Game and tbl4.Game.AssetEarnings or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Util") and ReplicatedStorage.Shared.Util:FindFirstChild("AssetEarnings") and require(ReplicatedStorage.Shared.Util.AssetEarnings) end) tbl5.PetRule = "Rarity Only" tbl5.MaxRarity = 3 tbl5.IncomeThreshold = 0 tbl5.BlacklistPets = {} tbl5.EggMaxRarity = 3 tbl5.LastSellAt = 0 tbl5.LastSellEggAt = 0 tbl5.IsSelling = false tbl5.ParseIncome = function(arg) if type(arg) == "number" then return arg end if type(arg) ~= "string" then return 0 end local str = string.gsub(arg, "[,%s]", ""):lower() if str == "" or str == "off" or str == "none" then return 0 end local v7, v8 = string.match(str, "^([%d%.]+)([a-z]*)$") if not v7 then return tonumber(str) or 0 end local n = tonumber(v7) or 0 if v8 == "k" then return n * 1000 end if v8 == "m" then return n * 1000000 end if v8 == "b" then return n * 1e9 end if v8 == "t" then return n * 1e12 end if v8 == "qa" or v8 == "q" then return n * 1e15 end if v8 == "qi" then return n * 1e18 end if v8 == "sx" or v8 == "s" then return n * 1e21 end if v8 == "sp" then return n * 1e24 end if v8 == "oc" or v8 == "o" then return n * 1e27 end if v8 == "n" then return n * 1e30 end return n end tbl5.GetPetIncome = function(arg, arg2) if not arg or type(arg) ~= "table" then return 0 end if assetEarnings then if assetEarnings.LiveRatePerSecond and arg2 then local ok, result = pcall(assetEarnings.LiveRatePerSecond, arg, arg2.Gamepasses, arg2.Products, localPlayer) if ok and type(result) == "number" and result > 0 then return result end end if assetEarnings.RatePerSecond then local ok, result = pcall(assetEarnings.RatePerSecond, arg) if ok and type(result) == "number" and result > 0 then return result end end end local category = arg.Category local v7 = fn21() if category and v7 and v7[category] then local n = tonumber(v7[category].EarningRate) or 0 local n2 = tonumber(arg.Scale) or 1 return math.round(n * (n2 <= 5 and n2 ^ 1.85 or (n2 / 5) ^ 1.2 * 19.637875755794113)) end return tonumber(arg.Income or arg.Rate or arg.BaseIncome or 0) or 0 end tbl5.GetPetDisplayName = function(arg) local v7 = fn21() if arg and v7 and v7[arg] then local v8 = v7[arg] return v8.DisplayName or v8.Name or arg end return tostring(arg or "Unknown") end tbl5.GetPetRarityName = function(arg) local v7 = fn21() if arg and v7 and v7[arg] then local v8 = v7[arg] if v8.Rarity then if type(v8.Rarity) == "table" then return v8.Rarity.DisplayName or v8.Rarity.Name or v8.Rarity._id or "Common" end if type(v8.Rarity) == "string" then return v8.Rarity end end end return "Common" end tbl5.GetPetFormattedName = function(arg) if not arg or not arg.Category then return "Unknown" end local v7 = tbl5.GetPetDisplayName(arg.Category) local v8 = tbl5.GetPetRarityName(arg.Category) return string.format("%s [%s]", v7, v8) end tbl5.IsPetBlacklisted = function(arg) if not tbl5.BlacklistPets or next(tbl5.BlacklistPets) == nil then return false end local category = arg and arg.Category if not category then return false end local v7 = tbl5.GetPetFormattedName(arg) local v8 = tbl5.GetPetDisplayName(category) local v9 = string.lower(tostring(category)) local v10 = string.lower(tostring(v7)) local v11 = string.lower(tostring(v8)) for k, blacklistPet in pairs(tbl5.BlacklistPets) do local v12 if blacklistPet == true and type(k) == "string" then v12 = string.lower(k) else v12 = nil if type(blacklistPet) == "string" then v12 = string.lower(blacklistPet) end end if v12 then if v12 == v9 or v12 == v10 or v12 == v11 or string.find(v10, v12, 1, true) or string.find(v12, v9, 1, true) or string.find(v12, v11, 1, true) then return true end end end return false end tbl5.ResolveRarityNumber = function(arg) if not arg then return 1 end if type(arg) == "number" then return arg end if type(arg) == "table" then arg = arg.AssetCategory or arg.Category or arg.Name or arg.DisplayName or arg[1] end if not arg then return 1 end local v7 = fn21() local v8 = v7 and v7[arg] if not v8 and v7 then local v9 = string.lower(tostring(arg)) for k, v10 in pairs(v7) do if string.lower(k) == v9 or v10.DisplayName and string.lower(v10.DisplayName) == v9 then v8 = v10 break end end end if v8 then if v8.Rarity and type(v8.Rarity) == "table" then if type(v8.Rarity.Rank) == "number" then return v8.Rarity.Rank end if type(v8.Rarity.RarityNumber) == "number" then return v8.Rarity.RarityNumber end local displayName = v8.Rarity.DisplayName or v8.Rarity.Name or v8.Rarity._id if displayName and type(displayName) == "string" then local v9 = tbl7[string.lower(displayName)] if v9 then return v9 end end end if type(v8.Rank) == "number" then return v8.Rank end if type(v8.RarityNumber) == "number" then return v8.RarityNumber end if v8.Rarity and type(v8.Rarity) == "string" then local v9 = tbl7[string.lower(v8.Rarity)] if v9 then return v9 end end end if tbl4.Steal and tbl4.Steal.GetEggRarityNumber then local ok, result = pcall(tbl4.Steal.GetEggRarityNumber, arg) if ok and type(result) == "number" and result > 0 then return result end end local v9 = tbl7[string.lower(tostring(arg))] if v9 then return v9 end return 1 end tbl5.CollectPetUids = function() local v7 = tbl4.Game.GetSave() if not v7 then return {} end local inventory = v7.Inventory or {} local equippedAssets = v7.EquippedAssets or {} local tbl8 = {} for _, equippedAsset in ipairs(equippedAssets) do tbl8[equippedAsset] = true end local petRule = tbl5.PetRule or "Rarity Only" if type(petRule) == "table" then petRule = petRule[1] or petRule.Value or petRule.Title or petRule.Text or "Rarity Only" end local tbl9 = {} for k, v8 in pairs(inventory) do if not tbl8[k] then local v9 = v8 if type(v8) == "string" or type(v8) == "table" and not v8.Category then pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local AssetItems = ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Util") and ReplicatedStorage.Shared.Util:FindFirstChild("AssetItems") and require(ReplicatedStorage.Shared.Util.AssetItems) if AssetItems and AssetItems.Decode then v9 = AssetItems.Decode(v8) elseif tbl4.Game and tbl4.Game.AssetItemSerialization and tbl4.Game.AssetItemSerialization.Deserialize then v9 = tbl4.Game.AssetItemSerialization.Deserialize(v8) end end) end if type(v9) == "table" and v9.Category then if not (v9.IsFavorite == true or v9.Favorite == true or v9.Locked == true) and not v9.InFuse and not tbl5.IsPetBlacklisted(v9) then local v10 = tbl5.ResolveRarityNumber(v9.Category) local v11 = tbl5.GetPetIncome(v9, v7) local flag = tbl5.MaxRarity and tbl5.MaxRarity > 0 and v10 <= tbl5.MaxRarity or false local flag2 = tbl5.IncomeThreshold and tbl5.IncomeThreshold > 0 and v11 < tbl5.IncomeThreshold or false local str = tostring(petRule):lower() if str:find("both") then flag2 = flag and flag2 elseif str:find("either") then flag2 = flag or flag2 elseif not str:find("income") then flag2 = flag end if flag2 then table.insert(tbl9, k) end end end end end return tbl9 end tbl5.CollectEggUids = function() local v7 = tbl4.Game.GetSave() local tbl8 = {} if not v7 then return tbl8 end local eggInventory = v7.EggInventory if type(eggInventory) == "table" then for k, v8 in pairs(eggInventory) do local v9 = v8 local flag = type(v9) == "string" if not flag then flag = type(v9) == "table" if flag then flag = not (v9.AssetCategory or v9.Category) end end if flag then pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local EggRecords = ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Util") and ReplicatedStorage.Shared.Util:FindFirstChild("EggRecords") and require(ReplicatedStorage.Shared.Util.EggRecords) if EggRecords and EggRecords.Decode then v9 = EggRecords.Decode(v8) end end) end if type(v9) == "table" and v9.Placement == nil then local assetCategory = v9.AssetCategory or v9.Category if assetCategory then local v10 = tbl5.ResolveRarityNumber(assetCategory) if tbl5.EggMaxRarity and tbl5.EggMaxRarity > 0 and v10 <= tbl5.EggMaxRarity then if not (v9.Mutations and type(v9.Mutations) == "table" and next(v9.Mutations) ~= nil) and not (v9.IsFavorite == true or v9.Favorite == true or v9.Locked == true) then table.insert(tbl8, k) end end end end end end if #tbl8 == 0 then local eggCmds = tbl4.Game and tbl4.Game.EggCmds local getRuntimeSnapshot = eggCmds and eggCmds.GetRuntimeSnapshot and eggCmds.GetRuntimeSnapshot() if type(getRuntimeSnapshot) == "table" then for _, v8 in ipairs(getRuntimeSnapshot) do if v8.OwnerUserId == localPlayer.UserId then local v9 = pairs local records = v8.Records or {} for k, record in v9(records) do if record.Placement == nil and (record.AssetCategory or record.Category) then local v10 = tbl5.ResolveRarityNumber(record.AssetCategory or record.Category) if tbl5.EggMaxRarity and tbl5.EggMaxRarity > 0 and v10 <= tbl5.EggMaxRarity then if not (record.Mutations and type(record.Mutations) == "table" and next(record.Mutations) ~= nil) and not (record.IsFavorite == true or record.Favorite == true or record.Locked == true) then table.insert(tbl8, k) end end end end end end end end return tbl8 end tbl5.CanSell = function() if tbl4.FarmState and (tbl4.FarmState.Carrying or tbl4.FarmState.OptimisticCarry) then return false end if tbl4.Steal and tbl4.Steal.IsActiveStealing and tbl4.Steal.IsActiveStealing() then return false end if tbl4.Steal and tbl4.Steal.IsStealing then return false end local flag = false if tbl4.Steal and tbl4.Steal.IsInSafeZoneArea then flag = tbl4.Steal.IsInSafeZoneArea() elseif tbl4.Steal and tbl4.Steal.IsInSafeZone then flag = tbl4.Steal.IsInSafeZone() end if not flag then pcall(function() local ToolGameplayGuard = require(game:GetService("ReplicatedStorage").Client.ToolGameplayGuard) if ToolGameplayGuard and ToolGameplayGuard.IsLocalInsideArena then flag = not ToolGameplayGuard.IsLocalInsideArena() end end) end return flag == true end tbl5.FireBatchSell = function(arg, arg2) arg = arg or {} arg2 = arg2 or {} if #arg == 0 and #arg2 == 0 then return false, "empty selection" end local flag = false pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.PetSatchel and remotes.PetSatchel.SellSelection then remotes.PetSatchel.SellSelection:FireServer({ Assets = arg, Eggs = arg2 }) flag = true return end local networking = ReplicatedStorage:FindFirstChild("Packages") and ReplicatedStorage.Packages:FindFirstChild("Networking") networking = networking and networking:FindFirstChild("RE/PetSatchel/SellSelection") if networking then networking:FireServer({ Assets = arg, Eggs = arg2 }) flag = true return end end) if not flag and #arg > 0 then pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.PetSatchel and remotes.PetSatchel.SellEveryPet then remotes.PetSatchel.SellEveryPet:FireServer(arg) flag = true end end) end return flag end tbl5.ExecutePet = function() if not tbl5.CanSell() then return false, "not in safezone" end local v7 = tbl5.CollectPetUids() if #v7 == 0 then return false, "no sellable pets" end local debugInspector = tbl4.DebugInspector tbl5.IsSelling = true _G.LastAction = string.format("Sell: Selling Batch of %d Pets...", #v7) if debugInspector then debugInspector.SetState("SELLING", string.format("Batch Selling %d Pets", #v7), "SafeZone") end local n = 0 for i = 1, #v7, 50 do if tbl5.CanSell() then local tbl8 = {} for i2 = i, math.min(i + 50 - 1, #v7) do table.insert(tbl8, v7[i2]) end if tbl5.FireBatchSell(tbl8, {}) then n += #tbl8 else pcall(function() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.PetSatchel and remotes.PetSatchel.SellPet then for _, v8 in ipairs(tbl8) do remotes.PetSatchel.SellPet:FireServer({ v8 }) task.wait(0.04) end end end) n += #tbl8 end if i + 50 <= #v7 then task.wait(0.08) end continue end break end tbl5.LastSellAt = os.clock() tbl5.IsSelling = false _G.LastAction = string.format("Sell: Finished selling %d Pets!", n) return true, n end tbl5.ExecuteEgg = function() if not tbl5.CanSell() then return false, "not in safezone" end local v7 = tbl5.CollectEggUids() if #v7 == 0 then return false, "no sellable eggs" end local debugInspector = tbl4.DebugInspector tbl5.IsSelling = true _G.LastAction = string.format("Sell: Selling Batch of %d Eggs...", #v7) if debugInspector then debugInspector.SetState("SELLING", string.format("Batch Selling %d Eggs", #v7), "SafeZone") end local n = 0 for i = 1, #v7, 50 do if tbl5.CanSell() then local tbl8 = {} for i2 = i, math.min(i + 50 - 1, #v7) do table.insert(tbl8, v7[i2]) end if tbl5.FireBatchSell({}, tbl8) then n += #tbl8 end if i + 50 <= #v7 then task.wait(0.08) end continue end break end tbl5.LastSellEggAt = os.clock() tbl5.IsSelling = false _G.LastAction = string.format("Sell: Finished selling %d Eggs!", n) return true, n end tbl5.Step = function() if not tbl5.CanSell() then return end local now = os.clock() if tbl5.LastStepAt and now - tbl5.LastStepAt < 2.5 then return end tbl5.LastStepAt = now local autoSellPet = enabled["Auto Sell Pet"] and tbl5.CollectPetUids() or {} local autoSellEgg = enabled["Auto Sell Egg"] and tbl5.CollectEggUids() or {} if #autoSellPet == 0 and #autoSellEgg == 0 then return end tbl5.IsSelling = true local debugInspector = tbl4.DebugInspector if debugInspector then debugInspector.SetState("SELLING", string.format("Selling %d Pets & %d Eggs", #autoSellPet, #autoSellEgg), "SafeZone") end local n = math.max(#autoSellPet, #autoSellEgg) for i = 1, n, 50 do if tbl5.CanSell() then local tbl8 = {} for i2 = i, math.min(i + 50 - 1, #autoSellPet) do table.insert(tbl8, autoSellPet[i2]) end local tbl9 = {} for i2 = i, math.min(i + 50 - 1, #autoSellEgg) do table.insert(tbl9, autoSellEgg[i2]) end if #tbl8 > 0 or #tbl9 > 0 then tbl5.FireBatchSell(tbl8, tbl9) end if i + 50 <= n then task.wait(0.08) end continue end break end tbl5.LastSellAt = now tbl5.LastSellEggAt = now tbl5.IsSelling = false _G.LastAction = string.format("Sell: Successfully sold %d Pets & %d Eggs!", #autoSellPet, #autoSellEgg) end return tbl5 end tbl4.Sell = fn20() local function fn21() local function fn22() if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then return true end if tbl4.Steal and tbl4.Steal.IsInSafeZoneArea and tbl4.Steal.IsInSafeZoneArea() then return true end if tbl4.Steal and not tbl4.Steal.IsStealing then return true end return false end local tbl5 tbl5 = { LastAt = 0, CanRebirth = function() if not fn22() then return false end local v7 = tbl4.Game.GetSave() if not v7 then return false end local v8 = tbl4.Game.RebirthUtil.RebirthToRequiredSpeedPower((v7.Rebirth or 0) + 1) if v8 == math.huge then return false end return (v7.SpeedPower or 0) >= v8 end, ClickUI = function() local rebirth = playerGui:FindFirstChild("Rebirth") if not rebirth then return false end if rebirth.Enabled ~= true then return false end local rebirth2 = rebirth:FindFirstChild("Rebirth") if not rebirth2 then return false end local content = rebirth2:FindFirstChild("Content") if not content then return false end local rebirth3 = content:FindFirstChild("Rebirth") if rebirth3 and rebirth3:IsA("ImageButton") and rebirth3.Visible then if fn6 then _G.LastAction = "Rebirth: Click Rebirth Button" local ok = pcall(function() fn6(rebirth3.Activated) end) local ok2 = pcall(function() fn6(rebirth3.MouseButton1Click) end) if ok or ok2 then return true end end return false end return false end, Step = function() if not fn22() then return end local lastAt = tbl5.LastAt if os.clock() - lastAt < 8 then return end tbl5.LastAt = os.clock() if tbl5.CanRebirth() then tbl5.ClickUI() end end, } return tbl5 end tbl4.Rebirth = fn21() local function fn22() local tbl5 = { LastAt = 0, LastTreadmillAt = 0 } local function fn23() if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then return true end if tbl4.Steal and tbl4.Steal.IsInSafeZoneArea and tbl4.Steal.IsInSafeZoneArea() then return true end if tbl4.Steal and not tbl4.Steal.IsStealing then return true end return false end tbl5.Step = function() if not fn23() then return end local lastAt = tbl5.LastAt if os.clock() - lastAt < 3 then return end tbl5.LastAt = os.clock() local v7 = tbl4.Game.GetSave() if not v7 then return end if enabled["Auto Upgrade Base"] then local ReplicatedStorage = game:GetService("ReplicatedStorage") local Bases = ReplicatedStorage:FindFirstChild("Data") and ReplicatedStorage.Data:FindFirstChild("Bases") and require(ReplicatedStorage.Data.Bases) if Bases and Bases.BASES then local n = (v7.BaseUpgradeLevel or 0) + 1 local v8 = Bases.BASES[n] local cost = v8 and v8.Cost if cost then cost = (v7.Money or 0) >= v8.Cost end if cost then pcall(function() if Remotes and Remotes.Homestead and Remotes.Homestead.AskBaseTierRaise then _G.LastAction = "Upgrade: Base Tier " .. tostring(n) Remotes.Homestead.AskBaseTierRaise:FireServer() elseif tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Homestead and tbl4.Game.Remotes.Homestead.AskBaseTierRaise then _G.LastAction = "Upgrade: Base Tier " .. tostring(n) tbl4.Game.Remotes.Homestead.AskBaseTierRaise:FireServer() end end) end end end end tbl5.StepTreadmill = function() if not fn23() then return end local lastTreadmillAt = tbl5.LastTreadmillAt if os.clock() - lastTreadmillAt < 3 then return end tbl5.LastTreadmillAt = os.clock() local v7 = tbl4.Game.GetSave() if not v7 then return end if enabled["Auto Upgrade Treadmill"] then local ReplicatedStorage = game:GetService("ReplicatedStorage") local treadmills = tbl4.Game and tbl4.Game.Treadmills or ReplicatedStorage:FindFirstChild("Data") and ReplicatedStorage.Data:FindFirstChild("Treadmills") and require(ReplicatedStorage.Data.Treadmills) if treadmills and treadmills.GetByUpgradeLevel then local v8 = treadmills.GetByUpgradeLevel((v7.TreadmillUpgradeLevel or 0) + 1) local flag if v8 then flag = (v7.Money or 0) >= (v8.Price or 0) else flag = v8 end if flag then pcall(function() if Remotes and Remotes.Treadmill and Remotes.Treadmill.AskTierRaise then _G.LastAction = "Upgrade: Buy " .. tostring(v8.DisplayName or v8._id) Remotes.Treadmill.AskTierRaise:InvokeServer(v8._id) elseif tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Treadmill and tbl4.Game.Remotes.Treadmill.AskTierRaise then _G.LastAction = "Upgrade: Buy " .. tostring(v8.DisplayName or v8._id) tbl4.Game.Remotes.Treadmill.AskTierRaise:InvokeServer(v8._id) end end) end end end end return tbl5 end tbl4.Upgrade = fn22() local function fn23() local tbl5 = { LastAt = 0 } local function fn24() if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then return true end if tbl4.Steal and tbl4.Steal.IsInSafeZoneArea and tbl4.Steal.IsInSafeZoneArea() then return true end if tbl4.Steal and not tbl4.Steal.IsStealing then return true end return false end tbl5.Step = function() if not fn24() then return end local lastAt = tbl5.LastAt if os.clock() - lastAt < 20 then return end tbl5.LastAt = os.clock() if enabled["Auto Claim"] then pcall(function() if Remotes and Remotes.AwayEarnings and Remotes.AwayEarnings.AskCollect then _G.LastAction = "Claim: Redeem Offline Assets" Remotes.AwayEarnings.AskCollect:InvokeServer() elseif tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.AwayEarnings and tbl4.Game.Remotes.AwayEarnings.AskCollect then _G.LastAction = "Claim: Redeem Offline Assets" tbl4.Game.Remotes.AwayEarnings.AskCollect:InvokeServer() end end) pcall(function() if Remotes and Remotes.Codex and Remotes.Codex.AskRedeemAll then _G.LastAction = "Claim: Request Claim All Index" Remotes.Codex.AskRedeemAll:InvokeServer() elseif tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Codex and tbl4.Game.Remotes.Codex.AskRedeemAll then _G.LastAction = "Claim: Request Claim All Index" tbl4.Game.Remotes.Codex.AskRedeemAll:InvokeServer() end end) end end return tbl5 end tbl4.Claim = fn23() local function fn24() local tbl5 = { LastAt = 0 } local function fn25() if tbl4.Treadmill and tbl4.Treadmill.CheckTreadmil and tbl4.Treadmill.CheckTreadmil() then return true end if tbl4.Steal and tbl4.Steal.IsInSafeZoneArea and tbl4.Steal.IsInSafeZoneArea() then return true end if tbl4.Steal and not tbl4.Steal.IsStealing then return true end return false end local tbl6 = {} pcall(function() local trails = tbl4.Game and tbl4.Game.Trails or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Trails) tbl6 = trails and trails.Directory or trails or {} end) tbl5.GetAvailableTrails = function() local tbl7 = {} for k, v7 in pairs(tbl6) do if type(v7) == "table" and (v7.Price or v7.Cost) then table.insert(tbl7, { Id = k, Name = v7.DisplayName or v7.Name or k, Price = v7.Price or v7.Cost or 0, Currency = v7.Currency or "SpeedPower", Order = v7.Order or v7.Price or 0, }) end end table.sort(tbl7, function(arg, arg2) return arg.Order < arg2.Order end) return tbl7 end tbl5.BuyAvailableTrails = function() local v7 = tbl4.Game.GetSave() if not v7 then return end local trailInventory = v7.TrailInventory or {} local speedPower = v7.SpeedPower or 0 local money = v7.Money or 0 local v8 = tbl5.GetAvailableTrails() for _, v9 in ipairs(v8) do local flag = false if type(trailInventory) == "table" then flag = trailInventory[v9.Id] == true or table.find(trailInventory, v9.Id) ~= nil end if not flag then local flag2 if v9.Currency == "Money" then flag2 = money >= v9.Price else flag2 = speedPower >= v9.Price end if flag2 then local ok, result = pcall(function() local Remotes_ = require(game:GetService("ReplicatedStorage").Shared.Remotes) if Remotes_ and Remotes_.Trailwear and Remotes_.Trailwear.AskPurchase then return Remotes_.Trailwear.AskPurchase:InvokeServer(v9.Id) end end) if ok and result then _G.LastAction = "Trail: Bought " .. tostring(v9.Name) if type(trailInventory) == "table" then trailInventory[v9.Id] = true end end task.wait(0.2) end end end end tbl5.Step = function() if not fn25() then return end if not enabled["Auto Buy Trail"] then return end if os.clock() - (tbl5.LastAt or 0) < 5 then return end tbl5.LastAt = os.clock() tbl5.BuyAvailableTrails() end return tbl5 end tbl4.Trail = fn24() local function fn25() local farmState = tbl4.FarmState local tbl5 tbl5 = { Folder = nil, Markers = {}, GuardMarkers = {}, Pool = {}, LastUpdate = 0, GuardWarningAt = 0, EnsureFolder = function() if tbl5.Folder and tbl5.Folder.Parent then return tbl5.Folder end tbl5.Folder = Instance.new("Folder") tbl5.Folder.Name = "SHX_ESP" tbl5.Folder.Parent = workspace return tbl5.Folder end, } local tbl6 = {} pcall(function() local ok, result = pcall(require, replicatedStorage.Data.Assets) if not (ok and result) then local ok2 ok2, result = pcall(require, replicatedStorage.Directory.Assets) if not (ok2 and result) then result = tbl4.Game and tbl4.Game.Assets end end local directory = result and result.Directory if directory then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) tbl5.ColorForCategory = function(arg) local v7 = tbl6[arg] if v7 and v7.Rarity and v7.Rarity.Color then return v7.Rarity.Color end return Color3.new(1, 1, 1) end tbl5.IsRare = function(arg) local flag = tbl5.ColorForCategory(arg) ~= nil if flag then flag = (tbl5.RarityNumberFor(arg) or 0) >= 6 end return flag end tbl5.RarityNumberFor = function(arg) local v7 = tbl6[arg] if v7 and v7.Rarity and v7.Rarity.RarityNumber then return v7.Rarity.RarityNumber end return 1 end tbl5.UpdateEggMarkers = function() if not enabled["ESP Eggs"] and not enabled["ESP Rare Eggs"] then if next(tbl5.Markers) or #tbl5.Pool > 0 then for k, marker in pairs(tbl5.Markers) do if marker.Part then marker.Part:Destroy() end tbl5.Markers[k] = nil end for _, v7 in ipairs(tbl5.Pool) do if v7.Part then v7.Part:Destroy() end end tbl5.Pool = {} end return end farmState.RefreshEggs() local tbl7 = {} local v7 = tbl5.EnsureFolder() local v8 = ipairs local eggs = farmState.Eggs or {} for _, egg in v8(eggs) do local color = tbl5.IsRare(egg.AssetCategory) if enabled["ESP Eggs"] or enabled["ESP Rare Eggs"] and color then local position = egg.BottomCFrame and egg.BottomCFrame.Position or nil if position then tbl7[egg.Uid] = true local tbl8 = tbl5.Markers[egg.Uid] local text = string.format("%s | %s", egg.AssetCategory or "?", egg.State or "?") local color2 = color and Color3.new(1, 0.5, 0) or Color3.new(1, 1, 1) color = color and Color3.new(1, 0.4, 0) or Color3.new(0.2, 0.8, 1) if not tbl8 or not tbl8.Part or not tbl8.Part.Parent then if #tbl5.Pool > 0 then tbl8 = table.remove(tbl5.Pool) tbl8.Part.Parent = v7 tbl8.Marker.Enabled = true else local part = Instance.new("Part") part.Name = "SHXEggPart" part.Size = Vector3.new(4, 4, 4) part.Transparency = 0.6 part.CanCollide = false part.CanQuery = false part.CanTouch = false part.Anchored = true part.Parent = v7 local billboardGui = Instance.new("BillboardGui") billboardGui.Name = "EggMarker" billboardGui.AlwaysOnTop = true billboardGui.Size = UDim2.fromOffset(120, 28) billboardGui.StudsOffset = Vector3.new(0, 2.5, 0) billboardGui.MaxDistance = 400 local frame = Instance.new("Frame") frame.Size = UDim2.fromScale(1, 1) frame.BackgroundColor3 = Color3.new(0, 0, 0) frame.BackgroundTransparency = 0.35 frame.BorderSizePixel = 0 frame.Parent = billboardGui local textLabel = Instance.new("TextLabel") textLabel.Size = UDim2.fromScale(1, 1) textLabel.BackgroundTransparency = 1 textLabel.Font = Enum.Font.GothamBold textLabel.TextScaled = true textLabel.Parent = frame billboardGui.Adornee = part billboardGui.Parent = part tbl8 = { Part = part, Marker = billboardGui, Label = textLabel } end tbl5.Markers[egg.Uid] = tbl8 end if tbl8 and tbl8.Part then tbl8.Part.CFrame = CFrame.new(position) tbl8.Part.Color = color if tbl8.Label and tbl8.Label.Text ~= text then tbl8.Label.Text = text tbl8.Label.TextColor3 = color2 end end end end end for k, marker in pairs(tbl5.Markers) do if not tbl7[k] then if marker.Marker then marker.Marker.Enabled = false end if marker.Part then marker.Part.Parent = nil end table.insert(tbl5.Pool, marker) tbl5.Markers[k] = nil end end end tbl5.UpdateGuards = function() if not enabled["ESP Guards"] and not enabled["Guard Warning"] then for k, guardMarker in pairs(tbl5.GuardMarkers) do if guardMarker.Parent then guardMarker:Destroy() end tbl5.GuardMarkers[k] = nil end return end local guardAreas = workspace:FindFirstChild("World") and workspace.World:FindFirstChild("Areas") and workspace.World.Areas:FindFirstChild("GuardAreas") if not guardAreas then return end for _, child in ipairs(guardAreas:GetChildren()) do if child:IsA("Model") then local guard = child:FindFirstChild("Guard") if guard and guard:IsA("Model") then guard:FindFirstChild("HumanoidRootPart") local attribute = guard:GetAttribute("GuardState") or "Sleeping" local attribute2 = guard:GetAttribute("TargetPlayer") or "" local highlight = tbl5.GuardMarkers[child.Name] if enabled["ESP Guards"] then if not highlight or not highlight.Parent then highlight = Instance.new("Highlight") highlight.Name = "Guard_" .. child.Name highlight.DepthMode = Enum.HighlightDepthMode.AlwaysOnTop highlight.FillTransparency = 0.7 highlight.Parent = tbl5.EnsureFolder() tbl5.GuardMarkers[child.Name] = highlight end highlight.Adornee = guard if attribute == "Chasing" then highlight.FillColor = Color3.new(1, 0.2, 0.2) highlight.OutlineColor = Color3.new(1, 0.2, 0.2) elseif attribute == "Waking" or attribute == "ReturningHome" then highlight.FillColor = Color3.new(1, 0.8, 0.1) highlight.OutlineColor = Color3.new(1, 0.8, 0.1) else highlight.FillColor = Color3.new(0.2, 1, 0.3) highlight.OutlineColor = Color3.new(0.2, 1, 0.3) end else if highlight and highlight.Parent then highlight:Destroy() end tbl5.GuardMarkers[child.Name] = nil end if enabled["Guard Warning"] and attribute2 == tostring(localPlayer.UserId) then local guardWarningAt = tbl5.GuardWarningAt if os.clock() - guardWarningAt > 2 then tbl5.GuardWarningAt = os.clock() fn4("Guard is chasing you! RUN!", "Guard Warning") end farmState.SyncCarry() if farmState.Carrying and enabled["Auto Drop Egg"] then pcall(function() tbl4.Game.EggCmds.RequestDropHeldAreaEgg("PlayerRequest") end) farmState.SyncCarry() end end end end end end tbl5.Step = function() local lastUpdate = tbl5.LastUpdate if os.clock() - lastUpdate < 1 then return end tbl5.LastUpdate = os.clock() tbl5.UpdateEggMarkers() tbl5.UpdateGuards() end return tbl5 end tbl4.ESP = fn25() local function fn26() local tbl5 = { Url = "", EggStealEnabled = false, MinRarity = 1 } local tbl6 = { Common = 13421772, Uncommon = 5635925, Rare = 5592575, Epic = 11141290, Legendary = 16755200, Mythic = 16733525, Cosmic = 10040319, Secret = 16711782, Eternal = 65535, Divine = 16766720, } local function fn27(arg) if not arg then return "0 Kg" end local v7, v8 = math.modf(math.round(arg * 100) / 100) local str = tostring(math.abs(v7)):reverse():gsub("(%d%d%d)", "%1,"):reverse():gsub("^,", "") local str2 if math.abs(v8) > 0.001 then str2 = str .. string.format("%.2f", math.abs(v8)):sub(2) else str2 = str end return str2 .. " Kg" end tbl5.SendPayload = function(arg) local url = tbl5.Url if not url or url == "" then url = enabled["Discord Webhook URL"] or "" end if not url or url == "" then return end local n = tbl6[arg.rarityName] or 65416 local n2 = tonumber(arg.scale) or 1 local str = type(arg.scale) == "number" and string.format("%.2fx", arg.scale) if not str then str = tostring(arg.scale or "1.0x") end local n3 = 1 pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory or assets or {} if directory[arg.petCategory] and directory[arg.petCategory].ModelWeight then n3 = directory[arg.petCategory].ModelWeight end end) local v7 = fn27(n3 * n2 ^ 3) local str2 = "0/s" pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local n4 = (assets and assets.Directory or assets or {})[arg.petCategory] n4 = n4 and tonumber(n4.EarningRate) or 0 if n4 > 0 then local n5 if n2 <= 5 then n5 = n2 ^ 1.85 else n5 = (n2 / 5) ^ 1.2 * 19.637875755794113 end local tbl7 = {} if arg.mutation and arg.mutation ~= "" and arg.mutation ~= "None" then for match in string.gmatch(tostring(arg.mutation), "[^,%s]+") do table.insert(tbl7, match) end end local getSave = tbl4.Game and tbl4.Game.GetSave and tbl4.Game.GetSave() or {} local Mutations = nil pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Modules") and replicatedStorage.Shared.Modules:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Shared.Modules.Mutations) elseif replicatedStorage:FindFirstChild("Data") and replicatedStorage.Data:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Data.Mutations) end end) local rebirthUtil = tbl4.Game and tbl4.Game.RebirthUtil local getTotalMutationsEarningMulti = Mutations and Mutations.GetTotalMutationsEarningMulti and Mutations.GetTotalMutationsEarningMulti(tbl7) or 1 local rebirthToMultiplier = rebirthUtil and rebirthUtil.RebirthToMultiplier if rebirthToMultiplier then rebirthToMultiplier = math.max(1, rebirthUtil.RebirthToMultiplier(getSave.Rebirth or 0)) end local n6 = math.max(math.round(n4 * n5 * getTotalMutationsEarningMulti * (rebirthToMultiplier or 1)), 1) if n6 >= 1e12 then str2 = string.format("%.2fT/s", n6 / 1e12) elseif n6 >= 1e9 then str2 = string.format("%.2fB/s", n6 / 1e9) elseif n6 >= 1000000 then str2 = string.format("%.2fM/s", n6 / 1000000) elseif n6 >= 1000 then str2 = string.format("%.1fK/s", n6 / 1000) else str2 = string.format("%d/s", n6) end end end) local tbl7 = { username = "Lennon hub" } local embeds = {} local tbl8 = { title = "**Lennon hub | Egg Successfully Stolen**", type = "rich", color = n } local fields = {} local tbl9 = { name = "** -> Profile : ** \n", value = "> Username : || " .. localPlayer.Name .. " ||", inline = false } local tbl10 = { name = "** -> Egg Info : ** \n", value = "> Pet Name : ``" .. tostring(arg.petName) .. "``" .. "\n> Rarity : ``" .. tostring(arg.rarityName) .. "``" .. "\n> Weight : ``" .. str .. " (" .. v7 .. ")``" .. "\n> Mutation : ``" .. tostring(arg.mutation) .. "``" .. "\n> Area : ``" .. tostring(arg.areaId) .. "``", inline = false, } fields[1] = tbl9 fields[2] = tbl10 fields[3] = { name = "** -> Pet Predictor : ** \n", value = "> Income : ``" .. str2 .. "``", inline = false } tbl8.fields = fields tbl8.thumbnail = { url = "https://cdn.discordapp.com/attachments/1386384052197527602/1538148901868019712/2130c04f38ddf3049b5b24a2d73971f5.png?ex=6a81a04b&is=6a804ecb&hm=05b7e14a3b99f37e87fdacdb879654cdcd62916b90e9a47ad0e46e43b6d28717&", } tbl8.footer = { text = "Lennon hub • Steal An Egg", icon_url = "https://cdn.discordapp.com/attachments/1386384052197527602/1538148901868019712/2130c04f38ddf3049b5b24a2d73971f5.png?ex=6a81a04b&is=6a804ecb&hm=05b7e14a3b99f37e87fdacdb879654cdcd62916b90e9a47ad0e46e43b6d28717&", } tbl8.timestamp = DateTime.now():ToIsoDate() embeds[1] = tbl8 tbl7.embeds = embeds task.spawn(function() pcall(tbl4.Webhook, url, tbl7) end) end tbl5.QueueEggSteal = function(arg) local eggStealEnabled = tbl5.EggStealEnabled or enabled["Webhook Egg Steal"] local url = tbl5.Url if not url or url == "" then url = enabled["Discord Webhook URL"] or "" end if not eggStealEnabled or not url or url == "" or not arg then return end local getEggRarityNumber = tbl4.Steal and tbl4.Steal.GetEggRarityNumber local n = 1 if getEggRarityNumber then n = tbl4.Steal.GetEggRarityNumber(arg) end if n < (tbl5.MinRarity or 1) then return end local assetCategory = arg.AssetCategory or "Unknown" local getEggDisplayName = tbl4.Steal and tbl4.Steal.GetEggDisplayName and tbl4.Steal.GetEggDisplayName(assetCategory) or tostring(assetCategory) local getEggRarityName = tbl4.Steal and tbl4.Steal.GetEggRarityName and tbl4.Steal.GetEggRarityName(assetCategory) or "Common" local n2 = tonumber(arg.AssetScale) or tonumber(arg.Scale) or 1 local baseMutation if arg.BaseMutation and arg.BaseMutation ~= "" then baseMutation = arg.BaseMutation else local flag = type(arg.Mutations) == "table" and #arg.Mutations > 0 baseMutation = "None" if flag then baseMutation = table.concat(arg.Mutations, ", ") end end tbl5.SendPayload({ petCategory = assetCategory, petName = getEggDisplayName, rarityName = getEggRarityName, rarityNum = n, scale = n2, mutation = baseMutation, areaId = arg.AreaId or "Unknown", nestId = arg.NestId or "Unknown", timestamp = os.time(), }) end tbl5.Step = function() end return tbl5 end tbl4.WebhookManager = fn26() local function fn27() local tbl5 = { ShowOnlyPlaced = true, SortMode = "Income", Paragraph = nil } local assets = tbl4.Game and tbl4.Game.Assets local Assets if assets then Assets = assets else Assets = replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) end local save = tbl4.Game and tbl4.Game.Save local Save if save then Save = save else Save = replicatedStorage:FindFirstChild("Shared") and require(replicatedStorage.Shared.Save) end local Mutations = nil pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Modules") and replicatedStorage.Shared.Modules:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Shared.Modules.Mutations) elseif replicatedStorage:FindFirstChild("Data") and replicatedStorage.Data:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Data.Mutations) end end) local rebirthUtil = tbl4.Game and tbl4.Game.RebirthUtil local MonetizationEntitlements = nil pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Util") and replicatedStorage.Shared.Util:FindFirstChild("MonetizationEntitlements") then MonetizationEntitlements = require(replicatedStorage.Shared.Util.MonetizationEntitlements) end end) local function fn28(arg) if not arg then return "0 Kg" end local v7, v8 = math.modf(math.round(arg * 100) / 100) local str = tostring(math.abs(v7)):reverse():gsub("(%d%d%d)", "%1,"):reverse():gsub("^,", "") if math.abs(v8) > 0.001 then str ..= string.format("%.2f", math.abs(v8)):sub(2) end return str .. " Kg" end local function fn29(arg) if not arg or arg == 0 then return "0/s" end if arg >= 1e12 then return string.format("%.2fT/s", arg / 1e12) end if arg >= 1e9 then return string.format("%.2fB/s", arg / 1e9) end if arg >= 1000000 then return string.format("%.2fM/s", arg / 1000000) end if arg >= 1000 then return string.format("%.1fK/s", arg / 1000) end return string.format("%d/s", arg) end local function fn30(arg) if arg <= 0 then return "READY" end local n = math.floor(arg / 3600) local n2 = math.floor(arg % 3600 / 60) local n3 = math.floor(arg % 60) if n > 0 then return string.format("%02dh %02dm %02ds", n, n2, n3) end return string.format("%02dm %02ds", n2, n3) end local function fn31(arg, arg2, arg3, arg4) local n = (Assets and Assets.Directory or Assets or {})[arg] n = n and tonumber(n.EarningRate) or 0 local n2 = arg2 or 1 local n3 if n2 <= 5 then n3 = n2 ^ 1.85 else n3 = (n2 / 5) ^ 1.2 * 19.637875755794113 end local getTotalMutationsEarningMulti = Mutations and Mutations.GetTotalMutationsEarningMulti if getTotalMutationsEarningMulti then getTotalMutationsEarningMulti = Mutations.GetTotalMutationsEarningMulti(arg3 or {}) end getTotalMutationsEarningMulti = getTotalMutationsEarningMulti or 1 local rebirthToMultiplier = rebirthUtil and rebirthUtil.RebirthToMultiplier if rebirthToMultiplier then rebirthToMultiplier = math.max(1, rebirthUtil.RebirthToMultiplier(arg4 and arg4.Rebirth or 0)) end rebirthToMultiplier = rebirthToMultiplier or 1 local getAssetMoneyAdditiveRebirthBonu = MonetizationEntitlements and MonetizationEntitlements.GetAssetMoneyAdditiveRebirthBonus if getAssetMoneyAdditiveRebirthBonu then getAssetMoneyAdditiveRebirthBonu = MonetizationEntitlements.GetAssetMoneyAdditiveRebirthBonus(arg4 and arg4.Gamepasses, arg4 and arg4.Products) end return math.max(math.round(n * n3 * getTotalMutationsEarningMulti * (rebirthToMultiplier + (getAssetMoneyAdditiveRebirthBonu or 0))), 1), n, n3, getTotalMutationsEarningMulti end local function fn32(arg, arg2) local placement = arg.Placement if not placement then return { IsPlaced = false, RemainingSeconds = 0, IsReady = false, StatusStr = "INVENTORY" } end if placement.ReadyAt ~= nil then return { IsPlaced = true, RemainingSeconds = 0, IsReady = true, StatusStr = "READY TO HATCH" } end local v7 = (Assets and Assets.Directory or Assets or {})[arg.AssetCategory] local growthTime = v7 and v7.Egg and v7.Egg.GrowthTime or 60 local assetScale = arg.AssetScale or 1 local n if assetScale <= 2 then n = 1 elseif assetScale <= 6 then n = (assetScale / 2) ^ 1.389 else n = math.min((assetScale / 6) ^ 0.72 * 4.6, 20) end local n2 = math.max(0, growthTime * n - arg2 - placement.PlacedAt + (placement.GrowthCreditSeconds or 0) + (placement.NightGrowthCreditSeconds or 0)) local flag = n2 <= 0 return { IsPlaced = true, RemainingSeconds = n2, IsReady = flag, StatusStr = flag and "READY TO HATCH" or fn30(n2), } end tbl5.GetForecastText = function() local get = Save.Get and Save.Get() or Save.Peek and Save.Peek() or {} if not get or not get.EggInventory then return "No egg inventory data available." end local serverTimeNow = workspace:GetServerTimeNow() local tbl6 = {} for k, v7 in pairs(get.EggInventory) do if not tbl5.ShowOnlyPlaced or v7.Placement ~= nil then local assetCategory = v7.AssetCategory or "Unknown" local n = tonumber(v7.AssetScale) or 1 local mutations = v7.Mutations or {} local baseMutation = v7.BaseMutation or mutations[1] or "None" local v8 = Assets.Directory[assetCategory] local rarity = v8 and v8.Rarity local displayName = rarity and (rarity.DisplayName or rarity.Name) or "Common" rarity = rarity and rarity.RarityNumber or 1 local v9 = fn28((v8 and v8.ModelWeight or 1) * n ^ 3) local v10 = fn31(assetCategory, n, mutations, get) local v11 = fn32(v7, serverTimeNow) if baseMutation == "Rainbow" then baseMutation = "Rainbow (+3x)" elseif baseMutation == "Golden" then baseMutation = "Golden (+2.5x)" elseif baseMutation == "Silver" then baseMutation = "Silver (+1.2x)" elseif baseMutation == "None" or baseMutation == "" then baseMutation = "Normal" end table.insert(tbl6, { Uid = k, Category = assetCategory, RarityName = displayName, RarityNumber = rarity, ScaleStr = string.format("%.2fx", n), KgStr = v9, MutDisplay = baseMutation, FinalRate = v10, IncomeStr = fn29(v10), Growth = v11, }) end end if #tbl6 == 0 then return tbl5.ShowOnlyPlaced and "No placed eggs in your pen." or "No eggs in inventory." end if tbl5.SortMode == "Income" then table.sort(tbl6, function(arg, arg2) return arg.FinalRate > arg2.FinalRate end) elseif tbl5.SortMode == "Rarity" then table.sort(tbl6, function(arg, arg2) if arg.RarityNumber ~= arg2.RarityNumber then return arg.RarityNumber > arg2.RarityNumber end return arg.FinalRate > arg2.FinalRate end) elseif tbl5.SortMode == "Time" then table.sort(tbl6, function(arg, arg2) return arg.Growth.RemainingSeconds < arg2.Growth.RemainingSeconds end) end local tbl7 = { [10] = "#FF1493", [9] = "#FF4500", [8] = "#FFFFFF", [7] = "#BA55D3", [6] = "#FF3366", [5] = "#FFA500", [4] = "#9932CC", [3] = "#1E90FF", [2] = "#32CD32", "#D3D3D3", } local tbl8 = {} table.insert(tbl8, string.format("Total Tracked Eggs: %d", #tbl6)) table.insert(tbl8, "──────────────────────────────────────") for _, v7 in ipairs(tbl6) do local str = tbl7[v7.RarityNumber] or "#FFFFFF" local str2 if v7.BaseMutation == "Rainbow" then str2 = "#FF69B4" elseif v7.BaseMutation == "Golden" then str2 = "#FFD700" else str2 = "#CCCCCC" if v7.BaseMutation == "Silver" then str2 = "#C0C0C0" end end local str3 if v7.Growth.IsReady then str3 = "#00FF7F" else str3 = "#888899" if v7.Growth.IsPlaced then str3 = "#FFD700" end end table.insert(tbl8, string.format("• [%s] %s (%s / %s)", str, v7.RarityName, v7.Category, v7.ScaleStr, v7.KgStr)) table.insert(tbl8, string.format(" %s | %s | %s", str2, v7.MutDisplay, v7.IncomeStr, str3, v7.Growth.StatusStr)) end return table.concat(tbl8, "\n") end tbl5.UpdateParagraph = function() if not tbl5.Paragraph then return end local v7 = tbl5.GetForecastText() local str = string.format("Pet Predictor (%s)", tbl5.ShowOnlyPlaced and "Pen Only" or "All Eggs") pcall(function() tbl5.Paragraph:Set({ str, v7 }) end) end return tbl5 end tbl4.PetPredictor = fn27() local function fn28() local tbl5 = { Paragraph = nil } local assets = tbl4.Game and tbl4.Game.Assets local Assets if assets then Assets = assets else Assets = replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) end local save = tbl4.Game and tbl4.Game.Save local Save if save then Save = save else Save = replicatedStorage:FindFirstChild("Shared") and require(replicatedStorage.Shared.Save) end local Mutations = nil pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Modules") and replicatedStorage.Shared.Modules:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Shared.Modules.Mutations) elseif replicatedStorage:FindFirstChild("Data") and replicatedStorage.Data:FindFirstChild("Mutations") then Mutations = require(replicatedStorage.Data.Mutations) end end) local rebirthUtil = tbl4.Game and tbl4.Game.RebirthUtil local MonetizationEntitlements = nil pcall(function() if replicatedStorage:FindFirstChild("Shared") and replicatedStorage.Shared:FindFirstChild("Util") and replicatedStorage.Shared.Util:FindFirstChild("MonetizationEntitlements") then MonetizationEntitlements = require(replicatedStorage.Shared.Util.MonetizationEntitlements) end end) local tbl6 = { { name = "Normal", min = 0.85, max = 1.05, baseWeight = 2000, color = "#CCCCCC" }, { name = "Large", min = 1.45, max = 1.55, baseWeight = 250, color = "#00FF7F" }, { name = "Giant", min = 1.9, max = 2.1, baseWeight = 125, color = "#1E90FF" }, { name = "Huge", min = 2.85, max = 3.15, baseWeight = 62.5, color = "#FFD700" }, { name = "Gigantic", min = 3.8, max = 4.2, baseWeight = 31.25, color = "#FF4500" }, { name = "Titan", min = 5.8, max = 6.2, baseWeight = 15.625, color = "#FF1493" }, { name = "Colossal", min = 9.5, max = 12.5, baseWeight = 3, color = "#BA55D3" }, } local function fn29(arg) if not arg then return "0 Kg" end local v7, v8 = math.modf(math.round(arg * 100) / 100) local str = tostring(math.abs(v7)):reverse():gsub("(%d%d%d)", "%1,"):reverse():gsub("^,", "") if math.abs(v8) > 0.001 then str ..= string.format("%.2f", math.abs(v8)):sub(2) end return str .. " Kg" end local function fn30(arg) if not arg or arg == 0 then return "0/s" end if arg >= 1e12 then return string.format("%.2fT/s", arg / 1e12) end if arg >= 1e9 then return string.format("%.2fB/s", arg / 1e9) end if arg >= 1000000 then return string.format("%.2fM/s", arg / 1000000) end if arg >= 1000 then return string.format("%.1fK/s", arg / 1000) end return string.format("%d/s", arg) end local function fn31(arg, arg2, arg3) return math.exp(math.log(arg) / 0.69314718055994529 * math.log((arg2 + arg3) / 2) / 0.69314718055994529 * 0.6) end local function fn32(arg, arg2, arg3, arg4) local v7 = (Assets and Assets.Directory or Assets or {})[arg] local n = v7 and tonumber(v7.EarningRate) or 0 arg2 = arg2 or 1 local n2 if arg2 <= 5 then n2 = arg2 ^ 1.85 else n2 = (arg2 / 5) ^ 1.2 * 19.637875755794113 end local getTotalMutationsEarningMulti = Mutations and Mutations.GetTotalMutationsEarningMulti if getTotalMutationsEarningMulti then getTotalMutationsEarningMulti = Mutations.GetTotalMutationsEarningMulti(arg3 or {}) end getTotalMutationsEarningMulti = getTotalMutationsEarningMulti or 1 local rebirthToMultiplier = rebirthUtil and rebirthUtil.RebirthToMultiplier if rebirthToMultiplier then rebirthToMultiplier = math.max(1, rebirthUtil.RebirthToMultiplier(arg4 and arg4.Rebirth or 0)) end rebirthToMultiplier = rebirthToMultiplier or 1 local getAssetMoneyAdditiveRebirthBonu = MonetizationEntitlements and MonetizationEntitlements.GetAssetMoneyAdditiveRebirthBonus if getAssetMoneyAdditiveRebirthBonu then getAssetMoneyAdditiveRebirthBonu = MonetizationEntitlements.GetAssetMoneyAdditiveRebirthBonus(arg4 and arg4.Gamepasses, arg4 and arg4.Products) end return math.max(math.round(n * n2 * getTotalMutationsEarningMulti * (rebirthToMultiplier + (getAssetMoneyAdditiveRebirthBonu or 0))), 1), n, n2, getTotalMutationsEarningMulti end tbl5.GetForecastText = function() local get = Save.Get and Save.Get() or Save.Peek and Save.Peek() or {} if not get then return "No player save data available." end local fusionSlots = get.FusionSlots or {} local inventory = get.Inventory or {} local tbl7 = {} for _, fusionSlot in ipairs(fusionSlots) do local v7 = inventory[fusionSlot] if v7 then table.insert(tbl7, v7) end end if #tbl7 == 0 and get.PrivateFusionSlots then for _, privateFusionSlot in ipairs(get.PrivateFusionSlots) do local v7 = inventory[privateFusionSlot] if v7 then table.insert(tbl7, v7) end end end if #tbl7 == 0 then return "No pets currently inside Fuse Machine.\nInsert 3 pets of the same species to predict results." end local tbl8 = {} local category = tbl7[1] and tbl7[1].Category or "Unknown" local rarity = Assets.Directory[category] local modelWeight = rarity and rarity.ModelWeight or 1 rarity = rarity and rarity.Rarity if rarity then rarity = rarity.DisplayName or rarity.Name end local str = rarity or "Common" table.insert(tbl8, string.format("⚡ FUSE MACHINE STATUS (%d/3 Pets)", #tbl7)) table.insert(tbl8, "──────────────────────────────────────") table.insert(tbl8, string.format("• Species: [%s] %s", str, category)) local n = 0 local n2 = 0 local str2 = "Normal" for i, v7 in ipairs(tbl7) do local n3 = tonumber(v7.Scale) or 1 n += n3 local v8 = fn29(modelWeight * n3 ^ 3) local str3 = (v7.Mutations or {})[1] or "Normal" if str3 ~= "Normal" then n2 += 1 if str3 == "Rainbow" or str3 == "Golden" and str2 ~= "Rainbow" or str3 == "Silver" and str2 == "Normal" then str2 = str3 end end table.insert(tbl8, string.format(" Pet #%d: %.2fx (%s) | %s", i, n3, v8, str3)) end if #tbl7 < 3 then table.insert(tbl8, "") table.insert(tbl8, string.format("⚠️ Waiting for %d more pet(s) to calculate final odds.", 3 - #tbl7)) return table.concat(tbl8, "\n") end local n3 = n / 3 table.insert(tbl8, "") table.insert(tbl8, string.format("• Average Scale: %.2fx (%s)", n3, fn29(modelWeight * n3 ^ 3))) local tbl9 = {} local n4 = 0 for _, v7 in ipairs(tbl6) do local n5 = v7.baseWeight * fn31(n3, v7.min, v7.max) n4 += n5 table.insert(tbl9, { tier = v7, weight = n5 }) end table.insert(tbl8, "") table.insert(tbl8, "📊 Predicted Scale Tier Probabilities:") for _, v7 in ipairs(tbl9) do local n5 = v7.weight / n4 * 100 if n5 >= 0.5 then local tier = v7.tier local n6 = modelWeight * tier.max ^ 3 table.insert(tbl8, string.format(" • %-8s (%.2fx - %.2fx / %s - %s): %.1f%%", tier.color, tier.name, tier.min, tier.max, fn29(modelWeight * tier.min ^ 3), fn29(n6), n5 >= 20 and "#00FF7F" or "#FFD700", n5)) end end local n5 = n3 * 0.95 local n6 = n3 * 1.55 local v7 = fn32(category, n5, str2 ~= "Normal" and { str2 } or {}, get) local v8 = fn32(category, n6, str2 ~= "Normal" and { str2 } or {}, get) table.insert(tbl8, "") table.insert(tbl8, string.format("• Predicted Mutation: %s", str2)) table.insert(tbl8, string.format("• Estimated Income: %s ~ %s", fn30(v7), fn30(v8))) return table.concat(tbl8, "\n") end tbl5.UpdateParagraph = function() if not tbl5.Paragraph then return end local v7 = tbl5.GetForecastText() pcall(function() tbl5.Paragraph:Set({ "Fuse Predictor", v7 }) end) end return tbl5 end tbl4.FusePredictor = fn28() local function fn29() local tbl5 = { PriorityMode = "Lowest Rarity First", MaxRarity = 0, SpecificSpecies = {}, SkipMutations = true, EjectIncomplete = false, LastFuseAt = 0, IsFusing = false, } local tbl6 = {} pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory or assets if directory then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) local function fn30() if next(tbl6) then return tbl6 end pcall(function() local assets = tbl4.Game and tbl4.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) local directory = assets and assets.Directory or type(assets) == "table" and assets if directory and type(directory) == "table" then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) return tbl6 end tbl5.ResolveRarityNumber = function(arg) if not arg then return 1 end if type(arg) == "number" then return arg end if type(arg) == "table" then arg = arg.AssetCategory or arg.Category or arg.Name or arg.DisplayName or arg[1] end local v7 = fn30() v7 = v7 and v7[arg] if v7 then if v7.Rarity and type(v7.Rarity) == "table" then if type(v7.Rarity.Rank) == "number" then return v7.Rarity.Rank end if type(v7.Rarity.RarityNumber) == "number" then return v7.Rarity.RarityNumber end end if type(v7.Rank) == "number" then return v7.Rank end if type(v7.RarityNumber) == "number" then return v7.RarityNumber end end if tbl4.Steal and tbl4.Steal.GetEggRarityNumber then local ok, result = pcall(tbl4.Steal.GetEggRarityNumber, arg) if ok and type(result) == "number" and result > 0 then return result end end return 1 end tbl5.GetFuseryRemotes = function() if tbl4.Game and tbl4.Game.Remotes and tbl4.Game.Remotes.Fusery then return tbl4.Game.Remotes.Fusery end local ok, result = pcall(function() return require(replicatedStorage.Shared.Remotes) end) if ok and result and result.Fusery then return result.Fusery end return nil end tbl5.IsPetEligible = function(arg, arg2, arg3) if not arg2 or type(arg2) ~= "table" or not arg2.Category then return false end if arg2.IsFavorite then return false end if arg2.InFuse then return false end if arg3 and arg3[arg] then return false end local displayName = tbl6[arg2.Category] if displayName and displayName.CannotFuse == true then return false end if tbl5.SkipMutations then if type(arg2.Mutations) == "table" and #arg2.Mutations > 0 then return false end if arg2.BaseMutation and arg2.BaseMutation ~= "" and arg2.BaseMutation ~= "Normal" then return false end end if tbl5.MaxRarity and tbl5.MaxRarity > 0 then if tbl5.MaxRarity < tbl5.ResolveRarityNumber(arg2.Category) then return false end end if #tbl5.SpecificSpecies > 0 or tbl5.PriorityMode == "Specific Species Only" then local category = arg2.Category if displayName then displayName = displayName.DisplayName or displayName.Name end displayName = displayName or category local flag = false for _, specificSpecy in ipairs(tbl5.SpecificSpecies) do if specificSpecy == category or specificSpecy == displayName or string.find(specificSpecy, category, 1, true) or string.find(specificSpecy, displayName, 1, true) then flag = true break end end if not flag then return false end end return true end tbl5.Execute = function() if tbl5.IsFusing then return false, "busy" end local lastFuseAt = tbl5.LastFuseAt if os.clock() - lastFuseAt < 1.8 then return false, "cooldown" end local v7 = tbl5.GetFuseryRemotes() if not v7 then return false, "no fusery remotes" end local getSave = tbl4.Game and tbl4.Game.GetSave and tbl4.Game.GetSave() if not getSave then return false, "no save data" end if getSave.FusionInfoAcknowledged == false then pcall(function() if v7.ConfirmBriefing then v7.ConfirmBriefing:InvokeServer() end end) end local getSave2 if getSave.FusionEggReward then pcall(function() if v7.FinishReveal then v7.FinishReveal:InvokeServer() end end) task.wait(0.3) getSave2 = tbl4.Game and tbl4.Game.GetSave and tbl4.Game.GetSave() or getSave else getSave2 = getSave end if getSave2.FusionLocked then return false, "fusion locked" end local v8, v9, v10 = pairs(getSave2.EggInventory or {}) local n = 0 for k in v8, v9, v10 do n += 1 end if n >= 100 then return false, "egg inventory full" end local inventory = getSave2.Inventory or {} local tbl7 = {} if type(getSave2.EquippedPets) == "table" then for _, equippedPet in ipairs(getSave2.EquippedPets) do tbl7[equippedPet] = true end end local fusionSlots = getSave2.FusionSlots or getSave2.PrivateFusionSlots or {} local tbl8 = {} local category = nil for _, fusionSlot in ipairs(fusionSlots) do if fusionSlot and inventory[fusionSlot] then local v11 = inventory[fusionSlot] if type(v11) == "string" or type(v11) == "table" and not v11.Category then pcall(function() if tbl4.Game and tbl4.Game.AssetItemSerialization and tbl4.Game.AssetItemSerialization.Deserialize then v11 = tbl4.Game.AssetItemSerialization.Deserialize(v11) end end) end if type(v11) == "table" and v11.Category then table.insert(tbl8, fusionSlot) category = category or v11.Category end end end tbl5.IsFusing = true tbl5.LastFuseAt = os.clock() local ok, result = pcall(function() if #tbl8 == 3 then _G.LastAction = string.format("Fuse: Fusing 3x %s", tostring(category or "Pets")) local response, v11 = v7.BeginFuse:InvokeServer() if response then task.wait(0.25) if v7.FinishReveal then v7.FinishReveal:InvokeServer() end if tbl4.FusePredictor and tbl4.FusePredictor.UpdateParagraph then tbl4.FusePredictor.UpdateParagraph() end return true, "fused" end return false, tostring(v11) end if #tbl8 > 0 and #tbl8 < 3 and category then local n2 = 3 - #tbl8 local tbl9 = {} for k, v11 in pairs(inventory) do if not table.find(tbl8, k) then local v12 = v11 if type(v11) == "string" or type(v11) == "table" and not v11.Category then pcall(function() if tbl4.Game and tbl4.Game.AssetItemSerialization and tbl4.Game.AssetItemSerialization.Deserialize then v12 = tbl4.Game.AssetItemSerialization.Deserialize(v11) end end) end if tbl5.IsPetEligible(k, v12, tbl7) and v12.Category == category then table.insert(tbl9, { uid = k, item = v12, scale = tonumber(v12.Scale) or 1 }) end end end if n2 <= #tbl9 then table.sort(tbl9, function(arg, arg2) return arg.scale < arg2.scale end) for i = 1, n2 do local v11 = tbl9[i] local v12 = tostring local uid = v11.uid _G.LastAction = string.format("Fuse: Loading %s (%s)", tostring(category), v12(uid)) v7.LoadPet:InvokeServer(v11.uid) table.insert(tbl8, v11.uid) task.wait(0.15) end if #tbl8 == 3 then _G.LastAction = string.format("Fuse: Fusing 3x %s", tostring(category)) if v7.BeginFuse:InvokeServer() then task.wait(0.25) if v7.FinishReveal then v7.FinishReveal:InvokeServer() end if tbl4.FusePredictor and tbl4.FusePredictor.UpdateParagraph then tbl4.FusePredictor.UpdateParagraph() end return true, "fused" end end elseif tbl5.EjectIncomplete then for _, v11 in ipairs(tbl8) do _G.LastAction = string.format("Fuse: Ejecting incomplete slot %s", tostring(v11)) v7.EjectPet:InvokeServer(v11) task.wait(0.15) end return true, "ejected incomplete" end return false, "waiting for more matching pets" end local tbl9 = {} for k, v11 in pairs(inventory) do local v12 = v11 if type(v11) == "string" or type(v11) == "table" and not v11.Category then pcall(function() if tbl4.Game and tbl4.Game.AssetItemSerialization and tbl4.Game.AssetItemSerialization.Deserialize then v12 = tbl4.Game.AssetItemSerialization.Deserialize(v11) end end) end if tbl5.IsPetEligible(k, v12, tbl7) then local category2 = v12.Category if not tbl9[category2] then tbl9[category2] = { category = category2, rarityNum = tbl5.ResolveRarityNumber(category2), pets = {} } end table.insert(tbl9[category2].pets, { uid = k, item = v12, scale = tonumber(v12.Scale) or 1 }) end end local tbl10 = {} for _, v11 in pairs(tbl9) do if #v11.pets >= 3 then table.insert(tbl10, v11) end end if #tbl10 == 0 then return false, "no 3x matching pets available" end if tbl5.PriorityMode == "Lowest Rarity First" then table.sort(tbl10, function(arg, arg2) if arg.rarityNum == arg2.rarityNum then return #arg.pets > #arg2.pets end return arg.rarityNum < arg2.rarityNum end) elseif tbl5.PriorityMode == "Highest Rarity First" then table.sort(tbl10, function(arg, arg2) if arg.rarityNum == arg2.rarityNum then return #arg.pets > #arg2.pets end return arg.rarityNum > arg2.rarityNum end) elseif tbl5.PriorityMode == "Most Duplicates First" then table.sort(tbl10, function(arg, arg2) if #arg.pets == #arg2.pets then return arg.rarityNum < arg2.rarityNum end return #arg.pets > #arg2.pets end) end local v11 = tbl10[1] if not v11 or #v11.pets < 3 then return false, "no valid group" end table.sort(v11.pets, function(arg, arg2) return arg.scale < arg2.scale end) local n2 = 0 for i = 1, 3 do local v12 = v11.pets[i] local v13 = tostring local uid = v12.uid _G.LastAction = string.format("Fuse: Loading %s (%s)", tostring(v11.category), v13(uid)) if v7.LoadPet:InvokeServer(v12.uid) ~= false then n2 += 1 end task.wait(0.15) end if n2 >= 3 then _G.LastAction = string.format("Fuse: Fusing 3x %s", tostring(v11.category)) local response, v12 = v7.BeginFuse:InvokeServer() if response then task.wait(0.25) if v7.FinishReveal then v7.FinishReveal:InvokeServer() end if tbl4.FusePredictor and tbl4.FusePredictor.UpdateParagraph then tbl4.FusePredictor.UpdateParagraph() end return true, string.format("Fused 3x %s", v11.category) end return false, tostring(v12 or "begin fuse failed") end return false, "could not load 3 pets" end) tbl5.IsFusing = false return ok, result end tbl5.Step = function() if not enabled["Auto Fuse Machine"] then return end tbl5.Execute() end return tbl5 end tbl4.Fuse = fn29() tbl4.AntiTrap = {} local function fn30() local steal = tbl4.Steal local farmState = tbl4.FarmState local treadmill = tbl4.Treadmill local utils = tbl4.Utils local tbl5 = { Snapshot = nil, LastSnapshotFetch = 0, SnapshotInterval = 1.8, LastDroneScan = 0, LastBatSwing = 0, NextBatType = "Original", LastShopBuyAt = 0, IsFarmingDrone = false, CurrentTargetDrone = nil, CurrentTargetInfo = "None", StatusParagraph = nil, ShopParagraph = nil, DroneESPFolder = nil, DropsESPFolder = nil, Config = { TweenSpeed = 300, AttackDistance = 3.5, BatSwingInterval = 0.72, FastSwitchBat = true, FastSwitchDelay = 40, PriorityTarget = "Closest", OrchestratorMode = "Prioritize Event", ShopReserve = 0, SelectedShopItems = {}, }, ActiveDrops = {}, ActiveDrones = {}, ESPObjects = {}, CachedOrigBat = nil, CachedScramBat = nil, } local function fn31(arg) if typeof(arg) == "CFrame" then return arg end if type(arg) == "string" then local tbl6 = {} for match in string.gmatch(arg, "[-0-9%.e]+") do table.insert(tbl6, tonumber(match)) end if #tbl6 >= 12 then return CFrame.new(unpack(tbl6)) end if #tbl6 >= 3 then return CFrame.new(tbl6[1], tbl6[2], tbl6[3]) end end return nil end local function fn32(arg) local str = tostring(arg or ""):lower() if str:find("aug") then return "AugmentedDrone", 3 end if str:find("react") then return "ReactorDrone", 2 end if str:find("scrap") then return "ScrapDrone", 1 end return "ScrapDrone", 1 end local function fn33() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes if not remotes then remotes = ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) end if remotes and remotes.Scramble then return remotes.Scramble end local networking = ReplicatedStorage:FindFirstChild("Packages") and ReplicatedStorage.Packages:FindFirstChild("Networking") if networking then return { Request = networking:FindFirstChild("RF/Scramble/Request"), Collect = networking:FindFirstChild("RE/Scramble/Collect"), Drones = networking:FindFirstChild("RE/Scramble/Drones"), Drops = networking:FindFirstChild("RE/Scramble/Drops"), RemoveDrops = networking:FindFirstChild("RE/Scramble/RemoveDrops"), State = networking:FindFirstChild("RE/Scramble/State"), Effect = networking:FindFirstChild("RE/Scramble/Effect"), } end return nil end tbl5.GetSnapshot = function(arg) local now = os.clock() if not arg and tbl5.Snapshot and now - tbl5.LastSnapshotFetch < tbl5.SnapshotInterval then return tbl5.Snapshot end local v7 = fn33() if v7 and v7.Request then local ok, snapshot = pcall(function() return v7.Request:InvokeServer("Snapshot") end) if ok and type(snapshot) == "table" then tbl5.Snapshot = snapshot tbl5.LastSnapshotFetch = now if snapshot.Drones and snapshot.Drones.Upserts then tbl5.ActiveDrones = snapshot.Drones.Upserts end local activeDrops = {} if snapshot.Drops then for _, drop in ipairs(snapshot.Drops) do if drop and drop.Id then activeDrops[drop.Id] = drop end end end tbl5.ActiveDrops = activeDrops return snapshot end end return tbl5.Snapshot end tbl5.IsEventActive = function() local v7 = tbl5.GetSnapshot() if not v7 or not v7.Window then return false end return v7.Window.Active == true end tbl5.ReleaseMovement = function() tbl5.IsFarmingDrone = false tbl5.CurrentTargetDrone = nil tbl5.CurrentTargetInfo = "None" tbl5.CachedOrigBat = nil tbl5.CachedScramBat = nil if tbl4.Movement then tbl4.Movement.Release("ScrambleDrone") end end tbl5.CanRun = function() if not enabled["Auto Farm Drones"] then return false end if steal and steal.IsNightOrWallClosed and steal.IsNightOrWallClosed() then return false end local orchestratorMode = tbl5.Config.OrchestratorMode or "Prioritize Event" if orchestratorMode == "Prioritize Event" then return tbl5.IsEventActive() end if orchestratorMode == "Steal Idle" then if not tbl5.IsEventActive() then return false end local value = farmState and farmState.GetCarryState and select(1, farmState.GetCarryState()) if steal and (steal.IsStealing or value) then return false end if enabled["Auto Steal"] and steal and steal.PickTarget and steal.PickTarget() ~= nil then return false end return true end return false end local function fn34(arg, arg2) if not arg2 or #arg2 == 0 then return false end local str = tostring(arg.Id or ""):lower() local str2 = tostring(arg.Label or ""):lower() for _, v7 in ipairs(arg2) do local str3 = tostring(v7):lower() if str3 == str or str3 == str2 then return true end if str ~= "" and str3:find(str, 1, true) then return true end if str2 ~= "" and str3:find(str2, 1, true) then return true end if str == "mutationconsumable" and (str3:find("mutation") or str3:find("scrambled")) then return true end if str == "limitedtimeexperimentpet" and (str3:find("experiment") or str3:find("001")) then return true end if str == "nibbles013" and (str3:find("nibbles") or str3:find("013")) then return true end if str == "cashbooster" and str3:find("cash") then return true end if str == "speedboost" and str3:find("speed") then return true end if str == "treadmillbooster" and str3:find("treadmill") then return true end end return false end tbl5.StepAutoShop = function(arg) local flag = not arg if flag and not enabled["Auto Buy Scramble Shop"] then return end local now = os.clock() if flag and now - tbl5.LastShopBuyAt < 2 then return end tbl5.LastShopBuyAt = now local v7 = tbl5.GetSnapshot(true) if not v7 or not v7.Shop or not v7.State then return end local n = (v7.State.Samples or 0) - (tbl5.Config.SampleReserve or tbl5.Config.ShopReserve or 0) if n <= 0 then return end local selectedShopItems = tbl5.Config.SelectedShopItems or {} if #selectedShopItems == 0 then return end local v8 = fn33() if not v8 or not v8.Request then return end for _, v9 in ipairs(v7.Shop) do local label = v9.Label or v9.Id if fn34(v9, selectedShopItems) then if v9.Price <= n then local v10 = (v7.State.ShopPurchases or {})[v9.Id] if not v9.PurchaseLimit or (v10 and v10.Count or 0) < v9.PurchaseLimit then local ok, result = pcall(function() return v8.Request:InvokeServer("Shop", v9.Id, { Quote = v9.Quote, Sequence = v7.State.ShopSequence or 0 }) end) if ok and result and result.Ok then n -= v9.Price if result.Snapshot and result.Snapshot.State then v7.State.ShopSequence = result.Snapshot.State.ShopSequence v7.State.Samples = result.Snapshot.State.Samples v7.State.ShopPurchases = result.Snapshot.State.ShopPurchases tbl5.Snapshot = result.Snapshot else v7.State.ShopSequence = (v7.State.ShopSequence or 0) + 1 end utils.Notify("Scramble Shop", string.format("Purchased %s for %d Samples!", label, v9.Price), 3) task.wait(0.25) end end end end end end tbl5.StepShop = tbl5.StepAutoShop tbl5.SafeApproach = function(arg, arg2) local character2 = localPlayer.Character if not (character2 and character2:FindFirstChild("HumanoidRootPart")) then return false end local n = math.max(arg2 or 300, 50) local autoSteal = tbl5.Config.OrchestratorMode == "Steal Idle" and enabled["Auto Steal"] if (steal.IsInSafeZone and steal.IsInSafeZone() or steal.IsInSafeZoneArea and steal.IsInSafeZoneArea()) and steal.GetSafeZone then local v7 = steal.GetSafeZone() if v7 then steal.TweenTo(v7, n, { Owner = "ScrambleDrone", AbortOnStealTarget = autoSteal }) end end return steal.TweenTo(arg, n, { Owner = "ScrambleDrone", AbortOnStealTarget = autoSteal }) end local function fn35(scramBat, arg) if not (scramBat and scramBat:IsA("Tool")) then return end local attribute = scramBat:GetAttribute("GearName") local flag = scramBat:GetAttribute("IsBat") == true local str = scramBat.Name:lower() if attribute == "The Scrambler" or str:find("the scrambler") or str:find("scrambler") then if not arg.scramBat then arg.scramBat = scramBat end elseif flag or attribute == "Bat" or attribute and attribute:lower():find("bat") or str:find("bat") then if attribute ~= "The Scrambler" and not str:find("scrambler") then if not arg.origBat then arg.origBat = scramBat end end end end local function fn36() local character2 = localPlayer and localPlayer.Character local backpack = localPlayer and localPlayer:FindFirstChildOfClass("Backpack") local cachedOrigBat = tbl5.CachedOrigBat local cachedScramBat = tbl5.CachedScramBat if cachedOrigBat and cachedOrigBat.Parent and (cachedOrigBat.Parent == character2 or cachedOrigBat.Parent == backpack) and cachedScramBat and cachedScramBat.Parent and (cachedScramBat.Parent == character2 or cachedScramBat.Parent == backpack) then return cachedOrigBat, cachedScramBat end local tbl6 = { origBat = nil, scramBat = nil } if character2 then for _, child in ipairs(character2:GetChildren()) do fn35(child, tbl6) end end if backpack then for _, child in ipairs(backpack:GetChildren()) do fn35(child, tbl6) end end tbl5.CachedOrigBat = tbl6.origBat tbl5.CachedScramBat = tbl6.scramBat return tbl6.origBat, tbl6.scramBat end tbl5.GetLiveDronePos = function(arg) local snapshot = tbl5.Snapshot if not snapshot or not snapshot.Drones or not snapshot.Drones.Upserts then return nil end for _, upsert in ipairs(snapshot.Drones.Upserts) do if (upsert.Id or tostring(upsert)) == arg then local n = tonumber(upsert.Health) or 0 if n <= 0 then return nil end local position = fn31(upsert.CFrame) position = position and position.Position if position then return position, n end return nil end end return nil end tbl5.SwingBat = function(arg, arg2) local v7, v8 = fn36() if tbl5.Config.FastSwitchBat ~= false and v7 ~= nil and v8 ~= nil then local fastSwitchDelay = tbl5.Config.FastSwitchDelay or 40 local n = fastSwitchDelay >= 1 and fastSwitchDelay / 1000 or fastSwitchDelay local n2 = math.clamp(n * 0.5, 0.02, 0.04) local flag = tbl5.NextBatType == "Scrambler" and v8 or v7 tbl5.NextBatType = flag == v8 and "Original" or "Scrambler" if flag.Parent ~= arg then arg2:EquipTool(flag) task.wait(n2) end pcall(function() flag:Activate() if flag:GetAttribute("GearName") == "The Scrambler" then local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.ToolTrigger and remotes.ToolTrigger.Trigger then remotes.ToolTrigger.Trigger:FireServer(flag) end end end) tbl5.LastBatSwing = os.clock() task.wait(n) else local v9 = v7 or v8 if not v9 then local backpack = localPlayer:FindFirstChildOfClass("Backpack") if backpack then for _, child in ipairs(backpack:GetChildren()) do local isTool = child:IsA("Tool") if isTool then isTool = child:GetAttribute("IsBat") == true or child:GetAttribute("GearName") == "The Scrambler" or child.Name:lower():find("bat") end if isTool then v9 = child break end end end end if v9 and v9.Parent ~= arg then arg2:EquipTool(v9) task.wait(0.03) end local batSwingInterval = tbl5.Config.BatSwingInterval or tbl5.Config.SwingInterval or 0.65 local flag if v9 then local lastBatSwing = tbl5.LastBatSwing flag = os.clock() - lastBatSwing >= batSwingInterval else flag = v9 end if flag then tbl5.LastBatSwing = os.clock() pcall(function() v9:Activate() if v9:GetAttribute("GearName") == "The Scrambler" then local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.ToolTrigger and remotes.ToolTrigger.Trigger then remotes.ToolTrigger.Trigger:FireServer(v9) end end end) end task.wait(0.05) end end tbl5.StepDrones = function() if not enabled["Auto Farm Drones"] then return false end if not tbl5.IsEventActive() then tbl5.ReleaseMovement() return false end if tbl5.Config.OrchestratorMode == "Steal Idle" and enabled["Auto Steal"] then local value = farmState and farmState.GetCarryState and select(1, farmState.GetCarryState()) if steal and (steal.IsStealing or value) then tbl5.ReleaseMovement() return false end if steal and steal.PickTarget and steal.PickTarget() ~= nil then tbl5.ReleaseMovement() return false end end local v7 = tbl5.GetSnapshot() if not v7 or not v7.Drones or not v7.Drones.Upserts then tbl5.ReleaseMovement() return false end local character2 = localPlayer.Character local humanoidRootPart2 = character2 and character2:FindFirstChild("HumanoidRootPart") character2 = character2 and character2:FindFirstChildOfClass("Humanoid") if not humanoidRootPart2 or not character2 or character2.Health <= 0 then tbl5.ReleaseMovement() return false end local priorityTarget = tbl5.Config.PriorityTarget or "Closest" local tbl6 = {} for _, upsert in ipairs(v7.Drones.Upserts) do local n = tonumber(upsert.Health) or 0 if n > 0 then local v8, v9 = fn32(upsert.Attributes and upsert.Attributes.ScrambleTier or "ScrapDrone") local flag = priorityTarget == "Augmented Only" and v8 ~= "AugmentedDrone" local flag2 = true if flag then flag2 = false end if priorityTarget == "Reactor Only" and v8 ~= "ReactorDrone" then flag2 = false end if priorityTarget == "Scrap Only" and v8 ~= "ScrapDrone" then flag2 = false end if flag2 then local position = fn31(upsert.CFrame) position = position and position.Position if position then local magnitude = (humanoidRootPart2.Position - position).Magnitude table.insert(tbl6, { drone = upsert, id = upsert.Id or tostring(upsert), pos = position, dist = magnitude, hp = n, tier = v8, rank = v9, }) end end end end if #tbl6 == 0 then tbl5.CurrentTargetDrone = nil tbl5.CurrentTargetInfo = "No target drones" tbl5.ReleaseMovement() return false end local id = tbl5.CurrentTargetDrone and tbl5.CurrentTargetDrone.Id local v8 = nil if id then v8 = nil for _, v9 in ipairs(tbl6) do if v9.id == tbl5.CurrentTargetDrone.Id then v8 = nil if v9.dist <= 18 then v8 = v9 end break else v8 = nil end end end if not v8 then if priorityTarget == "Closest" then table.sort(tbl6, function(arg, arg2) return arg.dist < arg2.dist end) elseif priorityTarget == "Lowest HP" then table.sort(tbl6, function(arg, arg2) if arg.hp == arg2.hp then return arg.dist < arg2.dist end return arg.hp < arg2.hp end) elseif priorityTarget == "Augmented First" then table.sort(tbl6, function(arg, arg2) if arg.rank == arg2.rank then return arg.dist < arg2.dist end return arg.rank > arg2.rank end) elseif priorityTarget == "Reactor First" then local tbl7 = { ReactorDrone = 3, AugmentedDrone = 2, ScrapDrone = 1 } table.sort(tbl6, function(arg, arg2) local n = tbl7[arg.tier] or 0 local n2 = tbl7[arg2.tier] or 0 if n == n2 then return arg.dist < arg2.dist end return n > n2 end) elseif priorityTarget == "Scrap First" then table.sort(tbl6, function(arg, arg2) if arg.rank == arg2.rank then return arg.dist < arg2.dist end return arg.rank < arg2.rank end) else table.sort(tbl6, function(arg, arg2) return arg.dist < arg2.dist end) end v8 = tbl6[1] end local magnitude = (humanoidRootPart2.Position - v8.pos).Magnitude local tier = v8.tier local hp = v8.hp tbl5.CurrentTargetDrone = v8.drone tbl5.CurrentTargetInfo = string.format("%s (HP: %d) [%.0f studs]", tier, hp, magnitude) if tbl4.Movement and not tbl4.Movement.Claim("ScrambleDrone", 80) then return false end if treadmill and treadmill.CheckTreadmil and treadmill.CheckTreadmil() then if treadmill.Unequip then treadmill.Unequip() end end tbl5.IsFarmingDrone = true local attackDistance = tbl5.Config.AttackDistance or 3.5 local id2 = v8.id local now = os.clock() while true do if enabled["Auto Farm Drones"] and tbl5.IsEventActive() then local character3 = localPlayer.Character local humanoidRootPart3 = character3 and character3:FindFirstChild("HumanoidRootPart") local humanoid2 = character3 and character3:FindFirstChildOfClass("Humanoid") if not (not humanoidRootPart3 or not humanoid2 or humanoid2.Health <= 0) then if not (steal and steal.IsNightOrWallClosed and steal.IsNightOrWallClosed()) then if not (tbl5.Config.OrchestratorMode == "Steal Idle" and enabled["Auto Steal"] and steal.PickTarget and steal.PickTarget() ~= nil) then local v9, v10 = tbl5.GetLiveDronePos(id2) if v9 then local v11 = v9 local n = (humanoidRootPart3.Position - v11) * Vector3.new(1, 0, 1) local vector = n.Magnitude < 0.1 and Vector3.new(0, 0, attackDistance) or n.Unit * attackDistance local vector2 = Vector3.new(v11.X + vector.X, v11.Y, v11.Z + vector.Z) local magnitude2 = (humanoidRootPart3.Position - vector2).Magnitude tbl5.CurrentTargetInfo = string.format("%s (HP: %d) [%.0f studs]", tier, v10, magnitude2) if magnitude2 > 5.5 then _G.LastAction = string.format("Scramble: Approaching %s (%.0fm)", tier, magnitude2) tbl5.SafeApproach(vector2, tbl5.Config.TweenSpeed or 300) else _G.LastAction = string.format("Scramble: Attacking %s (HP: %d)", tier, v10) pcall(function() for _, child in ipairs(character3:GetChildren()) do if child:IsA("BasePart") then child.CanCollide = false end end local vector3 = Vector3.new(humanoidRootPart3.Position.X, v11.Y, humanoidRootPart3.Position.Z) local vector4 = Vector3.new(v11.X, vector3.Y, v11.Z) humanoidRootPart3.CFrame = (vector4 - vector3).Magnitude > 0.1 and CFrame.lookAt(vector3, vector4) or CFrame.new(vector3) humanoidRootPart3.AssemblyLinearVelocity = Vector3.zero humanoidRootPart3.AssemblyAngularVelocity = Vector3.zero end) tbl5.SwingBat(character3, humanoid2) end if os.clock() - now > 12 then break else runService.Heartbeat:Wait() continue end end end end end end break end return true end tbl5.Step = function() if enabled["Auto Buy Scramble Shop"] and tbl5.StepAutoShop then tbl5.StepAutoShop() end if enabled["Auto Farm Drones"] then tbl5.StepDrones() end end local function fn37(name) local folder = workspace:FindFirstChild(name) if not folder then folder = Instance.new("Folder") folder.Name = name folder.Parent = workspace end return folder end tbl5.ClearDroneESP = function() if tbl5.DroneESPFolder then pcall(function() tbl5.DroneESPFolder:ClearAllChildren() end) end end tbl5.ClearDropsESP = function() if tbl5.DropsESPFolder then pcall(function() tbl5.DropsESPFolder:ClearAllChildren() end) end end tbl5.UpdateDroneESP = function() if not enabled["ESP Scramble Drones"] then tbl5.ClearDroneESP() return end tbl5.DroneESPFolder = fn37("NoLag_DroneESP") local droneESPFolder = tbl5.DroneESPFolder local v7 = tbl5.GetSnapshot() if not v7 or not v7.Drones or not v7.Drones.Upserts then tbl5.ClearDroneESP() return end local character2 = localPlayer.Character character2 = character2 and character2:FindFirstChild("HumanoidRootPart") character2 = character2 and character2.Position local tbl6 = {} for _, upsert in ipairs(v7.Drones.Upserts) do local n = tonumber(upsert.Health) or 0 if n > 0 then local v8 = fn31(upsert.CFrame) if v8 then local name = tostring(upsert.Id or "DroneESP") tbl6[name] = true local v9 = fn32(upsert.Attributes and upsert.Attributes.ScrambleTier or "ScrapDrone") local magnitude = character2 and (character2 - v8.Position).Magnitude or 0 local v10 = droneESPFolder:FindFirstChild(name) local part, textLabel if not v10 then part = Instance.new("Part") part.Name = name part.Anchored = true part.CanCollide = false part.Transparency = 1 part.Size = Vector3.new(4, 4, 4) local billboardGui = Instance.new("BillboardGui") billboardGui.Name = "BB" billboardGui.Adornee = part billboardGui.Size = UDim2.new(0, 150, 0, 45) billboardGui.StudsOffset = Vector3.new(0, 3, 0) billboardGui.AlwaysOnTop = true billboardGui.Parent = part textLabel = Instance.new("TextLabel") textLabel.Name = "TL" textLabel.Size = UDim2.new(1, 0, 1, 0) textLabel.BackgroundTransparency = 1 textLabel.TextStrokeTransparency = 0 textLabel.TextScaled = true textLabel.Parent = billboardGui part.Parent = droneESPFolder else local bb = v10:FindFirstChild("BB") if bb then part = v10 textLabel = bb:FindFirstChild("TL") else part = v10 textLabel = bb end end part.CFrame = v8 if textLabel then local color = v9 == "AugmentedDrone" and Color3.fromRGB(255, 60, 60) or v9 == "ReactorDrone" and Color3.fromRGB(255, 215, 0) or Color3.fromRGB(80, 255, 120) if textLabel.TextColor3 ~= color then textLabel.TextColor3 = color end textLabel.Text = string.format("%s\nHP: %d | %.0fm", v9, n, magnitude) end end end end for _, child in ipairs(droneESPFolder:GetChildren()) do if not tbl6[child.Name] then child:Destroy() end end end tbl5.UpdateDropsESP = function() if not enabled["ESP Scramble Drops"] then tbl5.ClearDropsESP() return end tbl5.DropsESPFolder = fn37("NoLag_DropsESP") local dropsESPFolder = tbl5.DropsESPFolder local v7 = tbl5.GetSnapshot() if not v7 or not v7.Drops then tbl5.ClearDropsESP() return end local tbl6 = {} for _, drop in ipairs(v7.Drops) do local name = tostring(drop.Id or drop.Position and tostring(drop.Position) or "Drop") tbl6[name] = true local position = drop.Position or drop.Origin if position then local part = dropsESPFolder:FindFirstChild(name) local textLabel if not part then part = Instance.new("Part") part.Name = name part.Anchored = true part.CanCollide = false part.Transparency = 1 part.Size = Vector3.new(2, 2, 2) local billboardGui = Instance.new("BillboardGui") billboardGui.Name = "BB" billboardGui.Adornee = part billboardGui.Size = UDim2.new(0, 100, 0, 30) billboardGui.AlwaysOnTop = true billboardGui.Parent = part textLabel = Instance.new("TextLabel") textLabel.Name = "TL" textLabel.Size = UDim2.new(1, 0, 1, 0) textLabel.BackgroundTransparency = 1 textLabel.TextStrokeTransparency = 0 textLabel.TextScaled = true textLabel.Parent = billboardGui part.Parent = dropsESPFolder else textLabel = part:FindFirstChild("BB") textLabel = textLabel and textLabel:FindFirstChild("TL") end part.Position = position if textLabel then if drop.Kind == "Part" then local color = Color3.fromRGB(255, 170, 0) if textLabel.TextColor3 ~= color then textLabel.TextColor3 = color end textLabel.Text = tostring(drop.PartId or "Part") else local color = Color3.fromRGB(0, 255, 180) if textLabel.TextColor3 ~= color then textLabel.TextColor3 = color end textLabel.Text = "Samples" end end end end for _, child in ipairs(dropsESPFolder:GetChildren()) do if not tbl6[child.Name] then child:Destroy() end end end tbl5.GetTelemetryText = function() local v7 = tbl5.GetSnapshot() if not v7 then return "Loading Dr. Scramble Outbreak telemetry..." end local state = v7.State or {} local window = v7.Window or {} local serverTimeNow = workspace:GetServerTimeNow() local str if window.Active == true and window.EndsAt then local n = math.max(0, math.ceil(window.EndsAt - serverTimeNow)) str = string.format("ACTIVE (Ends in %dm %ds)", n // 60, n % 60) elseif window.NextAt then local n = math.max(0, math.ceil(window.NextAt - serverTimeNow)) str = string.format("STANDBY (Starts in %dm %ds)", n // 60, n % 60) else str = "Standby" end local samples = state.Samples or 0 local upserts = v7.Drones and v7.Drones.Upserts local n = 0 local n2 = 0 local n3 = 0 local n4 = 0 if upserts then for _, upsert in ipairs(v7.Drones.Upserts) do if (tonumber(upsert.Health) or 0) > 0 then n += 1 local scrambleTier = upsert.Attributes and upsert.Attributes.ScrambleTier or "" if scrambleTier:find("Aug") then n3 += 1 elseif scrambleTier:find("React") then n2 += 1 else n4 += 1 end end end end local priorityTarget = tbl5.Config.PriorityTarget or "Closest" local tbl6 = {} local str2 = string.format("Samples Balance: %s", tostring(samples)) local str3 = string.format("Event Window: %s", str) local str4 = string.format("Active Drones: %d (Aug: %d, React: %d, Scrap: %d)", n, n3, n2, n4) local str5 = string.format("Priority Target: %s", tostring(priorityTarget)) local format = string.format local currentTargetInfo = tbl5.CurrentTargetInfo or "None" local v8 = table.pack(format("Target Drone: %s", currentTargetInfo)) tbl6[1] = str2 tbl6[2] = str3 tbl6[3] = str4 tbl6[4] = str5 do local values = table.pack(table.unpack(v8, 1, v8.n)) table.move(values, 1, values.n, 5, tbl6) end return table.concat(tbl6, "\n") end tbl5.GetShopTelemetryText = function() local v7 = tbl5.GetSnapshot() if not v7 or not v7.Shop then return "Loading Shop data..." end local samples = v7.State and v7.State.Samples or 0 local tbl6 = {} local str = string.format("Available Samples: %s", tostring(samples)) local str2 = string.format("Reserve Samples: %s", tostring(tbl5.Config.ShopReserve or 0)) tbl6[1] = str tbl6[2] = str2 tbl6[3] = "" tbl6[4] = "Catalog Items:" for _, v8 in ipairs(v7.Shop) do table.insert(tbl6, string.format(" • %s%s: %s", v8.Label or v8.Id, v8.PurchaseLimit and string.format(" (Limit: %d)", v8.PurchaseLimit) or "", samples >= v8.Price and string.format("%d Samples", v8.Price) or string.format("%d Samples", v8.Price))) end return table.concat(tbl6, "\n") end task.spawn(function() while true do if enabled["Auto Farm Drones"] and tbl5.IsFarmingDrone then pcall(tbl5.GetSnapshot, true) task.wait(0.2) continue end task.wait(0.5) end end) return tbl5 end tbl4.Scramble = fn30() local function fn31() local tbl5 = { State = nil, LastStateFetch = 0, LastSacrificeAt = 0, LastRerollAt = 0, StatusParagraph = nil, Config = { DesiredBanners = {} }, CachedPets = nil, LastPetsFetch = 0, CachedUnplacedEggs = nil, CachedPlacedEggs = nil, LastEggsFetch = 0, CachedNeededEggCategories = nil, LastNeededFetch = 0, } local function fn32(arg, arg2) if fn4 then fn4(arg2, arg) elseif Utils and Utils.Notify then Utils.Notify(arg, arg2, 4) end end local tbl6 = {} pcall(function() local assets = tbl4.Game and tbl4.Game.Assets local Assets if assets then Assets = assets else Assets = replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) end local directory = Assets and Assets.Directory or Assets if directory then for k, v7 in pairs(directory) do tbl6[k] = v7 end end end) local function fn33() local ReplicatedStorage = game:GetService("ReplicatedStorage") local remotes = tbl4.Game and tbl4.Game.Remotes or ReplicatedStorage:FindFirstChild("Shared") and ReplicatedStorage.Shared:FindFirstChild("Remotes") and require(ReplicatedStorage.Shared.Remotes) if remotes and remotes.Rift then return remotes.Rift end local networking = ReplicatedStorage:FindFirstChild("Packages") and ReplicatedStorage.Packages:FindFirstChild("Networking") if networking then return { AskState = networking:FindFirstChild("RF/Rift/AskState"), AskTradeIn = networking:FindFirstChild("RF/Rift/AskTradeIn"), AskRefresh = networking:FindFirstChild("RF/Rift/AskRefresh"), AskFinishReveal = networking:FindFirstChild("RF/Rift/AskFinishReveal"), BannerRotated = networking:FindFirstChild("RE/Rift/BannerRotated"), } end return nil end tbl5.GetState = function(arg) local now = os.clock() if not arg and tbl5.State and now - tbl5.LastStateFetch < 2 then return tbl5.State end local v7 = fn33() if v7 and v7.AskState then local ok, state = pcall(function() return v7.AskState:InvokeServer() end) if ok and type(state) == "table" then tbl5.State = state tbl5.LastStateFetch = now return state end end return tbl5.State end tbl5.IsUnlocked = function() local v7 = tbl5.GetState() return v7 and v7.Unlocked == true end tbl5.IsBannerDesired = function() local desiredBanners = tbl5.Config and tbl5.Config.DesiredBanners or cached and cached.Settings and cached.Settings.DesiredRiftBanners or {} if not desiredBanners or #desiredBanners == 0 then return true end local v7 = tbl5.GetState() if not v7 then return false end local str = tostring(v7.BannerId or ""):lower() local str2 = tostring(v7.BannerDisplayName or ""):lower() for _, desiredBanner in ipairs(desiredBanners) do local str3 = tostring(desiredBanner):lower() if str3 == str or str3 == str2 or str ~= "" and str3:find(str, 1, true) or str2 ~= "" and str3:find(str2, 1, true) then return true end end return false end tbl5.InvalidateCache = function() tbl5.CachedPets = nil tbl5.LastPetsFetch = 0 tbl5.CachedUnplacedEggs = nil tbl5.CachedPlacedEggs = nil tbl5.LastEggsFetch = 0 tbl5.CachedNeededEggCategories = nil tbl5.LastNeededFetch = 0 end local function fn34() local getSave = tbl4.Game and tbl4.Game.GetSave and tbl4.Game.GetSave() if not getSave then pcall(function() local Save = require(game:GetService("ReplicatedStorage").Shared.Save) if Save and Save.Get then getSave = Save.Get() or Save.Peek and Save.Peek() or {} end end) end if getSave and type(getSave) == "table" then return getSave.Data or getSave end return {} end tbl5.GetAllInventoryPets = function(arg) local now = os.clock() if not arg and tbl5.CachedPets and now - tbl5.LastPetsFetch < 0.75 then return tbl5.CachedPets end local v7 = fn34() local cachedPets = {} local tbl7 = {} if v7 then local equippedAssets = v7.EquippedAssets or v7.EquippedPets or {} for _, equippedAsset in pairs(equippedAssets) do if type(equippedAsset) == "string" then tbl7[equippedAsset] = true elseif type(equippedAsset) == "table" and (equippedAsset.UID or equippedAsset.Uid or equippedAsset.Id) then tbl7[equippedAsset.UID or equippedAsset.Uid or equippedAsset.Id] = true end end local AssetItems = nil pcall(function() AssetItems = require(game:GetService("ReplicatedStorage").Shared.Util.AssetItems) end) local inventory = v7.Inventory or v7.Slots or v7.Pets or {} for k, v8 in pairs(inventory) do if AssetItems and AssetItems.Decode and (type(v8) == "string" or type(v8) == "table" and not v8.Category) then local ok, result = pcall(AssetItems.Decode, v8) if ok and result then v8 = result end end if type(v8) == "table" then local str = tostring(v8.Category or v8.DisplayName or "") table.insert(cachedPets, { Uid = k, Category = str, DisplayName = tostring(v8.DisplayName or str), Weight = tonumber(v8.Weight) or 0, Scale = tonumber(v8.Scale) or 1, Favorite = v8.Favorite == true or v8.IsFavorite == true, Equipped = tbl7[k] == true, InFuse = v8.InFuse == true, Source = "Save", }) end end end local function fn35(arg2) if not (arg2 and arg2:IsA("Tool")) then return end local attribute = arg2:GetAttribute("UID") local attribute2 = arg2:GetAttribute("Category") or arg2:GetAttribute("DisplayName") if attribute and attribute2 then local flag = false for _, cachedPet in ipairs(cachedPets) do if cachedPet.Uid == attribute then flag = true break end end if not flag then table.insert(cachedPets, { Uid = attribute, Category = tostring(attribute2), DisplayName = tostring(arg2:GetAttribute("DisplayName") or attribute2), Weight = tonumber(arg2:GetAttribute("Weight")) or 0, Scale = tonumber(arg2:GetAttribute("Scale")) or 1, Favorite = arg2:GetAttribute("Favorite") == true, Equipped = tbl7[attribute] == true, InFuse = false, Source = "Tool", }) end end end local localPlayer2 = localPlayer or players.LocalPlayer if localPlayer2 and localPlayer2.Character then for _, child in ipairs(localPlayer2.Character:GetChildren()) do fn35(child) end end if localPlayer2 and localPlayer2:FindFirstChild("Backpack") then for _, child in ipairs(localPlayer2.Backpack:GetChildren()) do fn35(child) end end tbl5.CachedPets = cachedPets tbl5.LastPetsFetch = now return cachedPets end tbl5.GetAllEggs = function(arg) local now = os.clock() if not arg and tbl5.CachedUnplacedEggs and now - tbl5.LastEggsFetch < 0.75 then return tbl5.CachedUnplacedEggs, tbl5.CachedPlacedEggs end local v7 = fn34() local cachedUnplacedEggs = {} local cachedPlacedEggs = {} if v7 and v7.EggInventory then for k, v8 in pairs(v7.EggInventory) do if type(v8) == "table" and v8.AssetCategory then local str = tostring(v8.AssetCategory) if v8.Placement then table.insert(cachedPlacedEggs, { Uid = k, Category = str }) else table.insert(cachedUnplacedEggs, { Uid = k, Category = str }) end end end end local localPlayer2 = localPlayer or players.LocalPlayer if localPlayer2 and localPlayer2:FindFirstChild("Backpack") then for _, child in ipairs(localPlayer2.Backpack:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("AssetCategory") then local attribute = child:GetAttribute("UID") or child.Name local str = tostring(child:GetAttribute("AssetCategory")) local flag = false for _, cachedUnplacedEgg in ipairs(cachedUnplacedEggs) do if cachedUnplacedEgg.Uid == attribute then flag = true break end end if not flag then table.insert(cachedUnplacedEggs, { Uid = attribute, Category = str }) end end end end tbl5.CachedUnplacedEggs = cachedUnplacedEggs tbl5.CachedPlacedEggs = cachedPlacedEggs tbl5.LastEggsFetch = now return cachedUnplacedEggs, cachedPlacedEggs end tbl5.GetMissingRequirements = function() local v7 = tbl5.GetState() if not v7 or not v7.Requirements then return {} end local tbl7 = {} local v8 = tbl5.GetAllInventoryPets() for _, requirement in ipairs(v7.Requirements) do local str = tostring(type(requirement) == "table" and (requirement.Category or requirement.Id or requirement.Name) or requirement) local flag = false for _, v9 in ipairs(v8) do if (v9.Category == str or v9.DisplayName == str) and not v9.Favorite and not v9.Equipped and not v9.InFuse then flag = true break end end if not flag then tbl7[str] = true end end return tbl7 end tbl5.GetNeededRecipeEggCategories = function(arg) local now = os.clock() if not arg and tbl5.CachedNeededEggCategories and now - tbl5.LastNeededFetch < 0.5 then return tbl5.CachedNeededEggCategories end local v7 = tbl5.GetState() if not v7 or not v7.Requirements then return {} end local tbl7 = {} for _, requirement in ipairs(v7.Requirements) do local str = tostring(type(requirement) == "table" and (requirement.Category or requirement.Id or requirement.Name) or requirement) tbl7[str] = (tbl7[str] or 0) + 1 end local getAllInventoryPets = tbl5.GetAllInventoryPets and tbl5.GetAllInventoryPets() or {} for _, getAllInventoryPet in ipairs(getAllInventoryPets) do local category = getAllInventoryPet.Category or getAllInventoryPet.DisplayName if category and tbl7[category] and tbl7[category] > 0 then if not getAllInventoryPet.Favorite and not getAllInventoryPet.Equipped and not getAllInventoryPet.InFuse then tbl7[category] = tbl7[category] - 1 end end end local tbl8 = {} local tbl9 = {} if tbl5.GetAllEggs then tbl8, tbl9 = tbl5.GetAllEggs() end local v8 = ipairs tbl8 = tbl8 or {} for _, v9 in v8(tbl8) do local category = v9.Category if category and tbl7[category] and tbl7[category] > 0 then tbl7[category] = tbl7[category] - 1 end end local v9 = ipairs tbl9 = tbl9 or {} for _, v10 in v9(tbl9) do local category = v10.Category if category and tbl7[category] and tbl7[category] > 0 then tbl7[category] = tbl7[category] - 1 end end pcall(function() local character2 = localPlayer and localPlayer.Character if character2 then for _, child in ipairs(character2:GetChildren()) do if child:IsA("Tool") and child:GetAttribute("AssetCategory") then local str = tostring(child:GetAttribute("AssetCategory")) if tbl7[str] and tbl7[str] > 0 then tbl7[str] = tbl7[str] - 1 end end end end end) local cachedNeededEggCategories = {} for k, v10 in pairs(tbl7) do if v10 > 0 then cachedNeededEggCategories[k] = v10 end end tbl5.CachedNeededEggCategories = cachedNeededEggCategories tbl5.LastNeededFetch = now return cachedNeededEggCategories end tbl5.FindEligiblePetsForRecipe = function(arg) if not arg or #arg == 0 then return nil end local v7 = tbl5.GetAllInventoryPets() local tbl7 = {} local tbl8 = {} for _, v8 in ipairs(arg) do local v9 = tostring v8 = type(v8) == "table" and (v8.Category or v8.Id or v8.Name) or v8 local v10 = v9(v8) local huge = math.huge local v11 = nil for _, v12 in ipairs(v7) do if not tbl7[v12.Uid] and not v12.Equipped and not v12.Favorite and not v12.InFuse then if v12.Category == v10 or v12.DisplayName == v10 then local n = tonumber(v12.Weight) or 0 if n < huge then huge = n v11 = v12 end end end end if v11 then tbl7[v11.Uid] = true table.insert(tbl8, v11.Uid) continue end return nil end return #tbl8 == #arg and tbl8 or nil end tbl5.StepSacrifice = function(arg) local flag = not arg if flag and not enabled["Auto Rift Sacrifice"] then return end if flag and tbl5.IsBannerDesired and not tbl5.IsBannerDesired() then return end local now = os.clock() if flag and now - tbl5.LastSacrificeAt < 2 then return end tbl5.LastSacrificeAt = now local v7 = tbl5.GetState(arg) if not v7 then return end local requirements = v7.Requirements or {} if #requirements == 0 then return end local v8 = tbl5.FindEligiblePetsForRecipe(requirements) if v8 and #v8 == #requirements then local v9 = fn33() if v9 and v9.AskTradeIn then _G.LastAction = "Rift: Trading in sacrifice pets..." local ok, result = pcall(function() return v9.AskTradeIn:InvokeServer(v8) end) if ok and result == true then task.wait(0.3) if v9.AskFinishReveal then pcall(function() v9.AskFinishReveal:InvokeServer() end) end tbl5.GetState(true) tbl5.InvalidateCache() fn32("The Rift", "Trade-In successful! Rift Egg received.") _G.LastAction = "Rift: Sacrifice Successful! Egg received." return true end end end end tbl5.StepReroll = function(arg) local flag = not arg if flag and not enabled["Auto Reroll Rift Recipe"] then return end if flag and tbl5.IsBannerDesired and not tbl5.IsBannerDesired() then return end local now = os.clock() if flag and now - tbl5.LastRerollAt < 2.5 then return end tbl5.LastRerollAt = now local v7 = tbl5.GetState() local flag2 = not v7 local flag3 if flag2 then flag3 = flag2 else flag3 = (v7.FreeRefreshesRemaining or 0) <= 0 end if flag3 then return end local v8 = tbl5.FindEligiblePetsForRecipe(v7.Requirements or {}) if arg or not v8 then local v9 = fn33() if v9 and v9.AskRefresh then _G.LastAction = "Rift: Rerolling sacrifice recipe..." local ok, result = pcall(function() return v9.AskRefresh:InvokeServer() end) if ok and result == true then task.wait(0.4) tbl5.GetState(true) tbl5.InvalidateCache() local v10 = tbl5.GetState() fn32("The Rift", string.format("Recipe rerolled! (%d free refreshes left)", v10 and v10.FreeRefreshesRemaining or 0)) return true end end end end tbl5.Step = function() if enabled["Auto Rift Sacrifice"] then if tbl5.StepSacrifice() then return end end if enabled["Auto Reroll Rift Recipe"] then tbl5.StepReroll() end end tbl5.GetTelemetryText = function() local v7 = tbl5.GetState() if not v7 then return "Loading The Rift telemetry..." end local bannerDisplayName = v7.BannerDisplayName or v7.BannerId or "Unknown" local bannerId = v7.BannerId or "" local n = tonumber(v7.SecondsUntilRotation) or 0 local str = n > 0 and string.format("%dm %ds", math.floor(n / 60), math.floor(n % 60)) or "Rotating soon..." local freeRefreshesRemaining = v7.FreeRefreshesRemaining or 0 local str2 = string.format("%d / %d", v7.PityCount or 0, v7.PityThreshold or 50) local requirements = v7.Requirements or {} local str3 = tbl5.FindEligiblePetsForRecipe(requirements) local v8 = tbl5.GetAllInventoryPets() local v9, v10 = tbl5.GetAllEggs() local tbl7 = {} for _, requirement in ipairs(requirements) do local str4 = tostring(type(requirement) == "table" and (requirement.Category or requirement.Id or requirement.Name) or requirement) local n2 = 0 local n3 = 0 for _, v11 in ipairs(v8) do if v11.Category == str4 or v11.DisplayName == str4 then if v11.Favorite or v11.Equipped or v11.InFuse then n2 += 1 else n3 += 1 end end end local n4 = 0 for _, v11 in ipairs(v9) do if v11.Category == str4 then n4 += 1 end end local n5 = 0 for _, v11 in ipairs(v10) do if v11.Category == str4 then n5 += 1 end end local str5, str6 if n3 > 0 then str5 = string.format("(Ready: %d Pet)", n3) str6 = "#00FF88" elseif n5 > 0 then str5 = string.format("(%d Egg in Pen - Growing)", n5) str6 = "#FFD83D" elseif n4 > 0 then str5 = string.format("(%d Egg in Inventory - Needs Hatch)", n4) str6 = "#00E5FF" else str6 = "#FF5555" str5 = "(Missing)" if n2 > 0 then str6 = "#FFAA00" str5 = string.format("(%d Pet Favorited/Equipped)", n2) end end table.insert(tbl7, string.format(" • %s: %s", str4, str6, str5)) end local flag = true if tbl5.IsBannerDesired then flag = tbl5.IsBannerDesired() end local desiredBanners = tbl5.Config and tbl5.Config.DesiredBanners or cached and cached.Settings and cached.Settings.DesiredRiftBanners or {} local str4 = "" if #desiredBanners > 0 then if flag then str4 = " [DESIRED]" else str4 = " [NOT DESIRED - IDLE]" end end str3 = str3 and "READY TO TRADE-IN! (All Pets Ready)" or "Collecting / Hatching Recipe Pets..." if not flag and #desiredBanners > 0 then str3 = "Suspended (Banner not in Desired Banners)" end local tbl8 = {} local str5 = string.format(" Banner: %s [%s]%s", bannerDisplayName, bannerId, str4) local str6 = string.format(" Banner Rotation: %s", str) local str7 = string.format(" Pity Progress: %s", str2) local str8 = string.format(" Free Rerolls Left: %d", freeRefreshesRemaining) local str9 = string.format(" Status: %s", str3) tbl8[1] = str5 tbl8[2] = str6 tbl8[3] = str7 tbl8[4] = str8 tbl8[5] = str9 tbl8[6] = " Current Recipe Requirements:" for _, v11 in ipairs(tbl7) do table.insert(tbl8, v11) end return table.concat(tbl8, "\n") end return tbl5 end tbl4.Rift = fn31() return tbl4 end module.Modules = fn7() local tbl4 = {} local modules = module.Modules local utils = modules.Utils local misc = modules.Misc local game_ = modules.Game local movement = modules.Movement local farmState = modules.FarmState local farmState2 = modules.FarmState local steal = modules.Steal local placeEgg = modules.PlaceEgg local treadmill = modules.Treadmill local hatch = modules.Hatch local equip = modules.Equip local favorite = modules.Favorite local fuse = modules.Fuse local sell = modules.Sell local rebirth = modules.Rebirth local upgrade = modules.Upgrade local claim = modules.Claim local esp = modules.ESP local webhookManager = modules.WebhookManager local petPredictor = modules.PetPredictor local fusePredictor = modules.FusePredictor local trail = modules.Trail local scramble = modules.Scramble local rift = modules.Rift local function fn8() return { LastPhysicalTick = 0, Tick = function() local debugInspector = modules.DebugInspector if enabled["Auto Pick Dropped Egg"] and steal.AutoPickWasCarrying and not enabled["Auto Steal"] then if not (steal.IsNightWallClosed and steal.IsNightWallClosed()) then if debugInspector then debugInspector.SetState("AUTO_PICK", "Recovering Dropped Egg (Night)", "AutoPick") end return end end if steal.IsNightOrWallClosed and steal.IsNightOrWallClosed() then steal.WasNightOrClosed = true steal.IsStealing = false steal.GotEgg = false if farmState2 then farmState2.Carrying = false farmState2.CarriedUid = nil farmState2.CarriedAssetCategory = nil farmState2.OptimisticCarry = false end movement.Release("Steal") steal.StopRunAnimation() if treadmill and treadmill.CheckTreadmil and treadmill.CheckTreadmil() then if treadmill.Unequip then treadmill.Unequip() end end local getSafeZone = steal.GetSafeZone and steal.GetSafeZone() local character2 = localPlayer.Character character2 = character2 and character2:FindFirstChild("HumanoidRootPart") if (character2 and getSafeZone and (character2.Position - getSafeZone).Magnitude or 999) > 30 then if debugInspector then debugInspector.SetState("EMERGENCY_SAFEZONE", "Night / Barrier Evacuation", "SafeZone") end steal.GoToSafeZone(300, "SafeZone") elseif debugInspector then debugInspector.SetState("SAFEZONE_STANDBY", "Night SafeZone Standby", "SafeZone") end return end if enabled["Auto Farm Drones"] and scramble and scramble.CanRun and scramble.CanRun() then if debugInspector then debugInspector.SetState("SCRAMBLE_EVENT", "Dr. Scramble Event", scramble.CurrentTargetInfo or "Drone") end scramble.Step() return end if scramble and enabled["Auto Buy Scramble Shop"] and scramble.StepAutoShop then scramble.StepAutoShop() end if rift and (enabled["Auto Rift Sacrifice"] or enabled["Auto Reroll Rift Recipe"]) and rift.Step then rift.Step() end if enabled["Auto Steal"] then local v7, v8 = farmState2.GetCarryState() if v7 or steal.IsStealing then steal.MarkWork() if debugInspector then debugInspector.SetState("STEALING", "Carrying Egg to SafeZone", tostring(v8 or "Egg")) end steal.Step() return end local v9 = steal.PickTarget() if v9 ~= nil then steal.MarkWork() if debugInspector then debugInspector.SetState("STEALING", "Moving to Egg Nest", steal.GetEggFormattedName(v9)) end steal.Step() return end local character2 = localPlayer.Character local humanoid2 = character2 and character2:FindFirstChildOfClass("Humanoid") if humanoid2 and character2:FindFirstChildOfClass("Tool") then pcall(function() humanoid2:UnequipTools() end) end end if enabled["Auto Place Egg"] and placeEgg.ShouldRunNow and placeEgg.ShouldRunNow() then if debugInspector then debugInspector.SetState("PLACE_EGG", "Placing Eggs into Pen", "Plot Pen") end placeEgg.Step() return end if sell and sell.CanSell and sell.CanSell() then if (enabled["Auto Sell Pet"] or enabled["Auto Sell Egg"]) and sell.Step then sell.Step() end end if enabled["Auto Treadmill"] then if treadmill.CanRun and treadmill.CanRun() then if not (treadmill.CheckTreadmil and treadmill.CheckTreadmil()) and debugInspector then debugInspector.SetState("TREADMILL", "Training on Treadmill", "Treadmill") end treadmill.Step() return end end if debugInspector then debugInspector.SetState("IDLE_STANDBY", "Idle Standby", "None") end if steal.IsNightOrWallClosed and steal.IsNightOrWallClosed() then local getSafeZone = steal.GetSafeZone and steal.GetSafeZone() local character2 = localPlayer.Character local humanoidRootPart2 = character2 and character2:FindFirstChild("HumanoidRootPart") if humanoidRootPart2 and getSafeZone and (humanoidRootPart2.Position - getSafeZone).Magnitude > 15 then steal.GoToSafeZone(300, "SafeZone") end end end, } end modules.Orchestrator = fn8() local orchestrator = modules.Orchestrator tbl4.LoadLibrary = function() local v7 = BobloNEXT:CreateWindow({ Title = "Lennon hub", Subtitle = "Steal An Egg 1.2.2 | BobloNEXT", Icon = "Lucide:zap", Size = UDim2.fromOffset(680, 480), MinSize = Vector2.new(480, 340), Draggable = true, Resizable = true, UseBlur = true, DefaultTab = "Main", ToggleKeybind = Enum.KeyCode.RightShift, }) Runtime.Window = v7 local mainTab = v7:AddTab({ Name = "Main", Icon = "Lucide:house" }) local tbl5 = { Home = mainTab:AddSubTab({ Name = "Overview", Icon = "Lucide:house" }), Farm = v7:AddTab({ Name = "Farm", Icon = "Lucide:wheat" }), Events = v7:AddTab({ Name = "Events", Icon = "Lucide:zap" }), Progression = mainTab:AddSubTab({ Name = "Progression", Icon = "Lucide:trending-up" }), Predictor = v7:AddTab({ Name = "Predictor", Icon = "Lucide:search" }), ESP = v7:AddTab({ Name = "Visuals", Icon = "Lucide:eye" }), Miscellaneous = v7:AddTab({ Name = "Player", Icon = "Lucide:user" }), Settings = v7:AddTab({ Name = "Settings", Icon = "Lucide:settings" }), } tbl5.Home:AddParagraph({ Title = "Steal An Egg", Text = "Original game modules with BobloNEXT controls. Right Shift toggles the window. Search with Ctrl + K.", }) tbl5.Home:AddButton({ Text = "Discord Invite", Description = "Copy invite link", Callback = function() Runtime.Copy("https://discord.gg/speedhubx") end, }) local v8 = tbl5.Predictor:AddSubTab({ Name = "Pets", Icon = "Lucide:search" }) petPredictor.Paragraph = Runtime.LiveReport(v8, "Pet Predictor", "Loading pet predictions...") Runtime.Bind(v8, "AddDropdown", { Text = "Egg Scope", Description = "Select which eggs to inspect", Flag = "StealAnEgg.Egg_Scope", Options = { "Placed Eggs (In Pen)", "All Eggs (Inc. Inventory)" }, MultiSelect = false, Default = "Placed Eggs (In Pen)", Callback = function(arg) petPredictor.ShowOnlyPlaced = arg == "Placed Eggs (In Pen)" petPredictor.UpdateParagraph() end, }) Runtime.Bind(v8, "AddDropdown", { Text = "Sort Pets By", Description = "Sort order for predicted pet list", Flag = "StealAnEgg.Sort_Pets_By", Options = { "Income (Highest)", "Rarity (Highest)", "Time (Ready Soon)" }, MultiSelect = false, Default = "Income (Highest)", Callback = function(arg) if arg == "Income (Highest)" then petPredictor.SortMode = "Income" elseif arg == "Rarity (Highest)" then petPredictor.SortMode = "Rarity" elseif arg == "Time (Ready Soon)" then petPredictor.SortMode = "Time" end petPredictor.UpdateParagraph() end, }) v8:AddButton({ Text = "Refresh Pets", Description = "Recalculate pet predictions & growth timers now", Callback = function() petPredictor.UpdateParagraph() fn4("Pet predictions refreshed!", "Pet Predictor") end, }) task.spawn(function() task.wait(2.5) petPredictor.UpdateParagraph() end) local v9 = tbl5.Predictor:AddSubTab({ Name = "Fuse", Icon = "Lucide:search" }) fusePredictor.Paragraph = Runtime.LiveReport(v9, "Fuse Predictor", "Detecting fuse machine status...") v9:AddButton({ Text = "Refresh Fuse Predictor", Description = "Recalculate fuse machine odds & countdown now", Callback = function() fusePredictor.UpdateParagraph() fn4("Fuse predictor updated!", "Fuse Predictor") end, }) task.spawn(function() task.wait(3) fusePredictor.UpdateParagraph() end) local v10 = tbl5.Farm:AddSubTab({ Name = "Steal", Icon = "Lucide:zap" }) v10:AddLineText("Master Switch") Runtime.Bind(v10, "AddToggle", { Text = "Auto Steal", Description = "Automatically steal eggs from areas", Flag = "StealAnEgg.Auto_Steal", Default = false, Callback = function(arg) enabled["Auto Steal"] = arg if not arg then steal.StopSpam() steal.StopRunAnimation() steal.IsStealing = false steal.GotEgg = false farmState.State = "Idle" farmState.TargetUid = nil farmState.Carrying = false farmState.CarriedUid = nil farmState.CarriedAssetCategory = nil farmState.OptimisticCarry = false movement.Release("Steal") end end, }) v10:AddLineText("Target & Filter Config") local tbl6 = {} if game_.Init() then local v11 = game_.GetAreas() for _, v12 in ipairs(v11) do table.insert(tbl6, v12) end else tbl6 = { "Forest", "Lake", "Desert", "Jungle", "Snow", "Volcano", "Abyss Ocean", "Prehistoric", "Cosmic", } end Runtime.Bind(v10, "AddDropdown", { Text = "Target Areas", Description = "Select one or multiple areas (empty = all)", Flag = "StealAnEgg.Target_Areas", Options = tbl6, MultiSelect = true, Default = {}, Callback = function(areaFilters) steal.AreaFilters = areaFilters end, }) Runtime.Bind(v10, "AddDropdown", { Text = "Min Rarity", Description = "Only steal eggs with rarity >= this", Flag = "StealAnEgg.Min_Rarity", Options = { "All", "1 - Common", "2 - Uncommon", "3 - Rare", "4 - Epic", "5 - Legendary", "6 - Mythic", "7 - Cosmic", "8 - Secret", "9 - Eternal", "10 - Divine", "11 - Titan", "12 - Light & Dark", }, MultiSelect = false, Default = "7 - Cosmic", Callback = function(arg) steal.MinRarity = steal.ParseRarity(arg) end, }) local tbl7 = {} pcall(function() local ok, result = pcall(require, replicatedStorage.Data.Assets) if not (ok and result) then local ok2 ok2, result = pcall(require, replicatedStorage.Directory.Assets) if not (ok2 and result) then result = modules.Game and modules.Game.Assets end end local directory = result and result.Directory or type(result) == "table" and result or {} if next(directory) then local tbl8 = {} for k, v11 in pairs(directory) do if type(v11) == "table" then local rarity = v11.Rarity local displayName if rarity then displayName = rarity.DisplayName or rarity.Name else displayName = rarity end displayName = displayName or "Common" local rarityNumber = rarity and rarity.RarityNumber or 1 table.insert(tbl8, { formatted = string.format("%s [%s]", v11.DisplayName or v11.Name or k, displayName), rNum = rarityNumber, name = v11.DisplayName or v11.Name or k, }) end end table.sort(tbl8, function(arg, arg2) if arg.rNum == arg2.rNum then return arg.name < arg2.name end return arg.rNum < arg2.rNum end) for _, v11 in ipairs(tbl8) do table.insert(tbl7, v11.formatted) end end end) if #tbl7 == 0 then tbl7 = { "Chicken [Common]", "Dog [Common]", "Duckling [Common]", "Frog [Common]", "Jerboa [Common]", "Bird [Uncommon]", "Catfish [Uncommon]", "Fennec [Uncommon]", "Burrowing Owl [Rare]", "Camel [Rare]", "Chimpanzee [Rare]", "Dodo [Rare]", "Lava Gecko [Rare]", "Parrotfish [Rare]", "Penguin [Rare]", "Raccoon [Rare]", "Toucan [Rare]", "Tung Tung Sahur [Rare]", "Turtle [Rare]", "Bananita Dolphinita [Epic]", "Bear [Epic]", "Centapede [Epic]", "Crane [Epic]", "Crocodile [Epic]", "Fox [Epic]", "Lava frog [Epic]", "Swan [Epic]", "Swordfish [Epic]", "Tob Tobi Tob Tob [Epic]", "Trulimero Trulicina [Epic]", "Walrus [Epic]", "Axolotl [Legendary]", "Baby Aurora Dragon [Legendary]", "Brr Brr Patapim [Legendary]", "Cosmic Gecko [Legendary]", "Crustacia [Legendary]", "Flaming Bull [Legendary]", "Gorilla [Legendary]", "Lava Iguana [Legendary]", "Mecha Scorpio [Legendary]", "Orangutini Ananassini [Legendary]", "Polar Bear [Legendary]", "Pterodactyl [Legendary]", "Salamander [Legendary]", "Scorpio [Legendary]", "Shark [Legendary]", "Snake [Legendary]", "Spideron [Legendary]", "Ankylosaurus [Mythic]", "Belula Beluga [Mythic]", "Bladehide [Mythic]", "Chillin Chilli [Mythic]", "Cosmic Gorilla [Mythic]", "Froggo [Mythic]", "Mammoth [Mythic]", "Mecha Froggo [Mythic]", "Orca [Mythic]", "Red Panda [Mythic]", "Sabertooth Tiger [Mythic]", "Sand Spider [Mythic]", "Scorpion [Mythic]", "Shadow Dragon [Mythic]", "Spider [Mythic]", "Tiger [Mythic]", "Beluga Whale [Cosmic]", "Bronto [Cosmic]", "Crawler [Cosmic]", "Demon Imp [Cosmic]", "Drilla [Cosmic]", "Hellhound [Cosmic]", "King Mammoth [Cosmic]", "Koi [Cosmic]", "La Vacca Saturno Saturnita [Cosmic]", "Leviathan [Cosmic]", "Mangolini Parrochini [Cosmic]", "Mantaris [Cosmic]", "Mecha Crawler [Cosmic]", "Rhinotaur [Cosmic]", "Royal Sphinx [Cosmic]", "Snowy Owl [Cosmic]", "Triceratops [Cosmic]", "Whale Shark [Cosmic]", "Bombo Croco [Secret]", "Cerberus [Secret]", "Cosmic Dragon [Secret]", "Cosmic Skeleton Boss [Secret]", "Crocodon [Secret]", "Ember Dragon [Secret]", "Gargoyle [Secret]", "King Snake [Secret]", "Kraken [Secret]", "Mecha Crocodon [Secret]", "Minotaur [Secret]", "Mutant Shark [Secret]", "Scorched Dragon [Secret]", "Stag [Secret]", "TRex [Secret]", "Tralaledon [Secret]", "Yeti [Secret]", "Balrog [Eternal]", "El Maja [Eternal]", "Eternal Lunar Dragon [Eternal]", "Gorilla King [Eternal]", "Ice Dragon [Eternal]", "Krakenoid [Eternal]", "Lava Dragon [Eternal]", "Mecha Krakenoid [Eternal]", "Mosasaurus [Eternal]", "Oni Tiger [Eternal]", "Phoenix [Eternal]", "Strawberry Elephant [Eternal]", "Void Dragon [Eternal]", "Archdemon Dragon [Divine]", "Dreadscale [Divine]", "Kitsune [Divine]", "Mecha Dreadscale [Divine]", "Nightflame [Divine]", "Unicorn [Divine]", } end Runtime.Bind(v10, "AddDropdown", { Text = "Target Specific Eggs", Description = "Target only selected eggs (Empty = All)", Flag = "StealAnEgg.Target_Specific_Eggs", Options = tbl7, MultiSelect = true, Default = {}, Callback = function(specificEggFilters) steal.SpecificEggFilters = specificEggFilters or {} if steal.RebuildSpecificEggLookup then steal.RebuildSpecificEggLookup() end end, }) Runtime.Bind(v10, "AddDropdown", { Text = "Steal Priority", Description = "Select target egg priority when stealing", Flag = "StealAnEgg.Steal_Priority", Options = { "Best Rarity", "Best Weight", "Mutation", "Highest Money/Sec", "Lowest Money/Sec" }, MultiSelect = false, Default = "Best Rarity", Callback = function(priority) steal.Priority = priority or "Best Rarity" end, }) Runtime.Bind(v10, "AddToggle", { Text = "Prioritize Rift Recipe Eggs", Description = "Prioritize eggs needed for active Rift recipe, but ignore eggs already in backpack, pen, or pet inventory", Flag = "StealAnEgg.Prioritize_Rift_Recipe_Eggs", Default = false, Callback = function(arg) enabled["Prioritize Rift Recipe Eggs"] = arg enabled["Prioritize Rift Egg"] = arg end, }) v10:AddLineText("Movement & Speed") Runtime.Bind(v10, "AddTextbox", { Text = "Tween Speed", Description = "Speed of linear tween movement (Default: 350 studs/s)", Flag = "StealAnEgg.Tween_Speed", Default = tostring(steal.Speed or 350), Callback = function(arg) local speed = tonumber(arg) if speed and speed >= 50 and speed <= 1000 then steal.Speed = speed else steal.Speed = 350 end end, }) Runtime.Bind(v10, "AddTextbox", { Text = "Steal Timeout", Description = "Main egg grab timeout in seconds (Default: 2.5s)", Flag = "StealAnEgg.Steal_Timeout", Default = tostring(steal.Timeout or 2.5), Callback = function(arg) local timeout = tonumber(arg) if timeout and timeout > 0 then steal.Timeout = timeout else steal.Timeout = 2.5 end end, }) Runtime.Bind(v10, "AddToggle", { Text = "Run Animation", Description = "Play natural running animation matching tween speed", Flag = "StealAnEgg.Run_Animation", Default = true, Callback = function(arg) enabled["Run Animation"] = arg if not arg then steal.StopRunAnimation() end end, }) v10:AddLineText("Misc") stored.StateUpdate["Anti Knockback / Ragdoll"] = Runtime.Bind(v10, "AddToggle", { Text = "Anti Knockback / Ragdoll", Description = "", Flag = "StealAnEgg.Anti_Knockback_Ragdoll", Default = false, Callback = function(arg) enabled["Anti Knockback / Ragdoll"] = arg misc.SetAntiKnockback(arg) end, }) Runtime.Bind(v10, "AddToggle", { Text = "Auto Pick Dropped Egg", Description = "Instantly re-grab the egg if a guard knocks it out of your hands (best paired with Anti Knockback / Ragdoll)", Flag = "StealAnEgg.Auto_Pick_Dropped_Egg", Default = false, Callback = function(arg) enabled["Auto Pick Dropped Egg"] = arg end, }) Runtime.Bind(v10, "AddToggle", { Text = "Instant Prompt", Description = "", Flag = "StealAnEgg.Instant_Prompt", Default = false, Callback = function(arg) enabled["Instant Prompt"] = arg if arg then pcall(function() for _, descendant in ipairs(workspace:GetDescendants()) do if descendant:IsA("ProximityPrompt") then descendant.HoldDuration = 0 end end end) end end, }) local v11 = tbl5.Farm:AddSubTab({ Name = "Pen & Training", Icon = "Lucide:house" }) v11:AddLineText("Pen Placement") Runtime.Bind(v11, "AddToggle", { Text = "Auto Place Egg", Description = "Place all unplaced eggs into the pen", Flag = "StealAnEgg.Auto_Place_Egg", Default = false, Callback = function(arg) enabled["Auto Place Egg"] = arg if not arg then movement.Release("PlaceEgg") placeEgg.PendingUids = {} end end, }) Runtime.Bind(v11, "AddDropdown", { Text = "Place Egg Rule", Description = "Select condition for placing eggs into pen", Flag = "StealAnEgg.Place_Egg_Rule", Options = { "Egg Inventory Full", "After Steal", "Steal Idle" }, MultiSelect = false, Default = "Steal Idle", Callback = function(rule) placeEgg.Rule = rule or "Steal Idle" end, }) Runtime.Bind(v11, "AddDropdown", { Text = "Place Egg Priority", Description = "", Flag = "StealAnEgg.Place_Egg_Priority", Options = { "Choose Any Egg", "Highest KG", "Lowest KG", "Highest Money/Sec", "Lowest Money/Sec" }, MultiSelect = false, Default = "Choose Any Egg", Callback = function(selectionMode) placeEgg.SelectionMode = selectionMode or "Choose Any Egg" end, }) Runtime.Bind(v11, "AddTextbox", { Text = "Max Placed Eggs", Description = "Maximum eggs to place into pen (Default: 30)", Flag = "StealAnEgg.Max_Placed_Eggs", Default = tostring(placeEgg.MaxPlaced or 30), Callback = function(arg) placeEgg.MaxPlaced = tonumber(arg) or 30 end, }) local v12 = v11 v12:AddSection("Automation Treadmill") v12:AddLineText("Treadmill Automation") Runtime.Bind(v12, "AddToggle", { Text = "Auto Treadmill", Description = "Train on treadmill for Speed Power", Flag = "StealAnEgg.Auto_Treadmill", Default = false, Callback = function(arg) enabled["Auto Treadmill"] = arg if not arg then treadmill.ExitToSafeZone() end end, }) v12:AddButton({ Text = "Exit From Treadmill", Description = "Clear treadmill effects & jump off", Callback = function() treadmill.ExitToSafeZone() fn4("Exited from treadmill & effects cleared!", "Treadmill") end, }) local v13 = tbl5.Farm:AddSubTab({ Name = "Pets", Icon = "Lucide:settings" }) Runtime.Bind(v13, "AddToggle", { Text = "Auto Hatch", Description = "Automatically hatch ready eggs", Flag = "StealAnEgg.Auto_Hatch", Default = false, Callback = function(arg) enabled["Auto Hatch"] = arg end, }) Runtime.Bind(v13, "AddToggle", { Text = "Auto Equip Best", Description = "Automatically equip best pets", Flag = "StealAnEgg.Auto_Equip_Best", Default = false, Callback = function(arg) enabled["Auto Equip Best"] = arg end, }) local v14 = v13 v14:AddSection("Automation Favorite") v14:AddLineText("Auto Favorite Pet") Runtime.Bind(v14, "AddToggle", { Text = "Auto Favorite Pet", Description = "Auto lock pets matching rarity & mutation filters", Flag = "StealAnEgg.Auto_Favorite_Pet", Default = false, Callback = function(arg) enabled["Auto Favorite Pet"] = arg if arg then task.spawn(favorite.Execute) end end, }) Runtime.Bind(v14, "AddDropdown", { Text = "Favorite Min Rarity", Description = "Favorite pets with rarity >= this (select Off for mutation only)", Flag = "StealAnEgg.Favorite_Min_Rarity", Options = { "Off", "1 - Common", "2 - Uncommon", "3 - Rare", "4 - Epic", "5 - Legendary", "6 - Mythic", "7 - Cosmic", "8 - Secret", "9 - Eternal", "10 - Divine", "11 - Titan", "12 - Light & Dark", }, MultiSelect = false, Default = "Off", Callback = function(arg) if type(arg) == "table" then arg = arg[1] or arg.Value or arg.Title or arg.Text or arg.Name end local str = tostring(arg or "") if str == "Off" or string.find(str, "Off", 1, true) then favorite.MinRarity = 0 else favorite.MinRarity = tonumber(string.match(str, "^(%d+)")) or 0 end end, }) Runtime.Bind(v14, "AddDropdown", { Text = "Favorite Mutation", Description = "Favorite pets with this mutation (select Off for rarity only)", Flag = "StealAnEgg.Favorite_Mutation", Options = { "Off", "All Mutations", "Rainbow", "Golden", "Silver", "Celestial", "Voidtouched", "Heavenly", "Plasma", "Dawnbound", "Bloodmoon", "Magma", "Shocked", "Frozen", "Zombified", "Alpha", "Twisted", "Pollinated", "HoneyGlazed", "Candy", "Choc", "Windstruck", "Burnt", "Wet", "Chilled", "Scared", }, MultiSelect = false, Default = "Off", Callback = function(mutationFilter) favorite.MutationFilter = mutationFilter or "Off" end, }) v14:AddButton({ Text = "Favorite Pets Now", Description = "Lock matching pets immediately", Callback = function() local v15, v16 = favorite.Execute() fn4(v15 and "Successfully favorited " .. tostring(v16) .. " pets!" or "Failed: " .. tostring(v16), "Auto Favorite Pet") end, }) v14:AddLineText("Equipped Pets") Runtime.Bind(v14, "AddToggle", { Text = "Auto Favourite Equiped Pets", Description = "Auto favourite all currently equipped pets", Flag = "StealAnEgg.Auto_Favourite_Equiped_Pets", Default = false, Callback = function(arg) enabled["Auto Favourite Equiped Pets"] = arg end, }) Runtime.Bind(v14, "AddToggle", { Text = "Auto UnFavourite Equiped Pets", Description = "Auto unfavourite all currently equipped pets", Flag = "StealAnEgg.Auto_UnFavourite_Equiped_Pets", Default = false, Callback = function(arg) enabled["Auto UnFavourite Equiped Pets"] = arg end, }) v14:AddButton({ Text = "Favourite Equipped Now", Description = "Favourite all equipped pets immediately", Callback = function() local v15, v16 = favorite.SetFavoriteEquipped(true) fn4(v15 and "Favourited " .. tostring(v16) .. " equipped pets!" or "Failed: " .. tostring(v16), "Auto Favourite Equiped Pets") end, }) v14:AddButton({ Text = "UnFavourite Equipped Now", Description = "Unfavourite all equipped pets immediately", Callback = function() local v15, v16 = favorite.SetFavoriteEquipped(false) fn4(v15 and "Unfavourited " .. tostring(v16) .. " equipped pets!" or "Failed: " .. tostring(v16), "Auto UnFavourite Equiped Pets") end, }) local v15 = v13 v15:AddSection("Automation Fuse Machine") local tbl8 = {} pcall(function() local assets = modules.Game and modules.Game.Assets or replicatedStorage:FindFirstChild("Data") and require(replicatedStorage.Data.Assets) assets = assets and assets.Directory or assets or {} if next(assets) then local tbl9 = {} for k, asset in pairs(assets) do if type(asset) == "table" and asset.CannotFuse ~= true then local rarity = asset.Rarity local displayName = rarity and (rarity.DisplayName or rarity.Name) or "Common" rarity = rarity and rarity.RarityNumber or 1 table.insert(tbl9, { formatted = string.format("%s [%s]", asset.DisplayName or asset.Name or k, displayName), rNum = rarity, name = asset.DisplayName or asset.Name or k, category = k, }) end end table.sort(tbl9, function(arg, arg2) if arg.rNum == arg2.rNum then return arg.name < arg2.name end return arg.rNum < arg2.rNum end) for _, v16 in ipairs(tbl9) do table.insert(tbl8, v16.formatted) end end end) v15:AddLineText("Fuse Machine") Runtime.Bind(v15, "AddToggle", { Text = "Auto Fuse Machine", Description = "", Flag = "StealAnEgg.Auto_Fuse_Machine", Default = false, Callback = function(arg) enabled["Auto Fuse Machine"] = arg if arg then task.spawn(fuse.Execute) end end, }) Runtime.Bind(v15, "AddDropdown", { Text = "Fuse Priority Mode", Description = "Order in which pet categories are chosen to fuse", Flag = "StealAnEgg.Fuse_Priority_Mode", Options = { "Lowest Rarity First", "Highest Rarity First", "Most Duplicates First", "Specific Species Only" }, MultiSelect = false, Default = "Lowest Rarity First", Callback = function(priorityMode) fuse.PriorityMode = priorityMode or "Lowest Rarity First" end, }) Runtime.Bind(v15, "AddDropdown", { Text = "Max Rarity to Fuse", Description = "Only fuse pets with rarity <= this", Flag = "StealAnEgg.Max_Rarity_to_Fuse", Options = { "All", "1 - Common", "2 - Uncommon", "3 - Rare", "4 - Epic", "5 - Legendary", "6 - Mythic", "7 - Cosmic", "8 - Secret", "9 - Eternal", "10 - Divine", "11 - Titan", "12 - Light & Dark", }, MultiSelect = false, Default = "All", Callback = function(arg) if arg == "All" then fuse.MaxRarity = 0 else fuse.MaxRarity = tonumber((arg or "0"):match("^(%d+)")) or 0 end end, }) Runtime.Bind(v15, "AddDropdown", { Text = "Specific Species to Fuse", Description = "Select specific pet species to auto fuse (empty = all allowed)", Flag = "StealAnEgg.Specific_Species_to_Fuse", Options = tbl8, MultiSelect = true, Default = {}, Callback = function(specificSpecies) fuse.SpecificSpecies = specificSpecies or {} end, }) Runtime.Bind(v15, "AddToggle", { Text = "Skip Mutated Pets", Description = "Do not fuse pets with special mutations (Rainbow, Golden, Silver, etc.)", Flag = "StealAnEgg.Skip_Mutated_Pets", Default = true, Callback = function(skipMutations) fuse.SkipMutations = skipMutations end, }) Runtime.Bind(v15, "AddToggle", { Text = "Eject Incomplete Slots", Description = "Auto-eject pets in machine if <3 matching pets exist", Flag = "StealAnEgg.Eject_Incomplete_Slots", Default = false, Callback = function(ejectIncomplete) fuse.EjectIncomplete = ejectIncomplete end, }) local v16 = tbl5.Events:AddSubTab({ Name = "Drones", Icon = "Lucide:zap" }) v16:AddLineText("Event Telemetry & Status") local v17 = Runtime.LiveReport(v16, "Dr. Scramble Outbreak Telemetry", "Loading event data...") scramble.StatusParagraph = v17 task.spawn(function() while not Runtime.Unloaded and task.wait(2.5) do if scramble and scramble.GetSnapshot then scramble.GetSnapshot(true) if scramble.GetTelemetryText then pcall(function() v17:Set({ Title = "Dr. Scramble Outbreak Telemetry", Content = scramble.GetTelemetryText() }) end) end end end end) v16:AddLineText("Drone Hunting") Runtime.Bind(v16, "AddToggle", { Text = "Auto Farm Drones", Description = "Hunt and destroy event drones across biomes", Flag = "StealAnEgg.Auto_Farm_Drones", Default = false, Callback = function(arg) enabled["Auto Farm Drones"] = arg if not arg and modules.Movement then modules.Movement.Release("ScrambleDrone") end end, }) Runtime.Bind(v16, "AddToggle", { Text = "Fast Switch Bat Attack", Description = "Rapidly alternate between normal bat and The Scrambler to double DPS", Flag = "StealAnEgg.Fast_Switch_Bat_Attack", Default = true, Callback = function(fastSwitchBat) enabled["Fast Switch Bat"] = fastSwitchBat if scramble then scramble.FastSwitchBat = fastSwitchBat end end, }) Runtime.Bind(v16, "AddTextbox", { Text = "Fast Switch Delay (ms)", Description = "Delay between bat switches in milliseconds (Default: 40ms, range 10-100ms)", Flag = "StealAnEgg.Fast_Switch_Delay_ms", Default = tostring(scramble and scramble.FastSwitchDelay or 40), Callback = function(arg) local num = tonumber(arg) if num then local fastSwitchDelay = math.clamp(math.floor(num), 10, 100) if scramble then scramble.FastSwitchDelay = fastSwitchDelay end end end, }) Runtime.Bind(v16, "AddDropdown", { Text = "Orchestrator Mode", Description = "Priority when hunting drones vs stealing eggs", Flag = "StealAnEgg.Orchestrator_Mode", Options = { "Prioritize Event", "Steal Idle" }, MultiSelect = false, Default = "Prioritize Event", Callback = function(arg) scramble.Config.OrchestratorMode = type(arg) == "table" and arg[1] or arg or "Prioritize Event" end, }) Runtime.Bind(v16, "AddDropdown", { Text = "Priority Target", Description = "Select drone targeting priority strategy", Flag = "StealAnEgg.Priority_Target", Options = { "Closest", "Augmented First", "Reactor First", "Scrap First", "Lowest HP", "Augmented Only", "Reactor Only", "Scrap Only", }, MultiSelect = false, Default = "Closest", Callback = function(arg) local priorityTarget = type(arg) == "table" and arg[1] or arg if scramble then scramble.Config.PriorityTarget = priorityTarget or "Closest" end end, }) Runtime.Bind(v16, "AddTextbox", { Text = "Drone Tween Speed", Description = "Linear flight speed toward drones (Default: 300)", Flag = "StealAnEgg.Drone_Tween_Speed", Default = tostring(scramble.Config.TweenSpeed or 300), Callback = function(arg) local num = tonumber(arg) if num then scramble.Config.TweenSpeed = math.clamp(num, 50, 600) end end, }) Runtime.Bind(v16, "AddTextbox", { Text = "Drone Attack Distance", Description = "Horizontal distance to drone when attacking (Default: 3.5)", Flag = "StealAnEgg.Drone_Attack_Distance", Default = tostring(scramble.Config.AttackDistance or 3.5), Callback = function(arg) local num = tonumber(arg) if num then scramble.Config.AttackDistance = math.clamp(num, 1, 10) end end, }) Runtime.Bind(v16, "AddTextbox", { Text = "Bat Swing Interval", Description = "Bat swing interval delay in seconds (Default: 0.65s)", Flag = "StealAnEgg.Bat_Swing_Interval", Default = tostring(scramble.Config.BatSwingInterval or 0.65), Callback = function(arg) local num = tonumber(arg) if num then scramble.Config.BatSwingInterval = math.clamp(num, 0.2, 1.5) end end, }) local v18 = tbl5.Events:AddSubTab({ Name = "Shop", Icon = "Lucide:shopping-cart" }) v18:AddLineText("Shop Catalog & Balance") local v19 = Runtime.LiveReport(v18, "Scramble Event Shop", "Loading shop catalog...") scramble.ShopParagraph = v19 task.spawn(function() while not Runtime.Unloaded do if scramble.FetchSnapshot then scramble.FetchSnapshot(true) if scramble.GetShopTelemetryText then v19:Set({ Title = "Scramble Event Shop", Content = scramble.GetShopTelemetryText() }) end end task.wait(2.5) end end) v18:AddLineText("Auto Purchase Settings") Runtime.Bind(v18, "AddToggle", { Text = "Auto Buy Scramble Shop", Description = "Automatically buy selected items when having enough Samples", Flag = "StealAnEgg.Auto_Buy_Scramble_Shop", Default = false, Callback = function(arg) enabled["Auto Buy Scramble Shop"] = arg end, }) Runtime.Bind(v18, "AddDropdown", { Text = "Select Items to Buy", Description = "Choose which items to buy automatically", Flag = "StealAnEgg.Select_Items_to_Buy", Options = { "Scrambled (Mutation Consumable) [475 Samples]", "Experiment #001 (Egg) [6500 Samples]", "Nibbles #013 (Egg) [2950 Samples]", "2x Cash Booster [275 Samples]", "1.25x Speed Booster [375 Samples]", "2x Treadmill Booster [375 Samples]", }, MultiSelect = true, Default = {}, Callback = function(selectedShopItems) scramble.Config.SelectedShopItems = selectedShopItems or {} end, }) Runtime.Bind(v18, "AddTextbox", { Text = "Sample Reserve", Description = "Keep at least this many Samples unspent (e.g. 0, 500, 1k)", Flag = "StealAnEgg.Sample_Reserve", Default = "0", Callback = function(arg) local str = tostring(arg or ""):gsub(",", ""):gsub(" ", "") local sampleReserve if str:lower():find("k") then sampleReserve = (tonumber(str:lower():gsub("k", "")) or 0) * 1000 elseif str:lower():find("m") then sampleReserve = (tonumber(str:lower():gsub("m", "")) or 0) * 1000000 else sampleReserve = tonumber(str) or 0 end if sampleReserve < 0 then sampleReserve = 0 end scramble.Config.SampleReserve = sampleReserve scramble.Config.ShopReserve = sampleReserve end, }) v18:AddButton({ Text = "Buy Selected Items Now", Description = "Attempt immediate purchase of selected items once", Callback = function() local stepAutoShop = scramble if scramble then stepAutoShop = scramble.StepAutoShop or scramble.StepShop end if stepAutoShop then (scramble.StepAutoShop or scramble.StepShop)(true) if scramble.GetShopTelemetryText then v19:Set({ Title = "Scramble Event Shop", Content = scramble.GetShopTelemetryText() }) end end end, }) local v20 = tbl5.Events:AddSubTab({ Name = "Rift", Icon = "Lucide:zap" }) v20:AddLineText("Rift Machine Telemetry") local v21 = Runtime.LiveReport(v20, "Rift Machine Status", "Querying Rift status...") if rift then rift.StatusParagraph = v21 end v20:AddButton({ Text = "Refresh Rift Status", Description = "Query server for active banner, requirements, and pity count", Callback = function() if rift and rift.GetState then rift.GetState(true) if rift.GetTelemetryText then pcall(function() v21:Set({ Title = "Rift Machine Status", Content = rift.GetTelemetryText() }) end) end end fn4("Rift status updated.", "The Rift") end, }) Runtime.Bind(v20, "AddDropdown", { Text = "Desired Banners", Description = "Only prioritize steal & sacrifice when one of these banners is active (empty = all)", Flag = "StealAnEgg.Desired_Banners", Options = { "Riftborn (Verdant)", "Riftbeasts (Umbral)", "Shattered Rift (Radiant)" }, MultiSelect = true, Default = {}, Callback = function(arg) local desiredBanners = arg or {} if rift and rift.Config then rift.Config.DesiredBanners = desiredBanners end if rift and rift.StatusParagraph and rift.GetTelemetryText then pcall(function() v21:Set({ Title = "Rift Machine Status", Content = rift.GetTelemetryText() }) end) end end, }) v20:AddLineText("Automation & Sacrifice") Runtime.Bind(v20, "AddToggle", { Text = "Auto Rift Sacrifice", Description = "Automatically trade in 3 required sacrifice pets when available in inventory", Flag = "StealAnEgg.Auto_Rift_Sacrifice", Default = false, Callback = function(arg) enabled["Auto Rift Sacrifice"] = arg end, }) Runtime.Bind(v20, "AddToggle", { Text = "Auto Reroll Rift Recipe", Description = "Automatically use free refreshes if missing required sacrifice pets", Flag = "StealAnEgg.Auto_Reroll_Rift_Recipe", Default = false, Callback = function(arg) enabled["Auto Reroll Rift Recipe"] = arg end, }) v20:AddButton({ Text = "Reroll Recipe Now", Description = "Use a free refresh immediately to get a new sacrifice recipe", Callback = function() if rift and rift.StepReroll then rift.StepReroll(true) if rift.GetTelemetryText then pcall(function() v21:Set({ Title = "Rift Machine Status", Content = rift.GetTelemetryText() }) end) end end end, }) v20:AddButton({ Text = "Trade-In Now", Description = "Attempt immediate trade-in with current inventory pets", Callback = function() if rift and rift.StepSacrifice then rift.StepSacrifice(true) if rift.GetTelemetryText then pcall(function() v21:Set({ Title = "Rift Machine Status", Content = rift.GetTelemetryText() }) end) end end end, }) local v22 = tbl5.Farm:AddSubTab({ Name = "Selling", Icon = "Lucide:shopping-cart" }) local tbl9 = { "Off", "1 - Common", "2 - Uncommon", "3 - Rare", "4 - Epic", "5 - Legendary", "6 - Mythic", "7 - Cosmic", "8 - Secret", "9 - Eternal", "10 - Divine", "11 - Titan", "12 - Light & Dark", } local tbl10 = {} pcall(function() local ok, result = pcall(require, replicatedStorage.Data.Assets) if not (ok and result) then local ok2 ok2, result = pcall(require, replicatedStorage.Directory.Assets) if not (ok2 and result) then result = modules.Game and modules.Game.Assets end end local directory = result and result.Directory or type(result) == "table" and result or {} if next(directory) then local tbl11 = {} for k, v23 in pairs(directory) do if type(v23) == "table" then local rarity = v23.Rarity local displayName = rarity and (rarity.DisplayName or rarity.Name) or "Common" if rarity then rarity = rarity.Rank or rarity.RarityNumber end rarity = rarity or 1 table.insert(tbl11, { formatted = string.format("%s [%s]", v23.DisplayName or v23.Name or k, displayName), rNum = rarity, name = v23.DisplayName or v23.Name or k, }) end end table.sort(tbl11, function(arg, arg2) if arg.rNum == arg2.rNum then return arg.name < arg2.name end return arg.rNum < arg2.rNum end) for _, v23 in ipairs(tbl11) do table.insert(tbl10, v23.formatted) end end end) if #tbl10 == 0 then tbl10 = { "Chicken [Common]", "Dog [Common]", "Duckling [Common]", "Frog [Common]", "Jerboa [Common]", "Bird [Uncommon]", "Catfish [Uncommon]", "Fennec [Uncommon]", "Burrowing Owl [Rare]", "Camel [Rare]", "Chimpanzee [Rare]", "Dodo [Rare]", "Lava Gecko [Rare]", "Parrotfish [Rare]", "Penguin [Rare]", "Raccoon [Rare]", "Toucan [Rare]", "Tung Tung Sahur [Rare]", "Turtle [Rare]", "Bananita Dolphinita [Epic]", "Bear [Epic]", "Centapede [Epic]", "Crane [Epic]", "Crocodile [Epic]", "Fox [Epic]", "Lava frog [Epic]", "Swan [Epic]", "Swordfish [Epic]", "Tob Tobi Tob Tob [Epic]", "Trulimero Trulicina [Epic]", "Walrus [Epic]", "Axolotl [Legendary]", "Baby Aurora Dragon [Legendary]", "Brr Brr Patapim [Legendary]", "Cosmic Gecko [Legendary]", "Crustacia [Legendary]", "Flaming Bull [Legendary]", "Gorilla [Legendary]", "Lava Iguana [Legendary]", "Mecha Scorpio [Legendary]", "Orangutini Ananassini [Legendary]", "Polar Bear [Legendary]", "Pterodactyl [Legendary]", "Salamander [Legendary]", "Scorpio [Legendary]", "Shark [Legendary]", "Snake [Legendary]", "Spideron [Legendary]", "Ankylosaurus [Mythic]", "Belula Beluga [Mythic]", "Bladehide [Mythic]", "Chillin Chilli [Mythic]", "Cosmic Gorilla [Mythic]", "Froggo [Mythic]", "Mammoth [Mythic]", "Mecha Froggo [Mythic]", "Orca [Mythic]", "Red Panda [Mythic]", "Sabertooth Tiger [Mythic]", "Sand Spider [Mythic]", "Scorpion [Mythic]", "Shadow Dragon [Mythic]", "Spider [Mythic]", "Tiger [Mythic]", "Beluga Whale [Cosmic]", "Bronto [Cosmic]", "Crawler [Cosmic]", "Demon Imp [Cosmic]", "Drilla [Cosmic]", "Hellhound [Cosmic]", "King Mammoth [Cosmic]", "Koi [Cosmic]", "La Vacca Saturno Saturnita [Cosmic]", "Leviathan [Cosmic]", "Mangolini Parrochini [Cosmic]", "Mantaris [Cosmic]", "Mecha Crawler [Cosmic]", "Rhinotaur [Cosmic]", "Royal Sphinx [Cosmic]", "Snowy Owl [Cosmic]", "Triceratops [Cosmic]", "Whale Shark [Cosmic]", "Bombo Croco [Secret]", "Cerberus [Secret]", "Cosmic Dragon [Secret]", "Cosmic Skeleton Boss [Secret]", "Crocodon [Secret]", "Ember Dragon [Secret]", "Gargoyle [Secret]", "King Snake [Secret]", "Kraken [Secret]", "Mecha Crocodon [Secret]", "Minotaur [Secret]", "Mutant Shark [Secret]", "Scorched Dragon [Secret]", "Stag [Secret]", "TRex [Secret]", "Tralaledon [Secret]", "Yeti [Secret]", "Balrog [Eternal]", "El Maja [Eternal]", "Eternal Lunar Dragon [Eternal]", "Gorilla King [Eternal]", "Ice Dragon [Eternal]", "Krakenoid [Eternal]", "Lava Dragon [Eternal]", "Mecha Krakenoid [Eternal]", "Mosasaurus [Eternal]", "Oni Tiger [Eternal]", "Phoenix [Eternal]", "Strawberry Elephant [Eternal]", "Void Dragon [Eternal]", "Aetheron [Divine]", "ArchAngel [Divine]", "Archdemon Dragon [Divine]", "Cthulhu [Divine]", "Dreadscale [Divine]", "Kitsune [Divine]", "Luminous Cthulhu [Divine]", "Mecha Dreadscale [Divine]", "Nightflame [Divine]", "Shattered Colossus [Divine]", "Unicorn [Divine]", "World Burner [Divine]", } end local function fn9(arg) if not arg then return 0 end if type(arg) == "table" then arg = arg[1] or arg.Value or arg.Title or arg.Text or arg.Name end local str = tostring(arg or "") if str == "Off" or string.find(str, "Off", 1, true) then return 0 end local num = tonumber(string.match(str, "^(%d+)")) if num then return num end return ({ common = 1, uncommon = 2, superrare = 2, rare = 3, epic = 4, legendary = 5, mythic = 6, ["squishy god"] = 6, brainrotgod = 6, rainbow = 6, prismatic = 6, cosmic = 7, secret = 8, eternal = 9, limited = 9, divine = 10, transcendent = 10, titan = 11, ["light & dark"] = 12, lightdark = 12, ["light and dark"] = 12, })[string.lower(str)] or 0 end v22:AddLineText("Pet Sell") Runtime.Bind(v22, "AddToggle", { Text = "Auto Sell Pet", Description = "Auto sell pets matching rarity / income rules", Flag = "StealAnEgg.Auto_Sell_Pet", Default = false, Callback = function(arg) enabled["Auto Sell Pet"] = arg end, }) Runtime.Bind(v22, "AddDropdown", { Text = "Sell Pet Rule", Description = "Select condition mode to sell pets (Rarity, Income, or Both)", Flag = "StealAnEgg.Sell_Pet_Rule", Options = { "Rarity Only", "Income Threshold Only", "Both (Rarity & Income)", "Either (Rarity or Income)" }, MultiSelect = false, Default = "Rarity Only", Callback = function(arg) local title if type(arg) == "table" then title = arg[1] or arg.Value or arg.Title or arg.Text or arg.Name else title = arg end sell.PetRule = tostring(title or "Rarity Only") end, }) Runtime.Bind(v22, "AddDropdown", { Text = "Pet Max Rarity", Description = "Rule 1: Sell pets with rarity <= this", Flag = "StealAnEgg.Pet_Max_Rarity", Options = tbl9, MultiSelect = false, Default = "3 - Rare", Callback = function(arg) sell.MaxRarity = fn9(arg) end, }) Runtime.Bind(v22, "AddTextbox", { Text = "Pet Income Threshold", Description = "Rule 2: Sell if income < this (e.g. 10m, 10M, 10000000 | 0 = Off)", Flag = "StealAnEgg.Pet_Income_Threshold", Default = "0", Callback = function(arg) sell.IncomeThreshold = sell.ParseIncome(arg) end, }) Runtime.Bind(v22, "AddDropdown", { Text = "Blacklist Sell Pets", Description = "Never sell these specific pets even if they match rules", Flag = "StealAnEgg.Blacklist_Sell_Pets", Options = tbl10, MultiSelect = true, Default = {}, Callback = function(blacklistPets) sell.BlacklistPets = blacklistPets or {} end, }) v22:AddButton({ Text = "Sell Pets Now", Description = "Sell pets once (matching active rules & ignoring blacklist)", Callback = function() local v23, v24 = sell.ExecutePet() fn4(v23 and "Successfully sold " .. tostring(v24) .. " pets!" or "Failed: " .. tostring(v24), "Auto Sell Pet") end, }) v22:AddLineText("Egg Sell") Runtime.Bind(v22, "AddToggle", { Text = "Auto Sell Egg", Description = "Auto sell unplaced eggs matching rarity filter", Flag = "StealAnEgg.Auto_Sell_Egg", Default = false, Callback = function(arg) enabled["Auto Sell Egg"] = arg end, }) Runtime.Bind(v22, "AddDropdown", { Text = "Egg Max Rarity", Description = "Sell eggs with rarity <= this", Flag = "StealAnEgg.Egg_Max_Rarity", Options = tbl9, MultiSelect = false, Default = "3 - Rare", Callback = function(arg) sell.EggMaxRarity = fn9(arg) end, }) v22:AddButton({ Text = "Sell Eggs Now", Description = "Sell unplaced eggs once (matching filter)", Callback = function() local v23, v24 = sell.ExecuteEgg() fn4(v23 and "Successfully sold " .. tostring(v24) .. " eggs!" or "Failed: " .. tostring(v24), "Auto Sell Egg") end, }) local v23 = tbl5.Progression v23:AddSection("Automation Progression") Runtime.Bind(v23, "AddToggle", { Text = "Auto Buy Trail", Description = "Automatically buy available trails when affordable", Flag = "StealAnEgg.Auto_Buy_Trail", Default = false, Callback = function(arg) enabled["Auto Buy Trail"] = arg end, }) Runtime.Bind(v23, "AddToggle", { Text = "Auto Upgrade Base", Description = "Automatically upgrade base when money is available", Flag = "StealAnEgg.Auto_Upgrade_Base", Default = false, Callback = function(arg) enabled["Auto Upgrade Base"] = arg end, }) Runtime.Bind(v23, "AddToggle", { Text = "Auto Upgrade Treadmill", Description = "Automatically upgrade treadmill when money is available", Flag = "StealAnEgg.Auto_Upgrade_Treadmill", Default = false, Callback = function(arg) enabled["Auto Upgrade Treadmill"] = arg end, }) Runtime.Bind(v23, "AddToggle", { Text = "Auto Claim", Description = "Claim offline money & index rewards", Flag = "StealAnEgg.Auto_Claim", Default = false, Callback = function(arg) enabled["Auto Claim"] = arg end, }) local esp2 = tbl5.ESP:AddSubTab({ Name = "ESP", Icon = "Lucide:eye" }) Runtime.Bind(esp2, "AddToggle", { Text = "ESP Eggs", Description = "Display markers for all area eggs", Flag = "StealAnEgg.ESP_Eggs", Default = false, Callback = function(arg) enabled["ESP Eggs"] = arg end, }) Runtime.Bind(esp2, "AddToggle", { Text = "ESP Rare Eggs", Description = "Highlight high tier eggs (>= Mythic)", Flag = "StealAnEgg.ESP_Rare_Eggs", Default = false, Callback = function(arg) enabled["ESP Rare Eggs"] = arg end, }) Runtime.Bind(esp2, "AddToggle", { Text = "ESP Guards", Description = "Highlight guard outlines based on state", Flag = "StealAnEgg.ESP_Guards", Default = false, Callback = function(arg) enabled["ESP Guards"] = arg end, }) Runtime.Bind(esp2, "AddToggle", { Text = "ESP Scramble Drones", Description = "3D Highlights & health bars for active event drones", Flag = "StealAnEgg.ESP_Scramble_Drones", Default = false, Callback = function(arg) enabled["ESP Scramble Drones"] = arg if not arg and scramble and scramble.ClearDroneESP then scramble.ClearDroneESP() end end, }) Runtime.Bind(esp2, "AddToggle", { Text = "ESP Scramble Drops", Description = "3D Markers with distance for dropped mutant samples", Flag = "StealAnEgg.ESP_Scramble_Drops", Default = false, Callback = function(arg) enabled["ESP Scramble Drops"] = arg if not arg and scramble and scramble.ClearDropsESP then scramble.ClearDropsESP() end end, }) local v24 = tbl5.ESP:AddSubTab({ Name = "Guards", Icon = "Lucide:eye" }) Runtime.Bind(v24, "AddToggle", { Text = "Guard Warning", Description = "Alert when a guard is chasing you", Flag = "StealAnEgg.Guard_Warning", Default = false, Callback = function(arg) enabled["Guard Warning"] = arg end, }) Runtime.Bind(v24, "AddToggle", { Text = "Auto Drop Egg", Description = "Automatically drop held egg if chased by guard", Flag = "StealAnEgg.Auto_Drop_Egg", Default = false, Callback = function(arg) enabled["Auto Drop Egg"] = arg end, }) local Server = tbl5.Miscellaneous:AddSubTab({ Name = "Server", Icon = "Lucide:settings" }) Server:AddLineText("Ping") Runtime.Bind(Server, "AddTextbox", { Text = "Set Ping", Description = "", Flag = "StealAnEgg.Set_Ping", Default = "500", Callback = function(arg) enabled["Set Ping"] = tonumber(arg) end, }) Runtime.Bind(Server, "AddToggle", { Text = "Enable Set Ping", Description = "", Flag = "StealAnEgg.Enable_Set_Ping", Default = false, Callback = function(arg) enabled["Enable Set Ping"] = arg task.spawn(function() if enabled["Enable Set Ping"] then settings():GetService("NetworkSettings").IncomingReplicationLag = math.clamp(enabled["Set Ping"] * 0.0006, 0, 1) else settings():GetService("NetworkSettings").IncomingReplicationLag = 0 end end) end, }) Server:AddLineText("Job Server") Runtime.Bind(Server, "AddTextbox", { Text = "Job ID", Description = "", Flag = "StealAnEgg.Job_ID", Default = "", Callback = function(arg) enabled["Job ID"] = arg end, }) Server:AddButton({ Text = "Join Job ID", Description = "", Callback = function() obj.TeleportService:TeleportToPlaceInstance(game.PlaceId, enabled["Job ID"], localPlayer) end, }) Server:AddLineText("Other") Runtime.Bind(Server, "AddToggle", { Text = "Auto Execute Script", Description = "", Flag = "StealAnEgg.Auto_Execute_Script", Default = false, Callback = function(arg) enabled["Auto Execute Script"] = arg Runtime.Queue(arg) end, }) Runtime.Bind(Server, "AddToggle", { Text = "Auto Execute Script When Reconnected", Description = "Run this BobloNEXT version after Auto Reconnect", Flag = "StealAnEgg.Auto_Execute_Script_When_Reconnected", Default = true, Callback = function(arg) enabled["Auto Execute Script When Reconnected"] = arg end, }) Runtime.Bind(Server, "AddToggle", { Text = "Auto Reconnect", Description = "", Flag = "StealAnEgg.Auto_Reconnect", Default = false, Callback = function(arg) enabled["Auto Reconnect"] = arg end, }) task.spawn(function() local promptGui = coreGui:FindFirstChild("RobloxPromptGui") local promptOverlay = promptGui and promptGui:FindFirstChild("promptOverlay") if not promptOverlay then return end utils.Connections(promptOverlay.ChildAdded, function(arg) if enabled["Auto Reconnect"] and arg.Name == "ErrorPrompt" then task.delay(2, function() Runtime.Queue(enabled["Auto Execute Script"] or enabled["Auto Execute Script When Reconnected"]) teleportService:Teleport(game.PlaceId, localPlayer) end) end end) end) local Player = tbl5.Miscellaneous:AddSubTab({ Name = "Movement", Icon = "Lucide:user" }) Player:AddLineText("Local Player") Runtime.Bind(Player, "AddToggle", { Text = "No Clip", Description = "", Flag = "StealAnEgg.No_Clip", Default = false, Callback = function(arg) enabled["No Clip"] = arg utils.Fallback(arg, "No Clip", function() local character2 = localPlayer and localPlayer.Character for _, child in pairs(character2:GetChildren()) do if child:IsA("BasePart") then child.CanCollide = true end end end) end, }) Runtime.Bind(Player, "AddToggle", { Text = "Infinite Jump", Description = "", Flag = "StealAnEgg.Infinite_Jump", Default = false, Callback = function(arg) enabled["Infinite Jump"] = arg utils.Connections(userInputService.JumpRequest, function() local character2 = localPlayer and localPlayer.Character character2 = character2 and character2:FindFirstChild("Humanoid") if character2 and enabled["Infinite Jump"] then character2:ChangeState("Jumping") end end) end, }) local Performance = tbl5.Miscellaneous:AddSubTab({ Name = "Performance", Icon = "Lucide:settings" }) Performance:AddLineText("Graphics & FPS") Runtime.Bind(Performance, "AddToggle", { Text = "Reduce Lag", Description = "Simplify materials, remove shadows & clutter to boost FPS", Flag = "StealAnEgg.Reduce_Lag", Default = false, Callback = function(arg) enabled["Reduce Lag"] = arg misc.ApplyReduceLag(arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Hide Own Pets", Description = "Hide your equipped pets locally to reduce lag", Flag = "StealAnEgg.Hide_Own_Pets", Default = false, Callback = function(arg) enabled["Hide Own Pets"] = arg misc.SetHideOwnPets(arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Hide Own Eggs", Description = "Hide your placed eggs locally to reduce lag", Flag = "StealAnEgg.Hide_Own_Eggs", Default = false, Callback = function(arg) enabled["Hide Own Eggs"] = arg misc.SetHideOwnEggs(arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Hide Other Eggs", Description = "Hide other players' placed eggs to boost FPS", Flag = "StealAnEgg.Hide_Other_Eggs", Default = false, Callback = function(arg) enabled["Hide Other Eggs"] = arg misc.SetHideOtherEggs(arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Hide Money Animation", Description = "Hide floating money popup text that rises from pets", Flag = "StealAnEgg.Hide_Money_Animation", Default = false, Callback = function(arg) enabled["Hide Money Animation"] = arg if arg then misc.SetHideMoneyAnimation(true) end end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Show Screen White", Description = "Disable 3D rendering to drastically reduce CPU/GPU usage", Flag = "StealAnEgg.Show_Screen_White", Default = false, Callback = function(arg) runService:Set3dRenderingEnabled(not arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Show Screen Black", Description = "Set lighting exposure to minimum for power saving", Flag = "StealAnEgg.Show_Screen_Black", Default = false, Callback = function(arg) lighting.ExposureCompensation = arg and -10 or 0 end, }) Performance:AddLineText("Game Settings") local settingsCmds = nil pcall(function() settingsCmds = modules.Game and modules.Game.SettingsCmds or replicatedStorage:FindFirstChild("Shared") and require(replicatedStorage.Shared.SettingsCmds) end) local function fn10(arg, arg2) if settingsCmds and settingsCmds.Flag then local ok, result = pcall(function() return settingsCmds.Flag(arg) end) if ok and result ~= nil then return result end end return arg2 or false end local function fn11(arg, arg2) if settingsCmds and settingsCmds.Write then pcall(function() settingsCmds.Write(arg, arg2) end) else pcall(function() local Remotes_ = require(game:GetService("ReplicatedStorage").Shared.Remotes) if Remotes_ and Remotes_.Preferences and Remotes_.Preferences.AskWrite then Remotes_.Preferences.AskWrite:InvokeServer(arg, arg2) end end) end end Runtime.Bind(Performance, "AddToggle", { Text = "Hide Other Pets", Description = "Hide other players' pets via game settings", Flag = "StealAnEgg.Hide_Other_Pets", Default = fn10("HideOtherPets", false), Callback = function(arg) enabled["Hide Other Pets (Game)"] = arg fn11("HideOtherPets", arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Disable Video", Description = "Disable treadmill video frames via game settings", Flag = "StealAnEgg.Disable_Video", Default = fn10("DisableVideos", false), Callback = function(arg) enabled["Disable Video (Game)"] = arg fn11("DisableVideos", arg) end, }) Runtime.Bind(Performance, "AddToggle", { Text = "Music", Description = "Toggle in-game background music via game settings", Flag = "StealAnEgg.Music", Default = fn10("Music", true), Callback = function(arg) enabled["Music (Game)"] = arg fn11("Music", arg) end, }) local Webhook = tbl5.Settings:AddSubTab({ Name = "Webhook", Icon = "Lucide:settings" }) Runtime.Bind(Webhook, "AddTextbox", { Text = "Discord Webhook URL", Description = "Paste your Discord webhook URL here", Flag = "StealAnEgg.Discord_Webhook_URL", Default = "", Callback = function(url) modules.WebhookManager.Url = url or "" end, }) Runtime.Bind(Webhook, "AddToggle", { Text = "Webhook Egg Steal", Description = "Send Discord notification when an egg is stolen (sent on idle)", Flag = "StealAnEgg.Webhook_Egg_Steal", Default = false, Callback = function(eggStealEnabled) enabled["Webhook Egg Steal"] = eggStealEnabled modules.WebhookManager.EggStealEnabled = eggStealEnabled end, }) Runtime.Bind(Webhook, "AddDropdown", { Text = "Webhook Min Rarity", Description = "Only send notification for eggs with rarity >= this", Flag = "StealAnEgg.Webhook_Min_Rarity", Options = { "All", "1 - Common", "2 - Uncommon", "3 - Rare", "4 - Epic", "5 - Legendary", "6 - Mythic", "7 - Cosmic", "8 - Secret", "9 - Eternal", "10 - Divine", "11 - Titan", "12 - Light & Dark", }, MultiSelect = false, Default = "All", Callback = function(arg) if type(arg) == "table" then arg = arg[1] or arg.Value or arg.Title or arg.Text end local str = tostring(arg or "All") if str == "All" or string.find(str, "All", 1, true) then modules.WebhookManager.MinRarity = 1 else modules.WebhookManager.MinRarity = tonumber(string.match(str, "(%d+)")) or 1 end end, }) Webhook:AddButton({ Text = "Test Webhook", Description = "Send a test notification to verify URL", Callback = function() if not modules.WebhookManager.Url or modules.WebhookManager.Url == "" then fn4("Please paste Webhook URL first!", "Webhook") return end modules.WebhookManager.SendPayload({ petCategory = "Phoenix", petName = "Phoenix", rarityName = "Eternal", rarityNum = 9, scale = 1, mutation = "Rainbow", areaId = "Volcano", nestId = 1, timestamp = os.time(), }) fn4("Test webhook sent!", "Webhook") end, }) local configTab = tbl5.Settings:AddSubTab({ Name = "Config", Icon = "Lucide:settings" }) configTab:AddParagraph({ Title = "Configuration", Text = "Settings save automatically when file APIs are available. This game and account use a separate config." }) configTab:AddButton({ Text = "Save Config", Icon = "Lucide:save", Callback = function() Runtime.SaveConfig(false) end }) configTab:AddButton({ Text = "Load Config", Icon = "Lucide:folder-open", Callback = function() Runtime.LoadConfig(false) end }) configTab:AddButton({ Text = "Reset Script Config", Callback = function() BobloNEXT:Confirm({ Title = "Reset Script Config", Text = "Restore this script's defaults?", Danger = true, ConfirmText = "Reset", CancelText = "Cancel", Window = v7, Callback = function(confirmed) if not confirmed then return end -- Stop active toggles before replacing filters and other settings. for _, binding in ipairs(Runtime.Bindings) do if binding.Method == "AddToggle" and binding.Control:Get() then binding.Control:Set(false) binding.Apply(false) end end Runtime.Paused = true local ok, err = pcall(BobloNEXT.SetConfig, BobloNEXT, Runtime.Defaults) Runtime.Paused = false Runtime.ApplyControls() if ok then Runtime.SaveConfig(true) else fn4(err, "Config") end end, }) end }) Runtime.LoadConfig(true) Runtime.Ready = true Runtime.ApplyControls() task.spawn(function() local lastSaved = nil while not Runtime.Unloaded do task.wait(3) local ok, encoded = pcall(function() return httpService:JSONEncode(BobloNEXT:GetConfig()) end) if ok and encoded ~= lastSaved and Runtime.SaveConfig(true) then lastSaved = encoded end end end) end tbl4.LoadFunction = function() local function fn9(arg, arg2) task.spawn(function() utils.StartLoop(arg, arg2) end) end fn9("No Clip", function() local character2 = localPlayer and localPlayer.Character if not character2 then task.wait(0.5) return end for _, child in pairs(character2:GetChildren()) do if child:IsA("BasePart") and child.CanCollide then child.CanCollide = false end end task.wait(0.1) end) task.spawn(function() while not Runtime.Unloaded do local ok, result = pcall(orchestrator.Tick) if not ok and _G.DebugMode then warn("[Orchestrator Error] " .. tostring(result)) end if treadmill and treadmill.CheckTreadmil and treadmill.CheckTreadmil() then task.wait(0.4) else task.wait(0.04) end end end) fn9("Auto Pick Dropped Egg", function() if not game_.Ready then return end steal.AutoPickStep() task.wait() end) fn9("Auto Hatch", function() if not game_.Ready then return end hatch.Step() task.wait(2) end) fn9("Auto Equip Best", function() if not game_.Ready then return end equip.Step() task.wait(6) end) fn9("Auto Favorite Pet", function() if not game_.Ready then return end favorite.Step() task.wait(3) end) fn9("Auto Favourite Equiped Pets", function() if not game_.Ready then return end favorite.StepFavEquipped() task.wait(3) end) fn9("Auto UnFavourite Equiped Pets", function() if not game_.Ready then return end favorite.StepUnfavEquipped() task.wait(3) end) fn9("Auto Fuse Machine", function() if not game_.Ready then return end fuse.Step() task.wait(2) end) fn9("Auto Rebirth", function() if not game_.Ready then return end rebirth.Step() task.wait(3) end) fn9("Auto Upgrade Base", function() if not game_.Ready then return end upgrade.Step() task.wait(3) end) fn9("Auto Upgrade Treadmill", function() if not game_.Ready then return end upgrade.StepTreadmill() task.wait(3) end) fn9("Auto Buy Trail", function() if not game_.Ready then return end if trail and trail.Step then trail.Step() end task.wait(5) end) fn9("Auto Claim", function() if not game_.Ready then return end claim.Step() task.wait(5) end) enabled["ESP Loop"] = true fn9("ESP Loop", function() if not game_.Ready then return end esp.Step() if scramble then if scramble.UpdateDroneESP then scramble.UpdateDroneESP() end if scramble.UpdateDropsESP then scramble.UpdateDropsESP() end end task.wait(1) end) task.spawn(function() local clientRenderedAssets = workspace:FindFirstChild("ClientRenderedAssets") if clientRenderedAssets then utils.Connections(clientRenderedAssets.ChildAdded, function(arg) if not enabled["Hide Own Pets"] then return end task.wait(0.05) local userId = localPlayer.UserId if arg:GetAttribute("OwnerUserId") == userId or string.find(arg.Name, tostring(localPlayer.UserId), 1, true) == 1 then for _, descendant in ipairs(arg:GetDescendants()) do if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = 1 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = 1 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = false end end local connection = arg.DescendantAdded:Connect(function(descendant) if not enabled["Hide Own Pets"] then return end if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = 1 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = 1 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = false end end) arg.Destroying:Connect(function() if connection then connection:Disconnect() connection = nil end end) end end) end end) task.spawn(function() for _, child in ipairs(workspace:GetChildren()) do if child.Name == "PlacedEggRenders" then utils.Connections(child.ChildAdded, function(arg) task.wait(0.05) local flag = string.find(arg.Name, tostring(localPlayer.UserId), 1, true) == 1 local flag2 if flag then flag2 = flag else local userId = localPlayer.UserId flag2 = arg:GetAttribute("OwnerUserId") == userId end if flag2 and enabled["Hide Own Eggs"] or not flag2 and enabled["Hide Other Eggs"] then for _, descendant in ipairs(arg:GetDescendants()) do if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = 1 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = 1 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = false end end local connection = arg.DescendantAdded:Connect(function(descendant) if not (flag2 and enabled["Hide Own Eggs"] or not flag2 and enabled["Hide Other Eggs"]) then return end if descendant:IsA("BasePart") then descendant.LocalTransparencyModifier = 1 elseif descendant:IsA("Decal") or descendant:IsA("Texture") then descendant.Transparency = 1 elseif descendant:IsA("BillboardGui") or descendant:IsA("ParticleEmitter") or descendant:IsA("Highlight") then descendant.Enabled = false end end) arg.Destroying:Connect(function() if connection then connection:Disconnect() connection = nil end end) end end) end end end) task.spawn(function() local terrain = workspace:FindFirstChild("Terrain") if terrain then utils.Connections(terrain.ChildAdded, function(arg) if not enabled["Hide Money Animation"] then return end if arg.Name == "SyncedIncomeCashAttachment" or arg.Name == "SyncedIncomeCash" then arg:Destroy() end end) end end) fn9("Webhook Dispatcher", function() if webhookManager then webhookManager.Step() end task.wait(1) end) fn9("Pet Predictions Loop", function() if petPredictor and petPredictor.Paragraph then petPredictor.UpdateParagraph() end task.wait(15) end) fn9("Fuse Predictor Loop", function() if fusePredictor and fusePredictor.Paragraph then fusePredictor.UpdateParagraph() end task.wait(10) end) fn9("Auto Treadmill", function() if not game_.Ready then return end if enabled["Auto Treadmill"] and treadmill and treadmill.Step and treadmill.CanRun and treadmill.CanRun() then treadmill.Step() end if treadmill.IsOnTreadmill() and not treadmill.CanRun() then treadmill.ExitTreadmill() end task.wait(2) end) fn9("Auto Sell Pet", function() if not game_.Ready then return end if sell and sell.CanSell and sell.CanSell() then sell.Step() end task.wait(2) end) fn9("Auto Sell Egg", function() if not game_.Ready then return end if sell and sell.CanSell and sell.CanSell() then sell.Step() end task.wait(2) end) task.spawn(function() pcall(function() for _, descendant in ipairs(workspace:GetDescendants()) do if descendant:IsA("ProximityPrompt") and enabled["Instant Prompt"] then descendant.HoldDuration = 0 end end end) workspace.DescendantAdded:Connect(function(descendant) if enabled["Instant Prompt"] and descendant:IsA("ProximityPrompt") then descendant.HoldDuration = 0 end end) end) task.spawn(function() while not Runtime.Unloaded do if scramble and scramble.StatusParagraph and scramble.GetTelemetryText then pcall(function() scramble.StatusParagraph:Set({ Title = "Dr. Scramble Outbreak Telemetry", Content = scramble.GetTelemetryText() }) end) end if scramble and scramble.ShopParagraph and scramble.GetShopTelemetryText then pcall(function() scramble.ShopParagraph:Set({ Title = "Scramble Event Shop", Content = scramble.GetShopTelemetryText() }) end) end if rift and rift.StatusParagraph and rift.GetTelemetryText then pcall(function() rift.StatusParagraph:Set({ Title = "Rift Machine Status", Content = rift.GetTelemetryText() }) end) end task.wait(3) end end) fn9("Auto Buy Scramble Shop", function() if not game_.Ready then return end if scramble and scramble.StepAutoShop then scramble.StepAutoShop() end task.wait(2) end) fn9("Auto Rift", function() if not game_.Ready then return end if rift and (enabled["Auto Rift Sacrifice"] or enabled["Auto Reroll Rift Recipe"]) and rift.Step then rift.Step() end task.wait(2.5) end) end tbl4.Dependency = function() utils.Connections(localPlayer.CharacterAdded, function(arg) character = arg humanoid = character:WaitForChild("Humanoid") humanoidRootPart = character:WaitForChild("HumanoidRootPart") end, "Dependency_001") task.spawn(function() local v7, v8 = game_.Init() if not v7 then fn4("Game API failed to load: " .. tostring(v8), "Lennon hub") return end task.wait(1) if not game_.GetSaveWait() then fn4("Player data failed to load", "Lennon hub") return end pcall(function() game_.EggCmds.RequestAreaEggSnapshot() game_.EggCmds.RequestRuntimeSnapshot() end) fn4("Game API ready!", "Lennon hub") end) end tbl4:Dependency() tbl4:LoadFunction() tbl4:LoadLibrary() end task.spawn(pcall, function() local function fn3() local v6 = cloneref local obj = setmetatable({}, { __mode = "v" }) return v6 and function(arg) if not arg then return nil end local debugId = arg:GetDebugId() or arg local v7 = obj[debugId] if v7 then return v7 end local v8 = v6(arg) obj[debugId] = v8 return v8 end or function(arg) return arg end end local v6 = fn3() v6(game:GetService("ContentProvider")) local localPlayer = v6(game:GetService("Players")).LocalPlayer local function fn4() local character = localPlayer.Character if not character then return false end local humanoid = character:FindFirstChildOfClass("Humanoid") local humanoidRootPart = character:FindFirstChild("HumanoidRootPart") local animate = character:FindFirstChild("Animate") local currentCamera = workspace.CurrentCamera if not humanoid or not humanoidRootPart then return false end if humanoid:GetAttribute("__Index") == true then return true end local archivable = character.Archivable character.Archivable = true local ok, cameraSubject = pcall(function() return humanoid:Clone() end) character.Archivable = archivable if not ok or not cameraSubject then return false end local walkSpeed = humanoid.WalkSpeed local jumpPower = humanoid.JumpPower local jumpHeight = humanoid.JumpHeight local useJumpPower = humanoid.UseJumpPower local hipHeight = humanoid.HipHeight local autoRotate = humanoid.AutoRotate local maxHealth = humanoid.MaxHealth local health = humanoid.Health cameraSubject.Name = "Humanoid" cameraSubject:SetAttribute("__Index", true) cameraSubject.Parent = character humanoid:Destroy() cameraSubject.WalkSpeed = walkSpeed cameraSubject.JumpPower = jumpPower cameraSubject.JumpHeight = jumpHeight cameraSubject.UseJumpPower = useJumpPower cameraSubject.HipHeight = hipHeight cameraSubject.AutoRotate = autoRotate cameraSubject.MaxHealth = maxHealth cameraSubject.Health = math.min(health, maxHealth) for _, v7 in ipairs(Enum.HumanoidStateType:GetEnumItems()) do pcall(cameraSubject.SetStateEnabled, cameraSubject, v7, true) end humanoidRootPart.AssemblyLinearVelocity = Vector3.zero humanoidRootPart.AssemblyAngularVelocity = Vector3.zero if currentCamera then currentCamera.CameraType = Enum.CameraType.Custom currentCamera.CameraSubject = cameraSubject end if animate then animate.Disabled = true task.wait() animate.Disabled = false end task.defer(function() if cameraSubject.Parent then cameraSubject:ChangeState(Enum.HumanoidStateType.Running) end end) return true end task.spawn(function() while task.wait(0.1) do local character = localPlayer.Character if character then local humanoid = character:FindFirstChild("Humanoid") if humanoid and not humanoid:GetAttribute("__Index") then pcall(fn4) end end end end) task.spawn(function() while task.wait(0.1) do local character = localPlayer.Character if character then local antiCollisionHighSeedPushBack = character:FindFirstChild("AntiCollisionHighSeedPushBack", true) if antiCollisionHighSeedPushBack then antiCollisionHighSeedPushBack.Disabled = true antiCollisionHighSeedPushBack:Destroy() end end end end) end) task.spawn(fn2)]====] -- Store a runnable copy for the optional teleport/reconnect controls. if type(writefile) == "function" then local ok, err = pcall(writefile, "BobloNEXT-StealAnEgg.lua", SCRIPT_SOURCE) if not ok then warn("[BobloNEXT] Script cache unavailable: " .. tostring(err)) end end local chunk, compileError = loadstring(SCRIPT_SOURCE, "StealAnEgg-BobloNEXT") if not chunk then error(compileError) end chunk()