--==================== User options: ======================== partytext = "!but" -- text to use to get an invite to the butterflies party. combatdist = 150; -- Change value to your preferred distance. (Too high may cause problems targetting through walls). settings.ANTI_KS = true; -- best not to steal kills as a bot, especially butterflies. usebutparty = true; -- if set to true, bot will try to join the zone butterflies party. botinparty = false; -- set to true if you are manually joining a party keepridingpots = 15; -- set to how many galloping gale pots you want to keep and not use runfromgale = true; -- true means bot will run away from Fierce Gale when engaged runfromgardener = true; -- set to true to have bot run away from Copper Gardener --================ table of possible paths to take =================== randpath = { "farleft", "left", "right", "farright" } --================= mount function =================== function ButMount() if not player.Mounted then if inventory:itemTotalCount(speedpot) > keepridingpots then -- if at least 15 galloping gale pots in inventory, it will use one. Don't want to waste them all. if (useGoodie) then useGoodie("riding"); end end player:mount(); end; end --================= autoinvite listener functions =============== function InviteMonitor() local mytimer = 0; repeat local name, arg2 = EventMonitorCheck("butinvite", "1") yrest(200); mytimer = mytimer + 200; if name ~= nil then sendMacro('AcceptGroup()'); print("saw invite"); cprintf(cli.yellow, "Accepted Party-Invite from %s.", name); yrest(200); local mytimer = mytimer + 200; botinparty = true; end until botinparty == true or mytimer >= 6000 end function startInviteMonitor() unregisterTimer("autoaccept"); EventMonitorStart("butinvite", "PARTY_INVITE_REQUEST"); registerTimer("autoaccept", secondsToTimer(1), InviteMonitor); end --================= function that will attempt to get into a party ================ function getInParty() if usebutparty == true then if RoMScript("aai") ~= nil then local aaiinstalled = true; print("aai addon detected"); else local aaiinstalled = false; print("aai addon not detected"); end leaderName = RoMScript("UnitName('party1');") if leaderName ~= nil then printf("leaderName is %s\n", leaderName); else print("leaderName is currently nil") end if leaderName ~= nil and leaderName ~= player.Name then print("you are currently in a party"); -- already in a party botinparty = true; end if botinparty == false then if aaiinstalled == true then --sendMacro("SendSystemChat(\"/AAI on\", \"SAY\");") this one works, activates addon SlashCommand("AAI on"); yrest(1000); else startInviteMonitor(); yrest(500); RoMScript("SendChatMessage(\""..partytext.."\", \"ZONE\");") yrest(2000); leaderName = RoMScript("UnitName('party1');") if leaderName ~= nil and leaderName ~= player.Name then printf("leaderName is %s\n", leaderName); botinparty = true; else print("No party invite received... will try again after turning in quest."); botinparty = false; end unregisterTimer("autoaccept"); yrest(1000); end RoMScript("CloseAllWindows()"); end end end --================= onLeaveCombat will check quest state =================== settings.profile.events.onLeaveCombat = function() local queststate = getQuestStatus(quest) -- Quest name is Catch Butterflies, using IDs instead. if queststate == "complete" then __WPL:setForcedWaypointType("TRAVEL"); player:lootAll(); yrest(800); ButMount(); -- function in onload to mount up. end end --================= onEnterCombat section added to try to get away from Fierce Gale if encountered =================== settings.profile.events.onEnterCombat = function() if runfromgale == true then mytarget = player:getTarget(); if mytarget.Id == fiercegale then print("fierce gale detected... running away"); player:clearTarget(); __WPL:setForcedWaypointType("TRAVEL"); if (useGoodie) then useGoodie("speed"); -- if available, use Unbridled Enthusiasm to increase running speed useGoodie("godspeed"); -- if available, use Godspeed potion to really increase running speed end if player.Class1 == CLASS_ROGUE then player:cast("ROGUE_SPRINT"); -- added function to only do this if player class is rogue yrest(800); player:cast("ROGUE_VANISH"); end end end if runfromgardener == true then mytarget = player:getTarget(); if mytarget.Id == gardener then print("Copper Gardener detected... running away"); player:clearTarget(); __WPL:setForcedWaypointType("TRAVEL"); if (useGoodie) then useGoodie("speed"); -- if available, use Unbridled Enthusiasm to increase running speed useGoodie("godspeed"); -- if available, use Godspeed potion to really increase running speed end if player.Class1 == CLASS_ROGUE then player:cast("ROGUE_SPRINT"); -- added function to only do this if player class is rogue yrest(800); player:cast("ROGUE_VANISH"); end end end end --============== preset variables... don't change these ===================== questgiver = 118072 -- Robbie Butcher quest = 424181 -- Catch Butterflies quest butterfly = 105413 -- butterflies speedpot = 207204 -- Galloping Gale housemaid pot fiercegale = 105327 -- Fierce Gale boss horse in Inferno Gardens gardener = 105294 -- Copper Gardener settings.profile.mobs = {butterfly} -- only attacking butterflies settings.COMBAT_DISTANCE = combatdist; settings.MAX_TARGET_DIST = combatdist; settings.LOOT_DISTANCE = combatdist; __WPL:setForcedWaypointType("TRAVEL"); ButMount(); yrest(2000); if 10 > RoMScript("Daily_count()") then getInParty(); yrest(2000); player:target_NPC(questgiver); -- "Robbie Butcher" yrest(400); local queststate = getQuestStatus(quest) if queststate == "not accepted" then AcceptQuestByName(quest) end yrest(100); __WPL:setForcedWaypointType("TRAVEL"); ButMount(); butpath = math.random(1, 4); yrest(1000); __WPL:setWaypointIndex(__WPL:findWaypointTag(randpath[butpath])) else __WPL:setWaypointIndex(__WPL:findWaypointTag("butdone")) end __WPL:setForcedWaypointType("NORMAL"); local queststate = getQuestStatus(quest) if queststate == "complete" then __WPL:setForcedWaypointType("TRAVEL"); ButMount(); __WPL:setWaypointIndex(__WPL:findWaypointTag("turninfl")) else __WPL:setForcedWaypointType("NORMAL"); __WPL:setWaypointIndex(__WPL:findWaypointTag("flcontinue")) end player:target_NPC(questgiver); yrest(400); local queststate = getQuestStatus(quest) if queststate == "complete" then CompleteQuestByName(quest) end __WPL:setWaypointIndex(__WPL:findWaypointTag("getquest")) __WPL:setForcedWaypointType("NORMAL"); local queststate = getQuestStatus(quest) if queststate == "complete" then __WPL:setForcedWaypointType("TRAVEL"); ButMount(); __WPL:setWaypointIndex(__WPL:findWaypointTag("turninl")) else __WPL:setForcedWaypointType("NORMAL"); __WPL:setWaypointIndex(__WPL:findWaypointTag("lcontinue")) end player:target_NPC(questgiver); yrest(400); local queststate = getQuestStatus(quest) if queststate == "complete" then CompleteQuestByName(quest) end __WPL:setWaypointIndex(__WPL:findWaypointTag("getquest")) __WPL:setForcedWaypointType("NORMAL"); local queststate = getQuestStatus(quest) if queststate == "complete" then __WPL:setForcedWaypointType("TRAVEL"); ButMount(); __WPL:setWaypointIndex(__WPL:findWaypointTag("turninr")) else __WPL:setForcedWaypointType("NORMAL"); __WPL:setWaypointIndex(__WPL:findWaypointTag("rcontinue")) end player:target_NPC(questgiver); yrest(400); local queststate = getQuestStatus(quest) if queststate == "complete" then CompleteQuestByName(quest) end __WPL:setWaypointIndex(__WPL:findWaypointTag("getquest")) __WPL:setForcedWaypointType("NORMAL"); local queststate = getQuestStatus(quest) if queststate == "complete" then __WPL:setForcedWaypointType("TRAVEL"); ButMount(); __WPL:setWaypointIndex(__WPL:findWaypointTag("turninfr")) else __WPL:setForcedWaypointType("NORMAL"); __WPL:setWaypointIndex(__WPL:findWaypointTag("frcontinue")) end player:target_NPC(questgiver); yrest(400); local queststate = getQuestStatus(quest) if queststate == "complete" then CompleteQuestByName(quest) end __WPL:setWaypointIndex(__WPL:findWaypointTag("getquest")) if botinparty == true and usebutparty == true then RoMScript("SendChatMessage(\"Thanks for party.\", \"PARTY\");") end if botinparty == true and usebutparty == true then -- added this if so it won't leave your own personal party if not using public butterfly party RoMScript("LeaveParty()"); end error("Butterflies complete."); -- if you want your bot to continue elsewhere with another waypoint file: -- if you have the worldtraveler userfunction use a line like the following to get you to the proper zone: -- takemeto("varanascentral") -- then load your next waypoint file, for example: -- loadPaths("cot_tele.xml") -- just remember your next waypoint file would ahve to start near the transport NPC of the zone you go to.