Auto Identify on connect, nick change..

; ================================
; ===-     Coded by VampiR    -===
; ===-     Nick Control v1    -===
; ===- Revolution@mail-me.com -===
; ================================

#ncon

alias ncon { dialog -m ncontrol ncontrol }
dialog ncontrol {
  title "Nick Control by VampiR - Release v1"
  size -1 -1 205 136
  option dbu
  edit "", 1, 2 62 61 10, disable read center
  edit "", 2, 64 62 55 10, disable read pass center
  button "Postavi", 3, 120 61 37 12
  button "Zameni", 4, 160 61 22 12
  button "Postavi", 5, 120 74 37 12
  button "Zameni", 6, 160 74 22 12
  edit "", 7, 2 75 61 10, disable read center
  edit "", 8, 64 75 55 10, disable read pass center
  button "Postavi", 9, 120 87 37 12
  button "Zameni", 10, 160 87 22 12
  edit "", 11, 2 88 61 10, disable read center
  edit "", 12, 64 88 55 10, disable read pass center
  button "Postavi", 13, 120 101 37 12
  button "Zameni", 14, 160 101 22 12
  edit "", 15, 2 102 61 10, disable read center
  edit "", 16, 64 102 55 10, disable read pass center
  button "Postavi", 17, 120 114 37 12
  button "Zameni", 18, 160 114 22 12
  edit "", 19, 64 115 55 10, disable read pass center
  edit "", 20, 2 115 61 10, disable read center
  icon 21, 4 2 113 49, $mircdirpic\script.png, 0
  button "Obrisi", 24, 183 61 19 12
  button "Obrisi", 25, 183 74 19 12
  button "Obrisi", 26, 183 87 19 12
  button "Obrisi", 27, 183 101 19 12
  button "Obrisi", 28, 183 114 19 12
  text "Copyright VampiR © 2012. All Rights Reserved", 29, 3 128 198 8, center
  button "Close Nick Control", 22, 148 4 49 12, cancel
  button "Information", 23, 135 29 37 12
  icon 30, 172 26 20 16, $mircdirpic\info.png, 0, noborder
  text "=====- Nick -======", 31, 3 54 61 8, nowrap center
  text "===- Password -===", 32, 64 54 54 8, nowrap center
}

on *:dialog:ncontrol:sclick:*: {
  if ($did == 3) { .nick %cnick1 | .nickserv identify %sifra1 }
  if ($did == 4) { dialog -c $dname | .set %cnick1 $?"Nick za postaviti:" | .set %sifra1 $?"Sifra za nick?" | ncon }
  if ($did == 5) { .nick %cnick2 | .nickserv identify %sifra2 }
  if ($did == 6) { dialog -c $dname | .set %cnick2 $?"Nick za postaviti:" | .set %sifra2 $?"Sifra za nick?" | ncon }
  if ($did == 9) { .nick %cnick3 | .nickserv identify %sifra3 }
  if ($did == 10) { dialog -c $dname | .set %cnick3 $?"Nick za postaviti:" | .set %sifra3 $?"Sifra za nick?" | ncon }
  if ($did == 13) { .nick %cnick4 | .nickserv identify %sifra4 }
  if ($did == 14) { dialog -c $dname | .set %cnick4 $?"Nick za postaviti:" | .set %sifra4 $?"Sifra za nick?" | ncon }
  if ($did == 17) { .nick %cnick5 | .nickserv identify %sifra5 }
  if ($did == 18) { dialog -c $dname | .set %cnick5 $?"Nick za postaviti:" | .set %sifra5 $?"Sifra za nick?" | ncon }
  if ($did == 24) { unset %cnick1 | unset %sifra1 | dialog -x $dname | ncon }
  if ($did == 25) { unset %cnick2 | unset %sifra2 | dialog -x $dname | ncon }
  if ($did == 26) { unset %cnick3 | unset %sifra3 | dialog -x $dname | ncon }
  if ($did == 27) { unset %cnick4 | unset %sifra4 | dialog -x $dname | ncon }
  if ($did == 28) { unset %cnick5 | unset %sifra5 | dialog -x $dname | ncon }
  if ($did == 23) { nconinfo }
}

on *:dialog:ncontrol:init:*: {
  .did -a $dname 1 %cnick1
  .did -a $dname 2 %sifra1
  .did -a $dname 7  %cnick2
  .did -a $dname 8 %sifra2
  .did -a $dname 11 %cnick3
  .did -a $dname 12 %sifra3
  .did -a $dname 15 %cnick4
  .did -a $dname 16 %sifra5
  .did -a $dname 19 %cnick5
  .did -a $dname 20 %sifra5
}

on 1:notice:*identify*:*: { 
  If $nick = nickserv {
    if ( $me = %cnick1 ) { ns identify %sifra1 }
    if ( $me = %cnick2 ) { ns identify %sifra2 }
    if ( $me = %cnick3 ) { ns identify %sifra3 }
    if ( $me = %cnick4 ) { ns identify %sifra4 }
    if ( $me = %cnick5 ) { ns identify %sifra5 }
  }
}

on 1:connect: { 
  if ( $me = %cnick1 ) { ns identify %sifra1 }
  if ( $me = %cnick2 ) { ns identify %sifra2 }
  if ( $me = %cnick3 ) { ns identify %sifra3 }
  if ( $me = %cnick4 ) { ns identify %sifra4 }
  if ( $me = %cnick5 ) { ns identify %sifra5 }
}

alias nconinfo { dialog -m nconinfo nconinfo }
dialog nconinfo {
  title "Nick Control Information"
  size -1 -1 161 54
  option dbu
  icon 1, 3 3 92 47, $mircdirpic\script.png, 0, noborder
  text "Coder", 2, 99 4 59 8, center
  text "VampiR", 3, 99 10 59 8, center
  text "Nick Control Version", 4, 99 21 59 8, center
  text "Release v1", 5, 99 28 59 8, center
  button "Official Page", 6, 99 39 59 12
}

on *:dialog:nconinfo:sclick:6: { run www.serbia.hostei.com }

#ncon end