<< Önceki    Sonraki >>

mIRC kullanırken Google de bir kelimeyi arayabilirsiniz.Ayrıca Kodun başka bir özelliği kelime hakkında ayrıntılı bilgi vermesidir.

Lütfen yazının devamını okuyunuz.

alias gara {
  if !$1 { echo -at Bilgi: Herhangi bir kelime girmediniz. Kullanım şekli: $+($chr(2),/gara kelime,$chr(2)) | halt }
  else { set -e %1 $1- | set %3 $count(%1,$chr(32)) | sockclose google | sockopen google www.google.com.tr 80 | echo -at Bilgi: $+($chr(2),%1,$chr(2)) kelimesi google"da aranıyor bekleyiniz. }
}
on *:sockopen:google: {
  if $sockerr { echo -at Bilgi: Bağlantı sağlamanadı, lütfen tekrar deneyiniz. | halt }
  else { sockwrite -n google GET $+(/search?hl=tr&q=,$replace(%1,$chr(32),$chr(43)),&meta=) HTTP/1.1 | sockwrite -n google Host: www.google.com.tr | sockwrite -n google $crlf }
}
on *:sockread:google: {
  var %2 | sockread %2
  if *herhangi bir belge bulunamadı* iswm %2 { echo -at Bilgi: $+($chr(2),%1,$chr(2)) kelimesi bulunamadı. | halt }
  if *için yaklaşık* iswm %2 {
    echo -at Bilgi: Aranılan kelime; $+($chr(2),%1)
    echo -at Bilgi: Bulunan sonuç; $+($chr(2),$gettok($replace($remove($gettok($bb(%2),1,41),Web,$chr(40)),$chr(44),$chr(112)),$calc(4+%3),32))
    echo -at Bilgi: Arama süresi; $+($replace($+($chr(2),$gettok($replace($remove($gettok($bb(%2),1,41),Web,$chr(40)),$chr(44),$chr(112)),-2,32)),$chr(112),$chr(44)),$chr(2),$chr(32),saniye.)
    echo -at Bilgi: $+($chr(2),Sonuçlar"ı görmek için,$chr(32),$chr(2),tıklayınız.)
  }
}
alias bb { var %x, %i = $regsub($replace($1-,…,...),/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;,$chr(9)) | return %x  }
on ^*:hotlink:*tıklayınız.*:*: { return }
on *:hotlink:*tıklayınız.*:*: { run -n $+(www.viewwhois.com/,$replace(%_,$chr(32),$chr(43)) }

Bu kısmı mirc inizin alises bölümüne ekleyin.

Kullanım şekli ; /gara kelime

<< Önceki    Sonraki >>

PDF dökümanı olarak indir!	Arkadaşıma Gönder >>
Sizden önce 707 kişi okudu.

Toplam Oy : 0 Puan : 0

İlk yorumu yazan siz olmak ister misiniz?