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