There isn't much in the way of error checking in case it messes up, but it seems to work fine for me. You should be able to change it pretty easily to use other items that summon arrows.
Enjoy
Code: Select all
| tolan.mac
| Summons up a quiver full and range slot full of arrows using Tolan's Darkwood Bracer
| and places them in your quiver and your ammo slot, assumes you keep the bracer
| stored in a pack when not using.
|
| Change the declares at the top of the macro to use a different summoning item,
| like the Bloody Achilie's Pouch, for example. And to specify where you keep your
| item, and where to put the resulting arrows
|
| item = the name of the item that summons stuff
| pack = which pack you store the item in
| quiver = which pack is your quiver
| swapslot = which slot you need to equip the item in so you can cast with it
|
| There aren't any seatbelts provided, so use at your own risk :)
Sub Main
/declare item string local "Tolan's Darkwood Bracer"
/declare pack string local "pack7"
/declare quiver string local "pack8"
/declare swapslot string local "rightwrist"
/declare slotnum invslot local
/declare l1 int local
/if (${Window[InventoryWindow].Open}==0) /keypress inventory
/delay 2
/if (${Window[${pack}].Open}==0) /itemnotify ${pack} rightmouseup
/delay 1s
/if (${Window[${quiver}].Open}==0) /itemnotify ${quiver} rightmouseup
/delay 1s
/varset slotnum ${FindItem[${item}].InvSlot}
/delay 1s
/itemnotify ${slotnum} leftmouseup
/delay 1s
/itemnotify ${swapslot} leftmouseup
/delay 1s
/itemnotify ${slotnum} leftmouseup
/delay 1s
/for l1 1 to 7 {
/itemnotify ${swapslot} rightmouseup
:castwait
/delay 2
/if (${Me.Casting.ID}>0) /goto :castwait
:itemwait
/delay 2
/if (${Cursor.ID}==0) /goto :itemwait
/delay 2
/if (${l1}<7) {
/itemnotify in ${quiver} ${l1} leftmouseup
} else {
/itemnotify ammo leftmouseup
}
/delay 1s
/next l1
}
/itemnotify ${swapslot} leftmouseup
/delay 1s
/itemnotify ${slotnum} leftmouseup
/delay 1s
/itemnotify ${swapslot} leftmouseup
/delay 1s
/itemnotify ${quiver} rightmouseup
/delay 1s
/itemnotify ${pack} rightmouseup
/delay 1s
/keypress inventory
/endm



