home/font/devutf/charlib/PC

   1 %
   2 % UMDS pencil - needs to be cleaned up.
   3 %
   4
   5 /build_PC {
   6     pop
   7     gsave
   8         currentpoint translate
   9         1 scaling div ptsize 10 div mul dup scale
  10         newpath
  11         0 setlinecap
  12         1 setlinejoin
  13         2 setlinewidth
  14         0 1 moveto 12 0 rlineto stroke
  15         0 5 moveto 12 0 rlineto stroke
  16         0 9 moveto 12 0 rlineto stroke
  17         1 setlinewidth
  18         12 .5 moveto 21.27362 5 lineto 12 9.5 lineto stroke
  19         21.27362 5 moveto
  20         .4 9.27362 mul neg .4 4 mul rlineto
  21         0 .8 4 mul neg rlineto
  22         closepath fill
  23     grestore
  24 } def
  25