home *** CD-ROM | disk | FTP | other *** search
/ Network Support Encyclopedia 96-1 / novell-nsepro-1996-1-cd2.iso / download / netware / hpt009.exe / PSPORT.INI < prev    next >
Text File  |  1994-03-15  |  4KB  |  312 lines

  1. %!PS
  2.  
  3. /LM 21 def
  4. /TM 768 def
  5.  
  6. /BS   8 def
  7. /LF  10 def
  8. /FF  12 def
  9. /ESC 27 def
  10. /RS  30 def
  11.  
  12. /char 1 string def
  13.  
  14. /encoding850 StandardEncoding 256 array copy def
  15.  
  16. 0
  17. [ 16#07
  18.   /bullet
  19.   16#0F
  20.   /currency
  21.   16#14
  22.   /paragraph
  23.   /section
  24.   16#27
  25.   /quotesingle
  26.   16#2D
  27.   /minus
  28.   16#5E
  29.   /circumflex
  30.   16#60
  31.   /grave
  32.   16#7E
  33.   /tilde
  34.   /.notdef
  35. % 8-
  36.   /Ccedilla
  37.   /udieresis
  38.   /eacute
  39.   /acircumflex
  40.   /adieresis
  41.   /agrave
  42.   /aring
  43.   /ccedilla
  44.   /ecircumflex
  45.   /edieresis
  46.   /egrave
  47.   /idieresis
  48.   /icircumflex
  49.   /igrave
  50.   /Adieresis
  51.   /Aring
  52. % 9-
  53.   /Eacute
  54.   /ae
  55.   /AE
  56.   /ocircumflex
  57.   /odieresis
  58.   /ograve
  59.   /ucircumflex
  60.   /ugrave
  61.   /ydieresis
  62.   /Odieresis
  63.   /Udieresis
  64.   /oslash
  65.   /sterling
  66.   /Oslash
  67.   /multiply
  68.   /florin
  69. % A-
  70.   /aacute
  71.   /iacute
  72.   /oacute
  73.   /uacute
  74.   /ntilde
  75.   /Ntilde
  76.   /ordfeminine
  77.   /ordmasculine
  78.   /questiondown
  79.   /registered
  80.   /logicalnot
  81.   /onehalf
  82.   /onequarter
  83.   /exclamdown
  84.   /guillemotleft
  85.   /guillemotright
  86. % B-
  87.   /.notdef
  88.   /.notdef
  89.   /.notdef
  90.   /bar
  91.   /.notdef
  92.   /Aacute
  93.   /Acircumflex
  94.   /Agrave
  95.   /copyright
  96.   /.notdef
  97.   /.notdef
  98.   /.notdef
  99.   /.notdef
  100.   /cent
  101.   /yen
  102.   /.notdef
  103. % C-
  104.   /.notdef
  105.   /.notdef
  106.   /.notdef
  107.   /.notdef
  108.   /emdash
  109.   /.notdef
  110.   /atilde
  111.   /Atilde
  112.   /.notdef
  113.   /.notdef
  114.   /.notdef
  115.   /.notdef
  116.   /.notdef
  117.   /.notdef
  118.   /.notdef
  119.   /currency
  120. % D-
  121.   /eth
  122.   /Eth
  123.   /Ecircumflex
  124.   /Edieresis
  125.   /Egrave
  126.   /dotlessi
  127.   /Iacute
  128.   /Icircumflex
  129.   /Idieresis
  130.   16#DC
  131.   /bullet
  132.   /brokenbar
  133.   /Igrave
  134.   /.notdef
  135. % E-
  136.   /Oacute
  137.   /germandbls
  138.   /Ocircumflex
  139.   /Ograve
  140.   /otilde
  141.   /Otilde
  142.   /mu
  143.   /thorn
  144.   /Thorn
  145.   /Uacute
  146.   /Ucircumflex
  147.   /Ugrave
  148.   /yacute
  149.   /Yacute
  150.   /macron
  151.   /acute
  152. % F-
  153.   /endash
  154.   /plusminus
  155.   /ellipsis
  156.   /threequarters
  157.   /paragraph
  158.   /section
  159.   /divide
  160.   /cedilla
  161.   /ring
  162.   /dieresis
  163.   /periodcentered
  164.   /onesuperior
  165.   /threesuperior
  166.   /twosuperior
  167.   /bullet ]
  168.  
  169.   {
  170.   dup type /nametype eq
  171.     {
  172.     dup /Courier findfont /CharStrings get exch known not
  173.       {
  174.       pop /.notdef
  175.       }
  176.     if
  177.     encoding850 2 index 3 -1 roll put 1 add
  178.     }
  179.     {
  180.     exch pop
  181.     }
  182.   ifelse
  183.   }
  184. forall
  185. pop
  186.  
  187. /define850
  188.   {
  189.   findfont
  190.   begin
  191.     currentdict dup length dict
  192.     begin
  193.         {
  194.         1 index /FID ne
  195.           {
  196.           def
  197.           }
  198.           {
  199.           pop pop
  200.           }
  201.         ifelse
  202.         }
  203.       forall
  204.       /Encoding encoding850 def
  205.       dup /FontName exch def
  206.       currentdict
  207.     end
  208.   end
  209.   definefont
  210.   } def
  211.  
  212. /backspace
  213.   {
  214.   currentpoint exch
  215.   charwidth sub exch
  216.   moveto
  217.   } def
  218.  
  219. /carriagereturn
  220.   {
  221.   currentpoint exch pop
  222.   LM exch
  223.   moveto
  224.   } def
  225.  
  226. /linefeed
  227.   {
  228.   currentpoint linespacing sub
  229.   moveto
  230.   } def
  231.  
  232. /formfeed
  233.   {
  234.   showpage
  235.   /data false def
  236.   LM TM moveto
  237.   } def
  238.  
  239. /Courier850 /Courier define850 [7.25 0 0 9.5 0 0] makefont setfont
  240. /charwidth (X) stringwidth pop def
  241. /linespacing 12 def
  242. /data false def
  243. LM TM moveto
  244.  
  245.   {
  246.   currentfile read
  247.     {
  248.     dup RS eq
  249.       {
  250.       pop
  251.       carriagereturn
  252.       }
  253.       {
  254.       dup LF eq
  255.         {
  256.         pop
  257.         linefeed
  258.         }
  259.         {
  260.         dup FF eq
  261.           {
  262.           pop
  263.           formfeed
  264.           }
  265.           {
  266.           dup BS eq
  267.             {
  268.             pop
  269.             backspace
  270.             }
  271.             {
  272.             dup ESC eq
  273.               {
  274.               pop
  275.               currentfile read
  276.                 {
  277.                 32 sub
  278.                 /linespacing exch def
  279.                 }
  280.                 {
  281.                 data { formfeed } if
  282.                 exit
  283.                 }
  284.               ifelse
  285.               }
  286.               {
  287.               dup 32 ne
  288.                 {
  289.                 /data true def
  290.                 }
  291.               if
  292.               char 0 3 -1 roll put
  293.               char show
  294.               }
  295.             ifelse
  296.             }
  297.           ifelse
  298.           }
  299.         ifelse
  300.         }
  301.       ifelse
  302.       }
  303.     ifelse
  304.     }
  305.     {
  306.     data { formfeed } if
  307.     exit
  308.     }
  309.   ifelse
  310.   }
  311. loop
  312.