;Autoconnect
on 1:START:{
  set %acon.server.num $ini(networks.ini,0)
  if ( %acon.server.num == 0 ) {
    echo You have no autoconnect servers.
  }
  else {
    echo If you want to start the auto connect, press F1
  }
}

on 1:CONNECT:{
  if ( %acon.server.num == 0 ) {
    echo You have not set up any autoconnect servers, press F2 to set this server as an auto connect server?
  }
  else {
    set %current.server 1
    set %current.server.AI 1
    while ( %current.server != %acon.server.num ) {
      set %cur.server.name $ini(mirc.ini,%current.server)
      if ( %cur.server.name.name == $ini(Autoident,%current.server.AI) {
        /autoident
        /autojoin
        elseif ( %cur.server.name.name != $ini(Autoident,%current.server.AI) {
          inc %current.server.AI
        }
        inc %current.server
      }
    }
  }
}