; This script was created using Pulover's Macro Creator
; www.macrocreator.com

#NoEnv
SetWorkingDir %A_ScriptDir%
CoordMode, Mouse, Screen
SendMode Input
#SingleInstance Force
SetTitleMatchMode 2
#WinActivateForce
SetControlDelay 1
SetWinDelay 0
SetKeyDelay -1
SetMouseDelay -1
SetBatchLines -1

; UserGlobalVars

F18::
PrintHomeVisits:
CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
ImageSearch, FoundX, FoundY, 893, 661, 2455, 1439, assets\homevisits\home_visit_icon.png
CenterImgSrchCoords("assets\homevisits\home_visit_icon.png", FoundX, FoundY)
If (ErrorLevel)
{
    MsgBox, 0, , Couldn't find the home visit icon
    Return
}
FoundX := FoundX + 43
Click, %FoundX%, %FoundY% Left, 2
Sleep, 10
Sleep, 300
CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_wrench.png
CenterImgSrchCoords("assets\homevisits\home_visit_wrench.png", FoundX, FoundY)
If (ErrorLevel)
{
    MsgBox, 0, , Couldn't find Spanner Icon
    Return
}
VisitsY := FoundY+50
Click, %FoundX%, %VisitsY% Left, 1
Sleep, 10
Loop, 10
{
    Send, +{Down}
}
Click, %FoundX%, %FoundY% Left, 1
Sleep, 10
Sleep, 300
Loop, 18
{
    Send, {Down}
}
Send, {Enter}
Sleep, 300
CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary.png
If (ErrorLevel = 0)
{
	FoundY := FoundY-100
	Click, %FoundX%, %FoundY% Left, 1
	Sleep, 10
	Loop, 50
	{
		Send, {PgDn}
		Sleep, 100
		CoordMode, Pixel, Screen
		CoordMode, Mouse, Screen
		ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary_entry.png
		If (ErrorLevel = 0)
		{
			Click, %FoundX%, %FoundY% Left, 2
			Sleep, 10
			Break
		}
	}
}
Else
{
    MsgBox, 0, , Couldn't find Name title in Summary Printout Window
}
Return