Code:
on *:TEXT:*:#: {
  if ($istok($1-,$me,32)) { beep 1 0 }
}