dialog aid {
  title "Auto Identify Setup"
  size -1 -1 340 220
  button "Ok",1, 30 5 120 20, ok 
  button "Cancel",2, 190 5 120 20, cancel
  text " Check To Turn Auto Id",3, 30 32 130 40
  radio "On",4, 170 30 40 20,group
  radio "Off",5, 210 30 40 20
  box "Nick/Pass 1",6,10 60 150 70
  text "Nick",7,20 80 30 20
  text "Pass",8,20 100 30 20
  edit "",9, 50 80 85 20,autohs
  edit "",10, 50 100 85 20,autohs,pass
  box "Nick/Pass 2",11,180 60 150 70
  text "Nick",12,190 80 30 20
  text "Pass",13,190 100 30 20
  edit "",14, 220 80 85 20,autohs
  edit "",15, 220 100 85 20,autohs,pass
  box "Nick/Pass 3",16,10 130 150 70
  text "Nick",17,20 150 30 30
  text "Pass",18,20 170 30 20
  edit "",19, 50 150 85 20,autohs
  edit "",20, 50 170 85 20,autohs,pass
  box "Nick/Pass 4",21,180 130 150 70
  text "Nick",22,190 150 85 20
  text "Pass",23,190 170 85 20
  edit "",24, 220 150 85 20,autohs
  edit "",25, 220 170 85 20,autohs,pass
}
on *:dialog:aid:sclick:1: { 
  if ($did(aid,9).text) { /set %nickn1 $did(9).text }
  if ($did(aid,10).text) { /set %pass.1 $did(10).text }
  if ($did(aid,14).text) { /set %nickn2 $did(14).text }
  if ($did(aid,15).text) { /set %pass.2 $did(15).text }
  if ($did(aid,19).text) { /set %nickn3 $did(19).text }
  if ($did(aid,20).text) { /set %pass.3 $did(20).text }
  if ($did(aid,24).text) { /set %nickn4 $did(24).text }
  if ($did(aid,25).text) { /set %pass.4 $did(25).text }
  if ($did(aid,4).state == 1) { /set %nident on }
  if ($did(aid,5).state == 1) { /set %nident off }
}
on 1:dialog:aid:init:0: {
  did -a aid 9 %nickn1  
  did -a aid 14 %nickn2  
  did -a aid 19 %nickn3
  did -a aid 24 %nickn4  
  did -a aid 10 %pass.1
  did -a aid 15 %pass.2  
  did -a aid 20 %pass.3
  did -a aid 25 %pass.4  
  if (%nident == on) { did -c aid 4 }
  if (%nident == off) { did -c aid 5 }
} 
on 1:CONNECT:{
  if (%nident == On) {
	if ($me == %nickn1) { /nickserv identify %pass.1 | halt }
	if ($me == %nickn2) { /nickserv identify %pass.2 | halt }
	if ($me == %nickn3) { /nickserv identify %pass.3 | halt }
	if ($me == %nickn4) { /nickserv identify %pass.4 | halt }
  }
}
on 1:NOTICE:This nickname is owned by someone else*:?:{
  if ((%nident == On) && ($nick == nickserv)) {
	if ($me == %nickn1) { /nickserv identify %pass.1 | halt }
	if ($me == %nickn2) { /nickserv identify %pass.2 | halt }
	if ($me == %nickn3) { /nickserv identify %pass.3 | halt }
	if ($me == %nickn4) { /nickserv identify %pass.4 | halt }
  }
}
menu menubar,channel,status {
-
-=|-Auto Identifyer-|=-
.Open Dialog:/dialog -m aid aid
-
}