summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf115
1 files changed, 59 insertions, 56 deletions
diff --git a/Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf b/Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf
index 95416a5c6fa..684c9a75df3 100644
--- a/Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf
+++ b/Master/texmf-dist/fonts/source/public/schulschriften/wela14_kl.mf
@@ -2,11 +2,14 @@
% Walter Entenmann
% Kleinbuchstaben
% 16.10.2011
+% 15.09.2014: Schleifchen-e, etc. modifiziert
+% siehe wela14_def.mf
+%
if not wortende:
- beginchar("a",27.724ut#,ht#,0);
+ beginchar("a",28.724ut#,ht#,0);
else:
- beginchar(oct"241",14.278ut#,ht#,0);
+ beginchar(oct"241",15.278ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -15,15 +18,15 @@ a_char;
endchar;
if not wortende:
- beginchar("b",25.936ut#,Ht#,0);
+ beginchar("b",24.048ut#,Ht#,0);
else:
-beginchar(oct"242",11.713ut#,Ht#,0);
+beginchar(oct"242",9.826ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
-kurzstrich(xpos);
+%kurzstrich(xpos);
oschl(xpos);
-stamm(ht,ht/2,xpos);
+stamm(ht-Delta,ht/2,xpos);
bogen(ht/2,0,ht/2,ht/kh,0.5,-90,90,1,1,xpos);
schweif(ht/2,ht,-einroll,90,angle(-1,mfahne),1,xpos);
fahne(ht,ht-Delta,bfahne,angle(1,-mfahne),angle(1,m),1,xpos);
@@ -43,23 +46,23 @@ fahne(0,ht-Delta,rho+(ht-Delta)/m,0,angle(1,m),2.5,xpos);
endchar;
if not wortende:
- beginchar("d",27.724ut#,Ht#,0);
+ beginchar("d",28.724ut#,Ht#,0);
else:
-beginchar(oct"244",14.278ut#,Ht#,0);
+beginchar(oct"244",15.278ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
oval(xpos);
- stamm(Ht,rho,xpos);
+ stamm(Ht,2rho,xpos);
stock(xpos);
zeigen;
endchar;
% lat. e, Normalform
if not wortende:
- beginchar("e",15.767ut#,ht#,0);
+ beginchar("e",12.767ut#,ht#,0);
else:
-beginchar(oct"245",15.767ut#,ht#,0);
+beginchar(oct"245",12.767ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -70,7 +73,7 @@ endchar;
% Ligaturen:
% e nach r
if not wortende:
-beginchar(oct"010",17.5ut#,ht#,0);
+beginchar(oct"010",12.5ut#,ht#,0);
pickup wela_pen;
xpos:=0;
latin_er(xpos);
@@ -80,7 +83,7 @@ fi
% e nach b,o,v,w
if not wortende:
-beginchar(oct"011",20ut#,ht#,0);
+beginchar(oct"011",15ut#,ht#,0);
pickup wela_pen;
xpos:=0;
latin_eb(xpos);
@@ -90,7 +93,7 @@ fi
% e nach g,j,y
if not wortende:
-beginchar(oct"012",17.094ut#,ht#,0);
+beginchar(oct"012",13.6ut#,ht#,0);
pickup wela_pen;
xpos:=0;
latin_eg(xpos);
@@ -99,15 +102,15 @@ endchar;
fi
if not wortende:
- beginchar("f",15.333ut#,Ht#,dt#);
+ beginchar("f",13.446ut#,Ht#,dt#);
else:
-beginchar(oct"246",1.888ut#,Ht#,dt#);
+beginchar(oct"246",0ut#,Ht#,dt#);
fi
pickup wela_pen;
xpos:=0;
- kurzstrich(xpos);
+% kurzstrich(xpos);
oschl(xpos);
-stamm(ht,-dt,xpos);
+stamm(ht-Delta,-dt,xpos);
schweif(ht/6,0,D,-90,0,1,xpos-D);
fahne(0,ht-Delta,rho+(ht-Delta)/m,0,angle(1,m),2,xpos);
zeigen;
@@ -132,25 +135,25 @@ else:
endchar;
if not wortende:
- beginchar("h",29.382ut#,Ht#,0);
+ beginchar("h",28.494ut#,Ht#,0);
else:
-beginchar(oct"250",15.936ut#,Ht#,0);
+beginchar(oct"250",14.048ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
- kurzstrich(xpos);
+% kurzstrich(xpos);
oschl(xpos);
-stamm(ht,0,xpos);
+stamm(ht-Delta,0,xpos);
bogen(ht/4,ht,5*ht/6,ht/kh,0.8,90,-90,1.2,1,xpos);
-stamm(5*ht/6,rho,xpos);
+stamm(5*ht/6,2*rho,xpos);
stock(xpos);
zeigen;
endchar;
if not wortende:
- beginchar("i",15.446ut#,Ht#,0); %%%% um 1ut schmaler
+ beginchar("i",16.446ut#,Ht#,0); %%%% um 1ut schmaler
else:
-beginchar(oct"251",2ut#,Ht#,0);
+beginchar(oct"251",3ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -158,7 +161,7 @@ spitz(xpos);
pickup wela_pen_thick;
ipunkt(xpos);
pickup wela_pen;
-stamm(ht,rho,xpos);
+stamm(ht,2rho,xpos);
stock(xpos);
zeigen;
endchar;
@@ -185,39 +188,39 @@ uschl_e(xpos);
endchar;
if not wortende:
- beginchar("k",27.368ut#,Ht#,0);
+ beginchar("k",25.481ut#,Ht#,0);
else:
-beginchar(oct"253",13.923ut#,Ht#,0);
+beginchar(oct"253",12.035ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
- kurzstrich(xpos);
+% kurzstrich(xpos);
oschl(xpos);
-stamm(ht,0,xpos);
+stamm(ht-Delta,0,xpos);
k_form(xpos);
fahne(0,ht-Delta,rho+(ht-Delta)/m,0,angle(1,m),2.5,xpos);
zeigen;
endchar;
if not wortende:
- beginchar("l",19.333ut#,Ht#,0);
+ beginchar("l",17.446ut#,Ht#,0);
else:
-beginchar(oct"254",5.888ut#,Ht#,0);
+beginchar(oct"254",4ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
- kurzstrich(xpos);
+% kurzstrich(xpos);
oschl(xpos);
-stamm(ht,2*rho,xpos);
+stamm(ht-Delta,2*rho,xpos);
fuss(xpos);
fahne(0,ht-Delta,rho+(ht-Delta)/m,0,angle(1,m),2.5,xpos);
zeigen;
endchar;
if not wortende:
- beginchar("m",46.373ut#,ht#,0);
+ beginchar("m",45.373ut#,ht#,0);
else:
-beginchar(oct"255",32.928ut#,ht#,0);
+beginchar(oct"255",31.928ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -226,22 +229,22 @@ stamm(ht-rho,0,xpos);
bogen(ht/4,ht,5*ht/6,ht/kh,0.8,90,-90,1.2,1,xpos);
stamm(5*ht/6,0,xpos);
bogen(ht/4,ht,5*ht/6,ht/kh,0.8,90,-90,1.2,1,xpos);
-stamm(5*ht/6,rho,xpos);
+stamm(5*ht/6,2rho,xpos);
stock(xpos);
zeigen;
endchar;
if not wortende:
- beginchar("n",34.325ut#,ht#,0);
+ beginchar("n",33.325ut#,ht#,0);
else:
-beginchar(oct"256",20.880ut#,ht#,0);
+beginchar(oct"256",19.880ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
spazierstock(xpos);
stamm(ht-rho,0,xpos);
bogen(ht/4,ht,5*ht/6,ht/kh,0.8,90,-90,1.2,1,xpos);
-stamm(5*ht/6,rho,xpos);
+stamm(5*ht/6,2rho,xpos);
stock(xpos);
zeigen;
endchar;
@@ -258,16 +261,16 @@ o_char;
endchar;
if not wortende:
- beginchar("p",27.494ut#,ht#,dt#); % um 1ut schmaler
+ beginchar("p",28.494ut#,ht#,dt#); % um 1ut schmaler
else:
-beginchar(oct"260",14.048ut#,ht#,dt#);
+beginchar(oct"260",15.048ut#,ht#,dt#);
fi
pickup wela_pen;
xpos:=0;
spitz(xpos);
stamm(ht,-dt,xpos);
bogen(ht/4,ht,5*ht/6,ht/kh,0.8,90,-90,1.2,1,xpos);
-stamm(5*ht/6,rho,xpos);
+stamm(5*ht/6,2rho,xpos);
stock(xpos);
zeigen;
endchar;
@@ -286,9 +289,9 @@ strich(xpos);
endchar;
if not wortende:
- beginchar("r",23.831ut#,ht#,0);
+ beginchar("r",21.831ut#,ht#,0);
else:
-beginchar(oct"262",11.831ut#,ht#,0);
+beginchar(oct"262",9.831ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -300,7 +303,7 @@ fahne(ht,ht-Delta,rfahne,-90,angle(1,m),1,xpos);
endchar;
if not wortende:
- beginchar("s",19.172ut#,ht#,0);
+ beginchar("s",19.966ut#,ht#,0);
else:
beginchar(oct"263",9.388ut#,ht#,0);
fi
@@ -329,9 +332,9 @@ fahne(0,ht-Delta,rho+(ht-Delta)/m,0,angle(1,m),2.5,xpos);
endchar;
if not wortende:
- beginchar("u",27.494ut#,ht#,0); % um 1ut schmaler
+ beginchar("u",28.494ut#,ht#,0); % um 1ut schmaler
else:
-beginchar(oct"265",14.048ut#,ht#,0);
+beginchar(oct"265",15.048ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -340,9 +343,9 @@ u_char;
endchar;
if not wortende:
- beginchar("v",30.880ut#,ht#,0);
+ beginchar("v",28.880ut#,ht#,0);
else:
-beginchar(oct"266",16.657ut#,ht#,0);
+beginchar(oct"266",14.657ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -355,9 +358,9 @@ fahne(ht,ht-Delta,ofahne,angle(1,-mfahne),angle(1,m),1,xpos);
endchar;
if not wortende:
- beginchar("w",42.928ut#,ht#,0);
+ beginchar("w",40.928ut#,ht#,0);
else:
-beginchar(oct"267",28.706ut#,ht#,0);
+beginchar(oct"267",26.706ut#,ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -437,9 +440,9 @@ tangente(3.5ut);
% Umlaute
% ä
if not wortende:
- beginchar(oct"344",27.724ut#,Ht#,0);
+ beginchar(oct"344",28.724ut#,Ht#,0);
else:
-beginchar(oct"273",14.278ut#,Ht#,0);
+beginchar(oct"273",15.278ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;
@@ -464,9 +467,9 @@ endchar;
% ü
if not wortende:
- beginchar(oct"374",27.494ut#,Ht#,0); % um 1ut schmaler
+ beginchar(oct"374",28.494ut#,Ht#,0); % um 1ut schmaler
else:
-beginchar(oct"275",14.048ut#,Ht#,0);
+beginchar(oct"275",15.048ut#,Ht#,0);
fi
pickup wela_pen;
xpos:=0;