Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- $access_token='Token Kalian';
- $me = json_decode(danz('https://graph.facebook.com/me?access_token='.$access_token.'&fields=id'),true);
- $ucapan = gmdate('H',time()+7*3600);
- $ucapan = str_replace('01','Met Dini Hari ',$ucapan);
- $ucapan = str_replace('02','Met Dini Hari ',$ucapan);
- $ucapan = str_replace('03','Met Dini Hari ',$ucapan);
- $ucapan = str_replace('04','Met Dini Hari ',$ucapan);
- $ucapan = str_replace('05','Met Pagi ',$ucapan);
- $ucapan = str_replace('06','Met Pagi ',$ucapan);
- $ucapan = str_replace('07','Met Pagi ',$ucapan);
- $ucapan = str_replace('08','Met Pagi ',$ucapan);
- $ucapan = str_replace('09','Met Pagi ',$ucapan);
- $ucapan = str_replace('10','Met Jelang Siang ',$ucapan);
- $ucapan = str_replace('10','Met Jelang Siang ',$ucapan);
- $ucapan = str_replace('11','Met Siang ',$ucapan);
- $ucapan = str_replace('12','Met Siang ',$ucapan);
- $ucapan = str_replace('13','Met Siang ',$ucapan);
- $ucapan = str_replace('14','Met Siang ',$ucapan);
- $ucapan = str_replace('15','Met Sore ',$ucapan);
- $ucapan = str_replace('16','Met Sore ',$ucapan);
- $ucapan = str_replace('17','Met Petang ',$ucapan);
- $ucapan = str_replace('18','Met Petang ',$ucapan);
- $ucapan = str_replace('19','Met Malem ',$ucapan);
- $ucapan = str_replace('20','Met Malem ',$ucapan);
- $ucapan = str_replace('21','Met Malem ',$ucapan);
- $ucapan = str_replace('22','Met Malem ',$ucapan);
- $ucapan = str_replace('23','Met Malem ',$ucapan);
- $ucapan = str_replace('24','Met Malem ',$ucapan);
- $ucapan = str_replace('00','Met Malem ',$ucapan);
- $stat = json_decode(danz('https://graph.facebook.com/me/feed?fields=id&access_token='.$access_token.'&offset=0&limit=10'),true);
- $log = json_encode(file('log.dat'));
- for($i=1;$i<=count($stat[data]);$i++){
- $com = json_decode(danz('https://graph.facebook.com/'.$stat[data][$i-1][id].'/comments?access_token='.$access_token.'&limit=50&fields=id,from'),true);
- if(count($com[data]) > 0){
- for($c=1;$c<=count($com[data]);$c++){
- $dat = explode($com[data][$c-1][id],$log);
- if(count($dat) > 1){
- echo'<font color="red">wes di respon<hr/>';
- }else{
- $logx = $com[data][$c-1][id].'__';
- $logy = fopen('log.dat','a');
- fwrite($logy,$logx);
- fclose($logy);
- $gen=json_decode(danz('http://graph.facebook.com/'.$com[data][$c-1][from][id].'?fields=gender'),true);
- if($gen[gender] == 'male'){
- $arr_gen=array('Mas','Mas Bro','Kang','Mbah','Pak','Maz Bos',);
- $gender=$arr_gen[rand(0,5)];
- }else{
- $arr_gen=array('Mbak','Mbak Yu','Mbak Bro',);
- $gender=$arr_gen[rand(0,2)]; }
- $exp_nam=explode(' ',$com[data][$c-1][from][name]);
- $nama=$gender.' '.$exp_nam[0];
- $arr_mess = array(
- 'Tthankz ea '.$nama.' Dah mampir di Statusku... '.$ucapan.' '.$nama,
- 'Suka deh... '.$nama.' bisa hadir di statusku... '.$ucapan,
- $ucapan.' Makasih ea '.$nama.' Jempol + commentnya',
- 'Ok '.$nama.' Thankz dah Mampir',
- 'Seneng Dweh '.$nama.' dah comment',
- 'Baca Koment '.$nama.' Rasanya adhem hehe',
- 'aaaaaaaaa ada '.$nama.'... Thnkz '.$nama.' Dah hadir...',
- 'Kikuk Kikuk Hehe.... '.$ucapan,
- 'Ok Tok Ezz '.$nama.' Makasi eaaa',
- $ucapan,
- $ucapan.' '.$nama.' Rajin banget Comment Di Statusku xixixixi pizzz....',
- 'Yez Yez Yez '.$nama.' dah hadir :D',
- 'Andai Saja kamu tau '.$nama.' Setiap Kamu Hadir Di Statusku Rasanya Gimanaaaaaa Gitu',
- 'Maap '.$nama.'....!!! Baru mandi neh.... Lom sempet Pake celana Saya.... wakakakakaka',
- 'Seneng deh lok ada '.$nama.' Di tiap Statusku Ntar Komen lagi eaaaaa....',
- $ucapan.' '.$nama.'...!!! Bapak kamu tukang anu ya....!!! Abisnya lok deket kAmu Bawaanya pengen Anuuuuuuu Gitu',
- 'Weeeeeeeeeeeee '.$nama.' Dah hadirrrrr....!! '.$ucapan.' '.$nama.'',
- 'klok '.$nama.' Ga komen bisa Gila gua...!! haha :p',
- 'Ok sip Laaa...',
- 'Ampe jempol Keriting Oeee haha...',
- 'Hampir Aja saya Galau klo '.$nama.' Ga comment...!! '.$ucapan.' '.$nama,
- 'Thnkz',
- 'Sip dah',
- 'WoW Bisa terbang',
- 'Ngopi dulu '.$nama.'',
- ''.$nama.' Suka Sekali yak ama Statusku, sampe terus di Komen :D',
- 'Sesama bot Harus rukun ea '.$nama.' ',
- 'Sesepi malam tanpa rembulan sehening Lautan tanpa gelombang Begitu pula Statusku Terasa sepi tanpa komentar kamu..... Hahahaha Glodak :D',
- 'Dulu Saya suka makan roti.... setelah baca komen '.$nama.' Saya jadi suka makan batu.... Terimakasih '.$nama.'',
- 'Dulu Saya susah tidur... Setelah baca komen dari '.$nama.' saya Jarang mandi....',
- 'Sudah 3 tahun saya menderita gagal ginjal.... Setelah baca komen '.$nama.' Saya gagal hidup Terimakasih '.$nama.'',
- 'Dulu Saya menderita kencing batu... setelah baca komen dari '.$nama.' Batunya saya kumpulin buat bangun Rumah.... Terimakasih '.$nama.'',
- 'Dulu Saya sering gonta ganti pasangan Setelah baca komen dari '.$nama.' Saya jadi Sering Gonta ganti kelamin...',
- );
- $message= '@['.$com[data][$c-1][from][id].':1] => '.$arr_mess[rand(0,count($arr_mess)-1)].'';
- if($com[data][$c-1][from][id] != $me[id]) {
- danz('https://graph.facebook.com/'.$stat[data][$i-1][id].'/comments?access_token='.$access_token.'&message='.urlencode($message).'&method=post');
- danz('https://graph.facebook.com/'.$com[data][$c-1][id].'/likes?access_token='.$access_token.'&method=post');
- }
- }
- }
- }else{
- echo'Sepi Kumen<br/>';
- }
- }
- function danz($url){
- $curl = curl_init();
- curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
- curl_setopt($curl, CURLOPT_URL, $url);
- $ch = curl_exec($curl);
- curl_close($curl);
- return $ch;
- }
- ?>
Advertisement
Add Comment
Please, Sign In to add comment