AdiIRC

alias disconnectall {
  var %s 0
  while (%s < $scon(0)) {
    inc %s
    scon %s
    if ($status != disconnected) {
      disconnect
    }
  }
}

alias connectall {
  var %s 0
  while (%s < $scon(0)) {
    inc %s
    scon %s
    if ($status == disconnected) {
      server
    }
  }
}