Simplified Macros

; mining/acro (remember to pin menu first)

^!m:: IfWinExist eGenesis Client {

	WinActivate
	Gui, 2:Add, Text,, Recording mouse position`nPlease click on the button.
	Gui, 2:Show
	KeyWait, LButton, D
	MouseGetPos, MinePosX, MinePosY
	Gui, 2:Destroy
	Gui, 2:Add, Text,, How many pulls/moves?
	Gui, 2:Add, Edit, Number vNumPulls
	Gui, 2:Add, Button, default gMineCommit, OK
	Gui, 2:Show
	return

	MineCommit:
	Gui, 2:Submit
	Gui, 2:Destroy
	loop, %NumPulls%
	{
		WinActivate
		loop {
			Sleep, 8000
			PixelSearch, Px, Py, 760, 140, 805, 150, 0x88DCEF
			if (ErrorLevel = 1 and WinActive("eGenesis Client"))
			{
				break
			}
		}
		MouseClick, left, %MinePosX%, %MinePosY%
	}
	return

}

; limestone

^!o:: IfWinExist eGenesis Client {

	WinActivate
	Gui, 2:Add, Text,, Recording mouse position`nPlease click on the button.
	Gui, 2:Show
	KeyWait, LButton, D
	MouseGetPos, MinePosX, MinePosY
	Gui, 2:Destroy
	Gui, 2:Add, Text,, How many digs?
	Gui, 2:Add, Edit, Number vNumPulls
	Gui, 2:Add, Button, default gDigCommit, OK
	Gui, 2:Show
	return

	DigCommit:
	Gui, 2:Submit
	Gui, 2:Destroy
	loop, %NumPulls%
	{
		WinActivate
		loop {
			Sleep, 42500
			PixelSearch, Px, Py, 760, 140, 805, 150, 0x88DCEF
			if (ErrorLevel = 1 and WinActive("eGenesis Client"))
			{
				break
			}
		}
		MouseClick, left, %MinePosX%, %MinePosY%
	}
	return

}

; grass collector

^!g:: IfWinExist eGenesis Client {

	WinActivate
	WinGetPos,,, winWidth, winHeight
	minorOffset = 70
	majorOffset = 100
	winXCenter := winWidth / 2
	winYCenter := ((winHeight - 22) / 2) + 32
	winXLeft := winXCenter - minorOffset
	winXFarLeft := winXCenter - majorOffset
	winXRight := winXCenter + minorOffset
	winXFarRight := winXCenter + majorOffset
	winYUp := winYCenter - minorOffset
	winYFarUp := winYCenter - majorOffset
	winYDown := winYCenter + minorOffset
	winYFarDown := winYCenter + majorOffset
	circleMove = 0

	Gui, +AlwaysOnTop +ToolWindow
	Gui, Add, Text,, How many grass cycles?
	Gui, Add, Edit, Number vNumGrass
	Gui, Add, Button, default gGrassCommit, OK
	Gui, Show
	return

	GrassCommit:
	Gui, Submit
	Gui, Destroy
	GrassCycle = 0
	Gui, +AlwaysOnTop +ToolWindow
	Gui, Font, bold
	Gui, Add, Text, vGrassCycleText, Cycle %NumGrass% of %NumGrass%
	Gui, Font, norm
	Gui, Show
	GuiControl, Text, GrassCycleText, Cycle %GrassCycle% of %NumGrass%
	WinActivate, eGenesis Client
	CoordMode, Mouse, Relative
	loop, %NumGrass%
	{
		if circleMove = 0 
		{
			MouseClick, left, %winXFarRight%, %winYCenter%
			circleMove++
		}
		else if circleMove = 1 

		{
			MouseClick, left, %winXFarLeft%, %winYCenter%
			circleMove = 0
		}
		loop
		{
			PixelSearch, Px, Py, 0, 0, %winWidth%, 30, 0xB46E6C
			Sleep, 250
			if ErrorLevel = 0 
			{
				GrassCycle++
				GuiControl, Text, GrassCycleText, Cycle %GrassCycle% of %NumGrass%
				MouseClick, left, %Px%, %Py%
				Sleep, 2000
				break
			}
		}
	}
	Gui, Destroy
	return

} return