Auto Generator
Brian K. White
brian at aljex.com
Wed Mar 24 15:42:55 PST 2004
@once: if:
: then: x = rand("-1") ; end
@keyp : if:
: then: pw(8,alnum) = ""
nxtc : if: pw co " "
: then: pw = pw { chr(int(rand()*"76"/"32768")+"48") ; goto
nxtc : if:
: then: msgbox pw ; end
ok, @entsel was a bad recommendation in combination with code that is run
from an @key
if you hit the @key several times in a raw, the @entsel keeps re-seeding
rand with the same time value until a second passes and you get the same
password several times in a row and the password changes only about once
every second.
ask me how I know :)
see to it that rand("-1") always gets run, but only gets run 1 time.
since rand("-1") is a 5.0 feature anyways, I guess it's no worse to also say
to use it in @once, which works nicely I can report.
Brian K. White -- brian at aljex.com -- http://www.aljex.com/bkw/
+++++[>+++[>+++++>+++++++<<-]<-]>>+.>.+++++.+++++++.-.[>+<---]>++.
filePro BBx Linux SCO Prosper/FACTS AutoCAD #callahans Satriani
More information about the Filepro-list
mailing list