Sub main
:loop
/itemtarget
/delay 1s
/if (${ItemTarget.Name.NotEqual[NULL]}) {
/if (${ItemTarget.Name.Equal[Brew Barrel]}) {
/delay 1m
/goto :loop
}
/squelch /face item
/delay 5
/call GotoItem
/squelch /face item fast
/call GetItem
/delay 1s ${Cursor.ID}
/delay 2
/if (${Cursor.ID}) /autoinv
}
/delay 2s
/goto :loop
/return
Sub GotoItem
:loop
/if (${ItemTarget.Distance}>0.8) {
/squelch /face item fast
/keypress forward hold
/delay 1
/keypress forward
/goto :loop
}
/return
Sub GetItem
/declare lookangle int
/click left center
/if (!${MacroQuest.LClickedObject} || ${Target.ID}) {
/look -128
:loop
/click left center
/if (${Target.ID}) /target clear
/if (!${MacroQuest.LClickedObject} && ${Me.Look}<0) {
/varcalc lookangle ${Me.Look}+2
/look ${lookangle}
/goto :loop
}
}
/return