 |
Переписать Лс бота - Вопросы и ответы, обсуждения - Ваши вопросы по Web-программированию только в данном разделе |
25.03.2012, 02:06
|
#1
|
|
|
|
Разведчик
|
 Регистрация: 28.02.2012
 Сообщений: 0
 Популярность: 10
 Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
|
Переписать Лс бота
Кто может переписать этого бота под новый домен?
PHP код:
<?
$mail = "zhyk.ru"; //e-mail или логин от контакта
$pass = "zhyk.ru"; //пароль от контакта
function connect($link,$cookie=null,$post=null){
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,$link);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_TIMEOUT, 0);
curl_setopt ($ch, CURLOPT_HEADER, 1);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
if($cookie !== null)
curl_setopt($ch, CURLOPT_COOKIE, $cookie);
if($post !== null)
{
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
}
$otvet = curl_exec($ch);
curl_close($ch);
return $otvet;
}
$otvet=connect("http://login.vk.com/?act=login&email=$mail&pass=$pass");
If(!preg_match("/hash=(.*?)&/",$otvet,$hash)){
die("Login incorrect");
}
$otvet=connect("http://vkontakte.ru/login.php?act=slogin&fast=1&hash=".$hash[1]."&s=1");
preg_match("/remixsid=(.*?);/",$otvet,$sid);
$cookie = "remixchk=5; remixsid=$sid[1]";
while(1){
$html = connect("http://vkontakte.ru/mail",$cookie);
if(!preg_match('/new_msg" id="mess(.*?)"/',$html,$let)){
echo convert_cyr_string("Сообщений нет!!\n","w","a");
sleep(3);
}else{
echo convert_cyr_string("Сообщение найдено\n","w","a");
$lol = connect("http://m.vkontakte.ru/letter".$let[1]."",$cookie);
$loi = connect("http://vkontakte.ru/mail?act=show&id=".$let[1]."",$cookie);
preg_match('/285px;">(.*?)<\/div>/',$loi,$text);
preg_match('/to_id" value="(.*?)"/',$lol,$id);
preg_match('/name="chas" value="(.*?)"/',$lol,$hash);
echo convert_cyr_string("$text[1]\n","w","a");
if(preg_match('/привет/i',$text[1],$rr)){
$text = array("Привет. как дела?","куку","\0","0/","ziga","qq","Фты не достоен со мной здороваться :DD","здарова!!!","ку","о/","q","hi","\o","салам","зига","ку няшки","q все","q нЯШи ");
}
elseif(preg_match("/пока/i",$text[1],$rr)){
$text = array("Давай пиздуй тебе никто не ждёт","ну конечно уёбок так я тебя и отпустил!!","а нука стой!!","зига тебе","\0","\o");
}else{
$text = "";
}
if($text){
$i = rand(0, count($text) - 1);
connect("http://m.vkontakte.ru/mailsent?pda=1",$cookie,"to_id=".$id[1]."&to_reply=0&chas=".$hash[1]."&title=&message=".urlencode(iconv('cp1251','utf-8', $text[$i]))."");
echo convert_cyr_string("Ответил (с)жираф-блог.рф\n","w","a");
}
}
}
?>
|
|
|
25.03.2012, 07:38
|
#2
|
|
|
|
Разведчик
|
 Регистрация: 01.01.2012
 Сообщений: 4
 Популярность: 20
 Сказал(а) спасибо: 7
Поблагодарили 5 раз(а) в 5 сообщениях
|
Re: Переписать Лс бота
Че его переписывать то только домен vkontakte.ru заменить на vk.com
PHP код:
<?
$mail = "zhyk.ru"; //e-mail или логин от контакта
$pass = "zhyk.ru"; //пароль от контакта
function connect($link,$cookie=null,$post=null){
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,$link);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_TIMEOUT, 0);
curl_setopt ($ch, CURLOPT_HEADER, 1);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
if($cookie !== null)
curl_setopt($ch, CURLOPT_COOKIE, $cookie);
if($post !== null)
{
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
}
$otvet = curl_exec($ch);
curl_close($ch);
return $otvet;
}
$otvet=connect("http://login.vk.com/?act=login&email=$mail&pass=$pass");
If(!preg_match("/hash=(.*?)&/",$otvet,$hash)){
die("Login incorrect");
}
$otvet=connect("http://vk.com/login.php?act=slogin&fast=1&hash=".$hash[1]."&s=1");
preg_match("/remixsid=(.*?);/",$otvet,$sid);
$cookie = "remixchk=5; remixsid=$sid[1]";
while(1){
$html = connect("http://vk.com/mail",$cookie);
if(!preg_match('/new_msg" id="mess(.*?)"/',$html,$let)){
echo convert_cyr_string("Сообщений нет!!\n","w","a");
sleep(3);
}else{
echo convert_cyr_string("Сообщение найдено\n","w","a");
$lol = connect("http://m.vk.com/letter".$let[1]."",$cookie);
$loi = connect("http://vk.com/mail?act=show&id=".$let[1]."",$cookie);
preg_match('/285px;">(.*?)<\/div>/',$loi,$text);
preg_match('/to_id" value="(.*?)"/',$lol,$id);
preg_match('/name="chas" value="(.*?)"/',$lol,$hash);
echo convert_cyr_string("$text[1]\n","w","a");
if(preg_match('/привет/i',$text[1],$rr)){
$text = array("Привет. как дела?","куку","\0","0/","ziga","qq","Фты не достоен со мной здороваться :DD","здарова!!!","ку","о/","q","hi","\o","салам","зига","ку няшки","q все","q нЯШи ");
}
elseif(preg_match("/пока/i",$text[1],$rr)){
$text = array("Давай пиздуй тебе никто не ждёт","ну конечно уёбок так я тебя и отпустил!!","а нука стой!!","зига тебе","\0","\o");
}else{
$text = "";
}
if($text){
$i = rand(0, count($text) - 1);
connect("http://m.vk.com/mailsent?pda=1",$cookie,"to_id=".$id[1]."&to_reply=0&chas=".$hash[1]."&title=&message=".urlencode(iconv('cp1251','utf-8', $text[$i]))."");
echo convert_cyr_string("Ответил (с)жираф-блог.рф\n","w","a");
}
}
}
?>
Последний раз редактировалось avitoss; 25.03.2012 в 07:42.
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 22:09.
|
 |