%!
%%BoundingBox: 19 164 581 636
0.0 setlinewidth

/hsvcircle {
gsave
   /h 0.0 def
   0 4 360 {
   pop
   gsave
   0.5 0.0 translate

   newpath
   0.0 0.0 moveto
   0.1 0.0 lineto
   0.1 0.02 lineto
   0.0 0.02 lineto
   closepath
   h 1.0 1.0 sethsbcolor
   fill

   %newpath
   %0.0 0.0 moveto
   %0.1 0.0 lineto
   %0.1 0.02 lineto
   %0.0 0.02 lineto
   %closepath
   %0.0 setgray
   %stroke

   grestore
   /h h 4 360 div add def
   4 rotate
   } for
grestore
} def

/graycircle {
gsave
   /h -1.0 def
   0 4 360 {
   pop
   gsave
   0.5 0.0 translate

   newpath
   0.0 0.0 moveto
   0.1 0.0 lineto
   0.1 0.02 lineto
   0.0 0.02 lineto
   closepath

   h abs setgray
   fill

   %newpath
   %0.0 0.0 moveto
   %0.1 0.0 lineto
   %0.1 0.02 lineto
   %0.0 0.02 lineto
   %closepath
   %0.0 setgray
   %stroke
   grestore

   /h h 8 360 div add def
   4 rotate
   } for
grestore
} def

0.0 setlinewidth
0.0 setgray
300 400 translate
500 500 scale

30 rotate
1.0 0.7 scale
-30 rotate

hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle
0.8 0.8 scale
hsvcircle
0.8 0.8 scale
graycircle

showpage