Ülke/Şehir Bulucu Addon
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
raw 401:*: { msg #nerden $2 : Nick'i online degil! } alias nerden { set %ip $1 sockclose nerden sockopen nerden www.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: www.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 |