alias f3 {
  var %channels = #services,#prova

  var %t = $numtok(%channels,44)

  if ($status !== connected) || (!%t) { return }

  var %i = 1
  while (%i <= %t) {
    var %c = $gettok(%channels,%i,44)

    if ($me ison %c) { mode %c $iif(R isincs $chan(%c).mode,-R,+R) }

    inc %i
  }
}