Topics

1

Общие вопросы / запомнить координаторы клика

« on: September 30, 2017, 10:32:09 AM »

Ребята подскажите можно ли запомнить координаты найденной картинки, и вызывать их(кликать по ним) потом в любом месте скрипта?Если да подскажите как реализовать?
ну например:

Code: [Select]

  $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "mifpodtver.bmp", -1, 95) // ищем выход
         LCLICK($_return1+3, $_return2+3)//                     вот эти координаторы использовать в последующем без поиска картинки(кликать на них) 
         WAIT(1)
      ELSE
         $check = 1
         WAITMS(50)
      END_IF
   END_CYCСпасибо.

2

Использование / Почему не делает заданное количество раз?

« on: September 25, 2017, 10:55:41 PM »

Code: [Select]

MOVE(10,10)

SUB(blic)
   $ch = 0
   WHILE($ch = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzemblic.bmp", -1, 95) // блиц
         FOR($A=0, $A<2)
            MOVE($_return1+9, $_return2+9)
            WAITMS(50)
            LOGWRITE ("нашел блиц")
            $ch = 1
         END_CYC
      ELSE
         WAITMS(50)
         LOGWRITE ("no блиц суб")
      END_IF
     
   END_CYC
END_SUB


$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzemka.bmp", -1, 95) // клик на подземку
      MOVE($_return1+9, $_return2+9)
      WAITMS(50)
      LOGWRITE ("нашел подземку")
      $check = 1
   ELSE
      WAITMS(50)
      LOGWRITE ("no подземка")
   END_IF
END_CYC
blic()

$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzeml.bmp", -1, 95) // клик на 2 клетку
      MOVE($_return1+225, $_return2+9)
      WAITMS(50)
      LOGWRITE ("нашел 2 клетку")
      $check = 1
   ELSE
      WAITMS(50)
      LOGWRITE ("no 2 клетка")
   END_IF
END_CYC



FOR($a=0, $a < 10)// -------------------------------------> без FOR работает тело хорошо, нужно чтоб 10 раз сделал, а с ним делает сам по себе сколько захочет
   
   $check1 = 0
   WHILE($check1 = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzemblic.bmp", -1, 95) // проверка горит ли блиц
         WAITMS(50)
         LOGWRITE ("блиц горит иду дальше")
         $check1 = 1
         
         $check = 0
         WHILE($check = 0)
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzeml.bmp", -1, 95) // клик на 2 клетку
               MOVE($_return1+225, $_return2+9)
               WAITMS(50)
               LOGWRITE ("нашел 2 клетку")
               $check = 1
            ELSE
               WAITMS(50)
               LOGWRITE ("no 2 клетка")
            END_IF
         END_CYC
         
         blic()
         
         $check = 0
         WHILE($check = 0)
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzeml.bmp", -1, 95) // клик на 1 клетку
               MOVE($_return1+89, $_return2+9)
               WAITMS(50)
               LOGWRITE ("нашел 1 клетку")
               $check = 1
            ELSE
               WAITMS(50)
               LOGWRITE ("no 1 клетки")
            END_IF
         END_CYC
         
         blic()
         
         
      ELSE
         LOGWRITE ("блиц не горит")
         
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (0,0, $_xmax,$_ymax, "blictem.bmp", -1, 95) // проверка на темный
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(6)
               IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzemperex.bmp", -1, 95) // клик на переход
                  MOVE($_return1+9, $_return2+9)
                  WAITMS(50)
                  LOGWRITE ("нашел переход")
                  $check = 1
               ELSE
                  WAITMS(50)
                  LOGWRITE ("no переход")
               END_IF
            END_CYC
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(6)
               IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzemp.bmp", -1, 95) // клик на перелистать
                  for($a=0, $a<3)
                     MOVE($_return1+9, $_return2+9)
                     WAITMS(50)
                     LOGWRITE ("нашел перелистать")
                     $check = 1
                  END_CYC
                 
               ELSE
                  WAITMS(50)
                  LOGWRITE ("no перелистать")
               END_IF
            END_CYC
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(6)
               IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzeml.bmp", -1, 95) // клик на 2 клетку
                  MOVE($_return1+225, $_return2+9)
                  WAITMS(50)
                  LOGWRITE ("нашел 2ю клетку")
                  $check = 1
               ELSE
                  WAITMS(50)
                  LOGWRITE ("no 2ю клетку")
               END_IF
            END_CYC
           
            blic()
           
            $check = 0
            WHILE($check = 0)
               GETSCREEN
               COLORMODE(6)
               IF_PICTURE_IN (0,0, $_xmax,$_ymax, "podzeml.bmp", -1, 95) // клик на 1 клетку
                  MOVE($_return1+89, $_return2+9)
                  WAITMS(50)
                  LOGWRITE ("нашел 1 клетку")
                  $check = 1
               ELSE
                  WAITMS(50)
                  LOGWRITE ("no 1 й клетки")
               END_IF
            END_CYC
            blic()
            $check1 = 1
         ELSE
            WAITMS(50)
            LOGWRITE ("не горит блиц не какой проверяем сначало")
         END_IF
      END_IF
   END_CYC
END_CYC

HALTБез FOR работает отлично,подскажите как выполнить тело 10 раз, ставлю 2,3 делает 1 раз, ставлю 4 и больше делает без остановки? Помогите советом пожалуйста.

3

Общие вопросы / Не переходит дальше,помогите

« on: September 16, 2017, 11:20:28 AM »

Code: (clickermann) [Select]

SUB(vixod)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "vixod.bmp", -1, 95) // ищем выход
         LCLICK($_return1+3, $_return2+3)
         WAIT(1)
         $check = 1
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB

SUB(afk)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk.bmp", -1, 95) // ставим афк
         LCLICK($_return1+5, $_return2+5)
         WAITMS(50)
         LOGWRITE ("поставил на афк")
         $check = 1
      ELSE
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (0,0, $_xmax,$_ymax, "afk1.bmp", -1, 95) // галка стоит
            WAITMS(50)
            LOGWRITE ("афк включено")
            $check = 1
         END_IF
      ELSE
         WAITMS(50)
         LOGWRITE ("не нашел кнопку")
      END_IF
   END_CYC
END_SUB



$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "mifsrej.bmp", -1, 95) //
      LCLICK($_return1+60, $_return2+10) //
      WAITMS(500)
      LOGWRITE ("нашел сражение")
      $check = 1
      krest2()
     
      FOR($a=0,$a<10)// _______________________________делает 10 раз и застревает не делает суб выход
         $check = 0
         WHILE($check = 0)
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (0,0, $_xmax,$_ymax, "liger.bmp", -1, 95) //
               move($_return1-80, $_return2-80)
               WAITMS(50)
               LCLICK($_return1-80, $_return2-80)
               WAITMS(50)
               LOGWRITE ("нашел лигер")
               $check = 1
               afk() //
            ELSE
               WAITMS(50)
               LOGWRITE ("no картинки лигер")
            END_IF
         END_CYC
      END_CYC
     
      vixod()// _______________________вот сюда не идет
     
   ELSE
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "srajnegorit.bmp", -1, 95) // ищем сражение
         LCLICK($_return1+60, $_return2+10) //
         WAITMS(500)
         LOGWRITE ("сражение не горит")
         $check = 1
         WAITMS(50)
         LOGWRITE ("no картинка сражение не горит")
      END_IF
   ELSE
      WAITMS(50)
   END_IF
END_CYC.......
11:01:06 no картинки лигер
11:01:18 no картинки лигер
11:01:26 нашел лигер
11:02:29 афк включено
11:02:41 no картинки лигер
11:02:50 нашел лигер
11:02:56 афк включено
11:03:08 no картинки лигер
11:04:04 нашел лигер
11:04:10 афк включено
10 раз сделал на суб выход не идет почему то ?
Помогите советом пожалуйста

4

Общие вопросы / Что не так?

« on: September 01, 2017, 12:49:18 PM »

Code: [Select]

$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (966,68, 1612,451, "alx.bmp", -1, 95) // клик на алхимию
      LCLICK($_return1+9, $_return2+9)
      WAIT(3)
     
     
      FOR($a=0,$a<5) // повторяем 5 раз
         LCLICK(953,668)  // 3561743
         WAITMS(500)
         LCLICK(897,654)  // 10463683
         WAITMS(500)
      END_CYC
     
      $check = 1
      WAITMS(500)
      LCLICK(1158,308)  // закрыть
   END_IF
ELSE
   LOGWRITE ("не нашел алхимию")
   WAITMS(500)
END_CYC
HALT Если картинки нет останавливается а не ждет....Это из-за FOR?
Спасибо

5

Использование / Помогите разобраться

« on: August 21, 2017, 07:56:32 PM »

Code: [Select]

skip:

IF(($_time_h > 11) & ($_time_h < 23) & ($_time_m = 58) & ($_time_s = 03))//сработает 12 13 14  22 часа -------->Тут сработает в указанный промежуток каждый час? не зависимо во сколько запустил?
   
   WAIT(1)
   
   LOGWRITE ("обновляю страницу")
   LCLICK(106,13)
   WAIT(1)
   LCLICK(72,46)
   WAIT(35)
   LOGWRITE ("ожидаю картинку")
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (993,57, 1564,387, "raspr.bmp", -1, 80)
         $check = 1
         LCLICK($_return1+5, $_return2+5)
         WAITMS(100)
         LOGWRITE ("картинка найдена")
      ELSE
         LOGWRITE ("не нашел")
         
         WAITMS(50)
      END_IF
   END_CYC
END_IF

IF(($_time_h > 11) & ($_time_h < 23) & ($_time_m = 00) & ($_time_s = 02))
   LOGWRITE ("Начало поиска ")
   
   
   $var1 = 0
   WHILE($var1 = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (803,386, 1333,772, "balen.bmp", -1, 95) // ищем
         LCLICK($_return1, $_return2+120)
         WAITMS(100)
         LOGWRITE ("Успех !")
         LCLICK(841,659) //подтвердить
         WAITMS(900)
      ELSE
LOGWRITE ("не нашел балены")
         $var1 = 1
      END_IF
   END_CYC
   
   $var1 = 0
   WHILE($var1 = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (803,386, 1333,772, "gastro.bmp", -1, 95) // ищем
         LCLICK($_return1, $_return2+120)
         WAITMS(500)
         LOGWRITE ("нашел ")
         
         
         LOGWRITE ("проверка цены 1 ")
         
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (1035,564, 1049,578, "1.bmp", -1, 95)
            LCLICK(845,654) //подтвердить
            LOGWRITE ("купленно 1 балена")
            WAITMS(500)
         ELSE
            LOGWRITE ("проверка цены 2 ")
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (1035,564, 1049,578, "2.bmp", -1, 95) // клик ,бонус
               LCLICK(845,654) //подтвердить
               LOGWRITE ("купленно за 2 балена")
               WAITMS(500)
            ELSE
               LCLICK(1100,653)
               
               LOGWRITE ("Нету ")
               $var1 = 1
               WAITMS(500)
               
            END_IF
         END_IF
      ELSE
         LOGWRITE ("  не найдено ")
         
         $var1 = 1
      END_IF
   END_CYC
   
   $var4 = 0
   WHILE($var4 = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (803,386, 1333,772, "grun.bmp", -1, 95) // ищем
         LCLICK($_return1, $_return2+120)
         WAITMS(500)
         LOGWRITE ("нашел гРуна")
         
         
         LOGWRITE ("проверка цены 1 ")
         
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (1035,564, 1049,578, "1.bmp", -1, 95)
            LCLICK(845,654) //подтвердить
            LOGWRITE ("купленно 1 балена")
            WAITMS(500)
         ELSE
            LOGWRITE ("проверка цены ")
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (1035,564, 1049,578, "2.bmp", -1, 95) // клик ,бонус
               LCLICK(845,654) //подтвердить
               LOGWRITE ("купленно за 2 ")
               WAITMS(500)
            ELSE
               LCLICK(1100,653)
               LOGWRITE ("покупка   закончина" )
               $var4 = 1
               WAIT(1)
               
            END_IF
         END_IF
      ELSE
         LOGWRITE (" не найдена")
         
         $var4 = 1
      END_IF
   END_CYC
   
   
   
   LOGWRITE ("поиск ")
   $var2 = 0
   WHILE($var2 = 0)
      GETSCREEN
      COLORMODE(6)
      IF_PICTURE_IN (803,386, 1333,772, "ggem.bmp", -1, 95) // ищем
         LCLICK($_return1, $_return2+120)
         LOGWRITE ("Обнаружил Ггема")
         WAITMS(500)
         
         
         LOGWRITE ("проверка цены 1 ")
         GETSCREEN
         COLORMODE(6)
         IF_PICTURE_IN (1035,564, 1049,578, "1.bmp", -1, 95)
            LCLICK(845,654) //подтвердить
            LOGWRITE ("Куплено  гГема за 1 ")
            WAIT(1)
         ELSE
            LOGWRITE ("проверка цены 2 ")
            GETSCREEN
            COLORMODE(6)
            IF_PICTURE_IN (1035,564, 1049,578, "2.bmp", -1, 95) // клик ,бонус
               LCLICK(845,654) //подтвердить
               LOGWRITE ("Куплено  ")
               WAIT(1)
            ELSE
               LCLICK(1100,653)
               
               LOGWRITE ("покупка закончина")
               
               $var2 = 1
            END_IF
         END_IF
      ELSE
         LOGWRITE ("не найдена")
         $var2 = 1
      END_IF
   END_CYC
   LCLICK(1370,317)
END_IF

WAIT(1)

COLORMODE(6)
IF_PICTURE_IN (901,213, 1540,635, "krestik.bmp", -1, 90) // подстраховка
   LCLICK($_return1+22, $_return2+6)
   WAIT(1)
END_IF
WAIT(1)


GOTO(skip)


 Вопрос есть ли разница когда запущен( например запустил в 15.30 будет ли он срабатывать дальше каждый час( 15.58...16.58..... или нужно запускать до 11.58 а если  после не будет работать ? Или как по другому сделать?Спасибо за помощь!

6

Использование / Ребята подскажите

« on: January 26, 2017, 05:02:11 PM »

Как проще  дописать чтоб повторялось действие в 13.00 14.00 15.00

IF($_time_h = 12)&($_time_m = 0)
//действие
END_IF
   

7

Использование / Помогите разобраться

« on: May 17, 2016, 10:07:42 AM »

Code: [Select]

SUB(переход, $pict)
   
   
   WHEELDOWN(8)
   MOVE(1300,380)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (702,92, 1752,690, $pict, -1, 95)
         $check = 1
         LCLICK($_return1+10, $_return2+10)
         MOVE(1300,380)
         WAIT(1)
         
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB

SUB(охота, $pict)
   $q = 0
   WHILE($q = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (202,197, 1732,909, "oxota0000.bmp", -1, 85) // клик ,бонус
         LCLICK($_return1+13, $_return2+73)
         WAIT(1)
      ELSE
         $q=1
         
         
      END_IF
   END_CYC
   skip:
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (649,408, 1214,921, "oxotzakrit0000.bmp", -1, 95)
         
         $check = 1
         
         WAIT(6)
      ELSE
         
         GETSCREEN
         IF_PIXEL_IN(913,777, 916,783, 5194010) //манна
            LCLICK(1209, 764)
            WAITMS(100)
         ELSE
            LCLICK(1075,762)
            WAIT(1)
           
            GETSCREEN
            IF_PIXEL_IN(377,172, 378,175, 1973822) // жизнь
               LCLICK(438, 808)// элик жизни
               WAITMS(100)
            END_IF
         END_IF
      END_IF
   END_CYC
   
   $var = 0
   WHILE($var = 0)
     
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (202,197, 1732,909, "nagrada0000.bmp", -1, 95) // навести на добычу
         
         MOVE($_return1+46, $_return2+88)
         WAIT(1)
      END_IF
     
      WAIT(1)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (630,416, 1305,954, "moneta0000.bmp", -1, 95) // клик ,манета
         LCLICK($_return1, $_return2)
         WAIT(1)
      END_IF
     
     
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (630,416, 1305,954, "prodat0000.bmp", -1, 95) // клик ,продать
         LCLICK($_return1+5, $_return2+3)
         WAIT(1)
      ELSE
         IF_PICTURE_IN (630,416, 1305,954, "vse0000.bmp", -1, 95) // клик , на все
            LCLICK($_return1+5, $_return2+3)
            WAIT(1)
         ELSE
           
            $var = 1
         END_IF
      END_IF
   END_CYC
   
   MOVE(1024,318)
   WAIT(2)
   
   
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (630,416, 1305,954, "tuwki0000.bmp", -1, 90) // клик ,тушки
      LCLICK($_return1+52, $_return2+37)
      WAIT(1)
      MOVE(1024,318)
      IF_PICTURE_IN (630,416, 1305,954, "tuwki0000.bmp", -1, 90) // клик ,тушки
         LCLICK($_return1+52, $_return2+37)
         WAIT(1)
         MOVE(1024,318)
         
      END_IF
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (630,416, 1305,954, "oxotzakrit0000.bmp", -1, 95) // клик ,закрыть
      LCLICK($_return1+5, $_return2+5)
      WAIT(1)
     
   END_IF
   
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "kapkan0000.bmp", -1, 95)
         $check = 1
         LCLICK($_return1+15, $_return2+68)
         WAITMS(100)
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
   
   $che = 0
   WHILE($che = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (424,350, 1330,722, "med0000.bmp", -1, 90) // клик ,мед
         LCLICK($_return1+35, $_return2+35)
         WAIT(1)
         $che = 1
      ELSE
         GETSCREEN
         COLORMODE(7)
         IF_PICTURE_IN (424,350, 1330,722, "okorok0000.bmp", -1, 90) // клик ,окорок
            LCLICK($_return1+35, $_return2+35)
            WAIT(1)
            $che = 1
         ELSE
           
            GETSCREEN
            COLORMODE(7)
            IF_PICTURE_IN (424,350, 1330,722, "kalmar0000.bmp", -1, 90) // клик ,кальмар
               LCLICK($_return1+35, $_return2+35)
               WAIT(1)
               $che = 1
            ELSE
               WAITMS(100)
               
               
            END_IF
         END_IF
      END_IF
   END_CYC
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (562,409, 1330,722, "kupit0000.bmp", -1, 90) // клик ,купить
      LCLICK($_return1+5, $_return2+5)
      WAIT(1)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (424,350, 1330,722, "med10000.bmp", -1, 90) // клик ,мед
      LCLICK($_return1+35, $_return2+35)
      WAIT(1)
   ELSE
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (424,350, 1330,722, "okorok10000.bmp", -1, 90) // клик ,окорок
         LCLICK($_return1+35, $_return2+35)
         WAIT(1)
         
      ELSE
         
         GETSCREEN
         COLORMODE(7)
         IF_PICTURE_IN (424,350, 1330,722, "kalmar10000.bmp", -1, 90) // клик ,кальмар
            LCLICK($_return1+35, $_return2+35)
            WAIT(1)
         END_IF
      END_IF
   END_IF
   $q = 0
   WHILE($q = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (202,197, 1732,909, "oxota0000.bmp", -1, 85) // клик ,охоту
         WAIT(1)
         LCLICK($_return1+13, $_return2+73)
         GOTO(skip)
      ELSE
         $q=1
      END_IF
   END_CYC
   
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (1529,90, 1790,505, $pict, -1, 90)
         $check = 1
         LCLICK($_return1+13, $_return2+3)
         MOVE(1300,380)
         WAIT(1)
         
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB



SUB(проверка)
   
   
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (684,593, 1265,727, "bonus0000.bmp", -1, 90) // клик ,бонус
      LCLICK($_return1, $_return2)
      WAITMS(100))
   END_IF
   
   WAIT(3)
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (641,381, 1242,796, "zakritkr0000.bmp", -1, 90)  // на закрыт крастный
      $check = 1
      LCLICK($_return1+10, $_return2+10)
      WAITMS(100)
   END_IF
END_SUB


SUB(выбор, $pict)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (899,215, 1410,570, $pict, -1, 95)
         $check = 1
         LCLICK($_return1+30, $_return2+30)
         WAITMS(100)
      ELSE
         WAITMS(50)
      END_IF
     
   END_CYC
END_SUB

LOGWRITE ("начало")

выбор("oxotnik0000.bmp")
WAIT(1)
выбор("vOiti0000.bmp")
WAIT(20)
проверка()


охота("waxta10000.bmp")//выполняет
переход("lug0000.bmp")// встает и пишет ошибку как на скрине
охота("zapad0000.bmp")
переход("vostok0000.bmp")
переход("landor0000.bmp")
переход("gnezda0000.bmp")
охота("xram0000.bmp")
охота("maiak0000.bmp")
переход("fort")
охота("okrfort0000.bmp")
переход("paseka0000.bmp")
переход("mis0000.bmp")
охота("paseka0000.bmp")
переход("landor0000.bmp")
переход("vostok0000.bmp")
переход("zapad0000.bmp")
переход("lug0000.bmp")
переход("waxta10000.bmp")
переход("trakt0000.bmp")

переход("vixod0000.bmp")
переход("da0000.bmp")
LOGWRITE ("конец")

HALT

проблема в sub переход,отдельно он работает на все заданные локи ходит,а вместе с sub(охотник) не переходит почему то=(
Такова файла то не надо даже искать=( в ошибке, который(переход("lug0000.bmp")) а пишет не найден файл 0=(

Code: [Select]

SUB(переход, $pict)
   
   
   
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (702,92, 1752,690, $pict, -1, 90)
         $check = 1
         LCLICK($_return1+10, $_return2+10)
         MOVE(1300,380)
         WAIT(1)
         
      ELSE
      LOGWRITE ("ищу")
         WAITMS(50)
      END_IF
   END_CYC
END_SUB

переход("waxta10000.bmp")
LOGWRITE ("найдено")
переход("lug0000.bmp")
LOGWRITE ("найдено")
переход("zapad0000.bmp")
LOGWRITE ("найдено")
переход("vostok0000.bmp")
LOGWRITE ("найдено")
переход("landor0000.bmp")
LOGWRITE ("найдено")
переход("gnezda0000.bmp")
LOGWRITE ("найдено")
переход("xram0000.bmp")
LOGWRITE ("найдено")
переход("maiak0000.bmp")
LOGWRITE ("найдено")
переход("fort0000.bmp")
LOGWRITE ("найдено")
переход("okrfort0000.bmp")
LOGWRITE ("найдено")
переход("paseka0000.bmp")
LOGWRITE ("найдено")
переход("mis0000.bmp")
LOGWRITE ("найдено")
переход("paseka0000.bmp")
LOGWRITE ("найдено")
переход("landor0000.bmp")
LOGWRITE ("найдено")
переход("vostok0000.bmp")
LOGWRITE ("найдено")
переход("zapad0000.bmp")
LOGWRITE ("найдено")
переход("lug0000.bmp")
LOGWRITE ("найдено")
переход("waxta10000.bmp")
LOGWRITE ("найдено")
переход("trakt0000.bmp")
LOGWRITE ("вернулся обратно")вот тут все ок,туда и обратно сбегал  вот лог

8

Использование / Не находит картинку=(

« on: March 02, 2016, 01:14:22 PM »

Code: [Select]

WHILE($var1 < 0)
   
   GETSCREEN
   COLORMODE(7)
   
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "pustaiaset0000.bmp", -1, 90) //
      LCLICK($_return1+18, $_return2+82)
      WAIT(2)
     
     
      WHILE($var3 < 0)
         
         GETSCREEN(661,355, 1350,830)
         COLORMODE(7)
         
         IF_PICTURE_IN (661,355, 1350,830, "najvkapronohnaia0000.bmp", -1, 90) //не находит=(
            LCLICK($_return1+40, $_return2+40)
            WAIT(1)
            $var3 = 1
         ELSE
           
            IF_PICTURE_IN (661,355, 1350,830, "najivkaspokoinaia0000.bmp", -1, 90) //не находит
               LCLICK($_return1+40, $_return2+40)
               WAIT(1)
               $var3 = 1
            END_IF
         END_CYC
         
      ELSE
         
         $var1 = 1
         
      END_IF
   END_CYC
   
   HALT
Хотя по отдельности ищет и при 100%,а тут не как не хочет=(

9

Использование / Не корректно работает,может кто поправить?

« on: February 09, 2016, 08:12:57 PM »

Code: [Select]

start:
WAIT(1)
LCLICK(585,301) // макс шанс
WAITMS(100)
LCLICK(341,311) // мккс ставка
WAITMS(100)
LCLICK(339,368) // 10% ставки
WAITMS(100)
$check=0
While($check<2) //количество нажатий
LCLICK(344,425) // половина ставки
WAITMS(100)
inc($check,1)
end_cyc
$r = RND(1,2) //рандом из 2х координат
SWITCH($r)
CASE(1)
LCLICK(829,435)
CASE(2)
LCLICK(982,433)
END_SWITCH
WAIT(3)
getscreen
IF_PIXEL_IN(688,490, 873,498, 32768) //снимок если зеленый (32768) то в начало,если нет то дальше
goto(start)
end_if
WAITMS(100)
LCLICK(583,365) //50 % шанс
WAITMS(100)
LCLICK(349,313) // maxкс ставки
WAITMS(100)
FOR($a=0,$a<5) // количество нажатий на:
LCLICK(344,425) // половина ставки
END_CYC
WAIT(1)
LCLICK(RNDFROM(830,999),440) // рандом клик из 2х координат
WAIT(2)
while($color<3) // клличество красных(2237115) для прохода дальше
getscreen
WAIT(3)
IF_PIXEL_IN(688,490, 873,498, 2237115) //сканируем на красный (2237115)
inc($color,1)
WAIT(3)
LCLICK(271,412) //выполняем если красный и соблюдается условие while($color<3)
WAIT(2)
$r = RND(1,2)
SWITCH($r)
CASE(1)
LCLICK(819,423) //выполняем если красный и соблюдается условие while($color<3)
CASE(2)
LCLICK(860,423) //выполняем если красный и соблюдается условие while($color<3)
END_SWITCH
WAIT(3)
END_IF
getscreen
IF_PIXEL_IN(688,490, 873,498, 32768) // если выше выпал зеленый то в начало (32768) тут трудность,бывает что после 2х или 1 красных выподает зеленый,а он вместо начала идет дальше( а иногда нормально),
WAIT(3)
goto(start)
end_if
END_CYC
WAIT(2) //выполняем если выше было 4 красных в подряд
LCLICK(585,313) // макс шанс
WAITMS(100)
LCLICK(336,313) // макс ставка
WAITMS(100)
LCLICK(336,422) // половина ставки
WAITMS(100)
FOR($a=0,$a<4) //количество нажатий
LCLICK(RNDFROM(830,999),440)
WAIT(2)
END_CYC
WAIT(1)
LCLICK(577,363) //50% шанс
WAITMS(100)
LCLICK(335,313) // макс ставки
WAITMS(100)
FOR($a=0,$a<2) //количество нажатий
LCLICK(344,425) // пол ставки
WAITMS(100)
END_CYC

$check=0
while($check=0)
getscreen
WAIT(2)
LCLICK(RNDFROM(830,999),440) // рандом из 2х координат
WAITMS(3000)
IF_PIXEL_IN(688,490, 873,498, 32768) //тут сканируем если зеленый(32768) то в начало,если красный то дальше пока не будет зеленого делаем ниже
goto(start)
end_if
WAIT(1)
LCLICK(263,411) //выполняем пока не будет зеленый
WAITMS(100)
LCLICK(RNDFROM(830,999),440) //выполняем пока не будет зеленый(если зеленый то в начало)
WAITMS(2000)
END_CYC

10

Использование / Здравствуйте,помогите оптимизировать скрипт.С уважением к вам Clickermann ы)

« on: January 21, 2016, 12:37:57 AM »

Code: [Select]

WHILE ($a = 0)
   LCLICK(333,310)    // п. 1 настройки (1.Как сделать чтобы клик был рандумом  из 2 координат)
   WAITMS(100)
   LCLICK(342,363)
   WAITMS(100))
   LCLICK(344,425)    // п. 1.1 настройки ( хотелось бы упростить так как нужно нажать 10 раз одни и те же координаты)
   WAITMS(100))
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAITMS(100)
   LCLICK(344,425)
   WAIT(5)
   
    LCLICK(819,423)    // п.2
     WAIT(5)
   skip:
   
   GETSCREEN                                 
   IF(PXL(696, 492) = 2237115         
                                                           
             
     
      LCLICK(271,412)                       //3.1,3.22.Скрипт при условии что цвет в заданной координате красный,выполняет нужное действие раз 10 и прыгает на начало,хотя цвет остается красным=(,как сделать что бы пока красный выполнялось  бесконечно нужное действие 3.1.
      WAIT(5)
      LCLICK(819,423)
      WAIT(5)

      goto(skip)
     
   END_IF
END_CYC



$a =0




Действия скрипта:
1.выполнить настройки
2.Нажать на заданные координаты.
3.Распознать цвет
3.1 Если красный то выполнить,начиная с п.3
3.2 Если нет то вернуться к настройкам п.1.

Помогите пожалуйста улучшить
1.Как сделать чтобы клик был рандумом  из 2 координат
2.Скрипт при условии что цвет в заданной координате красный,выполняет нужное действие раз 10 и прыгает на начало,хотя цвет остается красным=(,как сделать что бы пока красный выполнялось  бесконечно нужное действие 3.1.
3.Посмотреть может как по другому написать.
С Уважением к вам. За ранние благодарен за помощь.