Generates a hexatridecimal password for you. If you don't specify a length, it defaults to 20 characters, but you can choose anything up to 100. Obviously it's not hugely secure, because it's possible using a debug output to view the password being sent, but I've attempted to make it as secure as possible by using .notice as opposed to /notice or even /msg.

Oh and also, you need to add this to your variables:

%passgen A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9

Example:

[19:33:19] <~Matt> !passgen
[19:33:19] <~JellyFish> Generating a 20 digit hexatridecimal password for Matt...
[19:33:20] -JellyFish- Password Generated: IVG70R4QNUB27RECKHIV

Or, if you choose the length:

[19:41:34] <~Matt> !passgen 40
[19:41:34] <~JellyFish> Generating a 40 digit hexatridecimal password for Matt...
[19:41:34] -JellyFish- Password Generated: SMZF3YFI3J7TF115S1U7XJ0HWFL4LH2MY4JBH2D3

on *:TEXT:!passgen*:#:{
  if (!$2) {
    var %inc = 0
    var %pass = $gettok(%passgen,$rand(1,$numtok(%passgen,32)),32)
    msg # Generating a 20 digit hexatridecimal password for $nick $+ ...
    while (%inc <= 19) {
      var %pass = $instok(%pass,$gettok(%passgen,$rand(1,$numtok(%passgen,32)),32),$len(%pass),15)
      inc %inc 1
      if (%inc == 19) {
        .notice $nick Password Generated: %pass
      }
    }
  }
  if ($2) && ($2 isnum) {
    if ($2 <= 100) {
      var %inc = 0
      var %pass = $gettok(%passgen,$rand(1,$numtok(%passgen,32)),32)
      msg # Generating a $2 digit hexatridecimal password for $nick $+ ...
      while (%inc <= $calc($2 - 1)) {
        var %pass = $instok(%pass,$gettok(%passgen,$rand(1,$numtok(%passgen,32)),32),$len(%pass),15)
        inc %inc 1
        if (%inc == $calc($2 - 1)) {
          .notice $nick Password Generated: %pass
        }
      }
    }
    else {
      msg # A $2 character long password would crash $me $+ . Generate something under 100 characters.
    }
  }
}