Added referral safeguards, second background colour for home visit searches, more text shortcuts (both inline and via quicksearch)

Launcher.ahk

@@ -26,6 +26,7 @@ IniRead, EPSPin, config\secure\main_secure.ini, EPS, Pin
 #Include includes\PrintHomeVisitsImageSearch.ahk
 #Include includes\EPS.ahk
 #Include includes\SignAcuteIssue.ahk
+#Include includes\ReferralSafeguard.ahk
 
 ; Reload Script after changes (Ctrl + F1)
 ^F1::

includes/PrintHomeVisitsImageSearch.ahk

@@ -79,7 +79,7 @@ If (ErrorLevel = 0)
 	Loop, 30
 	{
 		Send, {PgDn}
-		Sleep, 150
+		Sleep, 20
 		CoordMode, Pixel, Screen
 		CoordMode, Mouse, Screen
 		ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary_entry.png
@@ -89,6 +89,13 @@ If (ErrorLevel = 0)
 			Sleep, 10
 			Break
 		}
+		ImageSearch, FoundX, FoundY, 0, 0, 2560, 1440, assets\homevisits\home_visit_summary_entry_white.png
+		If (ErrorLevel = 0)
+		{
+			Click, %FoundX%, %FoundY% Left, 2
+			Sleep, 10
+			Break
+		}
 	}
 }
 Else

includes/QuickSearch.ahk

@@ -19,6 +19,15 @@ url_shortcuts["can"]	:= "https://www.nice.org.uk/guidance/ng12/chapter/Recommend
 url_shortcuts["hrt"]	:= "https://d2931px9t312xa.cloudfront.net/menopausedoctor/files/information/229/Easy`%20HRT`%20prescribing`%20guide.pdf"
 url_shortcuts["htn"]	:= "https://www.england.nhs.uk/london/wp-content/uploads/sites/8/2019/11/NICE-NG136-Visual-Summary.pdf"
 url_shortcuts["abx"]	:= "https://gmmmg.nhs.uk/wp-content/uploads/2022/06/GM-Antimicrobial-guidelines-Apr-2022-v11.0-FINAL.pdf"
+url_shortcuts["bsc"]	:= "https://upload.wikimedia.org/wikipedia/commons/a/a7/BristolStoolChart_%28cropped%29.png"
+url_shortcuts["rag"]	:= "https://gmmmg.nhs.uk/rag-category/adult/"
+url_shortcuts["amgp"]	:= "https://nhs.askmygp.uk/"
+url_shortcuts["copd"]	:= "https://gmmmg.nhs.uk/wp-content/uploads/2021/11/COPD-Treatment-Guideline-Sept-2021-V7.pdf"
+url_shortcuts["asthma"]	:= "https://gmmmg.nhs.uk/wp-content/uploads/2022/04/GM-asthma-guideline-2022-V8-for-web.pdf"
+url_shortcuts["diab"]	:= "https://www.nice.org.uk/guidance/ng28/resources/visual-summary-full-version-choosing-medicines-for-firstline-and-further-treatment-pdf-10956472093"
+url_shortcuts["tmj"]	:= "https://www.ouh.nhs.uk/patient-guide/leaflets/files/12128Ptmj.pdf"
+; url_shortcuts[""]	:= ""
+
 
 if (url_shortcuts.hasKey(vQuery)) {
 	path := url_shortcuts[vQuery]

includes/ReferralSafeguard.ahk

@@ -0,0 +1,39 @@
+; This script was created using Pulover's Macro Creator
+; www.macrocreator.com
+
+
+
+F22::
+referral_file := "C:\Sean\AHK\referrals\referrals.txt"
+referral_historical := "C:\Sean\AHK\referrals\historical.txt"
+WinActivate, SystmOne GP ahk_class SunAwtFrame
+Sleep, 333
+MouseGetPos, cur_mouse_x, cur_mouse_y
+CoordMode, Pixel, Screen
+Click, 2199, 70 Left, Down
+Sleep, 10
+CoordMode, Pixel, Screen
+Click, 2493, 70 Left, Up
+Sleep, 10
+Send, ^c
+Click, Left, 1
+Sleep, 10
+/*
+Click, %cur_mouse_x%, %cur_mouse_y%, 0
+Sleep, 10
+*/
+FormatTime, cur_timestamp, , yy-MM-dd HH:mm
+/*
+MsgBox, 0, , %cur_timestamp% - %clipboard%
+*/
+Sleep, 500
+CurrentKeyDelay := A_KeyDelay
+SetKeyDelay, 200
+SendEvent, ^5 ^6 {APPSKEY} !o
+SetKeyDelay, %CurrentKeyDelay%
+FileAppend, %cur_timestamp% - %clipboard%`n, %referral_file%
+FileAppend, %cur_timestamp% - %clipboard%`n, %referral_historical%
+Return
+
+F21::
+Run, notepad.exe %referral_file%

includes/TextExpansions.ahk

@@ -104,12 +104,13 @@ I have booked the following face to face appointment for you:
 
 x AM with x at Pennygate Medical Centre TODAY.
 
-Please wear a mask, and please do a covid lateral flow test before attending. If it is positive please do not attend and instead make contact again with the surgery. 
 Please contact the surgery if you are unable to attend this appointment.
 )
 SendInput %response%
 return
 
+;; Please wear a mask, and please do a covid lateral flow test before attending. If it is positive please do not attend and instead make contact again with the surgery. 
+
 ::sn.::
 SendInput safety netted to get back in touch if not improving or worsening
 return
@@ -146,14 +147,23 @@ return
 SendInput Take 1 capsule daily, increase to twice daily after 1 week and three times daily after another week
 return
 
+
 ::sig.::
 SendInput !n
 SendInput !p
 Sendinput !p
-sleep 200
+sleep 2000
-ClipboardSaved := Clipboard
+;ClipboardSaved := Clipboard
+sleep 50
 Clipboard := "\\AGMH2RESCIFS01.resources.greatermanchestercsu.nhs.uk\CIFS_WBCCG_GPs\P92016\HOME\Sean.Cusack\My Documents\signature_small.jpg"
-SendInput ^v
+sleep 100
+SendInput {Ctrl down}
+sleep 50
+SendInput v
+sleep 50
+SendInput {Ctrl up}
+sleep 50
 SendInput {Enter}
-Clipboard := ClipboardSaved
+sleep 200
+;Clipboard := ClipboardSaved
 return