Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Maza Faka

Ветеран


Сообщения: 604
Благодарности: 133

Профиль | Отправить PM | Цитировать


Frost_Imp
Возвращай из функции значение и на основе этого значения переходи к тому или иному действию, что-то вроде этого:
Код: Выделить весь код
;Здесь у нас GUI
;;;;;;;;;;;;;;;;

;Главный цикл
While 1
    Sleep(100)
WEnd

Func GetBuf()
    Local $time = 0, $err = 0, $p

    While $time <= 5000
        $p = PixelGetColor(1162,434)
        If $p = 0xEBEC76
            $time= $time + 500
            Sleep(500)
        Else
            $err = $err + 1
            $time = $time + 300
            Sleep(300)
        EndIf
    WEnd

    If $err > 0 Then
        Return True
    Else
        Beep(500, 1000)
        Return False
    EndIf
EndFunc
Цитата:
процедуру нужно повторить, скажем, через 5 минут
Используй функции TimerInit(); TimerDiff()

Frost_Imp
Вариант без GUI:
Код: Выделить весь код
While 1
    Local $time = 0, $err = 0, $p

    While $time <= 5000
        $p = PixelGetColor(1162,434)
        If $p = 0xEBEC76 Then
            $time= $time + 500
            Sleep(500)
        Else
            $err = $err + 1
            $time = $time + 300
            Sleep(300)
        EndIf
    WEnd

    If $err = 0 Then
        Beep(500, 1000)
        Exit
    EndIf

    Sleep(1000 * 300) ;Пауза 5 мин.
WEnd

-------
Сообщение помогло? Не забудьте нажать на Полезное сообщение


Отправлено: 15:07, 08-10-2008 | #973