# Not Another Pass Gen

### By Arigateaux on Jan 12, 2011

Yes, it is another pass gen.

sunslayer: imo atleast its not mirc, in the last week there have been like 3 or 4 different pass gens. ripped or not diversity is nice...

Made it out of spite and love. :)

``````alias passgen var %i = \$regsubex(\$str(.,\$iif(\$1,\$1,10)),/./g,\$iif(\$r(1,0),\$r(0,9),\$r(a,z)))) | echo -a %i :: \$md5(%i) :: \$sha1(%i)
``````

PuNkTuReD   -  Jan 14, 2011

well put, thanks for clearing that up.

jaytea   -  Jan 14, 2011

no, that's 5 repeated numbers, the first selection of each does not count as a repetition. the probability of observing exactly 5 repeated numbers in a sample size of 20 with selections made from a range of 1-100 is roughly 0.15 (1 in 67), which i wouldn't exactly call miraculous. now, if you observe this many times with a much greater frequency than 1 in 67 then perhaps we could start questioning the efficacy of mIRC's \$rand().

mIRC's random functions are at least as effective as C's rand().

sunslayer   -  Jan 13, 2011

you can't call it "good" or "bad" as the sole purpose of \$rand is to return a random number and by definition, while highly unlikely, \$rand(1,100) could be the same number several times over

PuNkTuReD   -  Jan 13, 2011

how good is mircs rand function tho.
out of 20 echos of //echo -a \$r(1,100)
45 11 45 18 39 66 90 28 28 56 18 11 32 9 11 43 76 86 13 83

2 x 45
3 x 11
2 x 18
2 x 28

thats 9 doubled numbers out of 20

LucSatise   -  Jan 13, 2011

passgens can be done too easily..

``````alias passgen {
%len = \$r(11,20)
%count = 0
while (%count < %len) {
inc %count
if (\$r(1,100) < 50) { %pass = %pass \$+ \$r(0,9) }
else {
if (\$r(1,100 < 50) { %pass = %pass \$+ \$r(a,z) }
else { %pass = %pass \$+ \$r(A,Z) }
}
}
echo %pass
}
``````
Arigateaux   -  Jan 12, 2011

Aw... I was just having some fun... :(

sunslayer   -  Jan 12, 2011

those who take it upon themselves to post such utterly retarded snippets such as this.

Jethro   -  Jan 12, 2011

Hold it there, buddy, who are those people whom you refer to as being retarded?

sunslayer   -  Jan 12, 2011

some people may actually be completely retarded.

congratulations.

Jethro   -  Jan 12, 2011

This looks like the one sunslayer has posted, except with added modification using \$md5() and \$sha1(), along with the local var set for the regsubex.

Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.