From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- language/mongolian/montex/mfinput/km/mcyccsc.mf | 50 +++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 language/mongolian/montex/mfinput/km/mcyccsc.mf (limited to 'language/mongolian/montex/mfinput/km/mcyccsc.mf') diff --git a/language/mongolian/montex/mfinput/km/mcyccsc.mf b/language/mongolian/montex/mfinput/km/mcyccsc.mf new file mode 100644 index 0000000000..d0159d5aed --- /dev/null +++ b/language/mongolian/montex/mfinput/km/mcyccsc.mf @@ -0,0 +1,50 @@ +% File: mcyccsc.mf +% Based on: cyccsc.mf +% Modified by: Oliver Corff +% Date: October 1997, Ulaanbaatar +% +% Caps and Small Caps in Computer Modern Cyrillic + +let cmchar=message; % `|cmchar|' should precede each character + +font_coding_scheme:=if ligs=0: "TeX typewriter text" + else: "TeX text without f-ligatures" fi; + +input mccoding; + +input mcyrligs; % ligatures defined for entering Cyrillic + +mode_setup; font_setup; +input punct; % Computer Modern punctuation symbols +input romanp; % more punctuation symbols +input romand; % digits +input mcyru; % upper case (majuscules) +input cyrmoreu; +input sym; % minus, etc. +input mcyrsymb; % seven additional chars: < << > >> No. t== T== +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; +input mcccscco; +font_setup; % now try again with |lower| settings +input mcyru; % majuscules (in lowercase positions) +input cyrmoreu; + +bye. + -- cgit v1.2.3