mIRC 7.49 download

(türkçe sürüm)

Sohbete Bağlan

(382 online)

Türkçe Mirc Sohbet programı 7.49 versiyonunu , sorunsuz ve tek download adresinden indirmek için TIKLAYIN

Google sıra bulucu v2 – (HTTP – HTTPS – subdomain)

Türkçe Mirc v7.49 Türkçe Sohbet Programını Hemen Bilgisayarınıza Yükleyin.

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.

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
}

Benzer yazılar

Badnick Koruması Op/Admin
ıp locator (ıp yer tespıt)
Regex Kontrol
DNSBL Proxy Koruma
Spam kısa alias kodları
Services bot sokma
Şişe çevirme oyunu
Socket Cycle v1-v2-v3 Hepsinin son versionu
Radyo dinleyici kayit sistemi
mIRC Join Ulke-Sehir Gösterme Codu
!zar – komutu hediye verme
Nick – IP – Sehir – “GLİNE” – “NICKBAN” – “SHUN”


IRCALEM.Net © Tüm Hakları Saklıdır.

Bu site YuzukNET iştirakıdır.