Juni 2012 ~ -Just Inspiration Your Live-

Auto komen Facebook versi 1(script auto coment)

Hai semua kali ini saya mau post tentang bot auto komen(script auto comen) sebelum dicoba resiko ditanggung pengguna ya :)

Yang dibutuhkan :

PHP SDK lama sedot disini Disini
Api key + Api Secret : bisa lihat Disini
Hosting support php + Perl
php code sbg logger/action + Perl remote
Get the code and feel the soul !

Php code :

01	<?php
02	class agendosa extends Exception { }

03	//pake sdk versi (lama max versi 2)
04	//Download disini : http://www.4shared.com/zip/COf7-MuF/sdk.html

05
06	require_once './sdk/facebook.php';

07
08	$appapikey = 'isi-api-keynya';

09	$appsecret = 'isi-api-secretnya';
10	$facebook = new Facebook($appapikey, $appsecret);

11	//$user_id = $facebook->require_login();
12

13	if(!empty($_GET['cmn'])){
14	$cmnt = $_GET['cmn'];

15	}
16

17	if(!empty($_GET['uid'])){
18	$uid = $_GET['uid'];

19	}
20

21	$cek_permisi = $facebook->api_client->users_hasAppPermission("read_stream",123456uidmu);
22	if($cek_permisi){

23	try{
24	$pot = $facebook->api_client->stream_get(123456uidmu,$uid,'0','0',1,'','','','');

25	//print_r($pot);
26	$post_id = $pot[posts][0][post_id];

27	$aktor = $pot[posts][0][actor_id];
28	if($aktor == $uid){

29	if(file_exists("$uid")){
30	$cek = fopen("$uid",'r');

31	$str = fgets($cek);
32	fclose($cek);

33
34	if(!empty($str) && ($str != $post_id)){

35	$comment = $facebook->api_client->stream_addComment($post_id, $cmnt, 123456uidmu);
36	}

37	}
38	$log1 = fopen("$uid", 'w');

39	fwrite($log1, $post_id);
40	fclose($log1);

41	}
42	}catch(agendosa $e){

43	throw $e;
44	}

45	}
46	?>

Upload file tsb dengan nama komen.php, selanjutnya setting remote komen.pl

Source remote komen.pl:

01	#!/usr/bin/perl
02	use IO::Socket;

03	use IO::Select;
04	use Socket;

05
06	my @pesan = (

"Selalu%20menyukai%20status%20anda.%0A%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%84%E2%96%84%0A%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%84%E2%96%84%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%84%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%0A%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%93%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%88%E2%96%88%0A%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%80%E2%96%91%E2%96%91%E2%96%91%E2%96%91%E2%96%80%E2%96%80%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%E2%96%88%0A",

"%F0%9D%90%87%F0%9D%90%9A%F0%9D%90%9D%F0%9D%90%A2%F0%9D%90%AB%20%F0%9D%90%A6%F0%9D%90%9E%F0%9D%90%A7%F0%9D%90%A0%F0%9D%90%9A%F0%9D%90%A7%F0%9D%90%AD%F0%9D%90%9A%F0%9D%90%AB%20%F0%9D%90%A3%F0%9D%90%9E%F0%9D%90%A6%F0%9D%90%A9%F0%9D%90%A8%F0%9D%90%A5%20,%E2%93%81%E2%93%98%E2%93%9A%E2%93%94%20%E2%93%89%E2%93%97%E2%93%98%E2%93%A2%20!!!",

09	"%E2%98%85%E2%98%85%E2%98%85%E2%98%85%E2%98%85%20Ane%20kasih%20rate%20gan....",
10		"Like%20this...Selalu%20komen%20biar%20kelihatan%20eksis...!!!",

11		"primingsi%20%cc%b6b%cc%b6o%cc%b6t%cc%b6%20gaul%20lewat.....",
12	"hadir...%0A%E2%94%80%E2%94%80%E2%94%80%E2%95%94%E2%95%97%E2%95%94%E2%95%90%E2%95%A6%E2%95%97%0A%E2%94%80%E2%94%80%E2%94%80%E2%95%91%E2%95%9A%E2%95%A3%E2%95%91%E2%95%91%E2%95%9A%E2%95%97%0A%E2%95%94%E2%95%A6%E2%95%A6%E2%95%A3%E2%95%AC%E2%95%91%E2%95%91%E2%95%91%E2%95%94%E2%95%AC%E2%95%A6%E2%95%A6%E2%95%97%0A%E2%95%9A%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%90%E2%95%A9%E2%95%90%E2%95%A9%E2%95%90%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%9D%0A%E2%95%94%E2%95%97%E2%95%94%E2%95%A6%E2%95%97%E2%94%80%E2%94%80%E2%94%80%E2%95%94%E2%95%97%E2%95%94%E2%95%97%E2%95%94%E2%95%A6%E2%95%90%E2%95%97%0A%E2%95%91%E2%95%91%E2%95%A0%E2%95%A3%E2%95%A0%E2%95%A6%E2%95%90%E2%95%97%E2%95%91%E2%95%9A%E2%95%A3%E2%95%9A%E2%95%AC%E2%95%A3%E2%95%90%E2%95%AC%E2%95%90%E2%95%A6%E2%95%A6%E2%95%97%0A%E2%95%91%E2%95%9A%E2%95%A3%E2%95%91%E2%95%90%E2%95%A3%E2%95%A9%E2%95%A3%E2%95%91%E2%95%94%E2%95%A3%E2%95%91%E2%95%91%E2%95%A0%E2%95%90%E2%95%91%E2%95%A9%E2%95%A3%E2%95%94%E2%95%9D%0A%E2%95%9A%E2%95%90%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%90%E2%95%9D%E2%95%9A%E2%95%90%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%90%E2%95%A9%E2%95%90%E2%95%A9%E2%95%9D%0A%E2%94%80%E2%94%80%E2%94%80%E2%95%94%E2%95%97%E2%94%80%E2%94%80%E2%94%80%E2%94%80%E2%95%94%E2%95%A6%E2%95%97%0A%E2%94%80%E2%94%80%E2%94%80%E2%95%91%E2%95%9A%E2%95%A6%E2%95%90%E2%95%97%E2%95%94%E2%95%9D%E2%95%A0%E2%95%AC%E2%95%A6%E2%95%97%0A%E2%95%94%E2%95%A6%E2%95%A6%E2%95%A3%E2%95%91%E2%95%91%E2%95%AC%E2%95%9A%E2%95%A3%E2%95%AC%E2%95%91%E2%95%91%E2%95%94%E2%95%AC%E2%95%A6%E2%95%97%0A%E2%95%9A%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%90%E2%95%90%E2%95%A9%E2%95%90%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%A9%E2%95%9D",

13		"nice%20info....%20like%20this...^____^..",
14	"iHiRRRR...%0A%E2%95%94%E2%95%90%E2%95%90%E2%95%90%E2%95%97%20%E2%99%AA%0A%E2%95%91%E2%96%88%E2%96%88%E2%96%88%E2%95%91%20%E2%99%AB%0A%E2%95%91%20(%E2%97%8F)%20%E2%99%AB%20Komen%20Sambil%0A%E2%95%9A%E2%95%90%E2%95%90%E2%95%90%E2%95%9D%E2%99%AA%E2%99%AA%20Denger%20Musik%20%E2%99%AA%E2%99%AA",

15	"Menyukai%20status%20Anda....%20like%20this...^____^..",
16	"like%20this!!!%20hi..hi..hi..%20!!!numpang%20lewat.hi.hi.hi..",

17	);
18

19	my $target1 = 1000000549xxxx;
20	my $target2 = 10000114539xxxx;

21	my $target3 = 10000135735xxxx;
22

23	$len = @pesan;
24

25	my $cmn_acak1 = @pesan[int rand($len)];
26	my $url1 = ("http://domainmu.com/komen.php?cmn=$cmn_acak1&uid=$target1");

27	my $stat1 = query($url1);
28

29	my $cmn_acak1 = @pesan[int rand($len)];
30	my $url2 = ("http://domainmu.com/komen.php?cmn=$cmn_acak1&uid=$target2");

31	my $stat2 = query($url2);
32

33	my $cmn_acak1 = @pesan[int rand($len)];
34	my $url3 = ("http://domainmu.com/komen.php?cmn=$cmn_acak1&uid=$target3");

35	my $stat3 = query($url3);
36

37	sub query($) {
38	my $url = $_[0];

39	$url =~ s/http:\/\///;
40	my $host = $url;

41	my $query = $url;
42	my $page = "";

43	$host =~ s/href=\"?http:\/\///;
44	$host =~ s/([-a-zA-Z0-9\.]+)\/.*/$1/;

45	$query =~ s/$host//;
46	if ( $query eq "" ) { $query = "/"; }

47	eval {
48	my $sock = IO::Socket::INET->new(PeerAddr => "$host", PeerPort => "80", Proto => "tcp") or return;

49	print $sock "GET $query HTTP/1.0\r\nHost: $host\r\nAccept: /\r\nUser-Agent: Mozilla/5.0\r\n\r\n";
50	my @r = <$sock>;

51	$page = "@r";
52	close($sock);

53	};
54	return $page;

}

-Just Inspiration Your Live-

Blog Archive

Categories

Recent Posts

Recent Comments

Followers

Do not forget to follow and leave comments.

jangan lupa Follow dan tinggalkan komentar ya!

Terima Kasih atas kunjungannya!

Thanks you For Visiting.

Sabtu, 02 Juni 2012

Script auto coment

Popular Posts

Labels

Blog Archive

Categories