• 26-01-2010, 06:01:22
    #1
    v7 etiket botu verebilicek olan varmı ? bende bir iki tane varda kimi v5 uyarlanmıs kimi ise tr karakter hatası var.
    Tr hatası olamayan düzgün bir etiket botu veren çıkarsa ne güzel olur
    Şimdiden tşkler.
  • 26-01-2010, 13:49:43
    #2
    Yokmu hayırsever
  • 26-01-2010, 13:51:04
    #3
    x2841x adlı üyeden alıntı: mesajı görüntüle
    Yokmu hayırsever
    Bulursan banada atarmısın yarım saat aradım biraz önce forumda 1 tane bulamadım
  • 26-01-2010, 13:51:34
    #4
    TRs adlı üyeden alıntı: mesajı görüntüle
    Bulursan banada atarmısın yarım saat aradım biraz önce forumda 1 tane bulamadım
    Çıkar bir hayırsever herhalde veririz köpegin olsun
  • 26-01-2010, 13:53:57
    #5
    x2841x adlı üyeden alıntı: mesajı görüntüle
    Çıkar bir hayırsever herhalde veririz köpegin olsun
    Eyv. Arkadaşa söyledim o yazıcak bir tane de 2-3 gün sonra anca yazar. 2-3 gün etiketsiz durucak site Tekrardan bir arayayım forumda, belki buluruz
  • 26-01-2010, 13:55:13
    #6
    Vendetta adlı üyeden alıntı: mesajı görüntüle
    Ya nete bakindim arkadaslar calisan 1 tane adam gibi ***** etiket botu yok dedim kendim yapim bari bitane yapdim simdi de paylasiyorum.
    Botu /inc-admin/
    icine atin adinida inc-etibot.php yapin serkayin kodladigi botla yerini degistiriyoruz yani sql ayari falan gerekmiyor. sonra admin.php botlar etiket botundan ekleyin iste sayfa sayfa
    <?  
    //powered by Vendetta
    //r10.net
    ini_set("max_execution_time","150000"); 
    $ne=$_GET['ne'];
    if($ne=="hepsi") {
    for($si=0; $si<601; $si++){
    $veri=file_get_contents("http://www.porno8.info/liste/arananlar-sayfa$si");
    preg_match('#<div id="colTwo">(.*?)</div>#si',$veri,$temiz);
    $temiz2=$temiz[1];
    preg_match_all('#title="(.*?)"#si',$temiz2,$m1,PREG_SET_ORDER);
    $say=count($m1);
    for($i=0; $i<$say; $i++){
    $gelen=$m1[$i][1];
    $ekle=cevir($gelen);
    $kontrol=mysql_query("select * from tag where tr='$ekle'");
    if(mysql_num_rows($kontrol)==0)
    {
    $sql2 = mysql_query("insert into tag (baslik,tr,tarih) values ('$gelen','$ekle',now()) ");
    echo $gelen."<br>";
    }
    } } }
    if($ne=="sec") {
    $count = 90000; 
    $perpage = 150;    
             $page = !empty($_GET["page"]) ? intval($_GET["page"]) : 1;
     $s = ($page-1)*$perpage;  if($count > $perpage) :   $x = 5; // akrif sayfadan önceki/sonraki sayfa gösterim sayýsý 
      $lastP = ceil($count/$perpage);    // sayfa 1'i yazdýr 
      if($page==1) echo " <span class=\"ThisPage\">1</span>"; 
      else echo " <a href=\"admin.php?yonetim=etibot&ne=sec&page=1\">1</a>";   // "..." veya direkt 2   
    if($page-$x > 2) {     echo "<span>………</span>";  
       $i = $page-$x;   } else {     $i = 2;   }   // +/- $x sayfalarý yazdýr   
    for($i; $i<=$page+$x; $i++) {     if($i==$page) echo " <span class=\"ThisPage\">[$i]</span>"; 
        else echo " <a href=\"admin.php?yonetim=etibot&ne=sec&page=".$i."\">$i</a>";     if($i==$lastP) break;   }   // "..." veya son sayfa 
      if($page+$x < $lastP-1) {     echo "<span>………</span>";     
    echo " <a href=\"admin.php?yonetim=etibot&ne=sec&page=".$lastP."\">$lastP</a>";  
     } elseif($page+$x == $lastP-1) {     echo " <a href=\"admin.php?yonetim=etibot&ne=sec&page=".$lastP."\">$lastP</a>";
       } endif; ?> <br /><br /> <?
    $veri=file_get_contents("http://www.porno8.info/liste/arananlar-sayfa$page");
    preg_match('#<div id="colTwo">(.*?)</div>#si',$veri,$temiz);
    $temiz2=$temiz[1];
    preg_match_all('#title="(.*?)"#si',$temiz2,$m1,PREG_SET_ORDER);
    $say=count($m1);
    for($i=0; $i<$say; $i++){
    $gelen=$m1[$i][1];
    $ekle=cevir($gelen);
    $kontrol=mysql_query("select * from tag where tr='$ekle'");
    if(mysql_num_rows($kontrol)==0)
    {
    $sql2 = mysql_query("insert into tag (baslik,tr,tarih) values ('$gelen','$ekle',now()) ");
    echo $gelen."<br>";
    }
    } 
    }
    ?>
    <a href="admin.php?yonetim=etibot&ne=sec">Ben Secerim (150 tane ekle *** daha cok istemedik :D)</a>
    Download adresi:RapidShare: 1-CLICK Web hosting - Easy Filehosting
    Vendetta arkadaşımız paylaşmıştı.

    banada v8 lazım
  • 26-01-2010, 14:03:53
    #7
    LG700 adlı üyeden alıntı: mesajı görüntüle
    Vendetta arkadaşımız paylaşmıştı.

    banada v8 lazım
    Evet onu denedim olmadı. Sanırım aynı bot'u daha önceden indirip arşive eklemiştim, onu denedim çalıştı şu anda