/usr/web/sources/contrib/fgb/root/sys/src/cmd/4th/examples/bf/random.b

Plan 9 from Bell Labs’s /usr/web/sources/contrib/fgb/root/sys/src/cmd/4th/examples/bf/random.b


>>++>+<[
    [>>]+>>+[
        -[++++++[>+++++++>+<<-]>-.>[<------>-]++<<]
        <[>>[-]]>[>[-<<]+<[<+<]]+<<
    ]>>
]
"Random" bit generator using the Rule 30 automaton.
To get x bits you need 4x+4 cells.
Daniel B. Cristofani (cristofd@hevanet.com)

(Return to Plan 9 Home Page)