3 # Font metrics for the PS code generator
6 # These files are generated from AFM files
7 require 'metrics/ptmr8a.ph'; # Times-Roman
8 require 'metrics/ptmb8a.ph'; # Times-Bold
9 require 'metrics/ptmri8a.ph'; # Times-Italic
10 require 'metrics/ptmbi8a.ph'; # Times-BoldItalic
11 require 'metrics/pcrr8a.ph'; # Courier
12 require 'metrics/pcrb8a.ph'; # Courier-Bold
13 require 'metrics/phvr8a.ph'; # Helvetica
14 require 'metrics/phvro8a.ph'; # Helvetica-Oblique
15 require 'metrics/phvb8a.ph'; # Helvetica-Bold
16 require 'metrics/phvbo8a.ph'; # Helvetica-BoldOblique
18 # The fonts we want to use for various things
19 # The order is: <normal> <emphatic> <code>
24 %TitlFont = (name => 'tfont',
26 fonts => [[20,\%PS_Times_Bold],
27 [20,\%PS_Times_BoldItalic],
28 [20,\%PS_Courier_Bold]]);
29 %ChapFont = (name => 'cfont',
31 fonts => [[18,\%PS_Times_Bold],
32 [18,\%PS_Times_BoldItalic],
33 [18,\%PS_Courier_Bold]]);
34 %HeadFont = (name => 'hfont',
36 fonts => [[14,\%PS_Times_Bold],
37 [14,\%PS_Times_BoldItalic],
38 [14,\%PS_Courier_Bold]]);
39 %SubhFont = (name => 'sfont',
41 fonts => [[12,\%PS_Times_Bold],
42 [12,\%PS_Times_BoldItalic],
43 [12,\%PS_Courier_Bold]]);
44 %BodyFont = (name => 'bfont',
46 fonts => [[10,\%PS_Times_Roman],
47 [10,\%PS_Times_Italic],
50 # Helvetica family fonts
52 %TitlFont = (name => 'tfont',
54 fonts => [[20,\%PS_Helvetica_Bold],
55 [20,\%PS_Helvetica_BoldOblique],
56 [20,\%PS_Courier_Bold]]);
57 %ChapFont = (name => 'cfont',
59 fonts => [[18,\%PS_Helvetica_Bold],
60 [18,\%PS_Helvetica_BoldOblique],
61 [18,\%PS_Courier_Bold]]);
62 %HeadFont = (name => 'hfont',
64 fonts => [[14,\%PS_Helvetica_Bold],
65 [14,\%PS_Helvetica_BoldOblique],
66 [14,\%PS_Courier_Bold]]);
67 %SubhFont = (name => 'sfont',
69 fonts => [[12,\%PS_Helvetica_Bold],
70 [12,\%PS_Helvetica_BoldOblique],
71 [12,\%PS_Courier_Bold]]);
72 %BodyFont = (name => 'bfont',
74 fonts => [[10,\%PS_Helvetica],
75 [10,\%PS_Helvetica_Oblique],
78 # Body text Times; headings Helvetica
79 %TitlFont = (name => 'tfont',
81 fonts => [[20,\%PS_Helvetica_Bold],
82 [20,\%PS_Helvetica_BoldOblique],
83 [20,\%PS_Courier_Bold]]);
84 %ChapFont = (name => 'cfont',
86 fonts => [[18,\%PS_Helvetica_Bold],
87 [18,\%PS_Helvetica_BoldOblique],
88 [18,\%PS_Courier_Bold]]);
89 %HeadFont = (name => 'hfont',
91 fonts => [[14,\%PS_Helvetica_Bold],
92 [14,\%PS_Helvetica_BoldOblique],
93 [14,\%PS_Courier_Bold]]);
94 %SubhFont = (name => 'sfont',
96 fonts => [[12,\%PS_Helvetica_Bold],
97 [12,\%PS_Helvetica_BoldOblique],
98 [12,\%PS_Courier_Bold]]);
99 %BodyFont = (name => 'bfont',
101 fonts => [[10,\%PS_Times_Roman],
102 [10,\%PS_Times_Italic],
107 # List of all fontsets; used to compute the list of fonts needed
109 @AllFonts = ( \%TitlFont, \%ChapFont, \%HeadFont, \%SubhFont, \%BodyFont );