User:Lunodragon

//Grass Picker
//coded by:Lunodragon

constants
objWindow = eGenesis Client 
intCount = 2
end



SetActiveWindow $objWindow

Keys {F5}
MousePos 527, 766
delay 1000
MousePos 453, 380

//Initial Gathering of grass
MousePos 93, 90
leftclick
delay 3000


//Move Back and Forth and Gather Grass
procedure harvest
MousePos 249, 361
leftclick
delay 1000
MousePos 93, 90
leftclick
delay 3000
MousePos 621, 357
leftclick
delay 1000
MousePos 93, 90
leftclick
delay 3000
end

//Loop to continue gathering grass
loop $intCount
call harvest
end


//To keep reseting the loop
when $intCount = 0
		setconst $intCount = 2
		end