chore: various tweaks

Author: sircharlo

Includes/MeetingAutomation.au3

@@ -76,10 +76,13 @@ EndFunc   ;==>_SetDuringMeetingSettings
 
 ; Checks current time against meeting schedule and applies appropriate settings
 ; @param $meetingTime - Scheduled meeting time in HH:MM format
+; Checks current time against meeting schedule and applies appropriate settings
+; @param $meetingTime - Scheduled meeting time in HH:MM format
+; @return Integer - Recommended sleep time in milliseconds before next check
 Func CheckMeetingWindow($meetingTime)
-	If $meetingTime = "" Then Return
+	If $meetingTime = "" Then Return 60000
 
-	Local $secondsToWait = 5     ; Default interval between checks
+	Local $nextCheckDelay = 5000     ; Default interval between checks
 
 	; Parse meeting time
 	Local $aParts = StringSplit($meetingTime, ":")
@@ -101,30 +104,45 @@ Func CheckMeetingWindow($meetingTime)
 				$g_PrePostSettingsConfigured = True
 			EndIf
 		EndIf
+		$nextCheckDelay = 5000
 
 	ElseIf $nowMin = ($meetingMin - $MEETING_START_WARNING_MINUTES) Then
 		; Meeting start window (1 minute before meeting)
 		If Not $g_DuringMeetingSettingsConfigured Then
-			If Not _GetZoomWindow() Then Return
+			If Not _GetZoomWindow() Then Return 1000 ; Retry quickly if window not found
 			_SetDuringMeetingSettings()
 			$g_DuringMeetingSettingsConfigured = True
 		EndIf
+		$nextCheckDelay = 5000
 
 	ElseIf $nowMin >= $meetingMin Then
 		; Meeting already started
 		Local $minutesAgo = $nowMin - $meetingMin
 		If $minutesAgo <= 120 Then
 			Debug(t("INFO_MEETING_STARTED_AGO", $minutesAgo), "INFO", $g_InitialNotificationWasShown)
+			$nextCheckDelay = 30000 ; Check every 30 seconds if meeting already started
 		Else
 			Debug(t("INFO_OUTSIDE_MEETING_WINDOW"), "INFO", $g_InitialNotificationWasShown)
+			$nextCheckDelay = 60000 ; Check every minute
 		EndIf
-		$secondsToWait = 30 ; Check every 30 seconds if meeting already started
+
 	Else
 		; Too early - show countdown to meeting
 		Local $minutesLeft = $meetingMin - $nowMin
-		Debug(t("INFO_MEETING_STARTING_IN", $minutesLeft), "INFO", $g_InitialNotificationWasShown)
+
+		If $minutesLeft > 60 Then
+			; If > 1 hour away, check every minute
+			; Only log if it's the first run to show we are alive, otherwise silence
+			If Not $g_InitialNotificationWasShown Then
+				Debug(t("INFO_MEETING_STARTING_IN", $minutesLeft), "INFO")
+			EndIf
+			$nextCheckDelay = 60000
+		Else
+			Debug(t("INFO_MEETING_STARTING_IN", $minutesLeft), "INFO", $g_InitialNotificationWasShown)
+			$nextCheckDelay = 5000
+		EndIf
 	EndIf
 
-	Sleep($secondsToWait * 1000)
 	$g_InitialNotificationWasShown = True
+	Return $nextCheckDelay
 EndFunc   ;==>CheckMeetingWindow

ZoomMate.au3

@@ -75,6 +75,7 @@ TraySetIcon($g_TrayIcon)
 $oUIAutomation = ObjCreateInterface($sCLSID_CUIAutomation, $sIID_IUIAutomation, $dtagIUIAutomation)
 If Not IsObj($oUIAutomation) Then
 	Debug("Failed to create UIAutomation COM object.", "UIA")
+	MsgBox(16 + 262144, "ZoomMate - Critical Error", "Failed to create UIAutomation COM object." & @CRLF & "Please ensure UIA prerequisites are met.")
 	Exit
 EndIf
 Debug("UIAutomation COM created successfully.", "UIA")
@@ -84,6 +85,7 @@ $oUIAutomation.GetRootElement($pDesktop)
 $oDesktop = ObjCreateInterface($pDesktop, $sIID_IUIAutomationElement, $dtagIUIAutomationElement)
 If Not IsObj($oDesktop) Then
 	Debug(t("ERROR_GET_DESKTOP_ELEMENT_FAILED"), "ERROR")
+	MsgBox(16 + 262144, "ZoomMate - Critical Error", t("ERROR_GET_DESKTOP_ELEMENT_FAILED"))
 	Exit
 EndIf
 Debug("Desktop element obtained.", "UIA")
@@ -106,30 +108,37 @@ _InitDayLabelMaps()
 ; MAIN APPLICATION LOOP
 ; ================================================================================================
 
+; Initialize loop variables
+Global $today
+Global $timeNow
+Global $sleepTime = 5000
+
 While True
 	; Handle tray icon events
 	TrayEvent()
 
 	; Check if day has changed to reset automation flags
-	Global $today = @WDAY
+	$today = @WDAY
 	If $today <> $previousRunDay Then
 		Debug("New day detected. Resetting configuration flags.", "VERBOSE")
 		$previousRunDay = $today
 		$g_PrePostSettingsConfigured = False
 		$g_DuringMeetingSettingsConfigured = False
 	EndIf
 
-	Global $timeNow = _NowTime(4) ; Get current time in HH:MM format
+	$timeNow = _NowTime(4) ; Get current time in HH:MM format
 
 	; Check if today is a scheduled meeting day
 	If $today = Number(GetUserSetting("MidweekDay")) Then
-		CheckMeetingWindow(GetUserSetting("MidweekTime"))
+		$sleepTime = CheckMeetingWindow(GetUserSetting("MidweekTime"))
 	ElseIf $today = Number(GetUserSetting("WeekendDay")) Then
-		CheckMeetingWindow(GetUserSetting("WeekendTime"))
+		$sleepTime = CheckMeetingWindow(GetUserSetting("WeekendTime"))
 	Else
 		; Not a meeting day - wait 1 minute before checking again
 		Debug(t("INFO_NO_MEETING_SCHEDULED"), "INFO", $g_InitialNotificationWasShown)
 		$g_InitialNotificationWasShown = True
-		Sleep(60000)
+		$sleepTime = 60000
 	EndIf
+
+	Sleep($sleepTime)
 WEnd