alias temizle { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)   | return %x   }
alias dwhois { sockopen dwhois kimindir.com 80 }
on *:sockopen:dwhois: {
  set %swp sockwrite -n $sockname
  %swp GET $+(/,%domain) HTTP/1.1
  %swp Host: kimindir.com
  %swp $crlf
}
on *:sockread:dwhois: {
  var %alien
  sockread %alien
  if $regex(%alien,_ext/_img/check_2.gif) {
    msg #webmaster %domain kayıtsız. (kayıt edilebilir)
    sockclose dwhois
  }
  if $regex(%alien,$+(href=”
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
msg #webmaster %domain kayıtlı. (alınamaz)
    sockclose dwhois
  }
}
on *:text:*:#webmaster: { 
  if $1 == !whois { 
    if !$2 { msg $chan Yanlış kullanım. Kullanmanız gereken kod: !whois domain.com , !whois domain.net gibi. } 
    else { 
      if !$regex($2,.com|.net|.org|.biz|.info|.com.tr|.in|.tv|.cc|.xxx|.co|.gen.tr|.me|.bel.tr|.org.tr|.gov.tr|.edu.tr|.web.tr|.name.tr) { 
        msg $chan Sorgulama başarısız. Sorgulama yapabileceğiniz uzantılar: com, net, org, biz, com.tr, info, in, tv, cc, gen.tr, co, me, bel.tr, gov.tr, edu.tr, web.tr, name.tr 
      } 
      else { 
        sockclose dwhois 
        set %domain $2 
        dwhois 
        msg $chan $2 domaini sorgulanıyor. 
      } 
    } 
  } 
}