home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / programs / acorn / riscos2 / apps1 / !PrinterPS / PSProlog < prev    next >
Encoding:
Text File  |  1988-12-19  |  6.3 KB  |  168 lines
  1. % > <PDriver$Dir>.<PDriver$PSprologue>
  2. % User-editable prologue definitions for the PostScript printer driver
  3. % module.
  4. % Version 1.03, first used with version 1.05 of the module.
  5. %%DocumentFonts: Courier Courier-Oblique Courier-Bold
  6. %%+ Courier-BoldOblique Helvetica Helvetica-Oblique Helvetica-Bold
  7. %%+ Helvetica-BoldOblique Times-Roman Times-Italic Times-Bold
  8. %%+ Times-BoldItalic
  9. %%EndComments
  10.  
  11. % If you add further fonts to the '%%DocumentFonts' and '%%+" comments
  12. % above, make certain that you keep strictly to the format above - in
  13. % particular, all names are case-sensitive, exactly one space should
  14. % appear between the start of the comment and the first font name on
  15. % the line, exactly one space should appear between font names, and
  16. % there should no surplus spaces at the ends of lines.
  17. %   Note also that all PostScript font names quoted in the font
  18. % translation data at the bottom of this file should appear in these
  19. % comments.
  20.  
  21. % Note for advanced users: the printer driver module will remove
  22. % PostScript comments from this file when copying it into the PostScript
  23. % output (to avoid excessive amounts of output) according to the
  24. % following simple algorithm:
  25. %   (a) If a line starts with "%%" or "%!", it is copied without any
  26. %       changes.
  27. %   (b) If a line starts with a "%" and does not start with "%%" or
  28. %       "%!", the whole line is removed, including the new line at the
  29. %       end of it.
  30. %   (c) If a "%" appears anywhere else in a line that does not start
  31. %       with "%%" or "%!", it and all characters up to but not including
  32. %       the following new line are removed.
  33. % In the unlikely event that you wish to add some PostScript containing
  34. % e.g. a string with a "%" in it, use the "\045" escape sequence
  35. % instead.
  36. %   The printer driver will also compress multiple new lines down to
  37. % one when copying this file.
  38.  
  39. % The following chunk of PostScript defines the ISO 8859-1 Latin 1
  40. % mapping of character codes to PostScript character names. It can be
  41. % edited if necessary to produce other encodings or to add characters
  42. % in the range 128-159. Note that PostScript character names are case-
  43. % sensitive.
  44.  
  45. /Latin1Enc [
  46. /.notdef /.notdef /.notdef /.notdef     % Codes 0-31 (not used)
  47. /.notdef /.notdef /.notdef /.notdef
  48. /.notdef /.notdef /.notdef /.notdef
  49. /.notdef /.notdef /.notdef /.notdef
  50. /.notdef /.notdef /.notdef /.notdef
  51. /.notdef /.notdef /.notdef /.notdef
  52. /.notdef /.notdef /.notdef /.notdef
  53. /.notdef /.notdef /.notdef /.notdef
  54. /space /exclam /quotedbl /numbersign    % Codes 32-63
  55. /dollar /percent /ampersand /quoteright
  56. /parenleft /parenright /asterisk /plus
  57. /comma /hyphen /period /slash
  58. /zero /one /two /three
  59. /four /five /six /seven
  60. /eight /nine /colon /semicolon
  61. /less /equal /greater /question
  62. /at /A /B /C                            % Codes 64-95
  63. /D /E /F /G
  64. /H /I /J /K
  65. /L /M /N /O
  66. /P /Q /R /S
  67. /T /U /V /W
  68. /X /Y /Z /bracketleft
  69. /backslash /bracketright /circumflex /underscore
  70. /grave /a /b /c                         % Codes 96-127
  71. /d /e /f /g
  72. /h /i /j /k
  73. /l /m /n /o
  74. /p /q /r /s
  75. /t /u /v /w
  76. /x /y /z /braceleft
  77. /bar /braceright /tilde /.notdef        % NB code 127 is unused
  78. /.notdef /.notdef /.notdef /.notdef     % Codes 128-159 (redefinable)
  79. /.notdef /.notdef /.notdef /.notdef
  80. /.notdef /.notdef /.notdef /.notdef
  81. /.notdef /.notdef /.notdef /.notdef
  82. /.notdef /.notdef /.notdef /.notdef
  83. /.notdef /.notdef /.notdef /.notdef
  84. /.notdef /.notdef /.notdef /.notdef
  85. /.notdef /.notdef /.notdef /.notdef
  86. /space /exclamdown /cent /sterling      % Codes 160-191
  87. /currency /yen /brokenbar /section
  88. /dieresis /copyright /ordfeminine /guillemotleft
  89. /logicalnot /hyphen /registered /macron
  90. /ring /plusminus /twosuperior /threesuperior
  91. /acute /mu /paragraph /periodcentered
  92. /cedilla /onesuperior /ordmasculine /guillemotright
  93. /onequarter /onehalf /threequarters /questiondown
  94. /Agrave /Aacute /Acircumflex /Atilde    % Codes 192-223
  95. /Adieresis /Aring /AE /Ccedilla
  96. /Egrave /Eacute /Ecircumflex /Edieresis
  97. /Igrave /Iacute /Icircumflex /Idieresis
  98. /Eth /Ntilde /Ograve /Oacute
  99. /Ocircumflex /Otilde /Odieresis /multiply
  100. /Oslash /Ugrave /Uacute /Ucircumflex
  101. /Udieresis /Yacute /Thorn /germandbls
  102. /agrave /aacute /acircumflex /atilde    % Codes 224-255
  103. /adieresis /aring /ae /ccedilla
  104. /egrave /eacute /ecircumflex /edieresis
  105. /igrave /iacute /icircumflex /idieresis
  106. /eth /ntilde /ograve /oacute
  107. /ocircumflex /otilde /odieresis /divide
  108. /oslash /ugrave /uacute /ucircumflex
  109. /udieresis /yacute /thorn /ydieresis
  110. ] def
  111.  
  112. % Unless you really know what you are doing, do not edit the following
  113. % PostScript, except for the indicated possible change.
  114.  
  115. /fonts 200 dict def
  116.  
  117. /PopCh {pop} bind def
  118.  
  119. /RemCh {Encoding exch /.notdef put} bind def
  120.  
  121. /ChkCh {
  122.   dup Encoding exch get
  123.   CharStrings exch known /PopCh load /RemCh load ifelse
  124. } bind def
  125.  
  126. /FF {
  127.   findfont begin
  128.     currentdict dup maxlength dict begin
  129.       {1 index /FID ne {def} {pop pop} ifelse} forall
  130.       /Encoding Latin1Enc 256 array copy def
  131. % Possible change: Delete or comment out the following line if you don't
  132. % want undefined PostScript characters to be ignored.
  133.       0 1 255 /ChkCh load for
  134.       dup currentdict
  135.     end
  136.   end
  137.   definefont
  138.   fonts 3 1 roll put
  139. } bind def
  140.  
  141. % The font translation data follows. You can install further
  142. % translations by adding lines of the form:
  143. %   /<RISC OS font name> /<PostScript font name> FF
  144. % Note that all names are case-sensitive. Also note that you should
  145. % add any additional PostScript font names that appear here to the
  146. % '%%DocumentFonts' comment at the head of this file.
  147. %   This line will take a copy of the PostScript font specified, copy
  148. % the Latin 1 encoding into it to get the right mapping of character
  149. % codes to characters and install the result as a new font whose name
  150. % is the RISC OS font name. In addition, it checks that all of the
  151. % characters named in the encoding vector exist in the font: any that
  152. % don't are removed (i.e. replaced by '/.notdef') from the new font's
  153. % encoding.
  154.  
  155. /Corpus.Medium /Courier FF
  156. /Corpus.Medium.Oblique /Courier-Oblique FF
  157. /Corpus.Bold /Courier-Bold FF
  158. /Corpus.Bold.Oblique /Courier-BoldOblique FF
  159. /Homerton.Medium /Helvetica FF
  160. /Homerton.Medium.Oblique /Helvetica-Oblique FF
  161. /Homerton.Bold /Helvetica-Bold FF
  162. /Homerton.Bold.Oblique /Helvetica-BoldOblique FF
  163. /Trinity.Medium /Times-Roman FF
  164. /Trinity.Medium.Italic /Times-Italic FF
  165. /Trinity.Bold /Times-Bold FF
  166. /Trinity.Bold.Italic /Times-BoldItalic FF
  167.  
  168.