Stuff

on $*:TEXT:/^[!@.](user|check|whois) */si:#: {
  if ($address($replace($2-,$chr(32),$chr(95)),2) == $null) {
    notice $nick 1 $replace($2-,$chr(32),$chr(95)) is currently 4Offline.
  }
  else {
    set %whoisnick $replace($2-,$chr(32),$chr(95))
    set %whoischan $nick
    /notice $nick 1 %whoisnick is currently 4Online.
    /notice $nick 1 Address:4 $address($replace($2-,$chr(32),$chr(95)),2)
    enable #GroupRaw
    /whois %whoisnick
  }
}
#GroupRaw off
raw 319:*:{
  if (!%whoisnick) { halt }
  else {
    notice %whoischan 1 %whoisnick is on the channels:4 $remove($3-,@,%,+)
    disable #GroupRaw
    enable #GroupRaw
    /whois %whoisnick
  }
}
#GroupRaw off
raw 312:*:{
  if (!%whoisnick) { halt }
  else {
    notice %whoischan 1 %whoisnick is on the server:4 $3
    unset %whoischan | unset %whoisnick
    disable #GroupRaw
  }
}