I reworked the postscript program so you can specify encoder wheel size, 
and index pulse width for an encoder, then you can call the subroutine 
(done twice at the bottom) at different places on the paper.
   Hopefully the instructions in another message for using GIMP can get 
you the resolution you need.

On 06/02/2012 03:58 PM, gene heskett wrote:
> Thanks cogoman.  This would be useful if I had room for a 6" OD wheel, but
> my limit in the space I have is about 2.7" in diameter.
%! Postscript utility for printing multiple encoder wheels

/inch {72 mul} def              % #points/inch (don't change me)
/sizeo 2 inch def               % outside radius of encoder wheel
/sizei 1.8 inch def             % inside radius of encoder wedges
/segments 256 def               % number of segments (black and white)
/ipwidth 5.5 def                % width of index pulse bar
/moveout 4 def            % how far from left side to put encoder wheel
/moveup 4 def            % how far from the bottom to put the encoder wheel
/angle 360 segments div def

/wedge
  { /radius exch def
   /angle_s exch def
   /angle_e exch def
   newpath 0 0 moveto
   0 0 radius angle_s angle_e arc
   closepath
  } def

/encoder
{
     % ADD IN THE ENCODER WHEEL AT THE SPECIFIED DIAMETER
     gsave
      0 1 segments {
       360 segments div rotate
       angle 0 sizeo wedge
       2 mod 0 eq {1} {0} ifelse
       setgray fill
      } for
     grestore

         %THIS ROUTINE FILLS THE CENTER WITH WHITE, AND SOMEHOW PUTS A 
SOLID CIRCLE
         %                  INSIDE THE GROUP OF WEDGES
         %THIS LINE SPECIFIES WHERE TO PUT THE CENTER

     0 0 sizei 0 360 arc
     gsave
       0 setgray stroke
     grestore
       9 setgray fill

       ipwidth 0 sizei wedge
       0 setgray fill



         %THIS ROUTINE PUTS A TINY DOT IN THE CENTER TO AID IN MOUNTING 
THE DISC
         %THIS LINE SPECIFIES WHERE TO PUT THE CENTER
     0.0 inch 0.0 inch .01 inch 0 360 arc
     gsave
       stroke
     grestore
     0 setgray fill

} def

gsave
     2.5 inch 2.5 inch translate
     encoder
grestore
     2.5 inch 7.5 inch translate
     encoder
showpage


------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Emc-users mailing list
Emc-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/emc-users

Reply via email to