Sorry for my english
I'm using a modified ElfDaily
Code: Select all
<?xml version="1.0" encoding="utf-8"?><waypoints type="TRAVEL">
    <onLoad>
-- Elf daily script - V1.2 - written by Jandrana 
-- thanks to rock5 for help regarding relog
-- relog features requires fastLogin and userfunction_LoginNextChar.lua
-- changes:
--   *if char is not in Valley of Preparation, try to use transport
--   *if inventory is full, you cannot complete the quest - try to delete
--    newbie egg pet 
    function relog()
        SetCharList({
         -- enter account number and char numbers that you like to run this script
         {account=1 , chars= {1,4,5,6,7,8}},  
		 {account=3 , chars= {1,2,3,4,5,6,7,8}},
         })
        LoginNextChar()
        loadProfile()
        loadPaths("ElfDailyACC13");
      end		
     
      local zoneId = RoMScript("GetZoneID()") % 1000;
      print("zone:"..tostring(zoneId));
      transport = "Transport: Valley of Preparation";
      if zoneId ~= 12 then
         cooldown, remaining = RoMScript("GetSkillCooldown(1,2);");
         print("remaining:"..tostring(remaining));
         while (remaining > 1) do
            cooldown, remaining = RoMScript("GetSkillCooldown(1,2);");
            yrest(5000);
         end;
         
         RoMScript('CastSpellByName("'..transport..'")');
         waitForLoadingScreen();
         __WPL:setWaypointIndex(__WPL:findWaypointTag("goto_Quest"));
      end;
        
		doRelog = true;  -- set to false, if you don't like to run multiple chars
      questEndNpcID1 = 112794; <!-- "Blinsik" -->
		questName1 = GetIdName(422340) -- "Helping Them Grow"; 
		
    </onLoad>
 <!-- # 1 --><waypoint x="31847" z="4592" tag ="Main">
    local queststate = getQuestStatus(questName1);
	 local occupiedSlots, totalSlots = sendMacro("GetBagCount();");
	 if occupiedSlots == totalSlots then
		item = inventory:findItem( 207051); --newbie pet egg
		if item then
			item:delete()
		end
	 end
    if queststate == "complete" then
        player:target_NPC(questEndNpcID1);
        CompleteQuestByName(questName1);
        yrest(300);
     end
    local dqCount, dqPerDay = RoMScript("Daily_count()");
    if dqPerDay == dqCount then 
	    if doRelog then
           relog()
		else
		   error("Bot stopped.", 0); 
		end
    else
        player:target_NPC(questEndNpcID1);
        AcceptQuestByName(questName1,questEndNpcID1);
        yrest(300);
    end
 	</waypoint>
	<!-- #  5 --><waypoint x="31801" z="4649" y="13">	
 	   queststate = getQuestStatus(questName1);
 	   if queststate == "not accepted" then
			__WPL:setWaypointIndex(1);
	   end
	</waypoint>
	<!-- #  4 --><waypoint x="31784" z="4754" y="4">	</waypoint>
	<!-- #  3 --><waypoint x="31775" z="4863" y="12">	</waypoint>
	<!-- #  2 --><waypoint x="31693" z="5046" y="-10">	</waypoint>
	<!-- #  1 --><waypoint x="31423" z="5701" y="-32" tag = "Item1">	
	 queststate = getQuestStatus(questName1)
	 if queststate == "incomplete" then
	 	player:target_Object(112976,300);
	 	yrest(2500);
	 	__WPL:setWaypointIndex(__WPL:findWaypointTag("Item1"));
	end
    </waypoint>
	<!-- #  1 --><waypoint x="31423" z="5701" y="-32">	</waypoint>
	<!-- #  2 --><waypoint x="31693" z="5046" y="-10">	</waypoint>
	<!-- #  3 --><waypoint x="31775" z="4863" y="12">	</waypoint>
	<!-- #  4 --><waypoint x="31784" z="4754" y="4">	</waypoint>
	<!-- #  5 --><waypoint x="31801" z="4649" y="13">	
	 	__WPL:setWaypointIndex(__WPL:findWaypointTag("Main"));
    </waypoint>
	
	<!-- #  1 --><waypoint x="31957" z="3275" y="22" tag="goto_Quest">	</waypoint>
	<!-- #  2 --><waypoint x="32012" z="3572" y="-10">	</waypoint>
	<!-- #  3 --><waypoint x="31914" z="3800" y="-2">	</waypoint>
	<!-- #  4 --><waypoint x="31817" z="4202" y="34">	</waypoint>
	<!-- #  5 --><waypoint x="31926" z="4373" y="30">	</waypoint>
	<!-- #  6 --><waypoint x="31853" z="4589" y="9">	</waypoint>
	
</waypoints>