summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/schulschriften/weva14.mf
blob: 045b5430ad300405d24c64ff21f1de62fa89edbc (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
64
65
66
67
68
69
% Vereinfachte Ausgangsschrift weva
% Driver-File
% Walter Entenmann
% 05.09.2011
% 13.09.2012
%
font_identifier "WEVA";
font_size 14pt#;
font_coding_scheme:="WEVA text";

mode_setup;

% Vereinbarungen:
path p, q;

%
% sharp Variables:
% unit_width
ut#:=0.233pt#;
% Linienabstand, 1:1:1
ht# := 20ut#;
dt# := ht#;
Ht# := ht#+dt#;

% Umrechnung von sharp Variablen in Pixelgroessen:
define_pixels(ut,ht,Ht,dt);

if unknown fetter: fetter:=0; fi
fetter:=sqrt(2)**fetter;
% Federn:
 pickup pencircle scaled (fetter*1.25*ut);
weva_pen := savepen;
% fuer i-Punkte etc.
if fetter>3: pickup  pencircle scaled 7ut;
  elseif fetter>2.5: pickup  pencircle scaled 5ut;
  else:
  pickup  pencircle scaled 3.5ut;
  fi
weva_pen_thick := savepen;
%

%  Current Transformation, slanted
if unknown slant: slant:=0; else: currenttransform:=identity slanted slant; fi


% Fontbeswchreibungen der einzelnen Zeichen:
% Parameter- und Makrodefinitionen
input weva14_def;
% Grossbuchstaben
input weva14_gr;
% Kleinbuchstaben
 input weva14_kl;
% Sonderzeichen
input weva14_sz;

% Abstandsmasse:
font_quad 14pt#;% 1em
font_x_height := 4.667pt#; % 1ex
font_normal_space 5pt#; % Wortzwischenraum
font_normal_stretch 2pt#;
font_normal_shrink 1pt#;

boundarychar:=oct"040"; % space

% Ligaturtabellen
input weva14_lig;

end
%%%%%%%% Ende weva14 Metafont-Hauptfile (Driver-File) %%%%%%%