8
					
						
						« on: January 20, 2018, 01:03:45 PM »
					 
					
					В общем то что получилось, рабочий бот для Eve online, курьерские миссии
П.С. Окно агенства и окно склада должны быть открыты.
//=============================================
sub(qwer)
   LCLICK(944,17)  // Клик на окно
   WAIT(3)
   MOVE(1551,264)
   WAIT(3)
   LCLICK(1551,264)  // клик на чтроку оверлея
   WAIT(3)
   
   skip1:
   $check_yellow = 0
   WHILE($check_yellow = 0) // пока есть  желтый
      GETSCREEN
      COLORMODE(7, 655,46, 1717,1011)
      LOGWRITE ("Проверяем желтый варп")
      IF_PIXEL_IN(1511,257, 1530,270, 8388607, 8388350, 8388093) //Проверям желтый пиксель
         LOGWRITE ("Желтый варп найден")
         MOVE(1574,134)    //если есть: действие мышью
         WAIT(4)
         LCLICK(1574,134)
         WAIT(15)
         
         $check_blue = 0
         WHILE($check_blue = 0) // пока есть  синий ничего не делаем
            GETSCREEN
            COLORMODE(7, 890,970, 910,990)
            LOGWRITE ("Проверка синего")
            $Найденый цвет = PXL(893,984)
            LOGWRITE ("Найденый цвет:", $Найденый цвет)
            IF_PIXEL_IN(893,984, 8355711)
               LOGWRITE ("Ожидание")
               WAIT(6)
            ELSE
               $check_blue = 1  //если нет:  возврат к проверке желтого пикселя
               LOGWRITE ("Синий не найден")
               WAIT(4)
            END_IF
         END_CYC
         
      else
         $check_yellow = 1 //Если нету: конец кольца
         LOGWRITE ("Желтый варп не  найден")
      END_IF
   END_CYC
   
   
   GETSCREEN
   COLORMODE(7, 1333,409 , 1482,460)
   LOGWRITE ("Проверка входа в док")
   IF_PICTURE_IN (1333,409 , 1482,460, "Enter dock 7.bmp", -1, 90)
      MOVE($_return1, $_return2)
      WAIT(2)
      LCLICK($_return1, $_return2)
      LOGWRITE ("Вход в док")
      WAIT(15)
   ELSE
      LOGWRITE ("Вход в док не найден")
   END_IF
   
   $check_pic_2 = 0
   WHILE($check_pic_2 = 0)
      GETSCREEN
      COLORMODE(8, 1623,167 , 1708,215)
      LOGWRITE ("Проверка окончания стыковки")
      IF_PICTURE_IN (1623,167 , 1708,215, "Exit 8.bmp", -1, 80)
         $check_pic_2 = 1   //  если есть: ничего не делаем
         WAITMS(100)
      ELSE
         WAIT(15)  //Если нет: ждем
         LOGWRITE ("Стыковка не окончена")
         goto(skip1)
         
      END_IF
   END_CYC
   LOGWRITE ("Конец стыковки")
end_sub
//=============================================
LOGWRITE ("Начало скрипта")
LCLICK(867,22)  // 15128779
MOVE(754,122)
WAIT(1)
LCLICK(754,122)  // 3156759
GETSCREEN
COLORMODE(8, 45,45, 1700,1000)
LOGWRITE ("Проверка присутствия агента на стации")
IF_PICTURE_IN (1333,409 , 1482,460, "Talk 8.bmp", -1, 98)
   LOGWRITE ("Агент на базе - начать разговор")
   MOVE($_return1, $_return2)
   WAIT(1)
   LCLICK($_return1, $_return2)
   WAIT(1)
   
   GETSCREEN
   COLORMODE(8, 72,43, 1766,1018)
   LOGWRITE ("Проверка запросить задание")
   IF_PICTURE_IN (72,43, 1766,1018, "Requiest 8.bmp", -1, 100)
      LOGWRITE ("Удачно")
      WAITMS(100)
      MOVE($_return1, $_return2)
      WAIT(2)
      LCLICK($_return1, $_return2)
      WAIT(3)
   else
      LOGWRITE (Не найдено")
   END_IF
   
   GETSCREEN
   COLORMODE(8, 72,43, 1766,1018)
   LOGWRITE ("Проверка просмотрара заданий")
   IF_PICTURE_IN (72,43, 1766,1018, "Look mission 8.bmp", -1, 100)
      LOGWRITE ("Удачно")
      WAITMS(100)
      MOVE($_return1, $_return2)
      WAIT(2)
      LCLICK($_return1, $_return2)
      WAIT(3)
   else
      LOGWRITE ("Не найдено")
   END_IF
   
   
   GETSCREEN
   COLORMODE(8, 14,43, 1766,1018)
   LOGWRITE ("Проверка статуса мисии")
   IF_PICTURE_IN (14,43, 1766,1018, "Accept 8.bmp", -1, 100)
      MOVE($_return1, $_return2)
      WAIT(1)
      LCLICK($_return1, $_return2)
      LOGWRITE ("Мисиия принята")
   else
      LOGWRITE ("Статус миссии - не известен")
   END_IF
   
   GETSCREEN
   COLORMODE(8, 51,43, 1766,1018)
   LOGWRITE ("Проверка расположения груза")
   //SCREENSHOTEX(14,43, 1766,1018)
   IF_PICTURE_IN (51,43, 1766,1018, "Okey 8.bmp", -1, 98)
      LOGWRITE ("Груз на станции")
      WAIT(1)
      
      GETSCREEN
      COLORMODE(8, 14,43, 1766,1018)
      LOGWRITE ("Прокладка маршрута доставки")
      //SCREENSHOTEX(14,43, 1766,1018)
      IF_PICTURE_IN (14,43, 1766,1018, "Place of delivery 8.bmp", -1, 95)
         MOVE($_return1+120, $_return2+3)
         WAIT(1)
         RCLICK($_return1+120, $_return2+3)
         WAIT(1)
         MOVE($_return1+200, $_return2+30)
         WAIT(1)
         LCLICK($_return1+200, $_return2+30)
         LOGWRITE ("Место доставки задано")
         
         
         LCLICK(952,16)  // 14865606
         GETSCREEN
         COLORMODE(6, 14,43, 1766,1018)
         LOGWRITE ("Окончание работы с агентом")
         //SCREENSHOTEX(14,43, 1766,1018)
         IF_PICTURE_IN (14,43, 1766,1018, "Window talk 6.bmp", -1, 99)
            MOVE($_return1+3, $_return2+3)
            WAIT(1)
            LCLICK($_return1+3, $_return2+3)
            GETSCREEN
            COLORMODE(5, 14,43, 1766,1018)
            IF_PICTURE_IN (14,43, 1766,1018, "X 5.bmp", -1, 99)
               MOVE($_return1+40, $_return2+4)
               WAIT(1)
               LCLICK($_return1+40, $_return2+4)
               LOGWRITE ("Закрыть окно разговора с агентом")
            else
               LOGWRITE ("ошибка не найден крест")
            END_IF
         else
            LOGWRITE ("ошибка не найдет разговор с агентом")
         END_IF
         
         LCLICK(952,16)  // 14865606
         GETSCREEN
         COLORMODE(6, 67,641, 280,921)
         LOGWRITE ("Погрузка товара")
         //SCREENSHOTEX(14,43, 1766,1018)
         IF_PICTURE_IN (67,641, 280,921, "Storage 6_1.bmp", -1, 90)
            MOVE($_return1+4, $_return2+4)
            WAIT(1)
            LCLICK($_return1+4, $_return2+4)
            MOVE(335,736)
            WAIT(1)
            LDOWN(335,736)
            WAIT(1)
            MOVE(124,691)
            WAIT(1)
            LUP(124,691)
            LOGWRITE ("Товар загружен")
         else
            LOGWRITE ("Ошибка проверки расположения груза")
         END_IF
         
         
         MOVE(1671,193)
         WAIT(2)
         LCLICK(1671,193)
         LOGWRITE ("Вылет")
         WAIT(15)
         qwer()
         
         
         LCLICK(867,22)
         GETSCREEN
         COLORMODE(8, 1018,359, 1081,402)
         LOGWRITE ("Проверка статуса миссии")
         IF_PICTURE_IN (1018,359, 1081,402, "Accept 8_2.bmp", -1, 100)
            MOVE($_return1, $_return2)
            WAIT(2)
            LCLICK($_return1, $_return2)
            LOGWRITE ("Мисиия принята")
            WAIT(1)
            
            GETSCREEN
            COLORMODE(8, 14,43, 1766,1018)
            SCREENSHOTEX(535,570, 662,595)
            LOGWRITE ("Проверка возможности сдачи миссии")
            IF_PICTURE_IN (14,43, 1766,1018, "Complete the mission.bmp", -1, 98)
               MOVE($_return1, $_return2)
               WAIT(2)
               LCLICK($_return1, $_return2)
               LOGWRITE ("Мисиия сдана успешно")
            else
               LOGWRITE ("Ошибка")
            END_IF
            
            
            WAIT(1)
            LCLICK(952,16)  // 14865606
            GETSCREEN
            COLORMODE(6, 14,43, 1766,1018)
            LOGWRITE ("Окончание работы с агентом")
            //SCREENSHOTEX(14,43, 1766,1018)
            IF_PICTURE_IN (14,43, 1766,1018, "Window talk 6.bmp", -1, 99)
               MOVE($_return1+3, $_return2+3)
               WAIT(1)
               LCLICK($_return1+3, $_return2+3)
               GETSCREEN
               COLORMODE(5, 14,43, 1766,1018)
               IF_PICTURE_IN (14,43, 1766,1018, "X 5.bmp", -1, 99)
                  MOVE($_return1+40, $_return2+4)
                  WAIT(1)
                  LCLICK($_return1+40, $_return2+4)
                  LOGWRITE ("Закрыть окно разговора с агентом")
               else
                  LOGWRITE ("ошибка не найден крест")
               END_IF
            else
               LOGWRITE ("ошибка не найдет разговор с агентом")
            END_IF
         END_IF
      else
         LOGWRITE ("Ошибка проверки статуса миссии")
      END_IF
   else
      LOGWRITE ("Груз в другом месте")
      GETSCREEN
      COLORMODE(8, 14,43, 1766,1018)
      LOGWRITE ("Проверка маршрута погрузки")
      //SCREENSHOTEX(14,43, 1766,1018)
      IF_PICTURE_IN (14,43, 1766,1018, "Place of loding.bmp", -1, 98)
         MOVE($_return1+120, $_return2+3)
         WAIT(2)
         RCLICK($_return1+120, $_return2+3)
         WAIT(2)
         MOVE($_return1+200, $_return2+30)
         WAIT(2)
         LCLICK($_return1+200, $_return2+30)
         LOGWRITE ("Место погрузки задано")
      else
         LOGWRITE ("ошибка")
         halt
      END_IF
      
      GETSCREEN
      COLORMODE(6, 14,43, 1766,1018)
      //SCREENSHOTEX(14,43, 1766,1018)
      LOGWRITE ("Окончание работы с агентом")
      IF_PICTURE_IN (14,43, 1766,1018, "Window talk 6.bmp", -1, 100)
         MOVE($_return1+3, $_return2+3)
         WAIT(2)
         LCLICK($_return1+3, $_return2+3)
         GETSCREEN
         COLORMODE(6, 14,43, 1766,1018)
         IF_PICTURE_IN (14,43, 1766,1018, "X.bmp", -1, 100)
            MOVE($_return1+1, $_return2+1)
            WAIT(2)
            LCLICK($_return1+1, $_return2+1)
            LOGWRITE ("Закрыть окно разговора с агентом")
         END_IF
      END_IF
      MOVE(1671,193)
      WAIT(2)
      LCLICK(1671,193)
      LOGWRITE ("Вылет")
      WAIT(15)
      qwer()
   END_IF
   
else
   LOGWRITE ("Начать разговор не найдено")
   LOGWRITE ("Поиск места назначения")
   IF_PICTURE_IN (65,65, 1755,1000, "set destination.bmp", -1, 85)
      MOVE($_return1, $_return2)
      WAIT(2)
      LCLICK($_return1, $_return2)
      LOGWRITE ("Задано место назначения агента")
      MOVE(1671,193)
      WAIT(2)
      LCLICK(1671,193)
      LOGWRITE ("Вылет")
      WAIT(15)
      qwer()
   else
      LOGWRITE ("Ошибка не найдено место назначение")
   END_IF
END_IF
//////COLORMODE(5, 1511,257, 1530,270)
/////8355711 - синий для мода 7, 16777215 - белый,  цвет скорости   диапазон 862,962, 874,984
/////2080703 цвет оверлея  диапазон 1511,257, 1530,270