-- Sap_Send by Rock5. Version 1.0. -- -- -- Continuously collects Pipi Tree Sap -- and sends them to another character. -- ========================= -- == User options Send_To = "recipient name" -- Character to send the Pipi to. Send_Amount = 0 -- Stop after sending this many. Set to 0, to not stop. -- ========================= -- Set up to use splitCollect() harvestId = 115605 -- Pipi Tree Sap questItemId = 207435 -- Pipi Tree Sap itemStackLimit = 5 splitCollectSetup(harvestId, questItemId, itemStackLimit) changeProfileOption("LOOT",false) changeProfileOption("HARVEST_DISTANCE",40) SapsSent = 0 -- Counter so we know how much we have sent -- At mailbox -- Send Pipi Tree Saps if inventory:itemTotalCount(questItemId) > 4 then -- Count Saps sent SapsSent = SapsSent + inventory:itemTotalCount(questItemId) UMM_SendByNameOrId(Send_To,{questItemId}) -- Pipi Tree Sap RoMCode("HideUIPanel(MailFrame)") -- Print how many sent so far cprintf(cli.yellow,"%d Pipi Tree Saps sent so far.\n", SapsSent) if Send_Amount > 0 and SapsSent >= Send_Amount then error(SapsSent .. " Pipi Tree Saps sent. Finished.") end end -- Go get quest if we don't have it if getQuestStatus(422899) == "not accepted" then -- Effective Deterrent __WPL:setWaypointIndex(__WPL:findWaypointTag("npc")); end player:mount() while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end if inventory:itemTotalCount(questItemId) > 4 then __WPL:setWaypointIndex(__WPL:findWaypointTag("toNPC")); end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end if inventory:itemTotalCount(questItemId) > 4 then __WPL:setWaypointIndex(__WPL:findWaypointTag("toNPC")); end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end if inventory:itemTotalCount(questItemId) > 4 then __WPL:setWaypointIndex(__WPL:findWaypointTag("toTree1")); end while splitCollect() == true do yrest(100) end while splitCollect() == true do yrest(100) end if itemStackLimit > inventory:itemTotalCount(questItemId) then __WPL:setWaypointIndex(__WPL:findWaypointTag("collect")); end __WPL:setWaypointIndex(__WPL:findWaypointTag("main")); player:target_NPC(115611) -- Jaexis Spider skin AcceptQuestByName(422899) -- Effective Deterrent yrest(1000)