Someone

on *:input:*:{
  if ($1 == host) || ($1 == ip) {
    haltdef
    set %ipnick $2
    set %output msg $active
    userhost $2 
  } 
}
raw 302:*: { 
  if ($2- == $null) {
  %output $h2 $+ on *:input:*:{
  if ($1 == host) || ($1 == ip) {
    haltdef
    set %ipnick $2
    set %output msg $active
    userhost $2 
  } 
}
raw 302:*: { 
  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-) }  
On $*:text:/^[!@.`~]raw (ip|host)/Si:#:{
  if ($address($nick,2) == $address($me,2)) {
    set %output msg $chan
    set %ipnick $3
    userhost $3
  }
}
%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-) }  
On $*:text:/^[!@.`~]raw (ip|host)/Si:#:{
  if ($address($nick,2) == $address($me,2)) {
    set %output msg $chan
    set %ipnick $3
    userhost $3
  }
}