Opt("TrayAutoPause", 0)
Opt("MouseCoordMode", 0)
Opt("WinTitleMatchMode", 2)
#include <File.au3>
$logfile = "c:\log\twslogin2" & @YEAR & @MON & @MDAY & ".txt"

TraySetIcon("Shell32.dll", 180)
_FileWriteLog($logfile, "Starting")
; Live mode
While 1
	;If (((@HOUR = 3 And (@MIN > 15 Or @MIN < 31))) Or (@HOUR = 15 And (@MIN > 15 Or @MIN < 31))) Then
	If 1 Then
		ConsoleWrite("tp0 " & @CRLF);
		Sleep(2000)
		Opt("SendKeyDelay", 500) ;150
		ConsoleWrite("waiting for jave window " & @HOUR & @MIN & @SEC & @CRLF);
		WinWaitActive("[CLASS:SunAwtFrame]", "")
		ConsoleWrite("found for jave window, waiting for exit window " & @HOUR & @MIN & @SEC & @CRLF);
		_FileWriteLog($logfile, "Exit :Session Setting")
		$ret = WinWaitActive("Exit Session Setting", "", 6)
		ConsoleWrite("tp1 " & @CRLF);
		Sleep(2000)
		If ($ret > 0) Then
			ConsoleWrite("found exit window " & @HOUR & @MIN & @SEC & @CRLF);
			If WinExists("Exit Session Setting") Then
				ConsoleWrite("moving windoW " & @HOUR & @MIN & @SEC & @CRLF);
				WinMove("Exit Session Setting", "", 0, 0, 320, 170, 100)
				$hr = @HOUR ;
				If @HOUR > 12 Then
					Beep(3000, 200);
					$hr = @HOUR - 12 ;
				EndIf
				$minutes = @MIN
				;If ($minutes > 55) Then $minutes = 20;
				If ($minutes < 20) Then $minutes = 55;
				ConsoleWrite("right digit " & @CRLF);
				MouseClick("left", 126, 60, 1); right most digit
				Beep(3900, 200);
				;MouseClick("left", 130, 63, 1); right most digit


				Sleep(1000)
				Send("{backspace}" & "{backspace}" & "{backspace}" & "{backspace}" & "{backspace}" & "{backspace}" & "{backspace}" & $hr & ":" & $minutes - 1 & "{enter}");
				MouseClick("left", 131, 150, 1); update
				MouseClick("left", 196, 150, 1); close
				ConsoleWrite("done " & @CRLF);
				Sleep(1000)
				WinMinimizeAll()
				;Exit 8
			Else
				Beep(1500, 20);
				ConsoleWrite("tp4 " & @CRLF);
				Sleep(1000)
				;MsgBox($MB_SYSTEMMODAL, "", "Window does not exist", 2)
				_FileWriteLog($logfile, "Window does not exist")
				;Beep(1500, 500);
			EndIf
		EndIf


		;WinWaitActive("Exit Session Setting")
		;U342054 Exit Session Setting

		;_FileWriteLog($logfile, "Exit Session Setting")
	EndIf
	Sleep(2000)

	; Switch from AM to PM & PM to AM
WEnd;