summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/mxedruli/mxedacc.mf
blob: 4270d44a17102466b799d6fb5b040fa55b24f9b9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
% Mxedruli Accents `mxedacc.mf'
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Designed and (c) by Johannes Heinecke                                     %
%                     Humboldt-Universit"at zu Berlin                       %
%                     Philosophische Faskult"at II                          %
%                     Institut f"ur deutsche Sprache und Linguistik         %
%                     Computerlinguistik                                    %
%                     J"agerstr. 10/11                                      %
%                     D - 10099 Berlin                                      %
%                     <heinecke@compling.hu-berlin.de>                      %
% Please send any improvements, corrections, suggestions, enhancements etc  %
% to the Author!                                                            %
%                                                                           %
% Version 2.0 as of 16th June 1995                                          %
%                                                                           %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% Character Definitions: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% Trema %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
mxedchar "Trema (Umlaut)";
beginchar(127, mxzw#+mxone#, mxheight#, 0);
    pickup mxed_dot;
    top lft z1 = (0, mxheight);
    rt z2 = (mxone, y1);
    drawdot z1;
    drawdot z2;
    penlabels(range 1 thru 2);
endchar;

%% Macron %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
mxedchar "Macron";
beginchar(22, mxzw#+mxone#, mxheight#, 0);
    pickup mxed_dash;
    top z1 = (0, mxheight);
    z2 = (mxone, y1);
    draw z1--z2;
    penlabels(range 1 thru 2);
endchar;

%% Hachek %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
mxedchar "Hachek";
beginchar(94, mxzw#+mxone#, mxheight#, 0);
%    pickup mxed_dash;
%    lft top z1 = (0, mxheight-mxthird);
%    rt z2 = (mxone, y1);
%    z3 = (.5[x1,x2], mxheight);
%    draw z1--z3--z2;
%    penlabels(range 1 thru 2);
    z1 = (0, mxheight-1.2mxthird);
    z2 = (1.2mxone, y1);
    z3 = (.5[x1,x2], mxheight);
    z4 = (x3, y3-.6mxthird);
    fill z1--z3--z2--z4--cycle;
endchar;



endinput;