[mIRC] Random Password Generator

/*
THIS SCRIPT HAS BEEN MADE BY [MM]IKKE
DO NOT DELETE ANY OF THESE CREDITS

USAGE
-----------
1. Copy-paste this to your remote tab (mIRC) in scripts editor.
2. Type /pass to generate a random password. It will ask if it should use special characters or not. You can specify the amount of characters in the first parameter ("/pass 10")
3. The password will be displayed in mIRC and copied to your clipboard.
4. Enjoy!
*/

alias pass {
  ;Syntax: <opt: amount of characters)
  ;Usage: generates a random password

  set %pass.tmp $null
  var %i = 1

  if ($1 !isnum) { var %length = $rand(20,30) }
  else { var %length = $1 }

  if ($?!="Use special characters? $crlf $crlf $+ : ; < = > ? @ [ \ ] ^ _ ` * + , - . / $chr(39) ( ) ! $chr(35) $chr(36) $chr(37) $chr(38) ") {
    while (%i <= %length) {
      set %pass.tmp %pass.tmp $+ $chr($rand(33,122))
      inc %i
    }
  }
  else {
    while (%i <= %length) {
      var %j = $rand(1,3)
      if (%j == 1) {
        set %pass.tmp %pass.tmp $+ $chr($rand(97,122))
      }
      elseif (%j == 2) {
        set %pass.tmp %pass.tmp $+ $chr($rand(65,90))
      }
      else {
        set %pass.tmp %pass.tmp $+ $chr($rand(48,57))
      }
      inc %i
    }
  }

  clipboard %pass.tmp
  echo -at Random password:4 %pass.tmp 1(copied to clipboard)
  unset %pass.tmp
}