on *:JOIN:#:{ 
  set %whois $chan 
  whois $nick 
} 
raw 319:*:{  
  if (!%whois) { halt }
  msg %whois 6 $2 is on:4 $3- 
  unset %whois 
}