.PS # Birds.m4 gen_init scale = 50 linethick = 2*linethick define bird {[ line shaded "$1" from (0,0) to \ (10,-5) to (19,8) to (35,7) to (38,-12)+(0,2) to (60,0) to\ (75,23) to (80,40) to (52,37)+(2,2) to (74,50) to (52,50) to \ (60,60) to (38,48)+(0,2) to (35,67) to (19,68) to (10,55) to \ (0,60) to (-8,50) to (14,50) to (-8,37)+(2,2) to (20,40) to \ (15,23) to (0,0) E: (80,40) W: (20,40) N: (19,68) S: (19,8) line outlined "gray" from (35,15) down 10 right 25 line outlined "gray" from (40,20) right 25 down 8 line outlined "gray" from (42,25) right 28 down 6 line outlined "gray" from (40,30) right 32 down 4 circle outlined "gray" rad 1 at (1,55) circle outlined "gray" rad 4 at (24,55) ]} ncols = 4 nrows = 4 right for i=0 to nrows-1 do { for j=0 to ncols-1 do { move to (j*60,-i*60) if (i+j)%2==0 then { bird(black) } else { bird(white) } } } .PE