Code:
alias leaveall {
  var %i = 1
  while $chan(%i) {
    $iif($me isop $v1,kick $v2 $me,part $v2) $1-
    inc %i
  }
}