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