UO Sagas: All in one taming

Messages.Print("=================================", 60) Messages.Print("Tamer Assistant Script v3.75", 68) Messages.Print("Status: Scanning for nearby creatures", 89) Messages.Print("=================================", 60) -- === Config === -- === Timing Control === local pauseScan = 400 -- Delay when no mobs are found (in milliseconds) local pausePolling = 400 -- Delay inside the tame result checking loop (in milliseconds) local pauseBetweenAttempts = 600 -- Delay after a successful tame before restarting loop (in milliseconds) local pauseSmallStep = 100 -- Fallback pause used inside loops (in milliseconds) -- === Taming Behavior === local renameAfterTame = true -- Whether to rename the pet after taming local renameSuffix = "Rab" -- Suffix or replacement name for renamed pets local autoRelease = true -- Whether to auto-release pet after successful tame local repeatAfterTame = true -- Whether to loop after taming success or stop script local ignoreAfterSuccessfulTame = true -- Whether to ignore a mob after successful tame -- === Display Options === local showAlreadyTamedOverhead = true -- Show "Already Tamed... Skipping" overhead message local showStatusMessages = true -- Periodically print system messages if script is idle local statusMessageInterval = 5 -- Interval for system status messages (in seconds) local killMeCooldown = 3 -- Cooldown between repeated "Kill me" overheads (in seconds) local cantTameCooldown = 5 -- Cooldown between repeated "Can't tame" overheads (in seconds) local tameSkipMessageCooldown = 10 -- Cooldown between "Already Tamed" overheads (in seconds) -- === Release Settings === local releaseGumpId = 3432224886 -- Gump ID for the taming release window local releaseButtonId = 2 -- Button ID to confirm release -- === Mob Ignore Settings === local ignoreScanRange = 10 -- Scan range (in tiles) for displaying ignore overheads local ignoreDuration = 15 -- How long to temporarily ignore mobs (in seconds) local ignoreNoChanceTamesPermanently = true -- If true, mobs that can't be tamed are ignored forever -- === Custom Ignore List === local customIgnoreNames = { "Muffin", "Baconator", "SirPoopsAlot" } -- List of mob names to always ignore -- === Caches and Counters === local tamedShownCache = {} -- Tracks which mobs showed "Already Tamed" local tameSkipShownCache = {} -- Tracks cooldowns for "Already Tamed" messages local tooManyOwnersShownCache = {} -- Tracks cooldowns for "Kill me" overheads local cantTameShownCache = {} -- Tracks cooldowns for "Can't tame" messages local ignoreList = {} -- Stores serials and expiration or permanent ignore status local lastStatusPrint = os.clock() -- Timestamp for last idle status message local tamedCount = 0 local lastTooManyFollowers = nil -- cooldown tracking for too many followers message -- Total count of successful tames Journal.Clear() while true do local now = os.clock() if showAlreadyTamedOverhead or showCantTameOverhead then local nearby = Mobiles.FindByFilter({ rangemax = ignoreScanRange, dead = false, human = false }) or {} if type(nearby) == "table" then for _, mob in ipairs(nearby) do if showAlreadyTamedOverhead and mob.Name and mob.Name ~= "" and mob.Name:find(renameSuffix) then local lastShown = tamedShownCache[mob.Serial] or 0 if now - lastShown >= 3 then Messages.Overhead("Already Tamed... Skipping", 38, mob.Serial) tamedShownCache[mob.Serial] = now end end if showCantTameOverhead and ignoreList[mob.Serial] == true then local lastShown = cantTameShownCache[mob.Serial] or 0 if now - lastShown >= cantTameCooldown then Messages.Overhead("Cant tame!", 53, mob.Serial) cantTameShownCache[mob.Serial] = now end end end end end local all = Mobiles.FindByFilter({ rangemax = 2, dead = false, human = false }) or {} local untamed = {} for _, mob in ipairs(all) do if mob.Name and mob.Name ~= "" and not mob.Name:find(renameSuffix) then local ignoredUntil = ignoreList[mob.Serial] local skip = false for _, name in ipairs(customIgnoreNames) do if mob.Name:lower() == name:lower() then skip = true break end end if not skip and (ignoredUntil ~= true and (not ignoredUntil or os.clock() > ignoredUntil)) then table.insert(untamed, mob) end end end table.sort(untamed, function(a, b) return a.Distance < b.Distance end) if #untamed == 0 then if showStatusMessages and now - lastStatusPrint >= statusMessageInterval then Messages.Print("...Still scanning for wild creatures...", 89) lastStatusPrint = now end Pause(pauseScan) else local target = untamed[1] local success = false Journal.Clear() Skills.Use("Animal Taming") if Targeting.WaitForTarget(2000) then Targeting.Target(target.Serial) else Messages.Print("Targeting failed. Skipping creature.", 38) end local timeout, elapsed = 15000, 0 while elapsed < timeout do if Journal.Contains("You have too many followers to tame that creature.") then if not lastTooManyFollowers or os.clock() - lastTooManyFollowers > 5 then Messages.Overhead("Too many followers!", 38, Player.Serial) Messages.Print("Too many followers — taming not possible.", 38) lastTooManyFollowers = os.clock() end break end if Journal.Contains("You have no chance of taming this creature.") or Journal.Contains("That animal looks tame already") then if showCantTameOverhead then local lastShown = cantTameShownCache[target.Serial] or 0 if os.clock() - lastShown >= cantTameCooldown then Messages.Overhead("Cant tame!", 53, target.Serial) cantTameShownCache[target.Serial] = os.clock() end end Messages.Print("No chance to tame — ignoring mob.", 38) if ignoreNoChanceTamesPermanently then ignoreList[target.Serial] = true else ignoreList[target.Serial] = os.clock() + ignoreDuration end break elseif Journal.Contains("It seems to accept you as master") or Journal.Contains("You tame the creature.") or Journal.Contains("That wasn't even challenging") then tamedCount = tamedCount + 1 Messages.Print("Tamed successfully! (" .. tamedCount .. " total)", 68) local releaseName = target.Name if renameAfterTame then local originalName = target.Name or "Unknown" local newName if originalName:lower():match("^a%s") then newName = renameSuffix else originalName = originalName:gsub("%s+", "") newName = originalName .. renameSuffix end Mobiles.Rename(target.Serial, newName) releaseName = newName Messages.Print("Renamed to: " .. newName, 89) end if autoRelease then Messages.Print("Releasing tamed creature...", 20) Player.Say(releaseName .. " release") Pause(500) if Gumps.WaitForGump(releaseGumpId, 1000) then Gumps.PressButton(releaseGumpId, releaseButtonId) Messages.Print("Released successfully.", 68) else Messages.Print("Release gump not found. Skipping release.", 38) end end if ignoreAfterSuccessfulTame then ignoreList[target.Serial] = true end success = true break elseif Journal.Contains("You fail to tame the creature.") then Messages.Print("Taming failed. Trying again...", 20) break elseif Journal.Contains("You seem to anger the beast") then Messages.Print("The beast was angered.", 20) Pause(pauseSmallStep) break elseif Journal.Contains("That is too far away.") then Messages.Print("Target too far. Skipping...", 38) break elseif Journal.Contains("This animal has had too many owners") then local lastShown = tooManyOwnersShownCache[target.Serial] or 0 if os.clock() - lastShown >= killMeCooldown then Messages.Overhead("Kill me", 33, target.Serial) tooManyOwnersShownCache[target.Serial] = os.clock() end Messages.Print("Too many owners — marked for death.", 38) ignoreList[target.Serial] = true break end Pause(pausePolling) elapsed = elapsed + pausePolling end if success then if repeatAfterTame then Pause(pauseBetweenAttempts) else Messages.Print("Ending script after successful tame.", 89) return end end end end