YourTargetScore = 3100 function waitForEventStart() repeat yrest(1000) -- check every second local namePE,messagePE,namePH,ScorePE,Count , IsScoreVisible= RoMScript("PE_GetInfo(1)") if Count == 2 and YourTargetScore > ScorePE then break end until false end function isEventFinished() local namePE,messagePE,namePH,ScorePE,Count , IsScoreVisible= RoMScript("PE_GetInfo(1)") if Count ~= 2 or ScorePE >= YourTargetScore then __WPL:setForcedWaypointType("RUN") __WPL:setWaypointIndex(__WPL:findWaypointTag("Home Base")); end end player:target_NPC("Diandon"); yrest(100); player:target_NPC("Diandon"); yrest(100); queststate = getQuestStatus("Extinguish More Flames"); while queststate == "incomplete" do yrest(100);player:target_Object("Strange Flame Seedling");yrest(100); queststate = getQuestStatus("Extinguish More Flames"); end waitForEventStart() __WPL:setForcedWaypointType("NORMAL") if (isEventFinished()) then __WPL:setWaypointIndex(__WPL:findWaypointTag("Home Base")); end