|
SUB(pros,$img1)
$sh=0// задаем счетчик
ski://метка
SOUND("play.wav")
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(vid_yt)
pros("yt_pros.bmp") // поиск категории просмотр сайта
skip:
WAIT(12)
GETSCREEN
if_picture_in(0,0,$_xmax,$_ymax,"img3.bmp")
// 4151273
//if_pixel_in(0,$ay,$bx,$_ymax,4151273)
MOVE($_return1+15,$_return2+1)
LCLICK($_return1+15,$_return2+1)
ELSE// просмотры закончились
if_picture_in(0,0,$_xmax,$_ymax,"soc.bmp")//переход на соц активность
MOVE($_return1+10,$_return2+5)
WAITMS(50)
LCLICK($_return1+10,$_return2+5)
WAIT(8)
MOVE (int($_xmax/2+$_xmax/4),int($_ymax/2)) // перемещение на окно категорий
LCLICK(int($_xmax/2+$_xmax/4),int($_ymax/2))// клик(активация) окна категорий
GOTO(fini)// переход на конец программы
END_IF
END_IF
WAIT(8)
GETSCREEN
if_picture_in(0,0,$_xmax,$_ymax,"pr_no.bmp")
MOVE(INT($_xmax/2),INT($_ymax/3+20))//запуск видео
WAIT(2)
LCLICK(INT($_xmax/2),INT($_ymax/3+20))
WAIT(23) //ожидание просмотр
GETSCREEN
if_pixel_in(INT($_xmax/2),INT(0+$_ymax/4),INT($_xmax/2+$_xmax/4),INT($_ymax-$_ymax/3),4373494) //нет счета времени (желтый квадрат)
if_picture_in(0,0,$_xmax,$_ymax,"zakrit.bmp")//закрыть
MOVE($_return1+5,$_return2+10)
WAITMS(50)
LCLICK($_return1+5,$_return2+10)
WAIT(1)
GETSCREEN
if_picture_in(0,0,$_xmax,$_ymax,"skrit.bmp")// скрыть
MOVE($_return1+10,$_return2+5)
WAIT(1)
LCLICK($_return1+10,$_return2+5)
WAIT(4)
KEYDOWN(#ctrl)// перезагрузка страницы
WAITMS(50)
KEYPRESS(#F5)
WAITMS(50)
KEYUP(#ctrl)
WAIT(15)
END_IF
END_IF
ELSE // счет есть-зеленый квадрат
WAIT(1)
if_picture_in(0,0,$_xmax,$_ymax,"zakrit.bmp")// закрыть видео
MOVE($_return1+5,$_return2+10)
WAITMS(50)
LCLICK($_return1+5,$_return2+10)
WAITMS(50)
END_IF
END_IF
GOTO(skip)
WAIT(5)
fini:
SOUND("bell1.wav")
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>90)
if_picture_in(0,0,$_xmax,$_ymax,"soc.bmp")//переход на соц активность
MOVE($_return1+10,$_return2+5)
WAITMS(50)
LCLICK($_return1+10,$_return2+5)
WAIT(3)
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)
WAIT(8)
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(4)
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,"просм_успех.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
ELSE
WAIT(10)
MOVE(420,41)
WAITMS(100)
LCLICK(420,41) // 15987708
WAITMS(10)
MOVE(820,241)
WAIT(1)
GOTO(skipe)// переход на начало
END_IF
con:
MOVE(420,41)
WAITMS(100)
LCLICK(420,41) // 15987708
WAITMS(10)
MOVE(820,41)
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:
vid_yt()
WAIT(4)
say()
GOTO(ip)
|