home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 1B / DATAFILE_PDCD1B.iso / _pocketbk / pocketbook / 001 / wdr_zip / PSAPPLE.INI < prev    next >
Text File  |  1992-05-12  |  2KB  |  75 lines
  1. /psd 100 dict def
  2. /PR {psd begin
  3. dup 0 eq {pop -.2 -.2 scale -90 rotate}{.2 .2 scale 0 exch translate}ifelse
  4. 2.4 setlinewidth /fst 0 def 0 12 F V /so save def}def
  5. psd begin
  6. /ft [
  7. 0 [/f0n /f0b /f0i /f0x]
  8. 8 [/f8n /f8b /f8i /f8x]
  9. 9 [/f9n /f9b /f9i /f9x]
  10. 10 [/f10n /f10b /f10i /f10x]
  11. 16 [/f16n /f16b /f16i /f16x]
  12. 24 [/f24n /f24b /f24i /f24x]
  13. 25 [/f25n /f25b /f25i /f25x]
  14. 26 [/f26n /f26b /f26i /f26x]
  15. 50 [/f50n dup dup dup]
  16. 56 [/Symbol dup dup dup]
  17. 60 [/ZapfDingbats dup dup dup]
  18. ] def
  19. /S {dup /fst exch def ft fti get exch get
  20. findfont fsi 5 mul scalefont setfont}bind def
  21. /U {/ul 1 def}bind def
  22. /V {/ul 0 def}bind def
  23. /F {/fsi exch def 0 2 ft length 1 sub
  24. {dup ft exch get 2 index eq{1 add /fti exch def exit}{pop}ifelse}for
  25. fst S}def
  26. /NP {showpage so restore /so save def}def
  27. /PS {so restore end currentfile closefile}def
  28. /M {neg moveto}bind def
  29. /R {0 rmoveto}bind def
  30. /D {neg 0 exch rmoveto}bind def
  31. /P {ul 1 eq{currentpoint 2 index show currentpoint gsave newpath
  32. 4 sub moveto 4 sub lineto stroke grestore pop}{show}ifelse}def
  33. /BD {fsi .6 div D}def
  34. /BU {fsi .6 div neg D}def
  35. /re {findfont begin currentdict dup length dict begin
  36. {1 index /FID ne {def}{pop pop} ifelse}forall
  37. /FontName exch def
  38. /Encoding ISOLatin1Encoding 256 array copy def
  39. Encoding dup dup 128 /florin put 129 /bullet put 130 /bullet put
  40. currentdict dup end end /FontName get exch definefont pop
  41. }bind def
  42. /f0n /Courier re
  43. /f0b /Courier-Bold re
  44. /f0i /Courier-Oblique re
  45. /f0x /Courier-BoldOblique re
  46. /f8n /Helvetica re
  47. /f8b /Helvetica-Bold re
  48. /f8i /Helvetica-Oblique re
  49. /f8x /Helvetica-BoldOblique re
  50. /f9n /AvantGarde-Book re
  51. /f9b /AvantGarde-Demi re
  52. /f9i /AvantGarde-BookOblique re
  53. /f9x /AvantGarde-DemiOblique re
  54. /f10n /Helvetica-Narrow re
  55. /f10b /Helvetica-Narrow-Bold re
  56. /f10i /Helvetica-Narrow-Oblique re
  57. /f10x /Helvetica-Narrow-BoldOblique re
  58. /f16n /Bookman-Light re
  59. /f16b /Bookman-Demi re
  60. /f16i /Bookman-LightItalic re
  61. /f16x /Bookman-DemiItalic re
  62. /f24n /Times-Roman re
  63. /f24b /Times-Bold re
  64. /f24i /Times-Italic re
  65. /f24x /Times-BoldItalic re
  66. /f25n /NewCenturySchlbk-Roman re
  67. /f25b /NewCenturySchlbk-Bold re
  68. /f25i /NewCenturySchlbk-Italic re
  69. /f25x /NewCenturySchlbk-BoldItalic re
  70. /f26n /Palatino-Roman re
  71. /f26b /Palatino-Bold re
  72. /f26i /Palatino-Italic re
  73. /f26x /Palatino-BoldItalic re
  74. /f50n /ZapfChancery-MediumItalic re
  75.