<?php
$access_token='XXXXXXXXXXXXXXX'; //+ perms = read_mailbox
$jam=array('01','02','03','04','05','06','07','08','09','10','11','12','13','14','15','16','17','18','19','20','21','22','23','24','00',);
$sapa=array('Met Dini Hari ','Met Dini Hari ','Met Dini Hari ','Met Dini Hari ','Met Pagi ','Met Pagi ','Met Pagi ','Met Pagi ','Met Pagi ','Met Jelang Siang ','Met Siang ','Met Siang ','Met Siang ','Met Siang ','Met Sore ','Met Sore ','Met Petang ','Met Petang ','Met Malem ','Met Malem ','Met Malem ','Met Malem ','Met Malem ','Met Malem ','Met Malem ',);
$ucapan = gmdate('H',time()+7*3600);
$ucapan = str_replace($jam,$sapa,$ucapan);
$me=json_decode(auto('https://graph.facebook.com/me?access_token='.$access_token),true);
$in=json_decode(auto('https://graph.facebook.com/me/inbox?access_token='.$access_token.'&fields=id,to,unread,unseen'),true);
if(file_exists('in_log')){
$inlog = json_encode(file('in_log'));
}else{
$inlog='';
}
if(file_exists('c_log')){
$clog = json_encode(file('c_log'));
}else{
$clog='';
}
for($i=1;$i<=count($in[data]);$i++){
if($in[data][$i-1][to][data][0][id] == $me[id]){
$from=$in[data][$i-1][to][data][1];
}else{
$from=$in[data][$i-1][to][data][0];
}
$cm=json_decode(auto('https://graph.facebook.com/'.$in[data][$i-1][id].'/comments?access_token='.$access_token.'&limit=50&fields=id,message,from'),true);
if(count($cm[data]) > '0'){
for($n=1;$n<=count($cm[data]);$n++){
if($cm[data][$n-1][from][id] != $me[id]){
if(!ereg($cm[data][$n-1][id],$clog)){
$logx = $cm[data][$n-1][id].' ';
$logy = fopen('c_log','a');
fwrite($logy,$logx);
fclose($logy);
$ex_nam=explode(' ',$cm[data][$n-1][from][name]);
$nama=$ex_nam[0];
$kata=$cm[data][$n-1][message];
if(ereg('MAAF',$kata) || ereg('maaf',$kata) || ereg('Maaf',$kata)){
$arr_mess = array(
'jiah... pake maap segala',
'ea.... g papa udah Danz maafin ko... ntar Inbox lgi ea '.$nama.'.... ',
'duh tiada maap bagimu '.$nama.'... gmana neh... :p',
'yeeee enak aja minta maaf... Nyanyi dulu '.$nama.'... nang ning ning nang oooo.... 5X',
'maaf... emang knapa '.$nama,
'masama '.$nama.' Danz jg minta maaf...',
);
}else{
if(ereg('ASSALAM',$kata) || ereg('Assalam',$kata) || ereg('Askum',$kata) || ereg('assalam',$kata) || ereg('askum',$kata) || ereg('ASKUM',$kata)){
$arr_mess = array(
'Waalaikumsalam... :D',
'kumcalam',
'kumsayank... upzz kesleo... :D',
'wasskum',
);
}else{
if(ereg('mandi',$kata) || ereg('pake celana',$kata) || ereg('mande',$kata)){
$arr_mess = array(
'idih... '.$nama.' parno',
'mau donk jdi sabunya',
'hihihik anuunya keliatan twuh',
'lohh '.$nama.' mandi g ajak2',
'mandi di kali anunya basah... tanpa Inbox '.$nama.' Anuku gelisah....',
'tumben '.$nama.' mandi',
);
}else{
if(ereg('ROBOT',$kata) || ereg('robot',$kata) || ereg('bot',$kata) || ereg('BOT',$kata)){
$arr_mess = array(
'botmu mantap '.$nama.' minta scriptnya dunk',
'kmu robot koplak ea',
'robot ko bisa kirim inbox si... gmana caranya',
'ooooh jdi '.$nama.' robot toh... baru ngerrti saya...',
$ucapan.' bot',
);
}else{
if(ereg('cinta',$kata) || ereg('love',$kata) || ereg('pacaran',$kata) || ereg('kekasih',$kata) || ereg('kangen',$kata) || ereg('kasmaran',$kata)){
$arr_mess = array(
'cinta itu glodak '.$nama.'',
'duh '.$nama.' makasih atas cintanya eaa',
'haddooooh '.$nama.' ngajak bercinta ',
'pokoknya mmmuaaaach '.$nama.'...',
'oooooo love ea '.$nama.'',
);
}else{
if(ereg('kenapa',$kata) || ereg('knapa',$kata) || ereg('knp',$kata) || ereg('kenapakah',$kata)){
$arr_mess = array(
'kenapa? au ach gelapz ',
'kena sesuatu nich '.$nama,
'ga knapa-napa... emang Majalah BuadTeLo... hehe pizzz',
'kenapa ea '.$nama.' sek sek sek tak mikir',
'Mo tau aja urusan robot',
);
}else{
if(ereg('mengapa',$kata) || ereg('mengpakah',$kata) || ereg('mgapa',$kata)){
$arr_mess = array(
'mengapa ea? sek sek sek tak mikir',
'karena '.$nama.' telah mencuri hatiku xixixi',
'Mo tau aja urusan robot',
);
}else{
if(ereg('haha',$kata) || ereg('hihi',$kata) || ereg('wkwk',$kata) || ereg('wakaka',$kata) || ereg('hehe',$kata) || ereg('xixi',$kata)){
$arr_mess = array(
'ngakak',
'malah mrengez',
'looohhh malah ktawa',
'loooohhh bot nya ketawa hahaha',
'gw serius say jgn ketawa dunkkkk... :p',
'kok ktawa ada yg aneh ea',
'wkwkwkwkwk juga',
'udah2 jgan ktawa mulu... '.$nama.' botnya malu nih',
);
}else{
if(ereg('kemana',$kata) || ereg('kmana',$kata) || ereg('buru2',$kata) || ereg('ditinggal',$kata)){
$arr_mess = array(
'ea nih '.$nama.' botnya ngantuk... bye',
'kemana kemana kemana.... assseeekk ting ting punya coey',
'dah ngantuk gw',
'byee....',
'turru disek rek',
'mo bobok aq... mo ikud',
'ikud yuk '.$nama,
);
}else{
if(ereg('http',$kata)){
$arr_mess=array(
'Link apa tuh Gan',
'Linknya boleh di klik ndak twuh ',
);
}else{
if(ereg('Keriting',$kata) || ereg('kriting',$kata) || ereg('Kriting',$kata) || ereg('Kesleo',$kata) || ereg('kriting',$kata) || ereg('kesleo',$kata)){
$arr_mess=array(
'tenang '.$nama.' sini jarinya Q setrika wakakaka',
'Uuuuu kacian keriting ea '.$nama.'... sama lok gitu',
'mo di pijitin jarinya '.$nama.'',
'besok jempolnya di bonding ea '.$nama.' :p',
);
}else{
$arr_mess=array(
'maap saya cuma robot '.$nama,
'sek sek sek bot nya mikir '.$nama,
'hadoh... Bot bingung '.$nama,
'hehehe kenapa '.$nama,
'boZ ge mandi neh '.$nama.' Jdi bot di tugasin bales inbok kmu',
'yaaaaaa BoZ Danz minggat.... saya cuma Bot g erti pa pa',
'hehehehe :p',
);
}}}}}}}}}}}
$message=' :D '.$arr_mess[rand(0,count($arr_mess)-1)].' :D ';
auto('https://graph.facebook.com/'.$from[id].'/inbox?access_token='.$access_token.'&message='.urlencode($message).'&subject='.urlencode($ucapan).'....&method=post');
echo '<br/>'.$cm[data][$n-1][from][name].' => '.$cm[data][$n-1][message].'<br/>Re => '.$message.'<br/>';
}
}
}
}else{
if(($in[data][$i-1][unseen] == '1' ) && ($in[data][$i-1][unread] == '1')){
if(!ereg($in[data][$i-1][id],$inlog)){
$logx = $in[data][$i-1][id].' ';
$logy = fopen('in_log','a');
fwrite($logy,$logx);
fclose($logy);
$xnam = explode(' ',$from[name]);
$nama = $xnam[0];
$arr_mess = array(
':) maaf '.$nama.' bos gi oflen :)',
':) da apa '.$nama.'...? maaf saya cuma bot ditugaskan ma Danz untuk bales Inbox :)',
':) duh '.$nama.' Bos Danz gi Off ne... :D di tunggu onlenya yakz :)',
':) duh sayang sekali '.$nama.'... saya cuma bot :/ gak ngerti apa apa :D tunggu boz onlen yak :) ',
);
$message = $arr_mess[rand(0,count($arr_mess)-1)];
auto('https://graph.facebook.com/'.$from[id].'/inbox?access_token='.$access_token.'&message='.urlencode($message).'&subject='.urlencode($ucapan).'....&method=post');
echo'<hr/>To: '.$nama.' => '.$message.'<br/>';
}
}
echo'<hr/>';
}
}
function auto($url){
$ch=curl_init();
curl_setopt($ch,CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch,CURLOPT_URL,$url);
$cx=curl_exec($ch);
curl_close($ch);
return($cx);
}
?>