this is some code i Made a couple off days ago Just press Remotes > Alt+R > File > New > Paste in the empty why box =) it's a whois'er Dns'er and ListIp'er Enjoy and can you Please comment on how to make it betta ? :D

raw &311:*:{ echo -a $timestamp 12|¯¯¯¯13( 0 Rasta/whois  $2 13 )12¯¯¯¯¯¯¯¯¯¯¯11 ¯¯¯¯¯ ¯¯¯¯ ¯¯¯13 ¯¯ ¯ | echo -a $timestamp 12| 0nick:14 $2 | echo -a $timestamp 12| 0name:14 ( $+ $6- $+ ) | echo -a $timestamp 12| 0hostname:14 $3 $+ @ $+ $4 | halt }
raw &314:*:echo -a $timestamp 12| 0name:14 $2-  | halt              
raw &312:*:echo -a $timestamp 12| 0server:14 $3 ( $+ $4- $+ ) 0IP:12 $serverip   | halt                          
raw &369:*:echo -a $timestamp 12| 0whowas:14 $2-  | halt                                       
raw &379:*:echo -a $timestamp 12| 0using modes:14 $6- | halt
raw &307:*:echo -a $timestamp 12| 0registered nick:14 Yes | halt
raw &319:*:echo -a $timestamp 12| 0channels:14 $3- | halt
raw &313:*:echo -a $timestamp 12| 0oper status:12 $5- | halt
raw &671:*:echo -a $timestamp 12| 0SSL:12 $4- | halt
raw &310:*:echo -a $timestamp 12| 0raw info:12 $4- | halt
raw &320:*:echo -a $timestamp 12| 0raw info:12 $3- | halt
raw &330:*:echo -a $timestamp 12| 0raw info:12 $4- | halt
raw &317:*:echo -a $timestamp 12| 0idle:14 $duration($3) | halt
raw &301:*:echo -a $timestamp 12| 0away:14 $3- | halt
raw &318:*:echo -a $timestamp 12|____13( 0end Rasta /whois :)  $2 13 )12_______________11_________________13___ | halt
raw &378:*:{
  haltdef
  var %host = $remove($6,*@) 
  hadd -mu1800 userhost $2 %host
  if $longip(%host) {
    echo -a $timestamp 12| 0real IP:12 $6
    return
  }
  if $hget(iptable,%host) {
    echo -a $timestamp 12| 0real Host:12 $6 0real IP:12 $ifmatch
    return
  }
  echo -a $timestamp 12| 0real Host:12 $6 0Getting IP...
  hadd -m iptable %host 0
  .dns -h %host 
}

On *:dns:{ 
  if $hget(iptable,$dns(1).addr) == 0 {
    hadd -mu1800 iptable $dns(1).addr $iif($dns(1).ip,$ifmatch,Unresolved)
    halt
  }
  echo -a $timestamp 13> 11dns12 [13!12] 
  var %n = $dns(0) 
  if (!$dns(0)) { echo -a $timestamp 12.11.13. 11Resolve 4Failed } 
  while (%n > 0) { 
    echo -a $timestamp 12.11.13. 11Resolved 12: 13[12 $+ $dns(%n).addr $+ 13]12 To 13[12 $+ $dns(%n).ip $+ 13] $iif($dns(%n).nick != $null, 13[12 $+ $dns(%n).nick $+ 13]) | HALTDEF
    dec %n 
  } 
} 

alias listip {
  var %i = $hget(userhost,0).item
  window -t20,40 @listip
  while %i {
    var %nick = $hget(userhost,%i).item, %ip = $hget(userhost,%nick), %i = %i - 1
    if $hget(iptable,%ip) {
      var %host = %ip, %ip = $ifmatch
    }
    aline @listip $+(Nick: %nick,$chr(9),IP: %ip,$chr(9),$iif(%host,Host: %host,Unresolved))
  }
}
;----------------------- 
;Coded By shanker =) 
;Powered By DarkCrew <3 
;-----------------------
;-Commands---------
; /whois nick      
; /listip Nick 
; /dns Nick 
; DarkCrew 4ever 
====================