Süper bir kod kullanımıda çok basit birşey. Fakat bu kodu kullanabilmeniz için Admin veya Oper olmanız lazımdır.
Kendi scriptinizde denememenizi tavsiye eder farklı bir mIRC açmanızı öneririm.
Kullanımı: !Nerden Nick

raw 340:*:{
if $2- == $null { msg #dns nerdensine Baktığınız Nick – %nerdennick – Sunucumuzda Online Değil, Lütfen Başka Bir Nick Deneyiniz. | halt }
set %nerdennick $remove($gettok($2-,1,61),*)
set %nerdenip $gettok($2-,2,64)
nerdenbul
halt
}
alias nerdenbul {
sockclose nerden
sockopen nerden www.melissadata.com 80
}
on *:sockopen:nerden:{
if ($sockerr) { msg #dns İşlem Gerçekleştirilemedi Lütfen Daha Sonra Tekrar Deneyin | halt }
sockwrite -n $sockname GET /lookups/iplocation.asp?ipaddress= $+ %nerdenip HTTP/1.1
sockwrite -n $sockname Host: www.melissadata.com $+ $crlf $+ $crlf
sockwrite -n $sockname $clrf
}
on *:sockread:nerden:{
var %nerdenoku
sockread %nerdenoku
if (%nerdenoku != $null) {
if (*>City< * iswm %nerdenoku) { msg #dns %mesajnick 2 $+ %nerdennick Sehir :4 $remove(%nerdenoku,
City ,

, ) }
if (*State*or*Region* iswm %nerdenoku) { msg #dns %mesajnick 2 $+ %nerdennick Bolge :4 $remove(%nerdenoku,
State or Region ,

, ) }
if (*>Country< * iswm %nerdenoku) { msg #dns %mesajnick 2 $+ %nerdennick nerden :4 $remove(%nerdenoku,
Country ,

, ) }
if (*>ISP< * iswm %nerdenoku) { msg #dns %mesajnick 2 $+ %nerdennick Baglandigi ADSL :4 $remove(%nerdenoku,
ISP , 

, ) | sockclose $sockname }
}
}
on *:text:*:#dns:{
if ($1 == !nerden) {
if ($sock(nerden)) { msg #dns Suanda Baska Bir Nick’in Bilgilerine Bakılıyor Lütfen Daha Sonra Tekrar Deneyin | halt }
set %nerdennick $remove($2,*)
set %mesajnick $nick
userip $2
msg $chan Lütfen Bekleyiniz…
msg $chan $2 Nick’inin ISP Adresi Kontrol Ediliyor..
}
}