Skrypt nie chce się uruchomić

[kociaczek]

Mógłby ktoś powiedzieć co tutaj jest źle? Szukam i szukam i nie mam pomysłu co zrobić (dopiero się uczę). Gdy uruchamiam skrypt (Run script) to mi mruga na systray-u i znika.

#include <ImageSearch.au3>

HotKeySet("/", "checkForImage")

Global $y = 0, $x = 0

Func checkForImage()
	MouseClick("Left", 1391, 757, 0)
	Sleep(300)
	Local $search2 = _ImageSearch('2.bmp', 0, $x, $y, 0)
	If $search2 = 1 Then
		MouseClick("Left", $x, $y, 0)
		Sleep(300)
	Else
		Local $search3 = _ImageSearch('3.bmp', 0, $x, $y, 0)
		If $search3 = 1 Then
			MouseClick("Left", $x, $y, 0)
			Sleep(300)
		Else
			Local $search4 = _ImageSearch('4.bmp', 0, $x, $y, 0)
			If $search4 = 1 Then
				MouseClick("Left", $x, $y, 0)
				Sleep(300)
			Else
				Local $search5 = _ImageSearch('5.bmp', 0, $x, $y, 0)
				If $search5 = 1 Then
					MouseClick("Left", $x, $y, 0)
					Sleep(300)
				Else
					Local $search6 = _ImageSearch('6.bmp', 0, $x, $y, 0)
					If $search6 = 1 Then
						MouseClick("Left", $x, $y, 0)
						Sleep(300)
					EndIf
				EndIf
			EndIf
		EndIf
	EndIf
EndFunc   ;==>checkForImage

[Pawellek]

Nie masz petli ktora by podtrzymywala program "przy zyciu".

#include <ImageSearch.au3>

HotKeySet("/", "checkForImage")

Global $y = 0, $x = 0

While 1
Sleep(100)
WEnd

Func checkForImage()
	MouseClick("Left", 1391, 757, 0)
	Sleep(300)
	Local $search2 = _ImageSearch('2.bmp', 0, $x, $y, 0)
	If $search2 = 1 Then
		MouseClick("Left", $x, $y, 0)
		Sleep(300)
	Else
		Local $search3 = _ImageSearch('3.bmp', 0, $x, $y, 0)
		If $search3 = 1 Then
			MouseClick("Left", $x, $y, 0)
			Sleep(300)
		Else
			Local $search4 = _ImageSearch('4.bmp', 0, $x, $y, 0)
			If $search4 = 1 Then
				MouseClick("Left", $x, $y, 0)
				Sleep(300)
			Else
				Local $search5 = _ImageSearch('5.bmp', 0, $x, $y, 0)
				If $search5 = 1 Then
					MouseClick("Left", $x, $y, 0)
					Sleep(300)
				Else
					Local $search6 = _ImageSearch('6.bmp', 0, $x, $y, 0)
					If $search6 = 1 Then
						MouseClick("Left", $x, $y, 0)
						Sleep(300)
					EndIf
				EndIf
			EndIf
		EndIf
	EndIf
EndFunc   ;==>checkForImage