поиск нескольких картинок и отправка сообщения

While 1
    $res = _ImageSearch("test.bmp",1,$x, $y,100)
    If $res = 1 Then
		MouseClick('left',$x, $y,1)
Sleep(1000)
ControlClick ( "[Class:TEdit;Instance:1]", "", "TEdit", "left", 1, 68, 37)
Sleep(9999)
Send ('111')
Sleep(999)
Send ('{enter}')
		MsgBox(0,"Нашли","Ура",1)
Sleep(9999)
		ExitLoop


    Else
        MsgBox(0, "Зависли", "Поиск",1)
		Sleep(9999)
ExitLoop
    EndIf

	WEnd