jef@well.sf.ca.us (Jef Poskanzer) (03/29/91)
%! roachsheet.ps - draw a sheet of roaches
%
% Copyright (C) 1991 by Jef Poskanzer (jef@well.sf.ca.us).
%
% Permission to use, copy, modify, and distribute this software and its
% documentation for any purpose and without fee is hereby granted, provided
% that the above copyright notice appear in all copies and that both that
% copyright notice and this permission notice appear in supporting
% documentation. This software is provided "as is" without express or
% implied warranty.
%
% Roach bitmap derived from xroach by J. T. Anderson (jta@locus.com).
/roachmask {
1 setgray
96 96 false
[ 96 0 0 -96 0 96 ]
{<ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
fffffffffffffffffffffffffcfffffffffffffffffffffffcffffffffff
fffcfffffffff9fffffffffffffc7ffffffff1fffffffffffffc3fffffff
c3fffffcfffffffc1fffffff83fffff0fffffffe0fffffff07ffffc1ffff
ffff007ffffe0fffe003ffffffff8003fffc1ff00007ffffffffc0007ff8
3fe0000ffffffffffe000ff87fc0003ffffffffffff007f0ff8000ffffff
fffffffe03f0ff003fffffffffffffffc1e07e0ffffffffffffffffff000
001ffffffffffffffffffc00001fffffffffffffff00000000003fffffff
fffff800000000003fffffffffffc000000000001f3fff3ffffe00000000
00001f3fff3ffff00000000000000fffcfffffc000000000000007ffcfff
ff00000000000000000fffffff00000000000000000fffffff0000000000
0000000fffffff00000000000000000fffffff00000000000000000fffff
ff80000000000000000fffffff80000000000000000fffffff8000000000
0000000fffffff80000000000000000fffffff80000000000000000fffff
ffc000000000000001ff3fffffc000000000000003ff3fffffc000000000
0000073ffcffffc0000000000000073ffcffffe00000000000000fffffff
fff00000000000000ffffffffffe0000000000001fffffffffffc0000000
00003fffffffffffff800000003fffffffffffffffff0000003fffffffff
fffffffffcfc783ffffffffffffffffff8f8fc01fffffffffffffc0001f0
7e000ffffffffffff00003f07f0000ffffffffffc0000ff83fc0000fffff
ffffc0003ffc3ff0000fffffffff800ffffe1fffc007ffffffff83ffffff
1fffff07ffffffff07ffffff8fffffc3fffffffe0fffffffc7fffff3ffff
fffc1fffffffe3fffffffffffffc3ffffffff1ffffffffffffffffffffff
f8fffffffffffffffffffffffcffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffff>}
imagemask
} def
/roach {
0 setgray
96 96 false
[ 96 0 0 -96 0 96 ]
{<ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
fffffffffffffffffffffffffcfffffffffffffffffffffffcffffffffff
fffcfffffffff9fffffffffffffc7ffffffff1fffffffffffffc3fffffff
c3fffffcfffffffc1fffffff83fffff0fffffffe0fffffff07ffffc1ffff
ffff007ffffe0fffe003ffffffff8003fffc1ff00007ffffffffc0007ff8
3fe0000ffffffffffe000ff87fc0003ffffffffffff007f0ff8000ffffff
fffffffe03f0ff003fffffffffffffffc1e07e0ffffffffffffffffff000
001ffffffffffffffffffc00003fffffffffffffff00000000603fffffff
fffff800000000c03fffffffffffc000000001801f3fff3ffffe00000000
01801f3fff3ffff00000000003000fffcfffffc000000000030007ffcfff
ff00000000000700000fffffff00000000000700000fffffff0000000000
0e000c0fffffff00000000000e000c0ffffffffffffffffffe00000fffff
fffffffffffffe00000fffffff80000000000e000c0fffffff8000000000
0e000c0fffffff80000000000e00000fffffff80000000000600000fffff
ffc000000000060001ff3fffffc000000000070003ff3fffffc000000000
0300073ffcffffc0000000000300073ffcffffe00000000003000fffffff
fff00000000001000ffffffffffe0000000001801fffffffffffc0000000
01c03fffffffffffff80000000ffffffffffffffffff0000007fffffffff
fffffffffcfc783ffffffffffffffffff8f8fc01fffffffffffffc0001f0
7e000ffffffffffff00003f07f0000ffffffffffc0000ff83fc0000fffff
ffffc0003ffc3ff0000fffffffff800ffffe1fffc007ffffffff83ffffff
1fffff07ffffffff07ffffff8fffffc3fffffffe0fffffffc7fffff3ffff
fffc1fffffffe3fffffffffffffc3ffffffff1ffffffffffffffffffffff
f8fffffffffffffffffffffffcffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff
ffffffffffffffffffffffff>}
imagemask
} def
/oneroach {
roachmask
roach
} def
/rpasg {
rand 612 mod rand 792 mod translate
rand 360 mod rotate
rand 30 mod 20 add dup
rand 2 mod 1 eq { neg } if
scale
} def
500 {
gsave rpasg oneroach grestore
} repeat
showpage