PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
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.