summaryrefslogtreecommitdiff
path: root/fonts/cmoefont/oesc.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/cmoefont/oesc.mf
Initial commit
Diffstat (limited to 'fonts/cmoefont/oesc.mf')
-rw-r--r--fonts/cmoefont/oesc.mf44
1 files changed, 44 insertions, 0 deletions
diff --git a/fonts/cmoefont/oesc.mf b/fonts/cmoefont/oesc.mf
new file mode 100644
index 0000000000..f59f3aad64
--- /dev/null
+++ b/fonts/cmoefont/oesc.mf
@@ -0,0 +1,44 @@
+% Caps and Small Caps in Computer Modern Roman
+%%% changed for old english
+
+font_coding_scheme:=if ligs=0: "TeX typewriter text"
+ else: "TeX text without f-ligatures" fi;
+spanish_shriek=oct"016"; spanish_query=oct"017";
+
+mode_setup; font_setup;
+input oermu; % upper case (majuscules)
+%input greeku; % upper case greek letters
+%input romand; % numerals
+%input romanp; % ampersand, question marks, currency sign
+%input romspu; % uppercase specials (\AE, \OE, \O)
+%input punct; % punctuation symbols common to all roman and italic
+%input accent; % accents common to roman and italic text
+%input romsub; % substitutes for ligatures
+input ogonek; % ogonek accent
+%if ligs>0: input comlig; fi % ligatures common with italic
+
+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#; fi
+
+%%% fine lower
+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: $.#:=lower.$.#; endfor
+fudge:=lower.fudge;
+font_setup; % now try again with |lower| settings
+extra_endchar:=extra_endchar&"charcode:=charcode+code_offset";
+code_offset:=ASCII"a" - ASCII"A";
+input oermu; % majuscules (in lowercase positions)
+%code_offset:=-3;
+%input romspu; % \AE, \OE, \O\ (in positions of \ae, \oe, \o)
+code_offset:=0;
+%input cscspu; % substitutes for the remaining characters of romspl
+bye.