-- approx. 634 sek
-- Version 0.2
time = os.time(); -- Startingtime of Waypoint
stoneId = 121855;
questGiverId = 121819;
questid = 425866;
questName = GetIdName(questid);
questtype = "daily" -- "public" or "daily";
__WPL:setForcedWaypointType("TRAVEL")
direction = WPT_FORWARD;
function questsDone()
local dailyQuestCount, dailyQuestsPerDay= RoMScript("Daily_count()");
if (dailyQuestCount==dailyQuestsPerDay) then
return true;
else
return false;
end
end
__WPL:setDirection(direction)
changeProfileOption("WAYPOINT_DEVIATION",5);
function _sturoport (zones)
if type(zones) ~= "table" then
error ("Argument needs to be a table!",0);
end
table.print (zones);
for __,v in pairs(zones) do
player:target_NPC(getTEXT("Sys111256_name"));
yrest(50);
ChoiceOptionByName(getTEXT(v));
yrest(50);
RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
waitForLoadingScreen(7);
end
end
if not questsDone() then
zones = {"ZONE_Z22_OLD_ROJAN_KINGDOM","Syrbalpass"}
_sturoport(zonenames);
else
error("finished",0);
end
if not questsDone() then
if (not player.Mounted) then
useGoodie(207204);
player:mount()
yrest(1000)
player:update();
end;
else
zonenames = {"QUEST_DIR_241","QUEST_DIR_236","ZONE_Z22_OLD_ROJAN_KINGDOM","VARANAS"}
_sturoport(zonenames);
direction = WPT_BACKWARD;
__WPL:setDirection(direction);
end
if (not player.Mounted) then
useGoodie(207204);
player:mount()
yrest(250)
player:update();
end;
direction = WPT_FORWARD;
__WPL:setDirection(direction);
npc=player:findNearestNameOrId(questGiverId);
player:target(npc);
local queststate = getQuestStatus(questName)
if queststate == "complete" then
Attack();
CompleteQuestByName(questName);
end
repeat
Attack();
yrest(50);
AcceptQuestByName(questName,"daily");
until getQuestStatus(questName) ~= "not accepted" or questsDone() ;
if questsDone() then
direction = WPT_BACKWARD;
__WPL:setDirection(direction);
if getQuestStatus(questName) ~= "not accepted" then
CancelQuest(questName);
end
print ("Finished in "..(os.time()-time).." Sekunden",0);
end
player:dismount();
stone=player:findNearestNameOrId(stoneId);
repeat
player:target_Object(stone.Name);
yrest(100);
until getQuestStatus(questName) == "complete"
direction = WPT_BACKWARD;
__WPL:setDirection(direction);
player:update();
if (not player.Mounted) then
if not player:hasBuff(506688) then
useGoodie(207204);
end
player:mount()
yrest(1000)
player:update();
end;
__WPL:setWaypointIndex(__WPL:findWaypointTag("BackfromStoneToTent"));