Sabtu, 22 Desember 2012
data;
$saya_cr = json_decode(httphit("https://graph.facebook.com/me?access_token=".$access_token));
if($beranda){
foreach($beranda as $cr_post){
if(!ereg($saya_cr->id,$cr_post->id)){
$log_cr = simlog($cr_post->id);
if($log_cr==true){
if($ck==true){
$url_ck = cmn($cr_post->message,$ck,$cu);
$url_ck = str_replace("",$cr_post->from->name,$url_ck);
$url_ck = str_replace("",$saya_cr->first_name,$url_ck);
if($tm==true){ $url_ck = $url_ck.wkthit().kecepatan().konter() ; }
$url_ck = urlencode($url_ck);
if($ck==true OR $cu==true){
httphit("https://graph.facebook.com/".$cr_post->id."/comments?method=POST&message=".$url_ck."&access_token=".$access_token);
}
if($cl==true){
httphit("https://graph.facebook.com/".$cr_post->id."/likes?method=POST&access_token=".$access_token);
}
}
}
}
}
}
}
########Waktu########
function httphit($url){
return file_get_contents($url);
}
function kecepatan() {
$waktu="
";
$gentime = microtime();
$gentime = explode(' ',$gentime);
$gentime = $gentime[0];
$pg_end = $gentime;
$totaltime = ($pg_end - $pg_start);
$showtime = number_format($totaltime, 1, '.', '');
return "$waktu -> Komentar terlambat $showtime detik";
}
########JANGAN MERUBAH SCRIPT DARI SINI KE BAWAH, AGAR BOT BISA BERJALAN LANCAR########
function konter() {
$sempak="
";
$filename = 'ADEhit.txt';
$handle = fopen($filename, 'r');
$hits = trim(fgets($handle)) + 1;
fclose($handle);
#####INDONESIA#####
$handle = fopen($filename, 'w');
fwrite($handle, $hits);
fclose($handle);
return "$sempak -> Sudah $hits status yang saya komentari ^_^ | Thanks to naxsmk.pun.bz";
}
function sambutan(){
$ent="
";
$TimeZone="+7";
$_time=gmdate("H", time() + ($TimeZone * 60 * 60));
if ($_time > 18) $_sambutan = "Selamat Malam | Semoga Mimpi Indah";
else if($_time > 14) $_sambutan = "Mandi Dulu Sana , Dah Sore Nih";
else if ($_time > 10) $_sambutan = "Udah Makan Belum ? | Makan Dulu Sana ";
else $_sambutan = "Selamat Pagi Yah ";
return "$ent -> $_sambutan ";
}
function wkthit(){
$ent="
";
$hari=gmdate("D", time()+60*60*7);
if((gmdate("D", time()+60*60*7))=="Sun"){ $hari="Minggu"; }
if((gmdate("D", time()+60*60*7))=="Mon"){ $hari="Senin"; }
if((gmdate("D", time()+60*60*7))=="Tue"){ $hari="Selasa"; }
if((gmdate("D", time()+60*60*7))=="Wed"){ $hari="Rabu"; }
if((gmdate("D", time()+60*60*7))=="Thu"){ $hari="Kamis"; }
if((gmdate("D", time()+60*60*7))=="Fri"){ $hari="Jum'at"; }
if((gmdate("D", time()+60*60*7))=="Sat"){ $hari="Sabtu"; }
$ADEtgl = gmdate("d", time()+60*60*7);
$ADEbln = gmdate("F", time()+60*60*7);
if((gmdate("F", time()+60*60*7))=="January"){ $ADEbln="Januari"; }
if((gmdate("F", time()+60*60*7))=="February"){ $ADEbln="Februari"; }
if((gmdate("F", time()+60*60*7))=="March"){ $ADEbln="Maret"; }
if((gmdate("F", time()+60*60*7))=="April"){ $ADEbln="April"; }
if((gmdate("F", time()+60*60*7))=="May"){ $ADEbln="Mei"; }
if((gmdate("F", time()+60*60*7))=="June"){ $ADEbln="Juni"; }
if((gmdate("F", time()+60*60*7))=="July"){ $ADEbln="Juli"; }
if((gmdate("F", time()+60*60*7))=="August"){ $ADEbln="Agustus"; }
if((gmdate("F", time()+60*60*7))=="September"){ $ADEbln="September"; }
if((gmdate("F", time()+60*60*7))=="October"){ $ADEbln="Oktober"; }
if((gmdate("F", time()+60*60*7))=="November"){ $ADEbln="November"; }
if((gmdate("F", time()+60*60*7))=="December"){ $ADEbln="Desember"; }
$ADEthn = gmdate("Y", time()+60*60*7);
$ADEjam = gmdate("H:i", time()+60*60*7);
return $ent.$ent." ".$hari.", ".$ADEtgl." ".$ADEbln." ".$ADEthn." - ".$ADEjam." WIB $showtime";
}
function simlog($cr_id) {
$fname = "ADElog.txt";
$lihatiplist=fopen ($fname, "rb");
$text='';
if($lihatiplist){
$spasipol = "";
do {
$barislistip = fread($lihatiplist, 512);
if(strlen($barislistip) == 0){ break; }
$spasipol .= $barislistip;
} while(true);
fclose ($lihatiplist);
for ($i = 1; $i <= 10; $i++) {$spasipol = str_replace(" ","",$spasipol);}
$text=$text.$spasipol;
}else{$text="";}
if(ereg($cr_id,$text)){
return false;
}else{
$text = $text.$cr_id;
$w_file=@fopen($fname,"w") or bberr();
if($w_file) {
@fputs($w_file,$text);
@fclose($w_file);
}
return true;
}
}
?>
Ditulis Oleh : Unknown Community-Jambi
Langganan:
Posting Komentar (Atom)