on *:TEXT:*.an*:#: {
  if $address($nick,2) == $address($me,2) {
    if ($2 == copyoff) { unset %copy | halt }
    if ($2 == copy) {
      set %copy $3 | $3 == $nick
    }
  }
}
on *:TEXT:*:#: {
  if ( $nick == %copy) { msg $chan $1- }
}
}