AUTO IDENTIFY !

; <><> Auto identify by Lit0 <><>
menu channel,status,menubar,nicklist {
  -
  Auto Identify :/dialog -m autoid autoid 
  -
}
dialog autoid {
  title "Auto Identify [ Ns / Cs / L ]"
  size -1 -1 110 139
  option dbu
  text "Pseudo", 2, 7 12 27 8
  box "NickServ", 3, 2 3 103 32
  text "Pass", 4, 7 22 25 8
  edit %ns.nick, 5, 46 12 50 10, multi
  edit %ns.pass, 6, 46 22 50 10, pass multi
  box "ChanServ", 7, 2 40 103 32
  text "Chan", 8, 7 48 25 8
  edit %cs.chan, 9, 47 58 50 10, pass multi
  text "Pass", 10, 7 58 25 8
  edit %cs.pass, 11, 47 48 50 10, multi
  box "Q [Quakenet]", 12, 2 76 103 36
  text "Pseudo", 13, 7 86 25 8
  edit %q.nick, 14, 39 86 50 10, multi
  text "Pass", 15, 7 96 25 8
  edit %q.pass, 16, 39 96 50 10, pass multi
  button "CloSe !", 17, 33 121 37 12
}

On *:Dialog:autoid:edit:5:{ set %ns.nick $did(5) } 
On *:Dialog:autoid:edit:6:{ set %ns.pass $did(6) } 
On *:Dialog:autoid:edit:9:{ set %cs.chan $did(9) } 
On *:Dialog:autoid:edit:11:{ set %cs.pass $did(11) } 
On *:Dialog:autoid:edit:14:{ set %q.nick $did(14) } 
On *:Dialog:autoid:edit:16:{ set %q.pass $did(16) } 
On *:Dialog:autoid:sclick:17:{ dialog -x autoid autoid }
On *:Connect:{ 
  if ($network == QuakeNet) { msg Q@Cserve.quakenet.org auth %l.nick %l.pass }
  else { nick %ns.nick | msg nickserv identify %ns.pass | timer 1 5 | msg chanserv identify %cs.chan %cs.pass | timer1 off }
}
On *:Load:{ //echo -a 3Auto Identify 4bien installé 15by Lit0 }
On *:Unload:{ //echo -a 3Auto Identify 4bien désinstallé 15by Lit0 }
; <><> Auto identify by Lit0 <><>