%! %%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