IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Ülke-Şehir Bulucu. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/16252-ulke-sehir-bulucu.html)

Ülke-Şehir Bulucu.

PHP- Kodu:

   raw 401:*: { msg #nerden $2 : Nick'i online degil! }
alias nerden { 
set %ip $1 
sockclose nerden
sockopen nerden 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ripe.net 80
}
on *:sockopen:nerden:{
sockwrite -n $sockname GET /fcgi-bin/whois?form_type=simple&full_query_string=&searchtext= $+ %ip $+ &submit.x=15&submit.y=7 HTTP/1.1
sockwrite -n $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ripe.net $+ $crlf $+ $crlf 
}
on *:sockread:nerden:{ 
sockread %ğ
if (descr: isin %ğ) && (TurkTelecom !isin %ğ) { msg #nerden 4 $+ $replace(%ğ,descr,şehir) }
if (country: isin %ğ) { msg #nerden 2 $+ $replace(%ğ,country,ülke,tr,Türkiye,de,Almanya,nl,Hollanda) }
} 
on *:text:*:#Nerden:{ 
if ($1 == !nerden) && $2 { baka.q $2 }
}
alias baka.q { whois $1 | enable #dirim }
#dirim off
raw 378:*: { nerden $gettok($6,2,64) | disable #dirim } 
#dirim end

Calısma sekli #Nerden kanalında !nerden nick seklindedir. Sunucuda Oper olmanız gerekir. Bazı sunuculara göre raw 378:*: { nerden $gettok($6,2,64) | disable #dirim } koyu renkle yazdıgım yer $7 veya $4 olabiliyor. Kolay gelsin.

Yanıt: Ülke-Şehir Bulucu.

güzel bir addon teşekkürler

Yanıt: Ülke-Şehir Bulucu.

cok iyi tesekkurLer..

Yanıt: Ülke-Şehir Bulucu.

arkadaslar burdaki werilmiş olan addonu "aliass" icinemi atioruz şimdiden tşkler.

Yanıt: Ülke-Şehir Bulucu.

Alıntı:

Z-o-M Nickli Üyeden Alıntı

arkadaslar burdaki werilmiş olan addonu "aliass" icinemi atioruz şimdiden tşkler.

Arkadaşım incelermisin;

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Yanıt: Ülke-Şehir Bulucu.

iyi güzel de neden çalışmıo :)

Yanıt: Ülke-Şehir Bulucu.

Yazdıgım kod sorunsuz calısıyo. $gettok($6,2,64) olan yeri $7 veya $4 seklinde degistirebilirsin. Kolay gelsin.

Yanıt: Ülke-Şehir Bulucu.

S.a ya arkadaslar kusura bakmayın uzun zaman olmus ama ben bu codeyi Cr de calistiramadim mumkunu varmi acaba Cr kulana bilmem icin ?