« previous next »
Pages: [1]

Author Topic: Бот R2 online || проверьте код  (Read 8183 times)

0 Members and 2 Guests are viewing this topic.

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Бот R2 online || проверьте код
« on: July 03, 2014, 07:39:19 PM »
Бот работает минут 20 после чего мышка перестает нажимать на мобов поможет ли мышь с  ps/2 разъемом
« Last Edit: July 04, 2014, 06:19:10 PM by xxxmaximal »
Logged

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #1 on: July 03, 2014, 09:38:30 PM »
Ну 20 минут то он нажимает. Может в скрипте ошибка?
Logged

aden

  • Оплот сообщества
  • ****
  • Posts: 363
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #2 on: July 03, 2014, 09:44:32 PM »
у меня бывает тоже тупо не срабатывает нажатие, причем я вижу что мышка вроде как кликает куда надо а реакции ноль, видать глюк флеш+кликер
Logged

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #3 on: July 04, 2014, 12:51:40 AM »
у меня видно что не кликает
Code: (clickermann) [Select]
GETSCREEN
keypress(#F6)
start:
#ps2_keyboard
SUB(хилка) 

   IF_PIXEL_IN(730,1025,810,1033, 1579032)
      WAITMS(10)
      KEYPRESS(#F1)
   Else
      WAITMS(10)
   END_IF
   IF_PIXEL_IN(682,1025,724,1032, 1579032)
      WAITMS(10)
      KEYPRESS(#F3)
   Else
      WAITMS(10)
   END_IF
   IF($F6_time < $_ms)
   KEYPRESS(#F6)
WAITMS(50) 
   $F6_time = $_ms+900000
   END_IF
END_SUB


for($y=138,$y<854,100)
   for($x=240,$x<1791,30)
      move($x,$y)
      /// с этого момента идет хилка
      хилка() // проверка хилки
 
      IF($_cursor = 153) // выход из цикла и другие
         waitms(64)
         LDOWN($x,$y)
         waitms(100)
         RCLICK($x,$y)
         waitms(100)
         LUP($x,$y)
         wait(5)
         хилка() // проверка хилки
         KEYPRESS(#F5)
         waitms(64)   
         KEYPRESS(#F5)
waitms(64)
wait(10)
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
 
         $time = $_time_t + 5
         WHILE($time > $_time_t) // цикл на 5 секунд
            waitms(64)
            хилка() // проверка хилки
            waitms(64)
         END_CYC
 
         $x=10000
         $y=10000
      END_IF
      waitms(64)
   end_cyc
end_cyc
KEYDOWN(#D)
wait(1)
KEYUP(#D)
Goto(start)
« Last Edit: July 04, 2014, 01:06:20 AM by xxxmaximal »
Logged

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #4 on: July 04, 2014, 06:22:01 AM »
А где у нас  GETSCREEN ?
Как минимум он должен быть первой строкой в сабе и перед IF($_cursor = 153)
А в начале убрать.
#ps2_keyboard  не нужно ложить под цикл. Достаточно прописать в самом начале.
Logged

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #5 on: July 04, 2014, 12:09:32 PM »
так я вроде бы все сначало и прописал
если гетскрин сделать в другом месте он будет его делать постоянно что приведет к лагам проги
Logged

aden

  • Оплот сообщества
  • ****
  • Posts: 363
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #6 on: July 04, 2014, 12:30:37 PM »
ахах getscreen как раз нужно завернуть в цикл иначе кликер не заметит изменений на экране, а вот эмуляцию ps2 из цикла убрать как уже заметили выше ибо это бред сивой кобылы
Logged

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #7 on: July 04, 2014, 02:08:00 PM »
у меня все нормально хилился то есть я не вижу смысла загонять в цикл getscreen
=============/
Я думал и думаю что достаточно сделать getscreen 1 раз т.к сделав скрин полоски хп он смотрит на цвет (тоесть если изменится то хиляется) в чем смысл делать гетскрин в цикле
Logged

aden

  • Оплот сообщества
  • ****
  • Posts: 363
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #8 on: July 04, 2014, 02:42:01 PM »
я не знаю каким чудом оно у вас работает, но if_picture_in и if_pixel_in производят поиск по картинке в буфере, а буфер у вас обновляется 1 раз при запуске скрипта, а потом изображение уже устаревшее.
Logged

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #9 on: July 04, 2014, 02:47:21 PM »
а смысл его обновлять если оно не изменяется, там просто полоска жизни
а изменение цвета по идее видит хоть и на усторевшем изображении
Logged

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #10 on: July 04, 2014, 03:49:29 PM »
Вот правильный вариант

Code: (clickermann) [Select]
#ps2_keyboard

keypress(#F6)
WAITMS(100)

SUB(хилка)
   GETSCREEN
   IF_PIXEL_IN(730,1025,810,1033, 1579032)
      WAITMS(10)
      KEYPRESS(#F1)
   Else
      WAITMS(10)
   END_IF
   IF_PIXEL_IN(682,1025,724,1032, 1579032)
      WAITMS(10)
      KEYPRESS(#F3)
   Else
      WAITMS(10)
   END_IF
   IF($F6_time < $_time_t)
      KEYPRESS(#F6)
      WAITMS(50)
      $F6_time = $_time_t+900
   END_IF
END_SUB


start:

for($y=138,$y<854,100)
   for($x=240,$x<1791,30)
      move($x,$y)
      /// с этого момента идет хилка
      хилка() // проверка хилки
     
      IF($_cursor = 153) // выход из цикла и другие
         waitms(64)
         LDOWN($x,$y)
         waitms(100)
         RCLICK($x,$y)
         waitms(100)
         LUP($x,$y)
         wait(5)
         хилка() // проверка хилки
         KEYPRESS(#F5)
         waitms(64)
         KEYPRESS(#F5)
         waitms(64)
         wait(10)
         хилка() // проверка хилки
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
         waitms(64)
         KEYPRESS(#E)
         
         $time = $_time_t + 5
         WHILE($time > $_time_t) // цикл на 5 секунд
            waitms(64)
            хилка() // проверка хилки
            waitms(64)
         END_CYC
         
         $x=10000
         $y=10000
      END_IF
      waitms(64)
   end_cyc
end_cyc
KEYDOWN(#D)
wait(1)
KEYUP(#D)
Goto(start)
Logged

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #11 on: July 04, 2014, 05:36:39 PM »
Quote from: Oraven on July 04, 2014, 03:49:29 PM
Вот правильный вариант
А зачем? У него и так всё работает и без кода. Слушать мы тоже не хотим.
"работать" могло только из включенного редактора. Я уже не первый раз говорил что эту фичу нужно отключить.

Quote from: xxxmaximal on July 04, 2014, 02:47:21 PM
а смысл его обновлять если оно не изменяется, там просто полоска жизни
а изменение цвета по идее видит хоть и на усторевшем изображении
Это вообще шедевр получился.
Logged

xxxmaximal

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Бот работает минут 20 после чего ....
« Reply #12 on: July 04, 2014, 05:43:34 PM »
в общем все дело было во взятии в таргет
Code: (clickermann) [Select]
GETSCREEN
keypress(#F6)   
#ps2_keyboard

start:
$z=0
SUB(хилка) 

   IF_PIXEL_IN(730,1025,824,1033, 1579032) // отхил
      WAITMS(10)
      KEYPRESS(#F1)
   Else
      WAITMS(10)
   END_IF
   IF_PIXEL_IN(682,1025,724,1032, 1579032) // телепорт если мало хп
      WAITMS(10)
      KEYPRESS(#F3)
   Else
      WAITMS(10)
   END_IF
   IF($F6_time < $_ms)
   KEYPRESS(#F6)
WAITMS(50) 
   $F6_time = $_ms+900000
   END_IF
END_SUB


for($y=138,$y<854,100)
   for($x=240,$x<1791,50)
      move($x,$y)
      /// с этого момента идет хилка
      хилка() // проверка хилки
 
      IF($_cursor = 245) // выход из цикла и другие
         waitms(64)
         LDOWN(-1,-1)  //взятие в таргет
         waitms(100)
         RDOWN(-1,-1)
         waitms(100)
RUP(-1,-1)
waitms(100)
         LUP(-1,-1)
         waitms(100)
         $time = $_time_t + 12
         WHILE($time > $_time_t) // цикл на 12 секунд драка с мобов ,хил,скилы,собирание лута
                        waitms(64)
KEYPRESS(#F5)
        waitms(64)
          KEYPRESS(#E)
          waitms(64)
          KEYPRESS(#E)
          waitms(64)
          KEYPRESS(#E)
    waitms(64)
          KEYPRESS(#E)
            waitms(64)
            хилка() // проверка хилки   
         END_CYC
          wait(1)
          KEYPRESS(#E)
    wait(1)
          KEYPRESS(#E)
            wait(1)
            KEYPRESS(#E)
            waitms(100)
            $x=10000
            $y=10000  // если мобов найдет то начать сначало цикл for
    $z=$z+1
      END_IF
      waitms(64)
   end_cyc
end_cyc
if ($z=0)     // если мобов не надйдет то повернется
KEYDOWN(#D)
wait(1)
KEYUP(#D)
END_IF

Goto(start)

 Теперь не выключается и хилится именно в бою , а не до или после боя
« Last Edit: July 04, 2014, 07:30:38 PM by xxxmaximal »
Logged
Pages: [1]
« previous next »