IRCForumu.NET - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu reklam ircforumu reklamdamlasu bizimkiler sihirlisohbet sohbetelit


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 05 Haziran 2016, 13:51   #1
Çevrimdışı
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
Google Trend Kodu(Socket)


mIRC Version: 6.35 'de yazılmıştır.

Kullanım: /trend Keywords


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias trend { if !$1 { echo -ea 2Lutfen komutu duzgun belirtiniz, 6Komut:2 /trend kelime 6Ornek:2 /trend sohbet | return } unset %keywords %y %t var %rand $rand(0,9999) sockopen $+(trend,%rand) www.google.com.tr 80 sockmark $+(trend,%rand) $1- echo -ea 6 $1- 2 Kelimesi Google trend arama kelimeleri taramasi yapiliyor bekleyiniz. } on *:sockopen:trend*: { var %s sockwrite -nt $sockname, %arama $replace($sock($sockname).mark,$chr(32),+) %s GET $+(/trends/trendsReport?hl=tr&q=,%arama,&tz=Etc%2FGMT-2&content=1) HTTP/1.1 %s Host: www.google.com.tr %s User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:45.0) Gecko/20100101 Firefox/45.0 %s Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %s Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 %s Accept-Encoding: gzip, deflate, br %s Referer: https://www.google.com.tr/trends/explore %s Connection: keep-alive %s $crlf } on *:sockread:trend*: { var %x | sockread %x if (class="errorTitle"> isin %x) { echo -ea 4 G4o8o2g4le2 trend limit asimina denk geldiniz, Lutfen daha sonra tekrar deneyiniz. (6Ortalama 10-20 dk.) sockclose $sockname return } if $regex(%x,/Farkl.+arama terimleri kullanmay.+deneyin/i) { echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 trend listesinde bulunmamaktadir! sockclose $sockname return } if $regex(%x,/controlPanel.updatePickerTimeZone/i) && !$var(%keywords) { echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 trend listesine detayli sekilde girebilecek kadar ilerlememistir. return } if $regex(%x,/top keywords drilldown g link/i) { if top10 !== %keywords { set %keywords top10 | echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 Liste basi aranan kelimeler } inc %y echo -a 6 %y -2 $token(%x,-2,39) 6 Link:2 $token(%x,2,34) } if $regex(%x,/rising drilldown g link/ig) { if yukselen !== %keywords { set %keywords yukselen | echo -ea 4 $sock($sockname).mark 2 kelimesi G4oo2g4le2 yukselen aranan kelimeler } inc %t 1 echo -a 6 %t -2 $token(%x,-2,39) 6 Link:2 $token(%x,2,34) } }


Kod Yapımcısı : Set
mIRC Version: 6.35 'de yazılmıştır.

Kullanım: /trend Keywords


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias trend { if !$1 { echo -ea 2Lutfen komutu duzgun belirtiniz, 6Komut:2 /trend kelime 6Ornek:2 /trend sohbet | return } unset %keywords %y %t var %rand $rand(0,9999) sockopen $+(trend,%rand) www.google.com.tr 80 sockmark $+(trend,%rand) $1- echo -ea 6 $1- 2 Kelimesi Google trend arama kelimeleri taramasi yapiliyor bekleyiniz. } on *:sockopen:trend*: { var %s sockwrite -nt $sockname, %arama $replace($sock($sockname).mark,$chr(32),+) %s GET $+(/trends/trendsReport?hl=tr&q=,%arama,&tz=Etc%2FGMT-2&content=1) HTTP/1.1 %s Host: www.google.com.tr %s User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:45.0) Gecko/20100101 Firefox/45.0 %s Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %s Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 %s Accept-Encoding: gzip, deflate, br %s Referer: https://www.google.com.tr/trends/explore %s Connection: keep-alive %s $crlf } on *:sockread:trend*: { var %x | sockread %x if (class="errorTitle"> isin %x) { echo -ea 4 G4o8o2g4le2 trend limit asimina denk geldiniz, Lutfen daha sonra tekrar deneyiniz. (6Ortalama 10-20 dk.) sockclose $sockname return } if $regex(%x,/Farkl.+arama terimleri kullanmay.+deneyin/i) { echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 trend listesinde bulunmamaktadir! sockclose $sockname return } if $regex(%x,/controlPanel.updatePickerTimeZone/i) && !$var(%keywords) { echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 trend listesine detayli sekilde girebilecek kadar ilerlememistir. return } if $regex(%x,/top keywords drilldown g link/i) { if top10 !== %keywords { set %keywords top10 | echo -ea 4 $sock($sockname).mark 2 kelimesi G4o8o2g4le2 Liste basi aranan kelimeler } inc %y echo -a 6 %y -2 $token(%x,-2,39) 6 Link:2 $token(%x,2,34) } if $regex(%x,/rising drilldown g link/ig) { if yukselen !== %keywords { set %keywords yukselen | echo -ea 4 $sock($sockname).mark 2 kelimesi G4oo2g4le2 yukselen aranan kelimeler } inc %t 1 echo -a 6 %t -2 $token(%x,-2,39) 6 Link:2 $token(%x,2,34) } }


Kod Yapımcısı : Set
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
google, kodusocket, trend
IRCForumu.Net - Sponsor Bağlantılar



Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık