Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: берг on August 20, 2014, 08:16:24 PM

Title: Помощь по скрипту
Post by: берг 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   

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

Title: Re: Помощь по скрипту
Post by: Oraven on August 20, 2014, 08:28:05 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 = 0)
      GETSCREEN
      COLORMODE(7,714,254,716,256)
      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 = 1
         LCLICK(RND(922,934),RND(619,626))
         WAIT(RND(1,3))
      END_IF
   END_CYC
   WAITMS(100)
END_CYC
WAIT(RND(427,731))

Title: Re: Помощь по скрипту
Post by: берг on August 20, 2014, 08:49:48 PM

Quote from: Oraven on August 20, 2014, 08:28:05 PM

Исправил ошибки

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

Title: Re: Помощь по скрипту
Post by: Oraven on August 21, 2014, 12:55:23 AM

Слышал о команде HALT ?

Title: Re: Помощь по скрипту
Post by: Vint on August 21, 2014, 07:15:42 AM

Quote from: берг on August 20, 2014, 08:49:48 PM

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

А переставить $check_boi = 1 перед ELSE не?