diff options
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.mf | 115 |
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; |