It's another X Login system, but for Specialnet.org, you can change x@Channels.specialnet.org to x@Channels.undernet.org for undernet or another Server :P enjoy

dialog XLogin {
  title "X Login System"
  size -1 -1 87 85
  option dbu
  edit %username, 2, 34 18 50 10
  edit %password, 3, 34 35 50 10, pass
  text " X Login System ", 1, 22 3 44 10
  text " UserName:", 4, 3 19 29 8
  text " Password:", 5, 4 36 29 8
  text "  This X Login system is only for SpecialNet made it by CharltonJ", 6, 9 60 68 22
  button "Okey", 7, 2 46 22 12, ok
  button "Mode +iwx", 8, 26 46 30 12
  button "Login", 9, 58 46 27 12
}
on *:dialog:xlogin:edit:*: {
  if ($did == 2) { /set %username $did(xlogin,2) }
  if ($did == 3) { /set %password $did(xlogin,3) }
}
on *:DIALOG:xlogin:SCLICK:*: {
  if ($did == 8) { //mode $me +iwx }
  if ($did == 9) { /msg x@Channels.specialnet.org login %username %password }
}
alias XL { /dialog -m XLogin XLogin }
menu Channel {
X Login System://xl
}