; New timer macro... using stuff


^+c::
IfWinExist eGenesis Client
{
	WinActivate
	WinGetPos,,, winWidth, winHeight
	widthOffset := winWidth - 40
	Searchtop := 130
	Searchbottom := 145
	Searchleft := winWidth - 40
	Searchright := winWidth - 8
	EndoCycle :=0
	NumCycles :=400
	Gui, +AlwaysOnTop +ToolWindow
	Gui, Font, bold
	Gui, Add, Text, vMineNumText, Recording mouse position
Gui, Add, Text, vDebugText, %Searchleft%, %Searchtop%, %Searchright%, %Searchbottom%
;	Gui, Add, Text, vDebugText, Testing ... %widthOffset%, 140, %winWidth%, 150
	Gui, Font, norm
	Gui, Add, Text, vCycleLowerText,
	( LTrim
	Please left-click on the Target
	)
;	Gui, Add, Button, default gEndoLoops, OK
;	Gui, Add, Button, default gEndoLoops, Abort
	Gui, Show, X400 Y800, Macro-cycle
;for debug...
;	GuiControl, Text, MineNumText, %winWidth%, %winHeight%
;	MineNum = 0
	WinGet, GameWinHandle, ID, eGenesis Client
	WinActivate
	CoordMode, Mouse, Relative
	KeyWait, LButton, D
	KeyWait, LButton
	MouseGetPos, TestX, TestY, WinHandle
	if (WinHandle = GameWinHandle)
	{
		MouseGetPos, TargetX, TargetY
		GuiControl, Text, MineNumText, Target Acquired
	}
	else
	{
		Gui, Destroy
	}
;Sleep, 500
gosub, EndoLoops
}
return

EndoLoops:
GuiControl, Text, MineNumText, Starting to Cycle
loop, %NumCycles% {
	GuiControl, Text, CycleLowerText, Cycle %EndoCycle% of %NumCycles%
	loop {
		Sleep, 500
; search for black, it's pretty unique
; Need to modify, click again if it doesn't contain BOTH whitish and black
; This works for sharpenning sticks, and the Barrel grinder
; Doesn't work for mining gems, or for Digs.
	PixelSearch, Px, Py, Searchleft, Searchtop, Searchright, Searchbottom, 0x000000, 10
		if (ErrorLevel = 1 and WinActive("eGenesis Client"))
		{
	; Black not found
			break
		}
	PixelSearch, Px, Py, Searchleft, Searchtop, Searchright, Searchbottom, 0x88DCEF, 50
		if (ErrorLevel = 1 and WinActive("eGenesis Client"))
		{
	; Whitish not found
			break
		}

;	GuiControl, Text, DebugText, Looping, B&W found %widthOffset%, 140, %winWidth%, 150
	}
	MouseGetPos, OldMX, OldMY
	;BlockInput, Mouse
	MouseClick, left, %TargetX%, %TargetY%,, 0
	MouseMove, %OldMX%, %OldMY%, 0
	EndoCycle++
	;BlockInput, Default
}
Gui, Destroy

return