This macro uses ACTools, your milage may vary.
// flax seed growing macro - Coyan - 6/10/2006
// resolution is 1280x1024 and ACTools required
// Okies, some setup is needed for this to work
// first in one-click related, turn on flax hotkeys
// next on chat related, turn on chat and inventory can be minimized
// your choice on whether to turn on minimized chat channels are still visible
// minimize your chat
// now, hit F8 twice so you are zoomed all the way out
Constants
time = 150 // mouse movement timer movetime = 500 // physical move between flax patches movebigtime = 3000 // physical movement between columns of flax pickseeds = 1800 // seed picker timer waitforseeds = 16000 // waiting for seeds to grow
varyseedpos = 50 //first time its 50 on the Y axis, after that 0 MouseX = 45 // where your pinned seed window should be MouseY = 45 // where your pinned seed window should be MouseXC = 640 // center of the screen on the X axis MouseYC = 512 // center of the screen on the Y axis MouseX1 = 640 // this is where you are planting and seeding on the X axis MouseY1 = 512 // this is where you are planting and seeding on the Y axisEnd
Call seeds
Procedure seeds
Mousepos 20,20 // okies this is zooming into about the right height for the macro// The next timer may need adjustment. If you run the macro and the flax
// fields are too spread out, then increase the timer by 100 or so
// if the fields are too tight, then decrease it
delay 2450 // this is the delay that determines the zoom height
Mousepos $MouseXC,$MouseYC
loop 6 Compute $MouseY1 = $MouseYC - 25 Compute $MouseX1 = $MouseXC Loop 5 Delay $movetime Mousepos $MouseX, $MouseY Leftclick Delay $time Mousepos $MouseX1, $MouseY1 Leftclick END Compute $MouseY1 = $MouseYC +100 Compute $MouseX1 = $MouseXC -40 Mousepos $MouseX1, $MouseY1 Leftclick Delay $movebigtime Mousepos $MouseX, $MouseY end
loop 5 Compute $MouseY1 = $MouseYC + $varyseedpos Compute $MouseX1 = $MouseXC +180 Mousepos $MouseX1, $MouseY1 Leftclick Delay $waitforseeds loop 6 Compute $MouseY1 = $MouseYC - 50 Compute $MouseX1 = $MouseXC Loop 5 Mousepos $MouseX1, $MouseY1 Delay $time Keys H Delay $pickseeds END Compute $MouseY1 = $MouseYC +120 Compute $MouseX1 = $MouseXC -40 Mousepos $MouseX1, $MouseY1 Delay $time Leftclick Delay $movebigtime end
if $varyseedpos = 50 compute $varyseedpos = 0 compute $waitforseeds = 4000 end
endEnd