Author Topic: Помогаем Люциферу  (Read 8433 times)

0 Members and 1 Guest are viewing this topic.

Крис Тинка

  • Активный участник
  • ***
  • Posts: 171
    • View Profile
Re: Помогаем Люциферу
« Reply #15 on: April 27, 2014, 02:18:04 PM »
Code: (clickermann) [Select]
define($agr1,470)

lucifer2000

  • Освоившийся
  • **
  • Posts: 21
    • View Profile
Re: Помогаем Люциферу
« Reply #16 on: April 27, 2014, 02:20:25 PM »
Ребят,вроде все что вы перечислили исправил проверьте на ошибки пожалуйста
Code: (clickermann) [Select]
define$agr1(470)
define$agr2(424)
define$agr3(381)
define$agr4(466)
define$spok1(555)
define$spok2(431)
define$spok3(553)
define$spok4(460)
define$hitr1(467)
define$hitr2(466)
define$hitr3(512)
define$hitr4(462)
define$start1(390)
define$start2(501)
define$start3(383)
define$start4(492)
define$okno1(370)
define$okno2(396)
define$okno3(370)
define$okno4(406)
define$1(434)
define$2(236)
define$3(435)
define$(246)
getscreen
IF_PIXEL_IN(514,396,512,393 47026)//Агрессивная
   lclick(RND($hitr1,$hitr3),rnd($hitr2,$hitr4))
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4 "zero.bmp"
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,433,244 1343307)
         lclick(RND($start1,$start3),rnd($start2,$start4))
      ELSE
         wait(RND(1200,1500))
      END_IF
   END_IF
   getscreen
   
   IF_PIXEL_IN(514,396,512,393 9830400)//Спокойная
      lclick(RND($agr1,$agr3),RND($agr2,$agr4))
      IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4 "zero.bmp"
         wait(RND(1000,1500))
         getscreen
         IF_PIXEL_IN(436,242,437,244 1343307)
            lclick(RND($start1,$start3,rnd($start2,$start4)
         ELSE
            wait(RND(1200,1500))
         END_IF
      END_IF
      getscreen
      IF_PIXEL_IN(506,393,512,393 327243)
         lclick(RND($spok1,$spok3),RND($spok2,$spok4))
         IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4 "zero.bmp")
            wait(RND(1000,1500))
            getscreen
            IF_PIXEL_IN(436,242,433,244 1343307)
               lclick(RND($start1,$start3,rnd($start2,$start4)
            ELSE
               wait(1500)
               getscreen
               IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4  "zero.bmp"
                  wait(RND(1000,1500))
               END_IF
            END_IF
         END_IF

Крис Тинка

  • Активный участник
  • ***
  • Posts: 171
    • View Profile
Re: Помогаем Люциферу
« Reply #17 on: April 27, 2014, 02:30:35 PM »
Code: (clickermann) [Select]
define($agr1,470)
define($agr2,424)
define($agr3,381)
define($agr4,466)
define($spok1,555)
define($spok2,431)
define($spok3,553)
define($spok4,460)
define($hitr1,467)
define($hitr2,466)
define($hitr3,512)
define($hitr4,462)
define($start1,390)
define($start2,501)
define($start3,383)
define($start4,492)
define($okno1,370)
define($okno2,396)
define($okno3,370)
define($okno4,406)
define($1,434)
define($2,236)
define($3,435)
define($4,246)
getscreen
IF_PIXEL_IN(514,396,512,393, 47026)//Агрессивная
   lclick(RND($hitr1,$hitr3),rnd($hitr2,$hitr4))
   // Не помешает задержка и возможно GETSCREEN
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,433,244 1343307)
         lclick(RND($start1,$start3),rnd($start2,$start4))
      ELSE
         wait(RND(1200,1500))
      END_IF
   END_IF
END_IF
getscreen

IF_PIXEL_IN(514,396,512,393, 9830400)//Спокойная
   lclick(RND($agr1,$agr3),RND($agr2,$agr4))
   // Не помешает задержка и возможно GETSCREEN
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,437,244, 1343307)
         lclick(RND($start1,$start3,rnd($start2,$start4))
      ELSE
         wait(RND(1200,1500))
      END_IF
   END_IF
END_IF

getscreen
IF_PIXEL_IN(506,393,512,393, 327243)
   lclick(RND($spok1,$spok3),RND($spok2,$spok4))
   // Не помешает задержка и возможно GETSCREEN
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,433,244, 1343307)
         lclick(RND($start1,$start3,rnd($start2,$start4))
      ELSE
         wait(1500)
         getscreen
         IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
            wait(RND(1000,1500))
         END_IF
      END_IF
   END_IF
END_IF

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Помогаем Люциферу
« Reply #18 on: April 27, 2014, 02:34:41 PM »
Вот последний вариант, он точно правильный. Единственное не уверен что в твоих переменных числа в правильном порядке.

Code: (clickermann) [Select]
define($agr1,470)
define($agr2,424)
define($agr3,381)
define($agr4,466)
define($spok1,555)
define($spok2,431)
define($spok3,553)
define($spok4,460)
define($hitr1,467)
define($hitr2,466)
define($hitr3,512)
define($hitr4,462)
define($start1,390)
define($start2,501)
define($start3,383)
define($start4,492)
define($okno1,370)
define($okno2,396)
define($okno3,370)
define($okno4,406)
define($1,434)
define($2,236)
define($3,435)
define($4,246)

getscreen
IF_PIXEL_IN(514,396,514,396, 47026) //Агрессивная
   lclick(RND($hitr1,$hitr3),rnd($hitr2,$hitr4))
   WAITMS(50)
   getscreen
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,436,242, 1343307)
         lclick(RND($start1,$start3),rnd($start2,$start4))
      ELSE
         wait(RND(1200,1500))
      END_IF
   END_IF
END_IF

getscreen
IF_PIXEL_IN(514,396,514,396, 9830400) // Спокойная
   lclick(RND($agr1,$agr3),RND($agr2,$agr4))
   WAITMS(50)
   GETSCREEN
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,437,244 1343307)
         lclick(RND($start1,$start3,rnd($start2,$start4))
         WAITMS(50)
      ELSE
         wait(RND(1200,1500))
      END_IF
   END_IF
END_IF

getscreen
IF_PIXEL_IN(506,393,506,393, 327243)
   lclick(RND($spok1,$spok3),RND($spok2,$spok4))
   WAITMS(50)
   GETSCREEN
   IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
      wait(RND(1000,1500))
      getscreen
      IF_PIXEL_IN(436,242,436,242, 1343307)
         lclick(RND($start1,$start3,rnd($start2,$start4)
         WAITMS(50)
      ELSE
         wait(1500)
         getscreen
         IF_PICTURE_IN($okno1,$okno2,$okno3,$okno4, "zero.bmp")
            wait(RND(1000,1500))
         END_IF
      END_IF
   END_IF
END_IF

lucifer2000

  • Освоившийся
  • **
  • Posts: 21
    • View Profile
Re: Помогаем Люциферу
« Reply #19 on: April 27, 2014, 02:42:27 PM »
Ок,спасибо ребята)

Крис Тинка

  • Активный участник
  • ***
  • Posts: 171
    • View Profile
Re: Помогаем Люциферу
« Reply #20 on: April 27, 2014, 02:56:37 PM »
Code: (clickermann) [Select]
IF_PIXEL_IN(514,396,514,396, 47026) //АгрессивнаяОбласть поиска 1 пиксель? Может тогда лучше использовать:
Code: (clickermann) [Select]
IF(PXL(514,396) = 47026)// Если цвет пикселя в координатах (514,396) равен 47026
« Last Edit: April 27, 2014, 02:58:33 PM by Крис Тинка »

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Помогаем Люциферу
« Reply #21 on: April 27, 2014, 03:59:11 PM »
Крис Тинка да это понятно, просто было лень переписывать а в таком виде все равно будет работать.

Крис Тинка

  • Активный участник
  • ***
  • Posts: 171
    • View Profile
Re: Помогаем Люциферу
« Reply #22 on: April 27, 2014, 04:08:30 PM »
Андрей,  конечно же я не тебе об этом говорю))), а Люциферу, чтобы залез в справку и посмотрел PXL

Zets

  • Освоившийся
  • **
  • Posts: 66
    • View Profile
    • vk.com
Re: Помогаем Люциферу
« Reply #23 on: April 28, 2014, 07:16:16 PM »
lucifer2000 За что ты так закрывающую скобку не любишь?)))