formatdict begin
/BIG 1073741824 def
% Gives a random number between 0 and N
% N Random random-number
/Random
{
rand BIG div mul 2 div
} bind def
/foo 0 def
/SHOWIT
{
dup stringwidth pop dup 2 div
gsave
dup 0 rmoveto
/foo foo 1 add def
foo 15 div dup Random exch 2 div sub rotate
neg 0 rmoveto exch show
grestore
0 rmoveto
} bind def
end