6 lines
175 B
PostScript
6 lines
175 B
PostScript
realtime srand % init RNG
|
|
{
|
|
rand 20 mod % generate number between 0 and 19
|
|
dup = % print it
|
|
10 eq { exit } if % exit if 10
|
|
} loop
|