this simple code is identify ur nick on connect and simple auto join on connect, this autojoin is prevent ur to excess flood when join more channel, but make sure to uncheck the 'autojoin on connect' in mirc options..

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;          Author :: AndyWong                                     ;;
;;          Ange|@Script Version 1.0                               ;;
;;          Feb 2008                                               ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; this my style of coding...

;make sure to uncheck the autojoin on connect in mirc options

on *:Load:{
  set %autonick
  set %autopass
  set %autonick2
  set %autopass2
  set %autoIdentify2 off
  set %autoIdentify off
  set %autoJoinChan off
}

#AutoIndentify On
alias EditNickPass {
  if ($1 == $null) { return }
  if ($2 == $null) { return }
  set %autonick $1
  set %autopass $2
  echo 5 Nick: %autonick , Password: %autopass added to AutoIdentify-1 Nick On Connect
}
alias EditNickPass2 {
  if ($1 == $null) { return }
  if ($2 == $null) { return }
  set %autonick2 $1
  set %autopass2 $2
  echo 5 Nick: %autonick2 , Password: %autopass2 added to AutoIdentify-2 Nick On Connect
}

on 1:CONNECT:{
  var %g1 = yes
  var %g2 = yes
  if (%autonick == $null) %g1 = no
  if (%autopass == $null) %g1 = no
  if (%autonick2 == $null) %g2 = no
  if (%autopass2 == $null) %g2 = no
  if ((%autoIdentify == on) && (%g1 == yes)) { /ns sidentify %autonick %autopass }
  if ((%autoIdentify2 == on) && (%g2 == yes))  { .timerxxx 1 8 /ns sidentify %autonick2 %autopass2 }
  .timercpr 1 120 /umode -Mmep+L
  $JChan

}
#AutoIndentify End

#autoJoinChan on
alias JChan {
  if (%AJoinChan == $null) { return }
  if (%autoJoinChan == off) { return }
  var %i $numtok(%AJoinChan,44)
  var %ch
  var %cnt = 5
  while (%i) {
    %ch = $gettok(%AJoinChan ,%i,44)
    .timer $+ %ch 1 %cnt .join %ch
    %cnt = %cnt + 6
    dec %i
  }
  unset %ch
}

alias AddajChan {
  if ($1 == $null) { return }
  .set %AJoinChan $addtok(%AJoinChan,$1,44)
}
alias DelajChan {
  if ($1 == $null) { return }
  .set %AJoinChan $remtok(%AJoinChan,$2,1,44) 
}

#autoJoinChan end

menu status {
Auto Identify Nick On connect
.Auto Identfy Nick 1
..Add/Change Nick And Password:$EditNickPass($$?="you nick",$$?="you Password")
..Mode- $+ %autoIdentify:{
  if (%autoIdentify == off) {
    set %autoIdentify on
  }
  else {
    set %autoIdentify off
  }
}
..View Auto IdentifyNick 1:echo 4 Nick %autonick - Password %autopass , Auto Identify 1 Mode is12 %autoIdentify
..Delete:set %autonick | set %autopass | set %autoIdentify off
.Auto Identfy Nick 2
..Add/Change Nick And Password:$EditNickPass2($$?="you nick",$$?="you Password")
..Mode- $+ %autoIdentify2:{
  if (%autoIdentify2 == off) {
    set %autoIdentify2 on
  }
  else {
    set %autoIdentify2 off
  }
}
..View Auto IdentifyNick 2:echo 4 Nick %autonick2 - Password %autopass2 , Auto Identify 2 Mode is12 %autoIdentify2
..Delete:set %autonick2 | set %autopass2 | set %autoIdentify2 off
}

menu channel {
Auto Join Channel
.Autojoin Mode- $+ %autoJoinChan:{
  if (%autoJoinChan == off) {
    set %autoJoinChan on
  }
  else {
    set %autoJoinChan off
  }
}
.Add # AutoJoin:$AddajChan(#) 
.Delete Autojoin #:$DelajChan(#)
.Clear Autojoin List:set %AJoinChan | set %autoJoinChan off
.View Auto Join List:echo 6 Autojoin chan is %AJoinChan - Autojoin Mode is12 %autoJoinChan 
}