home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 517a.lha / FontManipulatorForDtp_v2 / misc / JansonTextOSF-Roman < prev    next >
Text File  |  1991-06-09  |  767b  |  33 lines
  1. %!PS-Font: JansonTextOSF-Roman (Base font is JansonText-Roman
  2.  
  3. % This program builds a modified version of the base font with the standard
  4. % figures replaced by old style figures.  If you are downloading this be
  5. % sure to download the base font first.
  6.  
  7. 3 dict begin
  8. /basefont /JansonText-Roman findfont def
  9. /newfont basefont maxlength dict def
  10. basefont
  11. { exch dup /FID ne
  12.   { exch newfont 3 1 roll put }
  13.   { pop pop }
  14.   ifelse
  15. } forall
  16. newfont begin
  17. /Encoding StandardEncoding 256 array copy def
  18. mark
  19.  
  20. % +++ Beginning of codes to be modified
  21.  
  22. (----Replace this line with the contents of "ppextosf_encoding.ps".----) =
  23.  
  24. % +++ End of codes to be modified
  25.  
  26. counttomark 2 idiv
  27. { Encoding 3 1 roll put } repeat
  28. pop
  29. /JansonTextOSF-Roman currentdict definefont pop
  30. end
  31. end
  32.  
  33.