[Обсуждение] Clickermann - BOT DO 1.6

[sergio77rus]

Цитата: Сообщение от vokovl ну да, а пол кода переписывать никак?

если я перепишу пол кода ,то он точно работать не будет)) так что методом тыка все делаю потому что в это не силен
у тебя есть возможность помочь с этим кодом на навыки?

[E.x.p.r.e.s.s.]

Цитата: Сообщение от sergio77rus у тебя есть возможность помочь с этим кодом на навыки?

Сначала опиши задачу которую должен выполнить кликер

[sergio77rus]

Привет , очень хотелось бы что кликер использовал навыки корабля по кд на сборе коробок

[E.x.p.r.e.s.s.]

Цитата: Сообщение от sergio77rus Привет , очень хотелось бы что кликер использовал навыки корабля по кд на сборе коробок

Я в д.о. уже не играю, но могу предложить вариант постоянного нажатия кнопок в потоке.

SETTHREAD(AUTO_HOTKEY, 0) // Смена состояния потока: 0 - Пауза, 1 - Старт, 2 - Стоп

THREAD(AUTO_HOTKEY, 2)
   
   IF($TIME_SKILL_1 < $_time_t)
      KEYPRESS(#1)
      $TIME_SKILL_1 = $_time_t + 60 // условие сработает снова через 60 сек
   END_IF
   
   IF($TIME_SKILL_2 < $_time_t)
      KEYPRESS(#2)
      $TIME_SKILL_2 = $_time_t + 60 // условие сработает снова через 60 сек
   END_IF
   
   IF($TIME_SKILL_3 < $_time_t)
      KEYPRESS(#3)
      $TIME_SKILL_3 = $_time_t + 60 // условие сработает снова через 60 сек
   END_IF
   
END_THREAD

[sergio77rus]

Спасибо,все работает

[Тёмный_Ястраеб]

Где в скрипте объявлены подпрограммы? Почему при редактировании скрипта ничего не происходит? (хоть весь код удали, все будет работать)

[vokovl]

после редактирования надо кнопочку применить нажать




какие тебе ещё нужны объявления подпрограмм?

[Тёмный_Ястраеб]

Цитата: Сообщение от vokovl после редактирования надо кнопочку применить нажать какие тебе ещё нужны объявления подпрограмм?

Я посчитал, что операторы, начинающиеся с $ - это какие-то функции/процедуры, которые объявлены где-то в другом месте (без понятия в каком). Кнопочку жал, ничего не менялось.
Скопировал папку с рисунками, создал новый текстовый файл, туда скопировал нужный мне кусок кода, все заработало

[vokovl]

Цитата: Сообщение от Тёмный_Ястраеб Я посчитал, что операторы, начинающиеся с $ - это какие-то функции/процедуры, которые объявлены где-то в другом месте (без понятия в каком).

это обычные переменные

[E.x.p.r.e.s.s.]

#include "mylib.cms" // Вставляет код из внешнего файла

[Тёмный_Ястраеб]

Цитата: Сообщение от E.x.p.r.e.s.s. #include "mylib.cms" // Вставляет код из внешнего файла

Можете подсказать, как можно осуществить облет определенных координат на карте, чтобы облетать базы?

[vokovl]

где то в теме в этой или аналогичной уже писали об этом, связанно с закрашиванием нужного квадрата на миникарте сплошным цветом, и запретом клика на этот цвет

[Тёмный_Ястраеб]

Цитата: Сообщение от vokovl где то в теме в этой или аналогичной уже писали об этом, связанно с закрашиванием нужного квадрата на миникарте сплошным цветом, и запретом клика на этот цвет

Да, это было бы неплохой идеей, если бы скрипт не кликал "через" базы

[vokovl]

ну сделай картинку базы и проверку при клике на гетскрине, где эта база и клик в другую координату

[E.x.p.r.e.s.s.]

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

IF(($use_collecting = 1)&($minimap_not_found!1))
   $time_box = $_time_t
   $stop_ship = 0
   $check = 0
   $check_out = 0
   WHILE($check_out = 0)                          
      GETSCREEN(0,200, $_xmax,$_ymax-120)
      COLORMODE(4,200,0, $_xmax,$_ymax-120)
      PXLREPLACE(INT($_xmax/2-30),INT($_ymax/2+20),INT($_xmax/2+30),INT($_ymax/2+110), -1, 0))
      IF_PIXEL_IN(0,200, $_xmax,$_ymax-120, 13627391 )
         $xbox = 0                             
         $ybox = 0
         SCANPXL($arr,0,200, $_xmax,$_ymax-120, 13627391 )
         FOR($a=0,$a<ARRSIZE($arr),2)
            IF(DIST($arr[$a],$arr[$a+1],INT($_xmax/2),INT($_ymax/2))<DIST($xbox,$ybox,INT($_xmax/2),INT($_ymax/2)))
               $xbox=$arr[$a]
               $ybox=$arr[$a+1]
            END_IF
         END_CYC
         UNDEFINE($arr)
         $check = 1
         IF(($xbox=0)&($ybox=0))
            WAITMS(5)
         ELSE
            IF($stop_ship = 0)
               $stop_ship = 1
               IF(($xbox > 0)&($xbox < $_xmax)&($ybox > 0)&($ybox < INT($_ymax/2)))
                  LCLICK(INT($_xmax/2),INT($_ymax/2-110))
               ELSE
                  LCLICK(INT($_xmax/2),INT($_ymax/2+140))
               END_IF
            ELSE
               LCLICK($xbox,$ybox)
            END_IF
         END_IF
         IF($slowpoke = 1)                   
            WAITMS(700)
         ELSE
            WAITMS(300)
         END_IF
         $time_collected = $_time_t + 3 // Ждём когда на миникарте исчезнет знак ">"
         WHILE($time_collected > $_time_t)
            GETSCREEN($_xmap-91,$_ymap+6, $_xmap-59,$_ymap+16)
            IF_PIXEL_IN($_xmap-90,$_ymap+5, $_xmap-60,$_ymap+15, 16777215)
               WAITMS(5)
            ELSE
               $time_collected = 0
            END_IF
         END_CYC
         IF($end_of_animation = 0)
            $end_of_animation = 1
            WAITMS(5)
         ELSE
            $end_of_animation = 0
            WAITMS(250) // Ждём когда исчезнет анимация сбора коробки
         END_IF
         IF($_time_t - $time_box > 20)  // Выход на случай зависания
            $check_out = 1
            PRINT("Что-то пошло не так во время сбора.")
            LCLICK($x + RND(-4,4),$y + RND(-4,4)) // Клик по миникарте
            WAITMS(7000)
         END_IF
      ELSE
         $check_out = 1
         IF($check = 1)
            $check = 0
            $end_of_animation = 0
            LCLICK($x + RND(-4,4),$y + RND(-4,4))
            WAITMS(700)
         END_IF
      END_IF
   END_CYC
END_IF