Users > Aperio > Macros

Grass Macro

;When the macro starts it will ask you to move your mouse to the grass icon and press F1 ;After that it will lock the camera into a zoomed in topdown position, this takes about 5 seconds ;Then it will ask you to move the mouse to a point above your character, as far away as possible and hit F1 ;It will ask you to do the same for a position below your character ;After that you can press F1 to start the macro, use ctrl-z to abort it, this will unlock the camera

toggler = 0 dir = 1 MsgBox Please move the mouse to the grass icon and press F1 WinActivate eGenesis Client F1:: if(toggler = 0){

	MouseGetPos, grassx, grassy
	PixelGetColor, grasscolor, grassx, grassy
	MsgBox The camera will now switch to overhead view and lock your camera into position
	WinActivate eGenesis Client
	sleep 100
	Send {F8}
	sleep 100
	Send {F8}
	sleep 100
	MouseMove 0,0,0
	sleep 5000
	Send {Alt Down}
	sleep 100
	Send l
	sleep 100
	Send {Alt Up}
	toggler := 1
	MsgBox Now please move the mouse to a position above your character, as far away from your character as possible and press F1
	WinActivate eGenesis Client

} else if(toggler = 1){

	MouseGetPos, topx, topy
	toggler := 2
	MsgBox Now do the same for a position below your character
	WinActivate eGenesis Client

} else if(toggler = 2){

	MouseGetPos, bottomx, bottomy
	toggler := 3
	MsgBox once you press F1 again the macro will start, use ctrl-z to abort it

} else if(toggler = 3){

	;MsgBox Grass is %grassx% %grassy% %grasscolor%
	;MsgBox Top is %topx% %topy%
	;MsgBox Bottom is %bottomx% %bottomy%
	Loop{
		PixelGetColor, check, grassx, grassy
		if(check = grasscolor){
			MouseMove grassx, grassy, 0
			Click
			if(dir = 1){
				MouseMove topx, topy, 0
				sleep 500
				Click
				dir := -1
			} else{
				MouseMove bottomx, bottomy, 0
				sleep 500
				Click
				dir := 1 
			}
		}
	}

} return

^z:: Click Right Send {Alt Down} sleep 100 Send l sleep 100 Send {Alt Up} MsgBox Your camera position has been unlocked, the macro will now abort ExitApp

Slate Macro

;Once it's started it will ask you to stand on a spot with slate, move the mouse to the slate icon and hit F1 ;After that it will automatically click on the slate icon whenever it detects it and return the mouse to the position it was in ;To abort the macro use ctrl-z interupt = 0 MsgBox please stand on a spot with slate, move the mouse to the slate icon and hit F1 WinActivate eGenesis Client

F1:: MouseGetPos, slatex, slatey PixelGetColor, slatecolor, slatex, slatey MsgBox The macro will now click the slate icon whenever it detects it WinActivate eGenesis Client Loop{

	sleep 150
	PixelGetColor slate, slatex, slatey
	if(slate = slatecolor){
		MouseGetPos, xpos, ypos
		MouseMove slatex, slatey, 0
		Click
		MouseMove xpos, ypos, 0
	}
	if(interupt = 1){
		interupt = 0
		MsgBox interupting macro
		Exit
	}

} return

^i:: interupt = 1 return

^z:: ExitApp return