on *:text:*:#:{
  if $regex($1,/^([!\.]who[iıİ]s)$/i) {
    if (*.* !iswm $2) { msg # Lütfen (!.)whois domain.com olarak belirtiniz. | return }
    var %:rand $md5($ticks)
    set %:kanal # | sockopen $+(whodomain,%:rand) wmaraci.com 80 | sockmark $+(whodomain,%:rand) $remove($2,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockopen:whodomain*:{
  var %:who $+(whois_type=1&domain=,$sock($sockname).mark)
  sockwrite -nt $sockname POST /whois HTTP/1.1
  sockwrite -nt $sockname Host: wmaraci.com
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Content-Length: $len(%:who)
  sockwrite -nt $sockname Accept: */*
  sockwrite -nt $sockname X-Requested-With: XMLHttpRequest
  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/39.0.2171.95 Safari/537.36
  sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
charset=UTF-8
  sockwrite -nt $sockname 
  sockwrite -nt $sockname %:who
}
on *:sockread:whodomain*:{
  var %:whodomain | sockread %:whodomain | tokenize 32 %:whodomain
  if (*div class="hizli-whois" onclick="gotowhoisquery* iswm %:whodomain) {
    msg %:kanal $sock($sockname).mark - $token($regsubex(%:whodomain,/(.+gotowhoisquery)/gi,),4,39)
  } 
}