Code: Select all
| - Arrows.mac -
|
#include routines.mac
Sub Main
/call FindCombiner Fletching
/if $return==99 /return
/cleanup
/click right inv $return
:MakeArrows
/sendkey down ctrl
/finditem similar "Fletchings"
/if $find()==FALSE /goto :Done
/click left pack $return 0
/finditem similar "Nocks"
/if $find()==FALSE /goto :Done
/click left pack $return 2
/finditem similar "Arrow Shafts"
/if $find()==FALSE /goto :Done
/click left pack $return 4
/finditem similar "Arrowheads"
/if $find()==FALSE /goto :Done
/click left pack $return 6
/sendkey up ctrl
/click left pack $return combine
:WaitArrows
/if $pack($return,empty)==FALSE /goto :WaitArrows
/delay 2
/click left auto
/goto :MakeArrows
:Done
/sendkey up ctrl
/return
