Code
on *:notice:*:?:{
  if ($regex($1-,/(.*AUTHENTICATION.*SUCCESSFUL.*)/Si) && $nick == X) {
    var %x = 1
    while (%x <= $lines(AutojoinChannels.txt)) {
      .timer 1 $calc(%x * 10) join $unsafe($read(AutojoinChannels.txt,tn,%x))
      inc %x
    }
  }
}

#mircscripting @ irc.swiftirc.net == the best mIRC help channel