on ^*:JOIN:#:{ 
  if (%whois. [ $+ [ $chan ] ]) { 
    set %whoisnick $nick 
    set %whoischan $chan 
  } 
} 
raw *:*:{ 
  if ($numeric == 319) { 
    msg %whoischan %whoisnick is currently on: $3- 
    unset %whois* 
  } 
}