mypapers/socc-img-calibr/lensfocus.ps

   1 %!PS-Adobe-1.0
   2 %%Title: Camera lens focusing sheet
   3 %%Creator: Petter Reinholdtsen <pere@td.org.uit.no>
   4 %%CreationDate: 1999-12-04
   5 %%BoundingBox: 13 14 574 575
   6 %%Pages: 1
   7 % Place this in front of the camera, and change
   8 % focus until the black center spot is as small
   9 % as possible.  The camera should then be in
  10 % focus.
  11 /cm { 28 mul } def .00001 setlinewidth
  12 % Center of circle
  13 10.5 cm 10.5 cm translate
  14 % scale 1 to fill page
  15 10 cm 10 cm scale
  16 newpath 0 0 1 0 360 arc stroke
  17 72 { newpath 0 0 moveto
  18   0 0 1 0 2.5 arc closepath fill 5 rotate
  19 } repeat showpage