acid/GP-Tools-AHK
1
0
Fork 0
Code Issues Pull Requests Releases Activity

EPS & Home visits - loops until search target found

Browse Source 
Quicksearch - HRT and HTN guidelines
Textexpansions - Gabapentin dosing
Referral letter - first draft, not working
This commit is contained in:
Sean Cusack
2022-08-11 17:45:53 +01:00
parent e62940c2af
commit f9c02613b8
5 changed files with 127 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
includes/PrintHomeVisitsImageSearch.ahk
View File

@@ -18,10 +18,15 @@ SetBatchLines -1
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)
Loop, 10
{
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)
Sleep, 100
}
Until ErrorLevel = 0
If (ErrorLevel)
{
MsgBox, 0, , Couldn't find the home visit icon
@@ -30,16 +35,22 @@ If (ErrorLevel)
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)
;Sleep, 300
Loop, 20
{
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
Sleep, 100
}
Until ErrorLevel = 0
If (ErrorLevel)
{
MsgBox, 0, , Couldn't find Spanner Icon
Return
}
VisitsY := FoundY+50
Click, %FoundX%, %VisitsY% Left, 1
Sleep, 10
@@ -55,7 +66,7 @@ Loop, 18
Send, {Down}
}
Send, {Enter}
Sleep, 300
Sleep, 500
CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary.png
@@ -64,10 +75,10 @@ If (ErrorLevel = 0)
FoundY := FoundY-100
Click, %FoundX%, %FoundY% Left, 1
Sleep, 10
Loop, 50
Loop, 30
{
Send, {PgDn}
Sleep, 100
Sleep, 150
CoordMode, Pixel, Screen
CoordMode, Mouse, Screen
ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary_entry.png