alias nerden { 
   if $sock(yerbul) {
     sockclose yerbul
   }
   sockopen yerbul [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80  
 }
 on $*:text:/^((!|.)nerden\40\S+)$/i:#: {
   if $regex($2,^\d) { 
     .set -e %nrd $2 | set -e %c_n $chan
     .nerden 
   }
   else { 
     .userip $2
     .enable #opers
     set -e %c_n $chan
   }
 }
 on *:sockopen:yerbul:{  
   sockwrite -n $sockname GET /ip-address-locator.php?lookup= $+ %nrd HTTP/1.1
   sockwrite -n $sockname host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
   sockwrite -n $sockname $crlf  
 }
 on *:sockread:yerbul: {  
   if ($sockerr) { /msg %c_n Ba?lant? Hatas? Olu?tu! | halt } 
   var %yerbul
   sockread %yerbul
  if $regex(hst,%yerbul,/(</\142><\142\162\40/><\151>\110\S{7}\72</\151>\40<\142>(.+)</\142><\142\162\40/>)$/i) { /msg %c_n Host: $regml(hst,2) }
   if $regex(cnt,%yerbul,/^(<\151>\111\120\40\S{7}\72</\151>\40<\142>(\S+)</\142>)$/i) { /msg %c_n Ulke: $regml(cnt,2)  }
   if $regex(cod,%yerbul,/^(<\151>\111\120\40\S{7}\40\S{4}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n Ulke Kodu: $regml(cod,2) }
   if $regex(kta,%yerbul,/^(<\151>\111\120\40\103\S{8}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n Kita: $regml(kta,2) }
   if $regex(rgn,%yerbul,/^(<\151>\111\120\40\122\S{5}\72</\151>\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n Bolge: $regml(rgn,2) }
   if $regex(cty,%yerbul,/^(<\151>\111\120\40\103\S{3}\72\40<\142>(\S+)</\142><\142\162\40\/>)$/i) { /msg %c_n Sehir: $regml(cty,2) }
   if $regex(org,%yerbul,/^(<\151>\117\S{11}\72</\151>\40<\142>(.+)</\142><\142\162\40\/>)$/i) { /msg %c_n Organizasyon: $regml(org,2) }
   if $regex(iss,%yerbul,/^(<\151>\111\123\120\40\S{8}\72</\151>\40<\142>(.+)</\142><\142\162\40\/><\142\162\40\/>)$/i) { /msg %c_n Servis Saglayici: $regml(iss,2) }
 }
 #opers off
 raw 340:*: {
   if (!$2) { /msg %c_n Sorgulanan Nick Sunucuda bulunmuyor. | goto down }
   set -e %nrd $regsubex($2,/.+\100(\d+\56\d+\56\d+\56\d+)$/g,\1) 
   .nerden
   :down  
   .disable #opers
  .halt
 }
 #opers end