Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - берг

Pages: [1]
1
Общие вопросы / Re: Помощь по скрипту
« on: August 20, 2014, 08:49:48 PM »
Исправил ошибки

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



2
Общие вопросы / Помощь по скрипту
« on: August 20, 2014, 08:16:24 PM »
Други,имеется скриптик:

Code: (clickermann) [Select]
$time = $_time_t + RND(3180,4242)
WHILE($time > $_time_t)
   GETSCREEN
   IF_PIXEL_IN(837,179, 839,181, 3483157)
     WAIT(RND(5,6))
      LCLICK(RND(640,663),RND(141,153))
       WAIT(RND(1,2))
      LCLICK(RND(258,300),RND(7,16))
      WAIT(RND(298,305))
      LCLICK(RND(63,102),RND(6,16))
   else
      WAIT(RND(2,4))
   END_IF
   LCLICK(RND(834,865),(RND(124,150)))
   WAIT(RND(2,3))
   LCLICK(RND(912,997),(RND(514,522)))
   WAIT(RND(1,3))
   
   $check_boi = 0
   WHILE($check_boi < 1)
GETSCREEN
COLORMODE(7,715,255)
IF(PXL(715,255) = 1320324)
            WAIT(RND(1,4))
 LCLICK(RND(790,801),(RND(615,625)))
               WAIT(RND(9,11))
               LCLICK(859,460)
               WAIT(RND(3,5))
               ELSE
               $check_boi = 0
LCLICK(RND(922,934),(RND(619,626)))
         WAIT(RND(1,3))               
            END_IF
   END_CYC
   WAITMS(100)
END_CYC
WAIT(RND(427,731))

Проблема в том,что когда скрипт доходит до :

Code: (clickermann) [Select]
  $check_boi = 0
   WHILE($check_boi < 1)
GETSCREEN
COLORMODE(7,715,255)
IF(PXL(715,255) = 1320324)
            WAIT(RND(1,4))
 LCLICK(RND(790,801),(RND(615,625)))
               WAIT(RND(9,11))
               LCLICK(859,460)
               WAIT(RND(3,5))
               ELSE
               $check_boi = 0
LCLICK(RND(922,934),(RND(619,626)))
         WAIT(RND(1,3))               
            END_IF   

то,после завершения этого цикла,он повторяется с начала (этот цикл) ,а не запускается скрипт с самого начала. Может кто поможет,подскажет где ошибка? Заранее благодарю! :)

3
Общие вопросы / Re: Перебор картинок
« on: January 20, 2014, 06:39:50 PM »
Большое спасибо,еще раз!!!  Это я действительно тупанул. :D

4
Общие вопросы / Re: Перебор картинок
« on: January 20, 2014, 06:18:07 PM »
Огромное спасибо!! :D Все заработало!! Последний вопрос,как сделать,чтоб время цикла всего скрипта было рандомное,сейчас оно равно 3300 секундам ,а рандомный только перерыв между циклами.

5
Общие вопросы / Перебор картинок
« on: January 20, 2014, 05:57:17 PM »
Добрый вечер! Помогите пожалуйста новичку! :)
Сделал скриптик первый раз.  Есть три картинки,при нахождении хотя бы одной из них должен происходить клик по кнопке перебора,далее опять проверка на наличие этих картинок,если находит,опять клик по кнопке перебора, и только если ни одна из трех картинок не найдена,должен происходить клик по кнопке нападения.  Сейчас происходит так,находиться одна из трех картинок,кликается кнопка перебора,а после этого скрип начинает выполняться с начала.
Помогите пожалуйста,подправьте скрипт,чтоб нормально работал. :'(

Code: (clickermann) [Select]
$time = $_time_t + 3300
WHILE($time > $_time_t)
   GETSCREEN
   IF_PIXEL_IN(719,178, 721,179, 3220239)
      WAIT(RND(233,250))
   else
      WAIT(RND(1,3))
   END_IF
   LCLICK(RND(714,744),RND(126,149)) //вызов окна параметров поиска
   WAIT(RND(2,3))
  LCLICK(RND(787,875),RND(513,521)) //выбор параметра поиска
   WAIT(RND(1,3))
   
   GETSCREEN
   IF_PICTURE_IN (886,464, 895,476, "zero.bmp")
LCLICK(RND(805,819),RND(619,626))) //кнопка перебора
      WAIT(RND(1,3))
   ELSE
      IF_PICTURE_IN (886,464, 895,476, "five.bmp")
      LCLICK(RND(805,819),RND(619,626))) //кнопка перебора
         WAIT(RND(1,3))
      ELSE
         IF_PICTURE_IN (886,464, 895,476, "pusto.bmp")
  LCLICK(RND(805,819),RND(619,626))) //кнопка перебора
            WAIT(RND(1,3))
         ELSE
            WAIT(RND(1,4))
   LCLICK(RND(672,685),RND(616,626))) // кнопка нападения
            WAIT(RND(9,11))
            LCLICK(745,461) //сброс окна боя
            WAIT(RND(3,5))
         END_IF
      END_IF
   END_IF
   WAITMS(100)
END_CYC
WAIT(RND(420,720))



Pages: [1]