YourTargetScore = 3100 function waitForEventStart() repeat yrest(1000) -- check every second local namePE,messagePE,namePH,ScorePE,Count , IsScoreVisible= RoMScript("PE_GetInfo(1)") if Count == 2 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 or not PEFisVisible() then return true else retuen false end end function PEFisVisible() return RoMScript("PEFs:isVisible()") end player:target_NPC("Diandon"); yrest(100); player:target_NPC("Diandon"); yrest(100); local queststate = getQuestStatus("Extinguish More Flames"); while queststate == "incomplete" do yrest(100);player:target_Object("Strange Flame Seedling");yrest(100); queststate = getQuestStatus("Extinguish More Flames"); if isEventFinished() then __WPL:setForcedWaypointType("RUN") break end end if PEFisVisible() then waitForEventStart() __WPL:setForcedWaypointType("NORMAL") __WPL:setWaypointIndex(__WPL:findWaypointTag("Do Again")); end