;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
}
}
}
}