Code:
on @*:mode:*:{
  if ($nick != $me) {
    if (+ isin $1-) mode $comchan($me,1) $replace($1-,+,-)
    if (- isin $1-) mode $comchan($me,1) $replace($1-,-,+)
  }
}
Untested