shadowc0de

BOT KOMENT GROUP

Mar 30th, 2013
111
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 17.17 KB | None | 0 0
  1. <?php
  2. error_reporting(0);
  3. ##############SETTING BOT####################
  4. $bot['like'] = true; //bot like
  5. $bot['ck_k'] = true; //komentar
  6. $bot['ck_u'] = true; //komentar umum
  7. $bot['time'] = true; // tanggal
  8. $bot['aces'] = "YOUR TOKEN"; //token e sek expired=0 cok
  9. ##############BOT GROUP BY ANANG reedit by ENGGAR#############
  10. com_like($cl,$ck,$cu,$tm,$access_token);
  11.  
  12.  
  13. com_like($bot['like'],$bot['ck_k'],$bot['ck_u'],$bot['time'],$bot['aces']);
  14.  
  15. function cmn($text,$ck,$cu){
  16. ##########umum
  17. $cmn_umum = array("hadir menyukai untuk postingan <name> !!!",
  18.  
  19. "Maaf saya robot koment. hadir hanya untuk koment di postingan mu <name>..",
  20. "Fb Gw lagi offlen, jadi bot ditugaskan untuk koment di post mu <name>",
  21. "Orang cakep lewat postingn mu <name> minggirrrrrrrr..",
  22. "Bingung mo koment apa <name>",
  23. "pencet tombol like dulu di postingan <name> trus ane komen dah...okee sip!!",
  24. "SAYA DAN SEGENAP
  25. POLRI
  26. TNI AU
  27. TNI AD
  28. TNI AL
  29. ...............................................................................................................................................................................................................
  30. Presiden
  31. Wakil Presiden
  32. Menteri Agama
  33. Menteri Badan Usaha Milik Negara
  34. Menteri Pertahanan
  35. Menteri Dalam Negeri
  36. Menteri Hukum dan Hak Asasi Manusia
  37. Menteri Kebudayaan dan Pariwisata
  38. Menteri Kehutanan
  39. Menteri Energi dan Sumber Daya Mineral
  40. Menteri Kelautan dan Perikanan
  41. Menteri Kesehatan
  42. Menteri Koordinator Bidang Kesejahteraan Rakyat
  43. Menteri Keuangan
  44. Menteri Keuangan
  45. Menteri Komunikasi dan Informatika
  46. Menteri Koperasi dan Usaha Kecil dan Menengah
  47. Menteri Lingkungan Hidup
  48. Menteri Luar Negeri
  49. Menteri Pekerjaan Umum
  50. Menteri Pembangunan Daerah Tertinggal
  51. Menteri Pemberdayaan Perempuan dan Perlindungan Anak
  52. Menteri Pemuda dan Olahraga
  53. Menteri Pendayagunaan Aparatur Negara dan Reformasi Birokrasi
  54. Menteri Pendidikan Nasional
  55. Menteri Perdagangan
  56. Menteri Koordinator Bidang Perekonomian
  57. Kepala Badan Perencanaan Pembangunan Nasional
  58. Menteri Perhubungan
  59. Menteri Perindustrian
  60. Menteri Pertahanan Republik
  61. Menteri Pertanian
  62. Menteri Perumahan Rakyat
  63. Menteri Koordinator Bidang Politik, Hukum, dan Keamanan
  64. Menteri Riset dan Teknologi
  65. Menteri Sekretaris Negara
  66. Menteri Sosial
  67. Menteri Tenaga Kerja dan Transmigrasi
  68.  
  69. Gubernur
  70. Walikota
  71. Bupati
  72. Camat
  73. Lurah
  74. Ketua RW
  75. Ketua RT
  76. Hansip
  77.  
  78. Hacker
  79. Phreaker
  80. Cracker
  81. Scammer
  82. Defacer
  83. Script kiddies
  84. Hacker wannabe
  85. Newbie
  86. Spammer
  87. Junker
  88. Liker
  89.  
  90. Kaskuser
  91. Facebookers
  92. NMers
  93.  
  94. Tukang ngaduk
  95. Tukang gorengan
  96. Tukang bakso
  97. Tukang pompa
  98. Tukang jahit
  99. Tukang palak
  100. Tukang gali kubur
  101.  
  102. Dokter
  103. Suster
  104. Insinyur
  105. Hakim
  106. Jaksa
  107. Pengacara
  108.  
  109. Manager Hotel
  110. Manager Restoran
  111. Manager Sea food
  112. Manager Supermarket
  113.  
  114. Satpam Hotel
  115. Satpam Moll
  116. Satpam Kantor
  117. Satpam Apartemen
  118. Satpam Indomaret
  119. Satpam Discotick
  120. Satpam Ding dong
  121.  
  122. Mpok Romlah
  123. Mpok Encum
  124. Mpok Jenab
  125. Mpok Ati
  126. Mpok Dom dom
  127. Mpok Cuneh
  128.  
  129. Bang Toang
  130. Bang Toing (adenya bang toang)
  131. Bang Ale
  132. Bang Satimin
  133. Bang Midun
  134. Bang Kotan
  135.  
  136. Engkong Riman
  137. Engkong Injih
  138. Engkong Malih
  139. Engkong Bokir
  140. Ceu inah
  141. Ceu anih (bukan adenya ceu inah.. ga tau siapanya)
  142. Ceu Lia
  143. Ceu Romlah
  144. Pak Carik
  145. Bu Carik
  146. Ketua RT
  147. Ketua RW
  148. Sekretaris
  149. Bendahara
  150. Hansip
  151. Satpol PP
  152. Satpam
  153. Ibu kost
  154. Penjaga warnet
  155. Tukang Sapu
  156. Bakul Mie ayam
  157. Bakul Bakso
  158. Tukang Sate
  159. Bakul cilok
  160. Bakul gereh
  161. Bakul pindang
  162. Bakul es dawet
  163. Bakul srabi
  164. Bakul sego megono
  165. Bakul rujak
  166. Bakul siomay
  167. Bakul Lobes
  168. Bakul kentang
  169. Bakul mlinjo
  170. Bakul emping
  171. Bakul alfamart
  172. Bakul indomaret
  173. Supir angkot
  174. Supir truk
  175. Supir bus
  176. Supir m0ntor mabur
  177. Tukang becak
  178. Tukang netek
  179. Tukang gebyok
  180. Tukang nebas jengkol
  181. Suzanna
  182. Nyi lanjar
  183. Nyi pelet
  184. Nyi blorong
  185. Mak lampir
  186. Tukang parkir
  187. Tukang ledeng
  188. Tukang sedot WC
  189. Tukang kiclik
  190. Tukang kawin
  191. Tukang ngoloh
  192. Tukang nderes
  193. Wong ngarit
  194. Wong angon wedhus
  195. Pengemis
  196. Pengamen
  197. dan Seluruh Kampung
  198.  
  199. MENYUKAI ANDA.... Heee
  200. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  201. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  202. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  203. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  204. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  205. Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½Ð ¿½
  206. ´´´´´´¶´´´¶´´´¶´´´´´´´´´´´´´´´´´´´´´´´´´¶¶
  207. ´´´´¶¶¶¶¶¶¶¶¶¶¶¶´´´´´´´´´´´´´´´´´´´´´´´´¶¶
  208. ´´´¶´´´´´´´´´´´´¶´¶¶´´´´´´´´´´´´´¶¶´´´´´¶¶
  209. ´´¶¶´´´´´´´´´´´´¶´´¶¶´´´´´´´´´´´´¶¶´´´´´¶¶
  210. ´¶¶´´´¶¶¶¶¶¶¶¶¶¶¶´´´´¶¶´´´´´´´´¶¶´´´´´´´¶¶
  211. ´¶´´´´´´´´´´´´´´´¶´´´´´¶¶¶¶¶¶¶´´´´´´´´´¶¶
  212. ´¶¶´´´´´´´´´´´´´´¶´´´´´´´´´´´´´´´´´´´´¶¶
  213. ´´¶´´´¶¶¶¶¶¶¶¶¶¶¶¶´´´´´´´´´´´´´´´´´´´¶¶
  214. ´´¶¶´´´´´´´´´´´¶´´¶¶´´´´´´´´´´´´´´´´¶¶
  215. ´´´¶¶¶¶¶¶¶¶¶¶¶¶´´´´´¶¶´´´´´",
  216. "Nulis komen gak perlu mikir yang penting koment hadir. stuju kan <name>..?",
  217. "absen koment aja deh <name>",
  218. "sambil jungkir balik dan salto pun saya masih bisa komen di status <name>",
  219. "jadi saya harus bilang WOW ga nih <name> ?",
  220. "apa benar anda yang namanya <name>",
  221. "biar di bilang eksis saya harus tetap komen,walaupun sebenarnya saya lagi offline <name>",
  222. "Ampek jempol kriting tetep stia ane coment di postingn ny <name>",
  223. "Numpang ngisi koment distatusmu <name>..",
  224. "ga kan necewain deh, like this dan komen hadir selalu <name>",
  225. "<name> post mu sip banget. pokoknya JEMPOL trus dah..",
  226. "apapun posting nya? jempol ane slalu mampir di status <name>",
  227. "postingan <name> emang bagus-bagus ngepost ny . hihi",
  228. "mau komen apa ya?? bingung?? nambah like this, biar tambah eksis. hihihihihi....",
  229. "Di tungguin dari tadi,, akhirnya <name> update postingan juga,, oklah tanpa basa-basi lagi ane kasi jempol dah",
  230. " Sebenarnya saya
  231. Malas mengomentari postingan anda... tapi
  232. bagaimana lagi, tugas saya di facebook
  233. ini hanya update status, like status, dan
  234. komen status, jadi maaf klo komen saya
  235. .....................ini terlalu panjang untuk anda
  236. menger...ti.. sebenarnya saya
  237. juga.......................................... bi...ngung
  238. mau komen apa ya jadinya hanya
  239. tulisan-tulisan kecil ini yang bisa saya
  240. tulis..seperti kerjaan saya di... See More...
  241. Lihat Selengkapnya... Lihat
  242. Selengkapnya... See More... See More...
  243. See More........ Facebook yang hanya
  244. update status, like status, dan komen
  245. status, sekali lagi maaf klo dibilang
  246. nyampah dan menuh-menuhin notif
  247. anda, khan saya udah bilang klo kerjaan
  248. saya di facebook hanya update status,
  249. like status, dan komen status, jadi gak
  250. salah dong klo saya komen status anda
  251. sebagai bagian dari kerjaan saya di
  252. facebook yaitu update status, like
  253. status, dan komen status.. mungki
  254. dalam pikiran anda, knpa koq komen ini
  255. panjang sekali, apa gak capek
  256. ngetiknya, dan kapan selesainya, hmm..
  257. sebagai jawaban atas pertanyaan anda
  258. yang juga saya gak ngerti harap
  259. maklum karena kerjaan saya di
  260. facebook hanya update status, like
  261. status dan komen status, jadi sesuai
  262. pekerjaan saya saya akan komen status
  263. anda, namun saya bingung mau komen
  264. apa karena saat ini otak saya sedang
  265. blank makanya saya sendiri bingung
  266. mau komen apa, mungkin sejenak anda
  267. berfikir, niyh komen koq gak abis-abis,
  268. panjang banget lagi, dan anda mulai
  269. ingin berheenti untuk membacanya,
  270. namun rasa penasaran anda ingin tau
  271. apa maksud dari komen saya ini maka
  272. dari itu anda teruskan membaca komen
  273. ini kata demi katak anda baca dengan
  274. serius, untuk mengetahui apa maksud
  275. dari komen ini, anda bahkan ikhlas
  276. menggerakkan tangan anda untuk
  277. meng-klik baca selengkapnya atau see
  278. more, tapi anda malah melihat komen
  279. ini malah nambah panjang, dan anda
  280. mulai berkeinginan untuk tak
  281. membacanya lagi, namun kembali rasa
  282. penasaran anda menggugah anda
  283. untuk meneruskan membaca komen ini
  284. lebih lanjut, tapi anda gak menemukan
  285. maksud dari komen saya ini, maka dari
  286. itu saya sudahi saja komen ini.. lagipula
  287. capek lho ngetik panjang-panjang ehh
  288. tapi sebentar sebenarnya saya malas
  289. mengomentari status anda... tapi
  290. bagaimana lagi, tugas saya di facebook
  291. ini hanya update status, like status, dan
  292. komen status, jadi maaf klo komen saya
  293. ini terlalu panjang untuk anda
  294. mengerti.. sebenarnya saya juga
  295. bingung mau komen apa ya jadinya
  296. hanya tulisan-tulisan kecil ini yang bisa
  297. saya tulis..seperti kerjaan saya di ...
  298. Lihat Selengkapnyafacebook yang
  299. hanya update status, like status, dan
  300. komen status, sekali lagi maaf klo
  301. dibilang nyampah dan menuh-menuhin
  302. notif anda, khan saya udah bilang klo
  303. kerjaan saya di facebook hanya update
  304. status, like status, dan komen status,
  305. jadi gak salah dong klo saya komen
  306. status anda sebagai bagian dari kerjaan
  307. saya di facebook yaitu update status,
  308. like status, dan komen status.. mungki
  309. dalam pikiran anda, knpa koq komen ini
  310. panjang sekali, apa gak capek
  311. ngetiknya, dan kapan selesainya, hmm..
  312. sebagai jawaban atas pertanyaan anda
  313. yang juga saya gak ngerti harap
  314. maklum karena kerjaan saya di
  315. facebook hanya update status, like
  316. status dan komen status, jadi sesuai
  317. pekerjaan saya saya akan komen status
  318. anda, namun saya bingung mau komen
  319. apa karena saat ini otak saya sedang
  320. blank makanya saya sendiri bingung
  321. mau komen apa, mungkin sejenak anda
  322. berfikir, niyh komen koq gak abis-abis,
  323. panjang banget lagi, dan anda mulai
  324. ingin berheenti untuk membacanya,
  325. namun rasa penasaran anda ingin tau
  326. apa maksud dari komen saya ini maka
  327. dari itu anda teruskan membaca komen
  328. ini kata demi katak anda baca dengan
  329. serius, untuk mengetahui apa maksud
  330. dari komen ini, anda bahkan ikhlas
  331. menggerakkan tangan anda untuk
  332. meng-klik baca selengkapnya atau see
  333. more, tapi anda malah melihat komen
  334. ini malah nambah panjang, dan anda
  335. mulai berkeinginan untuk tak
  336. membacanya lagi, namun kembali rasa
  337. penasaran anda menggugah anda
  338. untuk meneruskan membaca komen ini
  339. lebih lanjut, tapi anda gak menemukan
  340. maksud dari komen saya ini, maka dari
  341. itu saya sudahi saja komen ini.. lagipula
  342. capek lho ngetik panjang-panjang.....^_^
  343. Bisa Gila...!!!ekekekekekekek. ",
  344. "hai <name> aku slalu setia dateng n koment. hihi",
  345. );
  346.  
  347. //dibawah ini apa bila teman update dengan status dengan kata-kata di bawah maka akan ke komen
  348.  
  349. $comment = array(
  350. array(
  351. array("bagi",
  352. ),
  353. array("Minta apa tuh <name>.hhe",
  354. )
  355. ),
  356. array(
  357. array("tanya",
  358. "mummet",
  359. "amin",
  360. ),
  361. array("Amin <name>.. Skalian like this juga ah. biar tambah exsis. hhe",
  362. )
  363. ),
  364. array(
  365. array("pagi",
  366. "pagiii",
  367. "morning",
  368. "selamat pagi",
  369. "Goodmorning",
  370. "met pagi",
  371. "page",
  372. ),
  373. array("selamat pagi juga <name> selamat ber-aktifitas",
  374. "hi <name> morning to ",
  375. "met pagi juga <name>",
  376. )
  377. ),
  378. array(
  379. array("malam",
  380. "selamat malam",
  381. "goodninght",
  382. "godninght",
  383. "udah malam",
  384. ),
  385. array("selamat malam juga <name> ",
  386. "hi <name> selamat malam ",
  387. "met malam <name> udah makan belom?",
  388. )
  389. ),
  390. array(
  391. array("auto like",
  392. "scripe auto",
  393. ),
  394. array("aku ga punya scripe nya",
  395. )
  396. ),
  397. array(
  398. array("galau",
  399. "nyesek",
  400. "dilema",
  401. ),
  402. array("lagi galau ye <name>!ke klinik tong fang aja hahhahhah",
  403. )
  404. ),
  405. array(
  406. array("tuhan",
  407. "Allah",
  408. "ya allah",
  409. ),
  410. array("jangan di facebook curhatnya <name>,sana shalat trus bedoa sambil curhat...hehehhe",
  411. )
  412. ),
  413. array(
  414. array("ganteng",
  415. "keren",
  416. "cakep",
  417. "tampan",
  418. ),
  419. array("makasih saya emang ganteng kok <name> ",
  420. "wah kamu bilang aku ganteng ya <name>!makasih ya",
  421. )
  422. ),
  423. array(
  424. array("sub",
  425. "auto sub",
  426. ),
  427. array("ha <name> sub aku juga ya",
  428. )
  429. ),
  430. array(
  431. array("robot",
  432. "scripe bot ",
  433. "minta scripe bot",
  434. "bot",
  435. ),
  436. array("bagi scripe nya dong <name> aku juga pengen jadi robot heee",
  437. )
  438. ),
  439. array(
  440. array("cpanel",
  441. "whm",
  442. "jual cpanel",
  443. "master reseler",
  444. "bagi cpanel",
  445. ),
  446. array("berapa tuh harga nya whm <name>",
  447. "bagi cpanel nya dong <name>,jangan pelit ya",
  448. "aku lagi butuh cpanel nih...hahahahh",
  449. )
  450. ),
  451. array(
  452. array("jancok",
  453. "asu",
  454. "Huft",
  455. "raimu",
  456. "matamu",
  457. "bacot",
  458. "cacad",
  459. "ccd",
  460. ),
  461. array("ada apa dengan mu <name> kok marah amat..? wkwkwkwk",
  462. )
  463. ),
  464. array(
  465. array("lapar",
  466. " laper ",
  467. " luwe ",
  468. "laper",
  469. " krucuk",
  470. ),
  471. array("Ni makanan buanyak disini. mau ga <name>..? hhe",
  472. "sama <name> klaparan nih",
  473. )
  474. ),
  475. array(
  476. array("cinta",
  477. "mencintaimu",
  478. "i love u",
  479. "lope",
  480. "sayang",
  481. "sayang kamu",
  482. "love",
  483. ),
  484. array("oh so cweeet banget <name> makasih ya.hahahhahah",
  485. )
  486. ),
  487. array(
  488. array("askum",
  489. "asalam",
  490. "assalam",
  491. "mekum",
  492. "laikum",
  493. ),
  494. array("Waalaikumsalam warahmatullahi wabarakatuh. <name> hihi",
  495. "Waskum <name> ",
  496. )
  497. ),
  498. array(
  499. array("lagu",
  500. "musik",
  501. "sing",
  502. "song",
  503. "np",
  504. "#NP",
  505. "nyanyi",
  506. ),
  507. array("nyanyiin dikit dong lagunya <name> hihi",
  508. "boleh dong kalo <name> nyanyi dikit ",
  509. )
  510. ),
  511. array(
  512. array("pamid",
  513. "off dulu",
  514. "ngantuk",
  515. "bobok",
  516. "Tinro",
  517. "tinro",
  518. "molor",
  519. "sleep",
  520. "hoam",
  521. "tidur",
  522. ),
  523. array("lho aq ditinggal <name> wkwkwkwk",
  524. )
  525. ),
  526. );
  527. $komentar = '';
  528. $cr_kondisi=false;
  529. foreach($comment as $cx){
  530. foreach($cx[0] as $ct){
  531. if(ereg($ct,$text)){
  532. $cr_kondisi=true;
  533. $komentar = $cx[1][rand(0,count($cx[1]) - 1)];
  534. }
  535. }
  536. }
  537. if($cr_kondisi==true && $ck==true){
  538. return $komentar;
  539. }else{
  540. if($cu==true){ return $cmn_umum[rand(0,count($cmn_umum) - 1)]; }
  541. }
  542. }
  543. #######################################
  544. function com_like($cl,$ck,$cu,$tm,$access_token){
  545. $beranda = json_decode(httphit("https://graph.facebook.com/ID_GROUP/feed?fields=id,from,type,message&limit=500&access_token=".$access_token))->data;
  546. $saya_cr = json_decode(httphit("https://graph.facebook.com/me?access_token=".$access_token));
  547. if($beranda){
  548. foreach($beranda as $cr_post){
  549. if(!ereg($saya_cr->id,$cr_post->id)){
  550. $log_cr = simlog($cr_post->id);
  551. if($log_cr==true){
  552. if($ck==true){
  553. $url_ck = cmn($cr_post->message,$ck,$cu);
  554. $url_ck = str_replace("<name>",$cr_post->from->name,$url_ck);
  555. if($tm==true){ $url_ck = $url_ck.wkthit().kecepatan().konter() ; }
  556. $url_ck = urlencode($url_ck);
  557. if($ck==true OR $cu==true){
  558. httphit("https://api.facebook.com/method/stream.addComment?post_id=".$cr_post->id."&comment=".$url_ck."&access_token=".$access_token);
  559. }
  560. if($cl==true){
  561. httphit("https://api.facebook.com/method/stream.addLike?post_id=".$cr_post->id."&access_token=".$access_token);
  562. }
  563. }
  564. }
  565. }
  566. }
  567. }
  568. }
  569. #######################################
  570. function httphit($url){
  571. return file_get_contents($url);
  572. }
  573.  
  574. function kecepatan() {
  575. $waktu="
  576. ";
  577.  
  578. $gentime = microtime();
  579. $gentime = explode(' ',$gentime);
  580. $gentime = $gentime[0];
  581. $pg_end = $gentime;
  582. $totaltime = ($pg_end - $pg_start);
  583. $showtime = number_format($totaltime, 1, '.', '');
  584. return "$waktu :|] komen Telat $showtime detik";
  585. }
  586. function konter() {
  587. $sempak="
  588. ";
  589. $filename = 'hitcount.txt';
  590. $handle = fopen($filename, 'r');
  591. $hits = trim(fgets($handle)) + 1;
  592. fclose($handle);
  593.  
  594. $handle = fopen($filename, 'w');
  595. fwrite($handle, $hits);
  596. fclose($handle);
  597. return "$sempak :|] postingan yang ke $hits yang saya komentari";
  598. }
  599. function wkthit(){
  600. $ent="
  601. ";
  602. $hari=gmdate("D", time()+60*60*7);
  603. if((gmdate("D", time()+60*60*7))=="Sun"){ $hari="Minggu"; }
  604. if((gmdate("D", time()+60*60*7))=="Mon"){ $hari="Senin"; }
  605. if((gmdate("D", time()+60*60*7))=="Tue"){ $hari="Selasa"; }
  606. if((gmdate("D", time()+60*60*7))=="Wed"){ $hari="Rabu"; }
  607. if((gmdate("D", time()+60*60*7))=="Thu"){ $hari="Kamis"; }
  608. if((gmdate("D", time()+60*60*7))=="Fri"){ $hari="Jum'at"; }
  609. if((gmdate("D", time()+60*60*7))=="Sat"){ $hari="Sabtu"; }
  610. $jam="Jam : ".gmdate("g:i a", time()+60*60*7);
  611. return $ent.$ent." :|] [".$hari."] [Tgl : ".gmdate("j - m - Y", time()+60*60*7)."] [".$jam."] $showtime";
  612. }
  613. function simlog($cr_id) {
  614. $fname = "cr_log.txt";
  615. $lihatiplist=fopen ($fname, "rb");
  616. $text='';
  617. if($lihatiplist){
  618. $spasipol = "";
  619. do {
  620. $barislistip = fread($lihatiplist, 512);
  621. if(strlen($barislistip) == 0){ break; }
  622. $spasipol .= $barislistip;
  623. } while(true);
  624. fclose ($lihatiplist);
  625. for ($i = 1; $i <= 10; $i++) {$spasipol = str_replace(" ","",$spasipol);}
  626. $text=$text.$spasipol;
  627. }else{$text="";}
  628. if(ereg($cr_id,$text)){
  629. return false;
  630. }else{
  631. $text = $text.$cr_id;
  632. $w_file=@fopen($fname,"w") or bberr();
  633. if($w_file) {
  634. @fputs($w_file,$text);
  635. @fclose($w_file);
  636. }
  637. return true;
  638. }
  639. }
  640. ?>
Advertisement
Add Comment
Please, Sign In to add comment