Боты для автоматического заработка - Maya Group ч.2 - Боты для Lickes Rock - Каталог статей

Боты для автоматического заработка - Maya Group ч.2

Скрипт для просмотра сайтов на lickes rock

Логика построения скрипта аналогична построению скрипту просмотра видео - старт с основного меню соц.активности. Поиск категории "Просмотр сайтов"-рис."пр_гл.bmp", затем переход на страницу предложений и поиск просмотра-рис."просмСай.bmp", переход на страницу просмотра и поиск пикселя полосы с цветом(26367) и ожидание капчи подтверждения-рис."blok.bmp" и закрытие страницы просмотра.По окончании всех просмотров возврат в основное меню по рис."soc.bmp". Скрипт просмотра организован как подпрограмма sub(say) вызов которой осуществляется строкой say().

Код

SUB(pros,$img1)
$sh=0// задаем счетчик
ski://метка
GETSCREEN //снимок экрана

if_picture_in(0,0,$_xmax,$_ymax,$img1)// если на снимке есть картинка
LCLICK($_return1+10,$_return2+10)// клм в координатах картинки
ELSE// иначе
WHEELDOWN// скролл
$sh=$sh+1// при прокрутке счетчик+1
IF($sh=20)// если 20 раз прокрутили колесико
   if_picture_in(0,0,$_xmax,$_ymax,"soc.bmp")//переход на соц активность
   MOVE($_return1+10,$_return2+5)
   WAITMS(50)
   LCLICK($_return1+10,$_return2+5)
   WAITMS(300)
   MOVE (int($_xmax/2+$_xmax/4),int($_ymax/2)) // перемещение на окно категорий
   LCLICK(int($_xmax/2+$_xmax/4),int($_ymax/2))// клик(активация) окна категорий
   GOTO(ip)// переход на конец программы
   END_IF

END_IF// конец цикла

WAIT(2)// задержка 2с
GOTO(ski)// переход по метке
END_IF// конец цикла
END_SUB

sub(say)
$c=0
pros("пр_гл.bmp") // поиск категории просмотр сайта
WAIT(5)
skipe:

WAIT(5)
GETSCREEN

WAITMS(500)
if_picture_in(0,0,$_xmax,$_ymax,"просмСай.bmp")// картинка просмотр

$c=$c+1
IF($c>30)
   if_picture_in(0,0,$_xmax,$_ymax,"soc.bmp")//переход на соц активность
   MOVE($_return1+10,$_return2+5)
   WAITMS(50)
   LCLICK($_return1+10,$_return2+5)
   WAITMS(300)
   MOVE (int($_xmax/2+$_xmax/4),int($_ymax/2)) // перемещение на окно категорий
   LCLICK(int($_xmax/2+$_xmax/4),int($_ymax/2))// клик(активация) окна категорий
   GOTO(finich)// переход на конец программы
   END_IF
END_IF
MOVE($_return1+5,$_return2+3)
LCLICK($_return1+5,$_return2+3)
MOVE($_return1+100,$_return2+30)
WAIT(1)
ELSE// просмотры закончились
   if_picture_in(0,0,$_xmax,$_ymax,"soc.bmp")//переход на соц активность
   MOVE($_return1+10,$_return2+5)
   WAITMS(50)
   LCLICK($_return1+10,$_return2+5)
   WAITMS(300)
    MOVE (int($_xmax/2+$_xmax/4),int($_ymax/2)) // перемещение на окно категорий
   LCLICK(int($_xmax/2+$_xmax/4),int($_ymax/2))// клик(активация) окна категорий
   GOTO(finich)// переход на конец программы
   END_IF
END_IF

WAIT(2)
GETSCREEN
if_pixel_in(0,int($_ymax/8),int($_xmax/7),int($_ymax/4),26367)// загрузка сайта
   WAIT(10)
   $an=0
ancor:
GETSCREEN
    if_picture_in(0,0,$_xmax,$_ymax,"blok.bmp")// капча- рука рок
    MOVE($_return1+2,$_return2+2)
    WAIT(1)
    LCLICK($_return1+2,$_return2+2)
      END_IF

   GETSCREEN
if_picture_in(0,0,$_xmax,$_ymax,"просм_успех.bmp")// капча- рука рок
   MOVE($_return1+10,$_return2+5)
   WAIT(1)
   LCLICK($_return1+10,$_return2+5)
   WAIT(2)
ELSE
   $an=$an+1
       IF($an>8)
           GOTO(con)
    END_IF

   WAIT(10)
   GOTO(ancor)

   END_IF
con:
KEYDOWN(#ctrl)// закрыть страницу
WAITMS(50)
KEYPRESS(#W)
WAITMS(50)
KEYUP(#ctrl)
ELSE
KEYDOWN(#ctrl)// закрыть страницу
WAITMS(50)
KEYPRESS(#W)
WAITMS(50)
KEYUP(#ctrl)

END_IF
GOTO(skipe)// переход на начало

finich:// конец выход в категории
SOUND("bell1.wav")
END_SUB

// начало программы
MOVE (int($_xmax/2+$_xmax/4),int($_ymax/2)) // перемещение на окно категорий
LCLICK(int($_xmax/2+$_xmax/4),int($_ymax/2))// клик(активация) окна категорий

ip:

say()
GOTO(ip)

Источник: http://robotnet.tk

Категория: Боты для Lickes Rock | Добавил: kuzma (28.08.2016) | Автор: просмотра сайтов на lickes rock

Всего комментариев: 0