If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)

Global $Paused
HotKeySet("{F4}", "TogglePause")
HotKeySet("{F3}", "Terminate")

if WinExists ( "Mortal Lockpick" , "" ) then
	WinActivate( "Mortal Lockpick", "" )
elseif WinExists ( "MortalGame", "" ) then
	WinSetTitle ( "MortalGame","", "Mortal Lockpick" )
	WinActivate( "Mortal Lockpick", "" )
else
MsgBox(0, "ERROR", "No MO window found")
endif

TogglePause()
Lockpick()

Func Lockpick()
	While 1
		Sleep(10)
		$acoord = PixelSearch(1160, 646, 1445, 646, 0xEA6D6C, 1)
		If Not @error Then
			Sleep(10)
			MouseClick("Left")
			Sleep(10)
			TogglePause()
		Else
			Sleep(10)
		EndIf
	WEnd
EndFunc

Func TogglePause()
	$Paused = NOT $Paused
	ToolTip("Script is Paused",0,0)
	While $Paused
		Sleep(100)
	WEnd
	ToolTip("")
EndFunc

Func Terminate()
	WinSetTitle ( "Mortal Lockpick","", "MortalGame" )
	Exit 0
EndFunc