% This is DXCSC.MF in text format, as of March 24, 1992
%
% DC fonts Version 1.1 (prerelease of EC fonts)
%
%          [ heavily borrowed from the Computer Modern Roman family of
%            fonts by D. E. Knuth ]
%
% Content:
%
%   driver file, called by parameter files for "caps and small caps" fonts
%

mode_setup;
font_setup;
%
%     dx  r   l   west
%         i   u   east
%         :   :   :
%         :   :   west '3xx / east '2xx
%         :   uppercase/lowercase
%         roman / italic

input dxruwest;
input dxrueast;
input dxrulett;  % upper case (majuscules)
%
input dxbraces;  % ^ ~ cwm  ( ) < | > [ ] \ { } _ - (177) space (040)
input dxpunct;   %  < << > >>  ! ` ' *  + , . / = ; : (spanish !)

input dxaccent;  %
input dxsign;    %  zero for mille, " # $ % @ pound sign
%
input dxromp;    % (roman punctuation)  & ? (spanish ?)
%
input dxrdigit;  % roman digits
%
%%% fine lower
begingroup
forsuffixes $= u, width_adj, cap_serif_fit, letter_fit,
 body_height, cap_height, x_height, bar_height, comma_depth,
 flare, cap_hair, stem, cap_stem, cap_curve, cap_ess,
 cap_jut, beak_jut, beak, slab, cap_bar, cap_band, cap_notch_cut,
 o, apex_o: save $; $.#:=lower.$.#; endfor
fudge:=lower.fudge;
font_setup; % now try again with |lower| settings

input dxcspl;    % dotless i,j; letter ligatures  FF FI FL FFI FFL D-


extra_endchar:=extra_endchar&"charcode:=charcode+code_offset";
code_offset:=ASCII"a" - ASCII"A";

input dxrulett;  % upper case (majuscules)

suppress_i_dot := true;

input dxruwest;
input dxrueast;

endgroup;


% Fontparameter
%
font_coding_scheme:="Extended TeX Font Encoding - Latin";
if known boundarychar: boundarychar:=oct"027"; fi
font_slant slant; font_x_height x_height#;
if monospace: font_normal_space 9u#; % no stretching or shrinking
 font_quad 18u#;
 font_extra_space 9u#;
else: font_normal_space 6u#+2letter_fit#;
 font_normal_stretch 3u#; font_normal_shrink 2u#;
 font_quad 18u#+4letter_fit#;
 font_extra_space 2u#;
 input dxcligtb;    % do the ligature programs, not for monospaced fonts
fi
font_character_set 1;
font_acc_height acc_height#;
font_cap_height cap_height#;
font_asc_height asc_height#;
font_rule_thickness rule_thickness#;
%font_baselineskip baselineskip#;
bye.
