home *** CD-ROM | disk | FTP | other *** search
/ DOS Wares / doswares.zip / doswares / PROGS / WORD6 / PRINT1 / PSNET.IN$ / psnet.ini
Encoding:
Text File  |  1993-05-19  |  19.8 KB  |  677 lines
  1. %!PS-Adobe-2.0 ExitServer
  2.     %%Title: Microsoft Word Driver Prolog (Net Safe)
  3. %%Creator: Microsoft
  4. %%CreationDate: Thu Jul 5 1990
  5. %%BeginDocument: Microsoft Word 5.x 0
  6. %%EndComments
  7. /bd { bind def } bind def
  8. /ed { exch def } bd
  9. /IsFirstPage { count 2 ge { 1 index (FirstPage) eq } { false } ifelse not } def
  10. /PSl 
  11.     {
  12.     %% Check if we already printed a doc if so pop the msdict
  13.     %% will need this for multiple copies since PSe is not called.
  14.     IsFirstPage not { end } if 
  15.     msdict begin msinit /landscape true def /ptop 612 def 90 rotate 
  16.     } def
  17.     
  18. /PSp 
  19.     {
  20.     %% Check if we already printed a doc if so pop the msdict
  21.     %% will need this for multiple copies since PSe is not called.
  22.     IsFirstPage not { end } if 
  23.     msdict begin msinit /landscape false def /ptop 792 def 
  24.     } def
  25. %%BeginFont: mslinedraw
  26.  /mslinedraw 25 dict def
  27.  mslinedraw
  28.  begin
  29.  /FontType 3 def
  30.  /FontMatrix [ 1.0 30.0 div 0 0 1.0 30.0 div 0 0 ] def
  31.  /FontBBox [ 0 -8 18 30 ] def
  32.  /Encoding 256 array def
  33.  0 1 255 { Encoding exch /.notdef put } for
  34.  Encoding 45
  35.    [
  36.     /sh   /sh   /sh /light /med /dark
  37.     /sv   /srj  /sdjr /dsjr /sdtr /dstr /djr  /dv
  38.     /dtr  /dbr  /sdbr /dsbr /str  /sbl  /sjb  /sjt
  39.     /sjl  /sh   /sjc  /sdjl /dsjl /dbl  /dtl  /djb
  40.     /djt  /djl  /dh   /djc  /dsjb /sdjb /dsjt /sdjt
  41.     /sdbl /dsbl /dstl /sdtl  /sdjc /dsjc /sbr  /stl
  42.     /black /bb /bl /br /bt /sqbul
  43.    ] putinterval
  44.    /pl
  45.    {
  46.     transform 0.1 sub round 0.1 add exch
  47.     0.1 sub round 0.1 add exch itransform
  48.    } bd
  49.   /moveto { pl moveto } bd
  50.   /lineto { pl lineto } bd
  51.   /a { moveto lineto stroke } bd
  52.   /b { moveto lineto lineto stroke } bd
  53.   /c { moveto 9 7 lineto stroke } bd
  54.   /d { moveto lineto lineto } bd
  55.   /e { lineto closepath fill } bd
  56.   /f { 7 22 7 9 0 9 b } def
  57.   /g { 12 22 12 9 18 9 b } def
  58.   /h { 7 -8 7 5 0 5 b } def
  59.   /i { 12 -8 12 5 18 5 b } def
  60.   /j { 0 7 18 7 a } def
  61.   /k { 9 22 9 -8 a } def
  62.   /l { 0 5 18 5 a 0 9 18 9 a } def
  63.   /m { 7 22 7 -8 a 12 22 12 -8 a } def
  64.   /n { 0 -8 18 -8 18 22 d 0 22 e } def
  65.   /CharProcs 55 dict def
  66.   CharProcs
  67.   begin
  68.     /.notdef {} def
  69.     /sp { 1 1 moveto } def
  70.     /sv { k } def
  71.     /srj { k 0 7 c } def
  72.     /sdjr { k 0 5 9 5 a 0 9 9 9 a } def
  73.     /dsjr { m 0 7 7 7 a } def
  74.     /sdtr { 0 7 12 7 12 -8 b 7 7 7 -8 a } def
  75.     /dstr { 0 9 9 9 9 -8 b 0 5 9 5 a } def
  76.     /djr { f h 12 -8 12 22 a } def
  77.     /dv { m } def
  78.     /dtr { h 0 9 12 9 12 -8 b } def
  79.     /dbr { f  0 5 12 5 12 22 b } def
  80.     /sdbr { 0 7 12 7 12 22 b 7 7 7 22 a } def
  81.     /dsbr { 0 5 9 5 9 22 b 0 9 9 9 a } def
  82.     /str { 0 7 9 7 9 -8 b } def
  83.     /sbl { 9 22 9 7 18 7 b } def
  84.     /sjb { j 9 22 c } def
  85.     /sjt { j 9 -8 c } def
  86.     /sjl { k 18 7 c } def
  87.     /sh { j } def
  88.     /sjc { j k } def
  89.     /sdjl { k 9 9 18 9 a 9 5 18 5 a } def
  90.     /dsjl { m 12 7 18 7 a } def
  91.     /dbl { g 7 22 7 5 18 5 b } def
  92.     /dtl { i 7 -8 7 9 18 9 b } def
  93.     /djb { f g 0 5 18 5 a } def
  94.     /djt { h i 0 9 18 9 a } def
  95.     /djl { g i 7 -8 7 22 a } def
  96.     /dh { l } def
  97.     /djc { f g h i } def
  98.     /dsjb { l 9 22 9 9 a } def
  99.     /sdjb { j 7 7 7 22 a 12 7 12 22 a } def
  100.     /dsjt { l 9 -8 9 5 a } def
  101.     /sdjt { j 7 7 7 -8 a 12 7 12 -8 a } def
  102.     /sdbl { 7 22 7 7 18 7 b 12 22 12 7 a } def
  103.     /dsbl { 9 22 9 5 18 5 b 9 9 18 9 a } def
  104.     /dstl { 9 -8 9 9 18 9 b 9 5 18 5 a } def
  105.     /sdtl { 7 -8 7 7 18 7 b 12 -8 12 7 a } def
  106.     /sdjc { m j } def
  107.     /dsjc { l k } def
  108.     /sbr { 0 7 9 7 9 22 b } def
  109.     /stl { 9 -8 9 7 18 7 b } def
  110.     /light { 0.90 setgray n } def
  111.     /med { 0.60 setgray n } def
  112.     /dark { 0.30 setgray n } def
  113.     /black { n } def
  114.     /bt { 0 7 18 7 18 22 d 0 22 e } def
  115.     /bb { 0 -8 18 -8 18 7 d 0 7 e } def
  116.     /bl { 0 -8 9 -8 9 22 d 0 22 e } def
  117.     /br { 9 -8 18 -8 18 22 d 9 22 e } def
  118.     /sqbul { 6 3 16 3 16 11 d 6 11 e} def
  119.    end %CharProcs
  120.   /BuildChar
  121.    { fs 1 and 0 eq { 1 } { 3 } ifelse
  122.      setlinewidth
  123.      18 0 setcharwidth
  124.      exch
  125.      begin
  126.      Encoding exch get
  127.      CharProcs exch get
  128.      exec
  129.      end
  130.    } def
  131.   end %mslinedraw
  132. %%EndFont
  133. FontDirectory
  134. /LineDraw known not
  135.  { /LineDraw mslinedraw definefont pop } if
  136. %%BeginProcSet: msdict 1.5 0
  137. /msdict 120 dict def
  138. msdict
  139. begin
  140. %% Draw the diamond character from symbol font & then restore back to
  141. %% original font
  142. /AnnsDiamond
  143.     {
  144.     /ftcdold ftcd def
  145.     /ftszold ftsz def
  146.     56 ftsz F
  147.     (\250) S
  148.     ftcdold ftszold F
  149.     } bd
  150. %% Draw the square bullet from linedraw font & then restore back to
  151. %% original font
  152. /SquareBullet
  153.     {
  154.     /ftcdold ftcd def
  155.     /ftszold ftsz def
  156.     57 ftsz F
  157.     (\140) S
  158.     ftcdold ftszold F
  159.     } bd
  160.         
  161. %% Download font procs
  162. /E
  163.  { Eft ftsz scalefont setfont
  164.    /fs 0 def
  165.  } bd
  166. % Download Font
  167. %        s = font size in points
  168. /DF
  169.     {
  170.     true /FTTFFont ed
  171.     /ftsz ed
  172.     ftsz /TTFSize ed
  173.     dup /TTFName ed
  174.     ftsz scalefont setfont
  175.     /fs 0 def
  176.     (-) stringwidth pop 2 div neg
  177.     /STh ed
  178.     } bd
  179. %% FontName [] FontBBox FontMatrix FontName
  180. /TTNewFont
  181. {
  182.   10 dict dup 3 1 roll def
  183.   dup
  184.   begin
  185.   4 1 roll
  186.   /FontType 3 def
  187.   /FontMatrix exch def
  188.   /FontBBox exch def
  189.   /FontInfo 2 dict def
  190.   /Encoding 256 array def
  191.     0 1 255 { Encoding exch /.notdef put } for
  192.   /CharProcs 256 dict def
  193.     CharProcs /.notdef {} put
  194.   /Metrics 256 dict def
  195.     Metrics /.notdef 3 -1 roll put
  196.   /BuildChar
  197.     {
  198.       /char exch def
  199.       /fontdict exch def
  200.       /charname fontdict /Encoding get char get def
  201.       fontdict /Metrics get charname get aload pop
  202.       setcachedevice
  203.       fontdict
  204.       begin
  205.         Encoding char get
  206.         CharProcs exch get
  207.       end
  208.       exec
  209.     } def
  210.   end
  211.   definefont pop
  212. } def
  213. /AddChar
  214. {
  215.   begin
  216.     Encoding 3 1 roll put
  217.     CharProcs 3 1 roll put
  218.     Metrics 3 1 roll put
  219.   end
  220. } def
  221. %% End Download font procs
  222. % end of the msdict is in /PE
  223. % Set Landscape mode
  224. /PSl 
  225.     {
  226.     %% Check if we already printed a doc if so pop the msdict
  227.     %% will need this for multiple copies since PSe is not called.
  228.     IsFirstPage not { end } if 
  229.     msdict begin msinit /landscape true def /ptop 612 def 90 rotate 
  230.     } def
  231.     
  232. % Set potrait mode
  233. /PSp 
  234.     {
  235.     %% Check if we already printed a doc if so pop the msdict
  236.     %% will need this for multiple copies since PSe is not called.
  237.     IsFirstPage not { end } if 
  238.     msdict begin msinit /landscape false def /ptop 792 def 
  239.     } def
  240. % the end is for the msdict begin by itself
  241.  /PSe { count 2 ge { restore pop } if end } def
  242. % Set Line Length - Len
  243.  /SLL { pop } def
  244. % Set Position - X Y
  245.  /P { exch msu exch msu neg ptop add moveto } bd
  246. % Show Text - String
  247.  /S { sw 0 32 4 -1 roll widthshow } bd
  248. % Show Character - CharCode
  249.  /C { 1 string dup 0 4 -1 roll put S } bd
  250. % Justification - X in 1/20 point units
  251.  /J { msu ( ) stringwidth pop sub /sw ed } bd
  252. % checks if the page to be printed is the first page
  253.  /IsFirstPage { count 2 ge { 1 index (FirstPage) eq } { false } ifelse not } def
  254. % end is from the begin for msdict in /PSl or /PSp
  255. % page end
  256.  /PE { showpage ptop exch restore save exch /ptop ed } def
  257. % page length - Len in 1/20 point units
  258.  /SFL
  259.   { landscape { dup msu neg 0 exch translate } if msu
  260.     /ptop ed IsFirstPage { (FirstPage) save } if
  261.   } def
  262.  /B1 { statusdict begin papertray 1 ne { 1 setpapertray } if end } def
  263.  /B2 { statusdict begin papertray 2 ne { 2 setpapertray } if end } def
  264.  /B3 { statusdict begin papertray 3 ne { 3 setpapertray } if end } def
  265.  /BENV {} def
  266.     %%BeginModelCheck
  267.     % get printer name in msprod
  268.      statusdict begin product end dup length string cvs /msprod ed
  269.      msprod (OmniLaser) eq msprod (RX7100PS) eq or msprod (OL840) eq or
  270.      msprod (LaserPrinter15) eq or msprod (Brother HL-10PS/DPS) eq or
  271.      {
  272.       /B1 { statusdict begin papertray 0 ne { 0 setpapertray } if end } def
  273.       /B2 { statusdict begin papertray 1 ne { 1 setpapertray } if end } def
  274.       /B3 {} def
  275.       /BENV {} def
  276.      } if
  277.      msprod (IBM LaserPrinter) eq msprod 0 2 getinterval (HP) eq or
  278.      msprod (Hewlett-Packard LaserJet IIISi) eq or
  279.      {
  280.       /B1 { statusdict begin papertray 0 ne { 0 setpapertray } if end } def
  281.       /B2 { statusdict begin papertray 1 ne { 1 setpapertray } if end } def
  282.       /B3 {} def
  283.     % Envelope
  284.       /BENV { statusdict begin papertray 2 ne { 2 setpapertray } if end } def
  285.      } if
  286.      msprod (IBM Personal Page Printer II) eq msprod (LZR 960) eq or
  287.      {
  288.       /B1 { statusdict begin papertray 1 ne { 1 setpapertray } if end } def
  289.       /B2 { statusdict begin papertray 2 ne { 2 setpapertray } if end } def
  290.       /B3 {} def
  291.     % Envelope
  292.       /BENV { statusdict begin papertray 3 ne { 3 setpapertray } if end } def
  293.      } if
  294.     msprod (FS-1500A) eq msprod (FS-3500A) eq or msprod (FS-5500A) eq or
  295.     msprod (FS-8500A) eq or msprod (LaserJet 4) eq or
  296.      {/B1 {statusdict begin papertray 0 ne {0 setpapertray} if end} def
  297.       /B2 {statusdict begin papertray 1 ne {1 setpapertray} if end} def
  298.       /B3 {statusdict begin papertray 3 ne {3 setpapertray} if end} def
  299.       /BENV {statusdict begin papertray 2 ne {2 setpapertray} if end} def
  300.      } if
  301.      
  302.      
  303.     % Add other printer specific tray orderings here.
  304.     %%EndModelCheck
  305. /MB
  306.  { statusdict
  307.    begin
  308.     /manualfeed true store
  309.    end
  310.  } def
  311. /ME
  312.  { statusdict
  313.    begin
  314.     /manualfeed false store
  315.    end
  316.   } def
  317.     /DB
  318.      { statusdict
  319.        begin
  320.         true setduplexmode
  321.        end
  322.      } def
  323.     /DE
  324.      { statusdict
  325.        begin
  326.         false setduplexmode
  327.        end
  328.      } def
  329. % Bold font
  330. /B
  331.  { fs 2 and 0 eq { Bft } { BIft } ifelse
  332.    ftsz scalefont setfont fs 1 or /fs ed
  333.  } bd
  334. % italic
  335. /I
  336.  { fs 1 and 0 eq { Ift } { BIft } ifelse
  337.    ftsz scalefont setfont fs 2 or
  338.    /fs ed
  339.  } bd
  340. % bold italic
  341. /BI
  342.  { BIft ftsz scalefont setfont fs
  343.    2 or 1 or /fs ed
  344.  } bd
  345. % remove bold, italic
  346. /E
  347.  { Eft ftsz scalefont setfont
  348.    /fs 0 def
  349.  } bd
  350. % Font - n = font ID in prd file
  351. %        s = font size in points
  352. /F
  353.  {
  354.   false /FTTFFont ed
  355.   /ftsz ed
  356.   (-) stringwidth pop 2 div neg
  357.   /STh ed
  358.   /ftcd ed
  359.   0 2 fonttable length 1 sub
  360.   { dup fonttable exch
  361.     get ftcd eq { 1 add fonttable exch get fontset exit } { pop } ifelse
  362.   } for
  363.   E
  364.  } bd
  365. % Underline
  366. /LU
  367.  { currentpoint
  368.    /uy ed
  369.    /ux ed
  370.    1 ssm
  371.  } bd
  372. % double underline
  373. /LD
  374.  { currentpoint
  375.    /uy ed
  376.    /ux ed
  377.    2 ssm
  378.  } bd
  379. % strikethru
  380. /LS
  381.  { currentpoint
  382.    /suy ed
  383.    /sux ed
  384.    4 ssm
  385.  } bd
  386. % draw leader chars - n = 0 dots
  387. %                         1 hyphens
  388. %                         2 underline
  389. /LL
  390.  { currentpoint
  391.    /luy ed
  392.    /lux ed
  393.    /ldmode ed
  394.    8 ssm
  395.  } bd
  396. /LE
  397.  { 
  398.    % Use courier for underline/strikethru of truetype download fonts
  399.    false /foo ed
  400.    FTTFFont true eq { true /foo ed 0 12 F } if
  401.    smode 1 and 0 ne { false (_) ul } if
  402.    smode 2 and 0 ne { true (_) ul } if
  403.    smode 4 and 0 ne { false (\352) ul } if
  404.    smode 8 and 0 ne { lux luy ldot pop pop } if
  405.    not smode and
  406.    /smode ed
  407.    foo { TTFName TTFSize DF } if
  408.  } bd
  409. % Subscript
  410. /BD { STh ssc } bd
  411. % Superscript
  412. /BU { STh neg ssc } bd
  413. % End sub/super script
  414. /BN { 0 ssy neg rmoveto} bd
  415. /msinit
  416.  { /sw 0 def
  417.    /ftsz 12 def
  418.    /ftcd 0  def
  419.    /smode 0 def
  420.     /FTTFFont false def
  421.     /TTFName 0 def
  422.     /TTFSize 0 def
  423.     /foo false def
  424.     /fs 0 def
  425.     /STh { (W) stringwidth exch pop 3 div } def
  426.    /offset 0 def
  427.    /ldsp 8 def
  428.    fonttable 1 get fontset E initmatrix
  429.    statusdict begin /waittimeout 360 def end
  430.  } def
  431.     /fontset
  432.      { dup 0 get findfont
  433.        /Eft ed
  434.        dup 1 get findfont
  435.        /Bft ed
  436.        dup 2 get findfont
  437.        /Ift ed
  438.        3 get findfont
  439.        /BIft ed
  440.      } def
  441. /msu { 20 div } bd
  442. /ssc
  443.  { dup
  444.    /ssy ed
  445.    0 exch rmoveto
  446.  } bd
  447. /ssm { dup smode or /smode ed } bd
  448. /dul
  449.  { cc true charpath pathbbox
  450.    newpath exch pop 2 copy exch sub 2 mul
  451.   /dulsp ed
  452.   2 index 2 index moveto cx1 4 -1 roll sub dup
  453.   0 rlineto 3 1 roll exch sub 0 exch rlineto neg
  454.   0 rlineto closepath fill
  455.  } bd
  456. % flag char ul
  457. % cc = char
  458. /ul
  459.  { gsave
  460.    /cc ed
  461.    currentpoint pop
  462.    /cx1 ed
  463.    smode 4 ne { ux uy } { sux suy } ifelse
  464.    moveto dul
  465.    {
  466.     grestore gsave smode 4 ne
  467.     { ux uy } { sux suy } ifelse
  468.     dulsp 2 gt { dulsp } { dulsp 2 mul } ifelse
  469.     sub moveto dul
  470.    } if
  471.    grestore
  472.  } bd
  473. /lsetup
  474.  { x ldsp div round cvi ldsp mul
  475.    /x ed
  476.    lux ldsp div round cvi ldsp mul
  477.    /lux ed
  478.    lux ldsp 2 div add luy moveto
  479.    x lux sub ldsp div cvi
  480.  } bd
  481. /ldot
  482.  { gsave 2 copy currentpoint
  483.    /y ed
  484.    /x ed
  485.    newpath
  486.    ldmode 0 eq
  487.    {
  488.     1 setlinewidth 1 setlinecap x lsetup
  489.     { 0 0 rlineto ldsp 0 rmoveto }
  490.     repeat stroke pop pop pop
  491.    }
  492.    {
  493.     ldmode 1 eq
  494.     {
  495.      .2 setlinewidth lsetup 1 sub 0 (M) stringwidth pop 2.5
  496.      div rmoveto
  497.      {
  498.       ldsp 2 sub 0 rlineto 2 0 rmoveto
  499.      } repeat
  500.      stroke pop pop
  501.     }
  502.     {
  503.      ldmode 2 eq
  504.      {
  505.       [] 0 setdash
  506.       /offset 1.4 def
  507.       .2 setlinewidth
  508.       offset sub moveto x y offset sub lineto stroke
  509.      }
  510.      if
  511.     }
  512.     ifelse
  513.    } ifelse
  514.   grestore
  515.  } def
  516. % /OrigName /NewName Foreign
  517. /Foreign
  518.  {
  519.   exch findfont
  520.   begin
  521.    currentdict dup length dict
  522.    begin
  523.     {
  524.      1 index /FID ne { def } { pop pop } ifelse
  525.     } forall
  526.     /FontName ed
  527.     /Encoding foreignvec def
  528.     currentdict dup
  529.    end
  530.   end
  531.   /FontName get exch definefont pop
  532.  } bd
  533. /foreignvec StandardEncoding 256 array copy def
  534. % the following are differences from StandardEncoding.
  535. % Sequential entries do not require indices:
  536. 0 [ 20 /paragraph /section 39 /quotesingle 96 /grave
  537.    128 /Ccedilla /udieresis /eacute /acircumflex /adieresis /agrave /aring /ccedilla
  538.    /ecircumflex /edieresis /egrave /idieresis /icircumflex /igrave /Adieresis /Aring
  539.   /Eacute /ae /AE /ocircumflex /odieresis /ograve /ucircumflex /ugrave /ydieresis
  540.   /Odieresis /Udieresis /cent /sterling /yen /P /florin /aacute /iacute /oacute /uacute
  541.  /ntilde /Ntilde /ordfeminine /ordmasculine /questiondown /.notdef /.notdef /half
  542.  /quarter /exclamdown /guillemotleft /guillemotright /Aacute /Acircumflex /Agrave
  543.  /Atilde /Ecircumflex /Edieresis /Egrave /Iacute /Icircumflex /Idieresis /Igrave
  544.  /Oacute /Ocircumflex /Ograve /Otilde /Uacute /Ucircumflex /Ugrave /Scaron
  545.  /Ydieresis /emdash /Zcaron /.notdef /otilde /scaron /zcaron /fraction /section
  546.  /currency /quotesingle /quotedblleft /guilsinglleft /guilsinglright /quoteleft
  547.  /quoteright /endash /dagger /daggerdbl /paragraph /quotesinglbase /quotedblbase
  548.  /quotedblright /ellipsis /.notdef /grave /acute /circumflex /tilde /macron
  549.  /germandbls /breve /dotaccent /dieresis /cedilla /.notdef /hungarumlaut /ogonek
  550.  /caron /emdash /Lslash /Oslash /dotlessi /lslash /oslash /.notdef /.notdef /.notdef
  551.  /.notdef /.notdef /atilde /.notdef /.notdef /ring /bullet /periodcentered /.notdef
  552.  /.notdef /.notdef /.notdef /.notdef ]
  553.  { dup type
  554.    /nametype eq
  555.    { dup
  556.      /Courier findfont
  557.      /CharStrings get exch known not { pop /.notdef } if
  558.       foreignvec 2 index 2 index put pop 1 add
  559.    }
  560.    { exch pop }
  561.    ifelse
  562.  } forall
  563.  pop
  564. %%BeginMakeForeign
  565.     /Courier /Courier-F Foreign
  566.     /Courier-Bold /Courier-Bold-F Foreign
  567.     /Courier-Oblique /Courier-Oblique-F Foreign
  568.     /Courier-BoldOblique /Courier-BoldOblique-F Foreign
  569.     /Helvetica /Helvetica-F Foreign
  570.     /Helvetica-Bold /Helvetica-Bold-F Foreign
  571.     /Helvetica-Oblique /Helvetica-Oblique-F Foreign
  572.     /Helvetica-BoldOblique /Helvetica-BoldOblique-F Foreign
  573.     /AvantGarde-Book /AvantGarde-Book-F Foreign
  574.     /AvantGarde-Demi /AvantGarde-Demi-F Foreign
  575.     /AvantGarde-BookOblique /AvantGarde-BookOblique-F Foreign
  576.     /AvantGarde-DemiOblique /AvantGarde-DemiOblique-F Foreign
  577.     /Helvetica-Narrow /Helvetica-Narrow-F Foreign
  578.     /Helvetica-Narrow-Bold /Helvetica-Narrow-Bold-F Foreign
  579.     /Helvetica-Narrow-Oblique /Helvetica-Narrow-Oblique-F Foreign
  580.     /Helvetica-Narrow-BoldOblique /Helvetica-Narrow-BoldOblique-F Foreign
  581.         /Helvetica-Light /Helvetica-Light-F Foreign
  582.         /Helvetica-Black /Helvetica-Black-F Foreign
  583.         /Helvetica-LightOblique /Helvetica-LightOblique-F Foreign
  584.         /Helvetica-BlackOblique /Helvetica-BlackOblique-F Foreign
  585.     /Helvetica-Condensed /Helvetica-Condensed-F Foreign
  586.     /Helvetica-Condensed-Bold /Helvetica-Condensed-Bold-F Foreign
  587.     /Helvetica-Condensed-Oblique /Helvetica-Condensed-Oblique-F Foreign
  588.     /Helvetica-Condensed-BoldObl /Helvetica-Condensed-BoldObl-F Foreign
  589.     /Bookman-Light /Bookman-Light-F Foreign
  590.     /Bookman-Demi /Bookman-Demi-F Foreign
  591.     /Bookman-LightItalic /Bookman-LightItalic-F Foreign
  592.     /Bookman-DemiItalic /Bookman-DemiItalic-F Foreign
  593.         /Korinna-Regular /Korinna-Regular-F Foreign
  594.         /Korinna-Bold /Korinna-Bold-F Foreign
  595.         /Korinna-KursivRegular /Korinna-KursivRegular-F Foreign
  596.         /Korinna-KursivBold /Korinna-KursivBold-F Foreign
  597.     /Times-Roman /Times-Roman-F Foreign
  598.     /Times-Bold /Times-Bold-F Foreign
  599.     /Times-Italic /Times-Italic-F Foreign
  600.     /Times-BoldItalic /Times-BoldItalic-F Foreign
  601.     /NewCenturySchlbk-Roman /NewCenturySchlbk-Roman-F Foreign
  602.     /NewCenturySchlbk-Bold /NewCenturySchlbk-Bold-F Foreign
  603.     /NewCenturySchlbk-Italic /NewCenturySchlbk-Italic-F Foreign
  604.     /NewCenturySchlbk-BoldItalic /NewCenturySchlbk-BoldItalic-F Foreign
  605.     /Palatino-Roman /Palatino-Roman-F Foreign
  606.     /Palatino-Bold /Palatino-Bold-F Foreign
  607.     /Palatino-Italic /Palatino-Italic-F Foreign
  608.     /Palatino-BoldItalic /Palatino-BoldItalic-F Foreign
  609.         /Garamond-Light /Garamond-Light-F Foreign
  610.         /Garamond-Bold /Garamond-Bold-F Foreign
  611.         /Garamond-LightItalic /Garamond-LightItalic-F Foreign
  612.         /Garamond-BoldItalic /Garamond-BoldItalic-F Foreign
  613.         /AGaramond-Regular /AGaramond-Regular-F Foreign
  614.         /AGaramond-Bold /AGaramond-Bold-F Foreign
  615.         /AGaramond-Italic /AGaramond-Italic-F Foreign
  616.         /AGaramond-BoldItalic /AGaramond-BoldItalic-F Foreign
  617.     /ZapfChancery-MediumItalic /ZapfChancery-MediumItalic-F Foreign
  618. %%EndMakeForeign
  619. /fonttable [
  620.     0 [ /Courier-F /Courier-Bold-F /Courier-Oblique-F /Courier-BoldOblique-F ]
  621.     8 [ /Helvetica-F /Helvetica-Bold-F /Helvetica-Oblique-F /Helvetica-BoldOblique-F ]
  622.     9 [ /AvantGarde-Book-F /AvantGarde-Demi-F /AvantGarde-BookOblique-F /AvantGarde-DemiOblique-F ]
  623.     10 [ /Helvetica-Narrow-F /Helvetica-Narrow-Bold-F /Helvetica-Narrow-Oblique-F /Helvetica-Narrow-BoldOblique-F ]
  624.         11 [ /Helvetica-Light-F /Helvetica-Black-F /Helvetica-LightOblique-F /Helvetica-BlackOblique-F ]
  625.     12 [ /Helvetica-Condensed-F /Helvetica-Condensed-Bold-F /Helvetica-Condensed-Oblique-F /Helvetica-Condensed-BoldObl-F ]
  626.     16 [ /Bookman-Light-F /Bookman-Demi-F /Bookman-LightItalic-F /Bookman-DemiItalic-F ]
  627.         18 [ /Korinna-Regular-F /Korinna-Bold-F /Korinna-KursivRegular-F /Korinna-KursivBold-F ]
  628.     24 [ /Times-Roman-F /Times-Bold-F /Times-Italic-F /Times-BoldItalic-F ]
  629.     25 [ /NewCenturySchlbk-Roman-F /NewCenturySchlbk-Bold-F /NewCenturySchlbk-Italic-F /NewCenturySchlbk-BoldItalic-F ]
  630.     26 [ /Palatino-Roman-F /Palatino-Bold-F /Palatino-Italic-F /Palatino-BoldItalic-F ]
  631.         28 [ /Garamond-Light-F /Garamond-Bold-F /Garamond-LightItalic-F /Garamond-BoldItalic-F ]
  632.         29 [ /AGaramond-Regular-F /AGaramond-Bold-F /AGaramond-Italic-F /AGaramond-BoldItalic-F ]
  633.     50 [ /ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F ]
  634.     56 [ /Symbol /Symbol /Symbol /Symbol ]
  635.     57 [ /LineDraw /LineDraw /LineDraw /LineDraw ]
  636.     60 [ /ZapfDingbats /ZapfDingbats /ZapfDingbats /ZapfDingbats ]
  637. ] def
  638. %%BeginGraphicsDefs
  639. /M { moveto } bd
  640. /L { lineto } bd
  641. /LH { currentpoint exch pop lineto } bd
  642. /LV { currentpoint pop exch lineto } bd
  643. /R
  644.  { 3 index 1 index 1 index 5 index 5 index 1 index M
  645.    L L L closepath pop pop
  646.  } def
  647.     /setpat { setscreen 100 div setgray } bd
  648. /setgrayed { { dup mul exch dup mul add 1 exch sub } setpat } bd
  649. /setbar { { pop } setpat } bd
  650. /setcross { { 2 copy gt { pop } { exch pop } ifelse } setpat } bd
  651.  
  652. /fi { 1 -1 scale } bd
  653. /II1 { save count /mscount ed } bd
  654. /II2
  655.  { userdict
  656.    begin
  657.     /showpage {} def
  658.     /letter {} def
  659.     /legal {} def
  660.     /a4 {} def
  661.     /b5 {} def
  662.     /clear
  663.      {
  664.       { cleartomark count msdict
  665.         /mscount get eq { exit } if
  666.       }
  667.       loop mark
  668.      } def
  669.    mark
  670.  } def
  671. /IT { pop restore } bd
  672. /IX { exch msu exch msu neg ptop add translate } bd
  673. /IS { div 3 1 roll div exch scale } bd
  674. %%EndGraphicsDefs
  675. %%EndProcSet
  676. save
  677.