Помогите, всю голову сломал!!!

[Kingbobkov]

Доброго времени суток, это снова я
Последнее время все чаще чувствую себя деревянным
Не могу в этот скрипт прекрасно работающий
[spoiler]$x=864    // Кнопка Вверх
$y=520    // Кнопка Вверх

$x2=758   // Закрыть окно результата
$y2=346   // Закрыть окно результата

$x3=829   // Окно вводда
$y3=188   // Окно вводда
 
$count = 0
 
DBLCLICK($x3,$y3)
WAITMS(50)
 
KEYSTRING("1")
WAITMS(50)
 
LCLICK($x,$y) // Кликаем по координатам
WAITMS(50)
 
$check = 0
WHILE($check = 0) // Ждем картинки и как только одна из двух появится делать следующие действия
   GETSCREEN
   IF_PICTURE_IN (543,377, 701,486, "1.bmp", -1, 100) // Если нашли картинку №1 то  закрываем окно с координатами х2,у2 и в начало
      WAIT(1)
      LCLICK($x2,$y2)
      $check = 1
      WAIT(1)
   ELSE
      IF_PICTURE_IN (543,377, 701,486, "2.bmp", -1, 100) // Если нашли картинку №2 то  закрываем окно с координатами х2,у2  вводим текст в х3,у3 и кликаем в х,у.
         WAIT(3)
         LCLICK($x2,$y2)
         WAIT(1)
         DBLCLICK($x3,$y3)
         WAITMS(50)
 
         INC($count,1)
         SWITCH($count)
         CASE(1)
            KEYSTRING("3")
         CASE(2)
            KEYSTRING("9")
         CASE(3)
            KEYSTRING("18")
                             
            $check = 1
         DEFAULT
         END_SWITCH
         WAITMS(50)
 
         LCLICK($x,$y)
         WAITMS(500)
      ELSE
         WAITMS(50)
      END_IF
   END_IF
END_CYC[/spoiler]
Вставить этот
[spoiler]GETSCREEN

IF_PICTURE_IN (237,327, 712,511, "Ошибка.bmp", -1, 100)
  WAIT(1)
  LCLICK(685,356)
  WAIT(1)
  LCLICK(499,65)
ELSE  [/spoiler]
Проблема в том, что время от времени появляется ошибка и все встает.
И проверку надо засунуть в начало перед первым кликом, когда я сам его туда вставляю
то скрипт не работает или работает честично.
Помогите убогому

[Kingbobkov]

  Спасибо, бай бог здоровья
Буду побывать.

[Kingbobkov]

  не работает. Появляется ошибка и все встаёт.
Без потока срабатывает, если отдельно запускать находит и кликакт, если просто ставлю

Code: [Select]

THREAD(thr_name)// поток
   // тело потока
 END_THREAD Не работает.

[Vint]

Версия программы у тебя какая? Надеюсь 4.11 003

[Kingbobkov]

Кликер 4.11.003

[Золотой]

ну значит сектор поиска задан неверно или картинка ошибки несоответствует , той которая появляется.
возможно нужно предварительно навести курсор на кнопку, а потом только проходят клики?

[Kingbobkov]

Если так то все работает

Code: [Select]

GETSCREEN
IF_PICTURE_IN (237,327, 712,511, "Ошибка.bmp", -1, 100)
  WAIT(1)
  LCLICK(685,356)
  WAIT(1)
  LCLICK(499,65)
END_IF     Как только вставляются в поток все бездействует.

[Vint]

Ты покажи как вставляешь. И куда вставляешь.

[Kingbobkov]

Вот так весь скрипт работает, но при появлении ошибки зависает.

Code: [Select]

$x=864    // Кнопка Вверх
$y=520    // Кнопка Вверх
 
$x2=758   // Закрыть окно результата
$y2=346   // Закрыть окно результата
 
$x3=829   // Окно вводда
$y3=188   // Окно вводда
 
$count = 0
 
DBLCLICK($x3,$y3)
WAITMS(50)
 
KEYSTRING("1")
WAITMS(50)
 
LCLICK($x,$y) // Кликаем по координатам
WAITMS(50)
 
$check = 0
WHILE($check = 0) // Ждем картинки и как только одна из двух появится делать следующие действия
   GETSCREEN
   IF_PICTURE_IN (543,377, 701,486, "1.bmp", -1, 100) // Если нашли картинку №1 то  закрываем окно с координатами х2,у2 и в начало
      WAIT(1)
      LCLICK($x2,$y2)
      $check = 1
      WAIT(1)
   ELSE
      IF_PICTURE_IN (543,377, 701,486, "2.bmp", -1, 100) // Если нашли картинку №2 то  закрываем окно с координатами х2,у2  вводим текст в х3,у3 и кликаем в х,у.
         WAIT(3)
         LCLICK($x2,$y2)
         WAIT(1)
         DBLCLICK($x3,$y3)
         WAITMS(50)
 
         INC($count,1)
         SWITCH($count)
         CASE(1)
            KEYSTRING("3")
         CASE(2)
            KEYSTRING("9")
         CASE(3)
            KEYSTRING("18")                               
            $check = 1
         DEFAULT
         END_SWITCH
         WAITMS(50)
 
         LCLICK($x,$y)
         WAITMS(500)
      ELSE
         WAITMS(50)
      END_IF
   END_IF
END_CYC
 
THREAD(thr_name)// поток
   // тело потока
 GETSCREEN
IF_PICTURE_IN (237,327, 712,511, "Ошибка.bmp", -1, 100)
  WAIT(1)
  LCLICK(685,356)
  WAIT(1)
  LCLICK(499,65)
END_IF 
 waitms(70) // задержка для разгрузки CPU
END_THREAD Если включать только поис ошибки то находит и кликает

Code: [Select]

GETSCREEN
IF_PICTURE_IN (237,327, 712,511, "Ошибка.bmp", -1, 100)
  WAIT(1)
  LCLICK(685,356)
  WAIT(1)
  LCLICK(499,65)
END_IF   

[Vint]

Странно всё это. У меня никаких ошибок нет.

Проблема в том, что время от времени появляется ошибка и все встает.

А ошибку то какую выдаёт?


Если это весь скрипт, то и потоки здесь ни к чему. Поиск картинки-ошибки вставить в череду поиска первых двух.
Можно первой.
И все дела.

Code: (clickermann) [Select]

$x=864    // Кнопка Вверх
$y=520    // Кнопка Вверх

$x2=758   // Закрыть окно результата
$y2=346   // Закрыть окно результата

$x3=829   // Окно вводда
$y3=188   // Окно вводда

$count = 0

DBLCLICK($x3,$y3)
WAITMS(50)

KEYSTRING("1")
WAITMS(50)

LCLICK($x,$y) // Кликаем по координатам
WAITMS(50)

$check = 0
WHILE($check = 0) // Ждем картинки и как только одна из двух появится делать следующие действия
   GETSCREEN
   IF_PICTURE_IN (237,327, 712,511, "Ошибка.bmp", -1, 100)
      WAIT(1)
      LCLICK(685,356)
      WAIT(1)
      LCLICK(499,65)
      WAITMS(500)
   ELSE
      IF_PICTURE_IN (543,377, 701,486, "1.bmp", -1, 100) // Если нашли картинку №1 то  закрываем окно с координатами х2,у2 и в начало
         WAIT(1)
         LCLICK($x2,$y2)
         $check = 1
         WAIT(1)
      ELSE
         IF_PICTURE_IN (543,377, 701,486, "2.bmp", -1, 100) // Если нашли картинку №2 то  закрываем окно с координатами х2,у2  вводим текст в х3,у3 и кликаем в х,у.
            WAIT(3)
            LCLICK($x2,$y2)
            WAIT(1)
            DBLCLICK($x3,$y3)
            WAITMS(50)
           
            INC($count,1)
            SWITCH($count)
            CASE(1)
               KEYSTRING("3")
            CASE(2)
               KEYSTRING("9")
            CASE(3)
               KEYSTRING("18")
               $check = 1
            DEFAULT
            END_SWITCH
            WAITMS(50)
           
            LCLICK($x,$y)
            WAITMS(500)
         ELSE
            WAITMS(50)
         END_IF
      END_IF
   END_IF
END_CYC

[Kingbobkov]

Спасибо за помощь, буду пробывать.