Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: Разумист on September 01, 2019, 05:01:18 PM

Title: Помогите оптимизировать код.
Post by: Разумист on September 01, 2019, 05:01:18 PM
Постоянная область для сканирования (0,1014, 66,1079), здесь появляются картинки 1, 2, 3.
Если появляется картинка 1 нажимается кнопка 1 на клавиатуре
Если появляется картинка 2 нажимается кнопка 2
Если появляется картинка 3 нажимается кнопка 3
Картинки появляются случайным образом, т.е может появиться картинка 2(нажать 2), картинка 1(нажать 1), и что бы постоянно ожидалась картинка и нажималась соответствующая кнопка.

Code: [Select]
$check = 0
WHILE($check = 0)
   GETSCREEN (0,1014, 66,1079)
   IF_PICTURE_IN (0,1014, 66,1079, "1.bmp", -1, 100)
      $check = 1
      KEYPRESS(#1)
      WAITMS(100)
   END_IF
END_CYC

else

$check = 0
WHILE($check = 0)
   GETSCREEN (0,1014, 66,1079)
   IF_PICTURE_IN (0,1014, 66,1079, "2.bmp", -1, 100)
      $check = 1
      KEYPRESS(#2)
      WAITMS(100)
   END_IF
END_CYC

else

$check = 0
WHILE($check = 0)
   GETSCREEN (0,1014, 66,1079)
   IF_PICTURE_IN (0,1014, 66,1079, "3.bmp", -1, 100)
      $check = 1
      KEYPRESS(#3)
      WAITMS(100)
   END_IF
END_CYC

else

halt

Code: (clickermann) [Select]
// Клавиша   |   Константа   |   10-ный код
// 0         |   #0          |   48
// 1         |   #1          |   49
// 2         |   #2          |   50
// 3         |   #3          |   51
// и т.д.

GETSCREEN (0, 1014, 66, 1079)
FOR($i = 1, $i < 4)
   IF_PICTURE_IN (0, 1014, 66, 1079, STRCONCAT($i, ".bmp"), -1, 100)
      KEYPRESS(48+$i)
      WAITMS(100)
   END_IF 
END_CYC

HALT
Спасибо :)
Title: Re: Помогите оптимизировать код.
Post by: Космич on September 01, 2019, 05:12:37 PM
Code: (clickermann) [Select]
// Клавиша   |   Константа   |   10-ный код
// 0         |   #0          |   48
// 1         |   #1          |   49
// 2         |   #2          |   50
// 3         |   #3          |   51
// и т.д.

GETSCREEN (0, 1014, 66, 1079)
FOR($i = 1, $i < 4)
   IF_PICTURE_IN (0, 1014, 66, 1079, STRCONCAT($i, ".bmp"), -1, 100)
      KEYPRESS(48+$i)
      WAITMS(100)
   END_IF 
END_CYC

HALT