on 1:TEXT:*:#:{ 
  if ($1 isupper) { 
    notice $nick who talks in caps anyway? its annoying  
  }
}