mIRC Auto Ident Script

Auto Ident Script

on *:NOTICE:*owned*:?:{
  if ($nick == NS) && ($read(user.txt, s, $me) == $me) msg ns id $read(users.txt, s, $me)
}
alias reg {
  if ($1 == $null) { echo -s Usage: /newpass <nick> <pass> | return }
  if ($1 == $read(user.txt, s, $1)) { echo -s Nick is already registered! | return }
  else {
    .write user.txt $1 $1
    .write users.txt $1 $2
    echo -s Nick:  $+ $1 $+  Pass:  $+ $2 $+ 
    echo -s Registration successful!
  }
}
alias newpass {
  if ($1 == $null) { echo -s Usage: /newpass <nick> <newpass> | return }
  else {
    if ($read(users.txt, s, $me) == $2) { echo -s New pass = old pass. No need to change! | return }
    else {
      echo -s Changing pass:  $+ $read(users.txt, s, $me) $+  for nick  $+ $me $+  to:  $+ $2 $+ 
      write -ds $1 users.txt | write -ds $1 user.txt | .write user.txt $1 $1 | .write users.txt $1 $2
    }
  }
}