Что нового

Цикл для команды

nikitos200

Новичок
Сообщения
3
Репутация
0
Всем привет! Набросал код
Код:
HotKeySet("{ESC}","_esc") ; ESC - выйти

While 1


MouseClick("left", 1094, 732, 1)
Send("^a")
Send ( "0" )
Sleep(10)
MouseClick("left", 938, 988, 1)
Sleep(50)
Sleep(10000)

PixelSearch(662,123,1251,199,0xFF0000,150)

If Not @error Then
	MouseClick("left", 1209, 478, 1)
	Sleep(10000)
 EndIf


 If @error Then
	  MouseClick("left", 972, 476, 1)
	Sleep(100)
	EndIf

WEnd

Func _esc()
   Exit
EndFunc


Как теперь сделать, чтобы кусок
Код:
If Not @error Then
	MouseClick("left", 1209, 478, 1)
	Sleep(10000)
 EndIf

Выполнялся в цикле, пока не повится @error отсюда
Код:
PixelSearch(662,123,1251,199,0xFF0000,150)
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
nikitos200 [?]
Выполнялся в цикле, пока не повится @error отсюда
Код:
PixelSearch(662,123,1251,199,0xFF0000,150)

While Not @error
   MouseClick("left", 1209, 478, 1)
   Sleep(10000)
WEnd
 
Автор
N

nikitos200

Новичок
Сообщения
3
Репутация
0
Garrett сказал(а):
nikitos200 [?]
Выполнялся в цикле, пока не повится @error отсюда
Код:
PixelSearch(662,123,1251,199,0xFF0000,150)

While Not @error
   MouseClick("left", 1209, 478, 1)
   Sleep(10000)
WEnd

Дело в том, что при таком коде, этот кусок
Код:
While Not @error
   MouseClick("left", 1209, 478, 1)
   Sleep(10000)
WEnd

уходит в бесконечный цикл, т.к он не получает новое значение error (надеюсь правильно объяснил)



Добавлено:
Сообщение автоматически объединено:

Выкрутился вот так
Код:
PixelSearch(662,123,1251,199,0xFF0000,150)

While Not @error
   PixelSearch(662,123,1251,199,0xFF0000,150)
   If @error Then
	  ExitLoop
	EndIf
   MouseClick("left", 1209, 478, 1)
   PixelSearch(662,123,1251,199,0xFF0000,150)
   Sleep(10000)
WEnd
 
Верх