Advertisement
tobitaz

komenbnykadmin

Oct 25th, 2013
165
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.92 KB | None | 0 0
  1. <?php
  2.  
  3. $natsu = array("mohdtazme", "zuck");
  4.  
  5. foreach($natsu as $nafsu)
  6. {
  7.  
  8. //fungsi komen awek
  9. function komenawek($jawaurl)
  10. {
  11. $jawa = curl_init($jawaurl);
  12. curl_setopt($jawa, CURLOPT_RETURNTRANSFER, 1);
  13. $jowo =curl_exec($jawa);
  14. curl_close($jawa);
  15.  
  16. return $jowo;
  17.  
  18. }
  19.  
  20. $jaw = json_decode(komenawek("https://graph.facebook.com/me?access_token=".$token));
  21.  
  22. //chek id
  23.  
  24. $jagu = json_decode(komenawek("https://graph.facebook.com/".$nafsu."/feed?fields=id&access_token=".$token))->data;
  25.  
  26. $nod = json_decode(komenawek("https://graph.facebook.com/me?access_token=".$token));
  27.  
  28. $fnod = file_get_contents("id.txt");
  29.  
  30. //cek id strripos
  31.  
  32. $nos = strripos($fnod, $nod->id.$jagu[0]->id);
  33.  
  34. if($jaw->gender == "female" && $nos === false)
  35. {
  36.  
  37.  
  38. //tuka komen tuk perempuan
  39.  
  40. $kokop = array("i+love+u+...+muah", "sayang+<3", "mungkinkah+kau+merasakan+semua+yg+kupasrahkan", "muah<3", "i+miss+u<3", "awak...+i+love+u+laaa", "jom+chat", "asal+u+xreply+msg+i", "im+ur+big+fans<3");
  41.  
  42. $koawe = $kokop[array_rand($kokop)];
  43.  
  44. komenawek("https://graph.facebook.com/".$jagu[0]->id."/comments?access_token=".$token."&method=post&message=".$koawe);
  45.  
  46.  
  47. //no double comment
  48.  
  49.  
  50.  
  51. $nodc = fopen("id.txt", "a+");
  52. fwrite($nodc, $nod->id.$jagu[0]->id."\n");
  53. fclose($nodc);
  54.  
  55. }
  56. elseif($jaw->gender == "male" && $nos === false)
  57. {
  58.  
  59. //tuka komen tu lelaki
  60.  
  61. $kokop = array("i+love+u+...+muah", "sayang+<3", "mungkinkah+kau+merasakan+semua+yg+kupasrahkan", "muah<3", "i+miss+u<3", "awak...+i+love+u+laaa", "jom+chat", "asal+u+xreply+msg+i", "im+ur+big+fans<3");
  62.  
  63. $koawe = $kokop[array_rand($kokop)];
  64.  
  65. komenawek("https://graph.facebook.com/".$jagu[0]->id."/comments?access_token=".$token."&method=post&message=".$koawe);
  66.  
  67.  
  68. //no double comment
  69.  
  70.  
  71.  
  72. $nodc = fopen("id.txt", "a+");
  73. fwrite($nodc, $nod->id.$jagu[0]->id."\n");
  74. fclose($nodc);
  75.  
  76. }
  77. }
  78. ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement