Mine

on *:input:*:{
  if ($1 == host) || ($1 == ip) {
    haltdef
    set %ipnick $2
    set %output msg $active
    userhost $2 
  } 
}
raw 302:*: { 
  if (%ipnick) {
    if ($2- == $null) {
    %output $h2 $+ %ipnick is not online $chr(124) no user host found }
    else {
      tokenize $asc(=) $2- 
      %output $h1 $+ The Host of $h2 $+ %ipnick $+ $h1 is: $h2 $+ - $replace($2-,$chr(43),$chr(32)) 
    }
    unset %output 
    unset %ipnick
  }
}
alias h1 { return $+(4,$1-) }
alias h2 { return $+(2,$1-) }