Author Topic: Помощь по скрипту  (Read 1884 times)

0 Members and 1 Guest are viewing this topic.

берг

  • Зашел в гости
  • *
  • Posts: 5
    • View Profile
Помощь по скрипту
« 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   

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

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Помощь по скрипту
« Reply #1 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))

берг

  • Зашел в гости
  • *
  • Posts: 5
    • View Profile
Re: Помощь по скрипту
« Reply #2 on: August 20, 2014, 08:49:48 PM »
Исправил ошибки

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



Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Помощь по скрипту
« Reply #3 on: August 21, 2014, 12:55:23 AM »
Слышал о команде HALT ?

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Помощь по скрипту
« Reply #4 on: August 21, 2014, 07:15:42 AM »
Спасибо,но немного не то,мне нужно,чтобы цикл перебора прерывался когда цвет будет найден,а он после одного перебора начинает весь скрипт с начала.
А переставить $check_boi = 1 перед ELSE не?