Author Topic: Пока картинка на экране, есть возможность выполнить действие  (Read 1305 times)

0 Members and 1 Guest are viewing this topic.

SimplY

  • Активный участник
  • ***
  • Posts: 125
    • View Profile
Добрый день!
Ломаю голову и не могу разобраться!

Пока открыто окно с картинкой, есть возможность нажать на ALT и продолжить скрипт. Если окно с картинкой закрывается, то скрипт завершает свою работу HALT.

Code: (clickermann) [Select]
WHILE($check = 1)
   GETSCREEN (6,150,1843,945)
   IF_PICTURE_IN (6,150,1843,945, "событие.bmp", -1, 60)
      $check = 1
      IF(ISKEYDOWN(#ALT) = 1)
         $check = 0
         WAITMS(320)
         LOGWRITE ("Даааааааааааа!")
         WAITMS(20)
         HALT
         WHILE(ISKEYDOWN(#ALT) = 1)
            WAITMS(20)
         END_CYC
      END_IF
      WAITMS(20)
   END_IF
END_CYC

Буду благодарен не только за скрипт с решением проблемы, но и разъяснением, что к чему, чтобы я сам разобрался и понял.

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Code: (clickermann) [Select]
WHILE($check = 1)
    GETSCREEN (6,150,1843,945)
    IF_PICTURE_IN (6,150,1843,945, "событие.bmp", -1, 60)
        $check = 1
        IF(ISKEYDOWN(#ALT) = 1)
            $check = 0
            WAITMS(320)
            LOGWRITE ("Даааааааааааа!")
            WAITMS(20)
            HALT
            WHILE(ISKEYDOWN(#ALT) = 1)
                WAITMS(20)
            END_CYC
        END_IF
        WAITMS(20)
    ELSE // если картинка не найдена
        HALT
    END_IF
END_CYC