DQ1 = "Gequ\132lte Seele"; DQ2 = "Unterst\129tzung der Front: Eliminierung der Gargoyles"; DQNPC12 = "Wernika Diyazi"; DQ3 = "Schmetterlinge fangen"; DQ4 = "Schwierige Vorratssituation"; DQNPC34 = "Robbie Butcher"; function tgtInRange(_target, _range) if not _range then _range = 300; end local objectList = CObjectList(); objectList:update(); player:update(); local objSize = objectList:size(); cprintf(cli.lightgreen,"Checking if any %s are in range.\n",_target) local _closest = 1000; for i = 0,objSize do obj = objectList:getObject(i); if obj.Name == _target then local _tmpDist = distance(obj.X,obj.Z,player.X,player.Z); if _closest > _tmpDist then _closest = _tmpDist end end end if _range >= _closest then cprintf(cli.lightgreen,"%s in range.\n",_target) return true; else cprintf(cli.lightgreen,"%s NOT in range.\n",_target) return false; end end function getDailyComplete() return RoMScript("Daily_count();"); end function checkDQCount() local _tmpQC = getDailyComplete(); cprintf(cli.lightblue,"%s quests completed.\n",tostring(_tmpQC)); if (_tmpQC == 10) then cprintf(cli.lightblue,"Completed max number of daily quests, logging out.\n"); player:logout(); end end settings.profile.friends = {"Ogest","Kupferg\132rtner","Dunkelritenmagier","Dunkelriten-Akolyth","Dunkelritenhexenmeister","Dunkelritenausbilder","Seelenkern","Knochenmahlblume","Wanderskelett"}; changeProfileOption("EGGPET_ENABLE_ASSIST",false); changeProfileOption("LOOT_ALL",true); changeProfileOption("TARGET_LEVELDIF_BELOW",21) __WPL:setForcedWaypointType("RUN") dailyQuest1 = getQuestStatus(DQ1); dailyQuest2 = getQuestStatus(DQ2); if (dailyQuest1 == "complete") then checkDQCount(); player:target_NPC(DQNPC12); CompleteQuestByName(DQ1); end if (dailyQuest2 == "complete") then checkDQCount(); player:target_NPC(DQNPC12); CompleteQuestByName(DQ2); end checkDQCount(); player:target_NPC(DQNPC12); AcceptQuestByName(DQ1); player:target_NPC(DQNPC12); AcceptQuestByName(DQ2); cprintf(cli.lightblue,"Quests accepted, moving to objective.\n"); dailyQuest3 = getQuestStatus(DQ3); dailyQuest4 = getQuestStatus(DQ4); if (dailyQuest3 ~= "not accepted") and (dailyQuest4 ~= "not accepted") then __WPL:setWaypointIndex(__WPL:findWaypointTag("skipAcceptButterflies")); end dailyQuest1 = getQuestStatus(DQ1); dailyQuest2 = getQuestStatus(DQ2); dailyQuest3 = getQuestStatus(DQ3); dailyQuest4 = getQuestStatus(DQ4); if (dailyQuest1 == "complete") or (dailyQuest2 == "complete") then __WPL:setWaypointIndex(__WPL:findWaypointTag("skipButterflyTurnin")); end if dailyQuest3 == "complete" then checkDQCount(); player:target_NPC(DQNPC34); CompleteQuestByName(DQ3); yrest(100); dailyQuest3 = getQuestStatus(DQ3); end if dailyQuest4 == "complete" then checkDQCount(); player:target_NPC(DQNPC34); CompleteQuestByName(DQ4); yrest(100); dailyQuest4 = getQuestStatus(DQ4); end if (dailyQuest3 == "not accepted") then checkDQCount(); player:target_NPC(DQNPC34); AcceptQuestByName(DQ3); end if (dailyQuest4 == "not accepted") then checkDQCount(); player:target_NPC(DQNPC34); AcceptQuestByName(DQ4); end __WPL:setWaypointIndex(__WPL:findWaypointTag("enterGarden")); __WPL:setForcedWaypointType("TRAVEL"); player:update(); if player.Battling and tgtInRange("Ogest",500) then local _tmpChannel = tonumber(RoMScript("GetLeaderChannelID();")); if _tmpChannel == 3 then _tmpChannel = 1; else _tmpChannel = _tmpChannel + 1; end RoMScript("ChangeParallelID(" .. tostring(_tmpChannel) .. ");"); yrest(25000); end __WPL:setForcedWaypointType("NORMAL"); dailyQuest1 = getQuestStatus(DQ1); dailyQuest2 = getQuestStatus(DQ2); if (dailyQuest1 ~= "incomplete") and (dailyQuest2 ~= "incomplete") then __WPL:setWaypointIndex(__WPL:findWaypointTag("endQuestKilling")); __WPL:setForcedWaypointType("RUN") elseif not (tgtInRange("Abyssal Shadow") or tgtInRange("Dunkler Nachtgargoyle")) then __WPL:setWaypointIndex(__WPL:findWaypointTag("startSecondKilling")); else __WPL:setWaypointIndex(__WPL:findWaypointTag("startFirstKilling")); end dailyQuest1 = getQuestStatus(DQ1); dailyQuest2 = getQuestStatus(DQ2); if (dailyQuest1 ~= "incomplete") and (dailyQuest2 ~= "incomplete") then __WPL:setWaypointIndex(__WPL:findWaypointTag("endQuestKilling")); __WPL:setForcedWaypointType("RUN") elseif not (tgtInRange("Schatten des Abgrunds") or tgtInRange("Dunkler Nachtgargoyle")) then __WPL:setWaypointIndex(__WPL:findWaypointTag("startFirstKilling")); else __WPL:setWaypointIndex(__WPL:findWaypointTag("startSecondKilling")); end cprintf(cli.lightblue,"Quests completed, moving to turnin.\n"); __WPL:setForcedWaypointType("RUN"); __WPL:setForcedWaypointType("TRAVEL"); __WPL:setForcedWaypointType("RUN"); __WPL:setWaypointIndex(__WPL:findWaypointTag("exitGarden")); dailyQuest3 = getQuestStatus(DQ3); dailyQuest4 = getQuestStatus(DQ4); if dailyQuest3 ~= "complete" and dailyQuest4 ~= "complete" then __WPL:setWaypointIndex(__WPL:findWaypointTag("skipButterflyTurnin")); end if dailyQuest3 == "complete" then checkDQCount(); player:target_NPC(DQNPC34); CompleteQuestByName(DQ3); end if dailyQuest4 == "complete" then checkDQCount(); player:target_NPC(DQNPC34); CompleteQuestByName(DQ4); end __WPL:setWaypointIndex(__WPL:findWaypointTag("skipBounce")); __WPL:setWaypointIndex(__WPL:findWaypointTag("questGiver")); isTeleport("next","Ailic's Aide",1);