1
0

fatcourier.ps 750 B

1234567891011121314151617181920212223242526
  1. %
  2. % Fat versions of the stroked Courier and Courier-Oblique - from Johnathan Shopiro.
  3. % Can be selectively pulled in using the -C option that's available with all the
  4. % PostScript translators or permanently added to any of the prologues. Helps on
  5. % Linotronic typesetters, where Courier and Courier-Oblique are too light!
  6. %
  7. /newdict /Courier findfont length 1 add dict def
  8. /Courier findfont {
  9. 1 index /FID ne
  10. {newdict 3 1 roll put}
  11. {pop pop}
  12. ifelse
  13. } forall
  14. newdict /StrokeWidth 60 put
  15. /Courier newdict definefont pop
  16. /newdict /Courier-Oblique findfont length 1 add dict def
  17. /Courier-Oblique findfont {
  18. 1 index /FID ne
  19. {newdict 3 1 roll put}
  20. {pop pop}
  21. ifelse
  22. } forall
  23. newdict /StrokeWidth 60 put
  24. /Courier-Oblique newdict definefont pop