Payala Fruit Collector
Posted: Wed Feb 23, 2005 4:56 am
This is a new Payala Fruit collector modified from one that noober posted, the 10s delay is needed due to the macro collecting all the spawn spots before they respawn so change at your own risk.. really simple macro..
Of course you need to make sure you've followed this post first.. or have the latest version of MQ2
Code: Select all
Sub Main
/call DefineGlobals
:Loop
/Call TargetItem
/Call MoveToItem
/Call GetItem
/Call Rest
/goto :loop
/return
Sub DefineGlobals
/declare TargetDistance global
/return
Sub TargetItem
/echo Targeting a shroom . . .
/ItemTarget *Blue
/return
Sub MoveToItem
:keepmoving
/varset TargetDistance ${Target.Distance}
/face fast nolook
/keypress forward hold
/delay 5
/call CheckIfStuck
/if (${Ground.Distance}>10) /goto :keepmoving
/keypress back
/return
Sub CheckIfStuck
|/echo is ${TargetDistance} = ${Target.Distance} ?
/if (${TargetDistance}==${Target.Distance}) {
/echo I am stuck
/keypress back hold
/delay 1s
/keypress back
/if (${Math.Rand[99]}>50) {
/keypress strafe_right hold
} else {
/keypress strafe_left hold
}
/delay 2s
/keypress strafe_right
/keypress strafe_left
/keypress forward hold
}
/Return
Sub GetItem
/click left item
/delay 1s
/autoinventory
/delay 1s
/autoinventory
/Return
Sub Rest
/delay 10s
/echo Getting next phat lewt!
/Return