Genel Forumlar Haylazforum.Net

Genel Forumlar Haylazforum.Net (https://haylazforum.net/)
-   mIRC Hazır Kodlar (https://haylazforum.net/324-mirc-hazir-kodlar/)
-   -   Google sıra bulucu v2 – (HTTP – HTTPS – subdomain) (https://haylazforum.net/mirc-hazir-kodlar/5982-google-sira-bulucu-v2-http-https-subdomain.html)

Aytac 02.Ocak.2019 22:29

Google sıra bulucu v2 – (HTTP – HTTPS – subdomain)
 
Kod sahibi: Set

Google sira bulucu bilindigi gibi paylasima acık bir cod olarak yapmistim, zamanla sistemler değişti 2013 senesinden beridir ilkkez güncellemesini yapiyorum, bu version’da https ve sub domain ‘leri arama sitesi olarak kullanabileceksiniz,

Güncelleme:

Direk googleden gelen veri degiştiginden, codeler degişti.
Eski codede https sorgulari olmuyordu, sorgular acildi.
Gene ilk 100 olarak ayarli, 500 olan sadece bende bulunuyor onu paylasmayi düşünmüyorum
Code daha hızlı hale geldi, direk tepkilere acık oldu.

Kod:

alias googlearama {
  var %rand $rand(0,99999)
  sockopen $+(google,%rand) www.google.com 80
  sockmark $+(google,%rand) $2-
  if !$hget(google,stat) { echo -a -/- 4 $1 2adresi4 $2- 2kelimesinde4 google 2uzerinde bilgilere bakiliyor bekleyiniz. }
  hadd -m google web $+(http://,$1)
  hadd -m google kelime $2-
}
 
on $*:sockopen:/^google/i: {
  sockwrite -n $sockname GET $+(/search?num=500&q=,$replace($sock($sockname).mark,$chr(32),+),&hl=tr&gbv=2) HTTP/1.1
  sockwrite -n $sockname Host: www.google.com.tr
  sockwrite -n $sockname $crlf
}
on $*:sockread:/^google/i: {
  var %2 | sockread %2 | tokenize 32 %2
  if (*ile ilgili hiçbir arama sonucu* iswm %2) {
    echo -a 1Belirtiginiz $sock($sockname).mark kelimesi google aramalarinda bulunmamaktadir.
    sockclose $sockname
    .hfree -sw googlearama | .hfree -sw google
    return
  }
  if (href="/url?q isin %2) { _google $sockname %2 }
  if (*Görselle ara* iswm %2) {
    if $hget(googlearama) {
      var %x 1 | while $hget(googlearama,%x).item {
        if $hget(google,web) isin $v1 {
          echo -a 1Sorgulanan Web:4 $hget(google,web)
          echo -a 1Sorgulanan Kelime:4 $hget(google,kelime)
          echo -a 1Google Üzerinde:4 $siralama($hget(googlearama,$hget(googlearama,%x).item))
          echo -a 1Google İndex:4 $hget(googlearama,%x).item
          echo -a
          .hinc -m google bulunan 1
        }
        inc %x
      }
      if $hget(google,bulunan) {
        echo -a 1Google üzerinde ilk4 100 sirada4 $hget(google,web) web adresi4 $hget(google,kelime) kelimesiyle4 $hget(google,bulunan) kere index almistir.
        .hfree -sw googlearama | .hfree -sw google
        sockclose $sockname
        return
      }
    }
    echo -a 1Belirtilen $hget(google,web) adresi $hget(google,kelime) kelimesinde ilk4 100 sitede yer almamaktadir.
    sockclose $sockname
    .hfree -sw googlearama | .hfree -sw google
  }
}
alias _google {
  var %x 1
  while $pos($2-,href="/url?q=http,%x) {
    var %web $token($token($mid($1-,$v1),1,38),4,61)
    if (webcache. !isin %web) { .hinc -m google inc 1 | .hadd -m googlearama %web  $hget(google,inc) | ;echo -a 4 $hget(google,inc) - %web }
    inc %x
  }
}
alias siralama {
  if ($gettok($calc($gettok($1,1,46) / 10),2,46)  / 10),2,46) == $null) { return $gettok($calc($gettok($1,1,46) / 10),1,46) Sayfa $gettok($1,2,46) Sirada | halt }
  return $calc($gettok($calc($1 / 10),1,46) +1) Sayfa $iif(!$gettok($calc($1 / 10),2,46),1,$gettok($calc($1 / 10),2,46)) Sirada
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:54.

Powered by vBulletin® Version 3.8.9
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.
Search Engine Optimization by vBSEO 3.6.1

User Alert System provided by Advanced User Tagging (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.Navbar with Avatar by Motorradforum