this is a snippet made to identify you when you connect to your server. it works great for me. if you find any bug please tell me.

dialog A_ID {
  title "Auto Identify"
  size -1 -1 89 46
  option dbu
  button "ADD", 1, 2 22 41 10
  button "DEL", 2, 47 22 40 10
  edit "", 3, 27 1 60 10, autohs
  text "NICK:", 4, 2 2 25 8, center
  text "PASS:", 5, 2 12 25 8, center
  edit "", 6, 27 11 60 10, autohs
  edit "", 7, 2 35 85 10, read
}
on *:dialog:A_ID:*:*:{
  if ($devent == mouse) {
    did -ra A_ID 7 %aidnick $+ , $+ %aidpass
  }
  if ($devent == sclick) {
    if ($did == 1) { 
      set %aidnick $did(3)
      set %aidpass $did(6)
      did -ra A_ID 7 %aidnick $+ , $+ %aidpass
      did -r A_ID 3,6
    }
    if ($did == 2) {
      unset %aidnick 
      unset %aidpass 
    }
  }
}
on *:connect:{
  nick %aidnick
  ns identify %aidpass
}
menu * {
  .Auto ID: dialog -m A_ID A_ID
}