Code: Select all
<?xml version="1.0" encoding="utf-8"?><waypoints>
<!-- Rock5's Millers Ranch Chickens run Version 1.1 edit by karasik666 -->
<onLoad>
repeat questname=RoMScript("TEXT('Sys422386_name')"); yrest(500) until questname -- ie. "An Easy Lay?"
repeat npcname=RoMScript("TEXT('Sys114930_name')"); yrest(500) until npcname -- ie. "Jenna Miller"
</onLoad>
<!-- # 1 --><waypoint x="3981" z="3110" tag="Main">
repeat queststate = getQuestStatus(questname); yrest(500) until queststate
if queststate == "complete" then
-- Complete quest
player:target_NPC(npcname);
sendMacro("CompleteQuest()"); yrest(2000);
-- Accept quest
player:target_NPC(npcname);
sendMacro("AcceptQuest()"); yrest(2000);
__WPL:setWaypointIndex(__WPL:findWaypointTag("Main"));
elseif queststate == "incomplete" then
-- Collect eggs
if 1 > inventory:getItemCount(204789) then -- Get more feed
__WPL:setWaypointIndex(__WPL:findWaypointTag("Get Feed"));
else
if player:target_Object(112955,8000) then -- Feed Hens
__WPL:setWaypointIndex(__WPL:findWaypointTag("Main"))
else
__WPL:setWaypointIndex(__WPL:findWaypointTag("Get Eggs"))
end
end
else
-- Accept quest
player:target_NPC(npcname);
sendMacro("AcceptQuest()"); yrest(2000);
__WPL:setWaypointIndex(__WPL:findWaypointTag("Main"));
end
</waypoint>
<!-- # 2 --><waypoint x="3940" z="3055" tag="Get Feed"> </waypoint>
<!-- # 4 --><waypoint x="3937" z="2978">
player:target_Object(112956,7000,true)
</waypoint>
<!-- # 5 --><waypoint x="3935" z="3051">__WPL:setWaypointIndex(__WPL:findWaypointTag("Main")); </waypoint>
<!-- # 6 --><waypoint x="3928" z="3185" tag="Get Eggs"> </waypoint>
<!-- # 8 --><waypoint x="3929" z="3261">
changeProfileOption("HARVEST_DISTANCE", 40)
while player:target_Object(112955,8500) do -- Check for hens
while player:target_Object(112958,1500) do -- Fresh Eggs
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(4000)
end
end
while player:target_Object(114931,1050) do -- Gold Eggs
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(100)
sendMacro("UseSkill(1,1)") yrest(3000)
end
changeProfileOption("HARVEST_DISTANCE", 75)
</waypoint>
<!-- # 9 --><waypoint x="3926" z="3198">__WPL:setWaypointIndex(__WPL:findWaypointTag("Main")); </waypoint>
</waypoints>
Some can fix my script or give me good script for golden eggs?
ps. i use script for this topic http://www.solarstrike.net/phpBB3/viewt ... 1&start=80
and still have the same problem