UO Sagas: Tree chop V1.3

-- V1 release -- V1.1 logchop fix -- V1.2 Hatchet fix -- V1.3 Hatchet handle fix -- Known bugs: At client start the hatchet doesnt get recognised -- Configuration local MAX_WEIGHT_DIFF = 10 local MAX_WEIGHT = 390 local ITEM_ID_WOODEN_LOGS = 0x1BDD local CHOP_DELAY = 2500 function GetHatchet() -- Check if Hatchet already in hand for _, layer in ipairs({1, 2}) do local checkAxe = Items.FindByLayer(layer) if checkAxe and string.find(string.lower(checkAxe.Name or ""), "hatchet") then return checkAxe end end -- No Hatchet -> Check Bagpack local equipaxe = Items.FindByName("Hatchet") if equipaxe then Player.Equip(equipaxe.Serial) Pause(1000) -- check if equip is successful for _, layer in ipairs({1, 2}) do local checkAxe = Items.FindByLayer(layer) if checkAxe and string.find(string.lower(checkAxe.Name or ""), "hatchet") then return checkAxe end end end Player.Say("No hatchet found.") return nil end function GetLogs() local itemList = Items.FindByFilter({}) for _, item in ipairs(itemList) do if item and item.RootContainer == Player.Serial and item.Graphic == ITEM_ID_WOODEN_LOGS then return item end end return nil end function CreateBoards(hatchet) local log = GetLogs() if hatchet and log then Player.Say("Chopping boards!") Player.UseObject(hatchet.Serial) if Targeting.WaitForTarget(1000) then Targeting.TargetSerial(log.Serial) Pause(1000) else Player.Say("Failed to target log for boards.") end elseif not hatchet then Player.Say("No hatchet to make boards.") elseif not log then Player.Say("No logs to make boards.") end end function CheckTreeStatus() local messages = { "There is no wood here to chop.", "You cannot see that.", "That is too far away.", "You can't use an axe on that.", "You cannot reach that.", "You have worn out your tool!", "There's not enough wood here to harvest." } for _, msg in ipairs(messages) do if Journal.Contains(msg) then Journal.Clear() return true end end return false end function ChopLoop(hatchet) while true do -- Check if hatchet still exists if not hatchet then Player.Say("Searching new hatchet...") hatchet = GetHatchet() if not hatchet then Player.Say("No hatchet found. Stopping.") return end end -- Weight check if Player.Weight > MAX_WEIGHT - MAX_WEIGHT_DIFF then Player.Say("Making boards") CreateBoards(hatchet) Pause(1000) end -- Use hatchet Player.UseObject(hatchet.Serial) Pause(500) if Targeting.WaitForTarget(1000) then Targeting.Self() else -- Hatchet may have broken hatchet = GetHatchet() Pause(1000) goto continue end Pause(CHOP_DELAY) if CheckTreeStatus() then Player.Say("Searching next tree") Pause(1000) end ::continue:: Pause(500) end end function Main() Journal.Clear() local hatchet = GetHatchet() if not hatchet then Player.Say("Stopping - no hatchet") return end Player.Say("Starting lumberjack") ChopLoop(hatchet) end Main()