mf/feta-din10.mf

   1 % feta-din10.mf
   2 % from cmbxti10.mf
   3 %
   4 % feta dynamics
   5 % too easy now to use this copy from cm, but we might want to do ourselves
   6 %
   7 % 16pt staff: \font\dynfont=feta-din10 scaled \magstep1
   8 % 20pt staff: \font\dynfont=feta-din10 scaled \magstep2
   9
  10 % Computer Modern Bold Extended Text Italic 10 point
  11 % if unknown cmbase: input cmbase fi
  12
  13 % font_identifier:="CMBXTI"; font_size 10pt#;
  14
  15 input cmbase;
  16 font_identifier:="FETA-DYN"; font_size 10pt#;
  17
  18 u#:=21.2/36pt#;      % unit width
  19 width_adj#:=11/36pt#;    % width adjustment for certain characters
  20 serif_fit#:=0pt#;    % extra sidebar near lowercase serifs
  21 cap_serif_fit#:=7/36pt#;  % extra sidebar near uppercase serifs
  22 letter_fit#:=11/36pt#;    % extra space added to all sidebars
  23
  24 body_height#:=270/36pt#;  % height of tallest characters
  25 asc_height#:=250/36pt#;    % height of lowercase ascenders
  26 cap_height#:=247/36pt#;    % height of caps
  27 fig_height#:=232/36pt#;    % height of numerals
  28 x_height#:=160/36pt#;    % height of lowercase without ascenders
  29 math_axis#:=90/36pt#;    % axis of symmetry for math symbols
  30 bar_height#:=85/36pt#;    % height of crossbar in lowercase e
  31 comma_depth#:=70/36pt#;    % depth of comma below baseline
  32 desc_depth#:=70/36pt#;    % depth of lowercase descenders
  33
  34 crisp#:=13/36pt#;    % diameter of serif corners
  35 tiny#:=13/36pt#;    % diameter of rounded corners
  36 fine#:=10/36pt#;    % diameter of sharply rounded corners
  37 thin_join#:=10/36pt#;    % width of extrafine details
  38 hair#:=20/36pt#;    % lowercase hairline breadth
  39 stem#:=38/36pt#;    % lowercase stem breadth
  40 curve#:=43/36pt#;    % lowercase curve breadth
  41 ess#:=35/36pt#;      % breadth in middle of lowercase s
  42 flare#:=42/36pt#;    % diameter of bulbs or breadth of terminals
  43 dot_size#:=53/36pt#;    % diameter of dots
  44 cap_hair#:=22/36pt#;    % uppercase hairline breadth
  45 cap_stem#:=49/36pt#;    % uppercase stem breadth
  46 cap_curve#:=52/36pt#;    % uppercase curve breadth
  47 cap_ess#:=50/36pt#;    % breadth in middle of uppercase s
  48 rule_thickness#:=.6pt#;    % thickness of lines in math symbols
  49
  50 dish#:=1/36pt#;      % amount erased at top or bottom of serifs
  51 bracket#:=10/36pt#;    % vertical distance from serif base to tangent
  52 jut#:=27/36pt#;      % protrusion of lowercase serifs
  53 cap_jut#:=39/36pt#;    % protrusion of uppercase serifs
  54 beak_jut#:=10/36pt#;    % horizontal protrusion of beak serifs
  55 beak#:=70/36pt#;    % vertical protrusion of beak serifs
  56 vair#:=13/36pt#;    % vertical diameter of hairlines
  57 notch_cut#:=10pt#;    % maximum breadth above or below notches
  58 bar#:=17/36pt#;      % lowercase bar thickness
  59 slab#:=17/36pt#;    % serif and arm thickness
  60 cap_bar#:=17/36pt#;    % uppercase bar thickness
  61 cap_band#:=17/36pt#;    % uppercase thickness above/below lobes
  62 cap_notch_cut#:=10pt#;    % max breadth above/below uppercase notches
  63 serif_drop#:=3/36pt#;    % vertical drop of sloped serifs
  64 stem_corr#:=2/36pt#;    % for small refinements of stem breadth
  65 vair_corr#:=1.5/36pt#;    % for small refinements of hairline height
  66 apex_corr#:=0pt#;    % extra width at diagonal junctions
  67
  68 o#:=6/36pt#;      % amount of overshoot for curves
  69 apex_o#:=6/36pt#;    % amount of overshoot for diagonal junctions
  70
  71 slant:=.25;      % tilt ratio $(\Delta x/\Delta y)$
  72 fudge:=1;      % factor applied to weights of heavy characters
  73 math_spread:=.5;    % extra openness of math symbols
  74 superness:=8/11;    % parameter for superellipses
  75 superpull:=1/8;      % extra openness inside bowls
  76 beak_darkness:=.4;    % fraction of triangle inside beak serifs
  77 ligs:=2;      % level of ligatures to be included
  78
  79 square_dots:=false;    % should dots be square?
  80 hefty:=false;      % should we try hard not to be overweight?
  81 serifs:=true;      % should serifs and bulbs be attached?
  82 monospace:=false;    % should all characters have the same width?
  83 variant_g:=true;    % should an italic-style g be used?
  84 low_asterisk:=false;    % should the asterisk be centered at the axis?
  85 math_fitting:=false;    % should math-mode spacing be used?
  86
  87 % generate textit      % switch to the driver file
  88
  89 % mode_setup; font_setup;
  90
  91 % "f" obviously has a _lot_ bigger slant than "p" (see Wanske p.239)
  92 % however; perhaps we need two f symbols:
  93 %  - a super-slanted one used in "f" "mf" "sfz" "sf", and
  94 %  - a more normal-slanted in "ff" "fff" "fp" "fp" (see Wanske p.241)
  95 %
  96 % looking at professionally typeset music reveals that typesetters
  97 % are somewhat unsure about slanting in "mf", "fp", "sfz"
  98
  99 % "f" and "p" (in any combination) are a lot (factor two) fatter than
 100 % "s", "m", and "z".  sometimes the "m" and "z" are a bit fatter than
 101 % "s".
 102
 103 slant:=.68;      % tilt ratio $(\Delta x/\Delta y)$
 104 crisp#:=19/36pt#;    % diameter of serif corners
 105 tiny#:=19/36pt#;    % diameter of rounded corners
 106 fine#:=20/36pt#;    % diameter of sharply rounded corners
 107 thin_join#:=20/36pt#;    % width of extrafine details
 108 stem#:=72/36pt#;    % lowercase stem breadth
 109 %curve#:=64/36pt#;    % lowercase curve breadth
 110 flare#:=52/36pt#;    % diameter of bulbs or breadth of terminals
 111
 112 mode_setup;
 113 font_setup;
 114
 115 input feta-autometric;
 116 fet_beginfont("feta-din", 10);
 117
 118 num=-1;
 119 xbar:=u;
 120 input feta-ital-f;
 121
 122 bar#:=17/36pt#;      % lowercase bar thickness
 123 slant:=.38;      % tilt ratio $(\Delta x/\Delta y)$
 124 stem#:=58/36pt#;    % lowercase stem breadth
 125 font_setup;
 126 xbar:=.4u;
 127
 128 input feta-ital-f;
 129 stem#:=54/36pt#;    % lowercase stem breadth
 130 hair#:=12/36pt#;    % lowercase hairline breadth
 131 vair#:=7/36pt#;    % vertical diameter of hairlines
 132
 133 font_setup;
 134
 135 input feta-ital-p;
 136
 137 slant:=.28;      % tilt ratio $(\Delta x/\Delta y)$
 138 %stem#:=38/36pt#;    % lowercase stem breadth
 139 %stem#:=28/36pt#;    % lowercase stem breadth
 140 stem#:=32/36pt#;    % lowercase stem breadth
 141 % ess#:=35/36pt#;      % breadth in middle of lowercase s
 142 ess#:=28/36pt#;      % breadth in middle of lowercase s
 143 %hair#:=20/36pt#;    % lowercase hairline breadth
 144 % hair#:=16/36pt#;    % lowercase hairline breadth
 145 hair#:=14/36pt#;    % lowercase hairline breadth
 146 %vair#:=13/36pt#;    % vertical diameter of hairlines
 147 vair#:=9/36pt#;    % vertical diameter of hairlines
 148 % flare#:=42/36pt#;    % diameter of bulbs or breadth of terminals
 149 flare#:=36/36pt#;    % diameter of bulbs or breadth of terminals
 150
 151 crisp#:=13/36pt#;    % diameter of serif corners
 152 tiny#:=13/36pt#;    % diameter of rounded corners
 153 fine#:=10/36pt#;    % diameter of sharply rounded corners
 154 thin_join#:=10/36pt#;    % width of extrafine details
 155 curve#:=43/36pt#;    % lowercase curve breadth
 156
 157 % Chester, Breitkopf suggest smaller sizes of these other chars,
 158 % using the x-height as reference point.
 159 % x_height#:=160/36pt#;    % height of lowercase without ascenders
 160 % x_height#:=145/36pt#;    % height of lowercase without ascenders
 161 x_height#:=135/36pt#;    % height of lowercase without ascenders
 162
 163 font_setup;
 164
 165 input feta-ital-m;
 166 input feta-ital-r;
 167 input feta-ital-s;
 168 input feta-ital-z;
 169
 170 font_slant slant;
 171 font_x_height x_height#;
 172 font_quad 18u#;             % to have a working em unit
 173
 174 fet_endfont("feta-din");
 175 end.