To use make sure you're in the top down view (F9 once i believe) and zoomed out to the max. Also the format for loading the macro is
/macro farming.mac "item first name" Not in the "s
so for evergreen leafs i did; /macro farming.mac evergreen
okay nuff said here is the macro. (worked for me and you shouldn't loose money... less you die.)
Code: Select all
| - Farming.mac -
| use /macro farming.mac "item name" |without the "s
| press F9 once and make sure ur char is in the center
| and zoom out as much as possible
#include routines.mac
Sub Main
varset v85 0
varset v87 1
varset v90 0
/mqlog
:again
/call StatStuff
/delay 5
/itemtarget $p0
/call Runto
/call AutoRun 0
/delay 10
/delay 20
/call Pickup
/goto :again
/return
Sub Runto
/echo running
/face item
/call AutoRun 1
:runningto
/varadd v85 1
/varset v67 "$char(x)"
/varset v68 "$char(y)"
/if n "$v67"=="$char(x)" /if "$v68"=="$char(y)" /call Tree
/if n "$v85"=="50" /face item
/if n "$v85"=="50" /varset v85 0
/if n "$distance(item)"<"10" /goto :done
/goto :runningto
:done
/return
sub Pickup
/echo picking up
/face item
/cleanup
/delay 20
/click left item
/delay 30
/click left auto
/delay 5
/varadd v87 1
/return
sub Tree
/delay 10
/varcalc v69 $char(heading)+20
/face heading $v69
/sendkey down up
/delay 5
/call runto
/return
sub StatStuff
/echo starting to look for the $v87 , $p0
/if n "$V87"=="10 /varadd V90 10
/if n "$v87"=="10" /mqlog You have found $v90 , $p0
/if n "$v87"=="10" /varset v87 1
/return




