Auto Identifikacija !!

;Addon created by Lju[B]a
;Auto Identify

alias aid {
  $iif(!$dialog(aid),dialog -m aid aid,dialog -v aid)
}
dialog aid {
  title "Auto Identifikacija by Lju[B]a"
  size -1 -1 201 119
  option dbu
  text "Sifra:", 2, 102 6 50 12
  text "Nick:", 1, 8 6 50 12
  edit %nick1 , 3, 13 22 82 12
  edit %pass1 , 4, 107 22 82 12, pass
  edit %nick2 , 5, 13 37 82 12
  edit %pass2 , 6, 107 37 82 12, pass
  edit %nick3 , 7, 13 52 82 12
  edit %pass3 , 8, 107 52 82 12, pass
  edit %nick4 , 9, 13 67 82 12
  edit %pass4 , 10, 107 67 82 12, pass
  edit %nick5 , 11, 13 82 82 12
  edit %pass5 , 12, 107 82 82 12, pass
  button "&Sacuvaj", 13, 13 102 82 12, flat apply
  button "&Ok", 14, 107 102 82 12, flat ok
}
On 1:Dialog:aid:sclick:13: {
  set %nick1 $did(aid,3).text
  set %pass1 $did(aid,4).text
  set %nick2 $did(aid,5).text
  set %pass2 $did(aid,6).text
  set %nick3 $did(aid,7).text
  set %pass3 $did(aid,8).text
  set %nick4 $did(aid,9).text
  set %pass4 $did(aid,10).text
  set %nick5 $did(aid,11).text
  set %pass5 $did(aid,12).text
  echo -a 1,12Auto identifikacija je potvrdjena
}
on *:dialog:aid:init:*: {
  mdxd SetMircVersion $version
  mdxd MarkDialog $dname
  mdxd SetDialog $dname style tool title
  mdxd SetColor 1,2 text $rgb(255,255,255)
  mdxd SetColor $dname 2,1 background $rgb(0,0,0)
  mdxd SetDialog $dname bgcolor $rgb(0,0,0)
  mdxd SetFont $dname 1,2 20 400 Tahoma Bold
  mdxd SetFont $dname 13,14 14 400 Tahoma Bold
  mdxd SetFont $dname 3,4,5,6,7,8,9,10,11,12 14 400 Arial Bold Italic
  mdxd SetColor 3,4,5,6,7,8,9,10,11,12 text $rgb(0,0,0)
  mdxd SetColor 1,2 textbg $rgb(0,0,0)
}
on *:NOTICE:*This nickname*:?: {
  if ($nick == NickServ) && ($me == %nick1) {
    ns identify %pass1
  }
  if ($nick == NickServ) && ($me == %nick2) {
    ns identify %pass2
  }

  if ($nick == NickServ) && ($me == %nick3) {
    ns identify %pass3
  }

  if ($nick == NickServ) && ($me == %nick4) {
    ns identify %pass4
  }

  if ($nick == NickServ) && ($me == %nick5) {
    ns identify %pass5
  }
}