summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf174
1 files changed, 174 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf b/Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf
new file mode 100644
index 00000000000..7a2618a7e02
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/ethiop/eth_w.mf
@@ -0,0 +1,174 @@
+%-------------------------------------------------------------
+% This is ETH_W.MF as of Dec, 1995 by Jochen Metzinger
+% originally distributed by Abass B. Alamnehe [February, 1993]
+%-------------------------------------------------------------
+
+iff known eth_wa:
+cmchar "The letter wa";
+beginchar(eth_wa,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(u#,0);
+
+pickup fine.nib; penpos0(stem,0); penpos1(stem,-5); penpos2(vair,90);
+penpos2'(vair,90); penpos3(stem,180); penpos3'(stem,180);
+penpos4(stem,180); penpos5(vair,270);
+penpos6(vair,270); penpos7(vair,270); penpos8(vair,270); penpos9(stem,0);
+penpos10(stem,0); penpos11(vair,90); penpos12(vair,90);
+
+x0l=w-6.3u; x1l=w-7.6u; x2=x0l; x2'l=x0l-u; x3'r=1.25u; x3r=.35u;
+x4r=.35u; x5=w-8u; x6=x1l; x7=x1r; x8=w-4.5u; x9l=w-3.5u; x10l=w-2.65u;
+x11=w-3.5u; x12=x0r;
+
+y0=.8h; y1=.175h; y2r=y0-o; y2'r=y0-oo; y3'=.65h; y3=.4h;
+y4=.275h; y5r=y6r=y7r=y1; y8r=y1; y9=.25h; y10=.675h; y11=.775h; y12=.775h;
+
+filldraw stroke z0e{down}--z1e;
+filldraw stroke z2e..z2'e..tension 1.1..z3'e..z3e..z4e...z5e..z6e;
+filldraw stroke z7e..z8e..z9e..tension 1.3..z10e..z11e..z12e;
+penlabels(1,2,2',3,3',4,5,6,7,8,9,10,11,12,13); endchar;
+
+
+iff known eth_wU:
+cmchar "The letter wU";
+beginchar(eth_wU,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(u#,2u#);
+
+pickup fine.nib; penpos0(stem,0); penpos1(stem,-5); penpos2(vair,90);
+penpos2'(vair,90); penpos3(stem,180); penpos3'(stem,180);
+penpos4(stem,180); penpos5(vair,270);
+penpos6(vair,270); penpos7(vair,270); penpos8(vair,270); penpos9(stem,0);
+penpos10(stem,0); penpos11(vair,90); penpos12(vair,90);
+
+x0l=w-6.3u; x1l=w-7.6u; x2=x0l; x2'=x0l-u; x3'r=1.25u; x3r=.35u;
+x4r=.35u; x5=w-8u; x6=x1; x7=x1r; x8=w-4.5u; x9l=w-3.5u; x10l=w-2.65u;
+x11=w-3.5u; x12=x0r;
+
+y0=.8h; y1=.175h; y2r=y0-o; y2'r=y0-oo; y3'=.65h; y3=.4h;
+y4=.275h; y5r=y6r=y7r=y1; y8r=y1; y9=.25h; y10=.675h; y11=.775h; y12=.775h;
+
+filldraw stroke z0e--z1e;
+filldraw stroke z2e..z2'e...z3'e...z3e..z4e...z5e..z6e;
+filldraw stroke z7e..z8e..z9e..tension 1.3..z10e..z11e..z12e;
+x13=x9; y13=y1; rt_half_ellipse(13,1.5u);
+penlabels(1,2,2',3,3',4,5,6,7,8,9,10,11,12,13); endchar;
+
+
+iff known eth_wI:
+cmchar "The letter wI";
+beginchar(eth_wI,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(.5u#,-.5u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos1'(stem,0);
+penpos2(vair,90); penpos2'(vair,90); penpos3(stem,180); penpos4(stem,180);
+penpos5'(vair,270); penpos5(vair,270); penpos6(vair,270); penpos7(vair,270);
+penpos8(stem,0); penpos8'(stem,0); penpos9(vair,90); penpos10(vair,90);
+
+lft x0l=w-7u; x1l=w-8u; x1'l=x1l+.25u; x2=x0; x2'=w-8.25u; lft x3r=.75u;
+x4r=.75u; x5'=w-8.25u; x5=w-7u; x6=w-5.5u;
+x7=w-4.5u; x8l=w-3.25u; x8'l=w-3.25u; x9=w-4u; x10=x0r;
+
+y0=.9h; y1=.075h; bot y1'=0; bot y2r=bot y2'r=y0-o; y3=.725h; y4=.55h;
+y5'=.475h; y5=y5'+o; y6=y5; y7l=y6; y8=.65h; y8'=.825h; y9=y0+o; y10=y0;
+
+filldraw stroke z0e--z1e...z1'e;
+filldraw stroke z2e{left}..z2'e...z3e...z4e..z5'e..z5e;
+filldraw stroke z6e...z7e..z8e..z8'e..z9e..z10e;
+x11=x1'r; y11=y1'+o; rt_half_ellipse(11,1.5u);
+penlabels(1,2,2',3,3',4,5,6,7,8,9,10,11); endchar;
+
+
+iff known eth_wA:
+cmchar "The letter wA";
+beginchar(eth_wA,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(.5u#,-.5u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos1'(stem,5);
+penpos2(vair,90); penpos2'(vair,90); penpos3(stem,180); penpos4(stem,180);
+penpos5'(vair,270); penpos5(vair,270); penpos6(vair,270); penpos7(vair,270);
+penpos8(stem,0); penpos8'(stem,0); penpos9(vair,90); penpos10(vair,90);
+
+lft x0l=w-7u; x1l=w-8u; x1'l=x1l+.25u; x2=x0; x2'=w-8.25u; lft x3r=.75u;
+x4r=.75u; x5'=w-8.25u; x5=w-7u; x6=w-5.5u;
+x7=w-4.5u; x8l=w-3.25u; x8'l=w-3.25u; x9=w-4u; x10=x0r;
+
+y0=.9h; y1=.075h; bot y1'=0; bot y2r=bot y2'r=y0-o; y3=.725h; y4=.55h;
+y5'=.475h; y5=y5'+o; y6=y5; y7l=y6; y8=.65h; y8'=.825h; y9=y0+o; y10=y0;
+
+filldraw stroke z0e---z1e...{right}z1'e;
+filldraw stroke z2e{left}..z2'e...z3e...z4e..z5'e..z5e;
+filldraw stroke z6e...z7e..z8e..z8'e..z9e..z10e;
+penlabels(1,2,2',3,3',4,5,6,7,8,9,10,11); endchar;
+
+
+iff known eth_wE:
+cmchar "The letter wE";
+beginchar(eth_wE,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(.5u#,-.5u#);
+
+pickup fine.nib; penpos0(stem,5); penpos1(stem,0); penpos1'(stem,5);
+penpos2(vair,90); penpos2'(vair,90); penpos3(stem,180); penpos4(stem,180);
+penpos5'(vair,270); penpos5(vair,270); penpos6(vair,270); penpos7(vair,270);
+penpos8(stem,0); penpos8'(stem,0); penpos9(vair,90); penpos10(vair,90);
+
+lft x0l=w-7u; x1l=w-8u; x1'l=x1l+.25u; x2=x0; x2'=w-8u; lft x3r=1.1u;
+x4r=1.1u; x5'=w-8.25u; x5=w-7u; x6=w-5.5u;
+x7=w-4.5u; x8l=w-3.5u; x8'l=w-3.5u; x9=w-4u; x10=x0r;
+
+y0=.9h; y1=.075h; bot y1'=0; bot y2r=bot y2'r=y0-o; y3=.725h; y4=.55h;
+y5'=.475h; y5=y5'+o; y6r=y5; y7r=y6; y8=.65h; y8'=.825h; y9=y0+o; y10=y0;
+
+filldraw stroke z0e---z1e...{right}z1'e;
+filldraw stroke z2e..z2'e...z3e...z4e..z5'e..z5e;
+filldraw stroke z6e...z7e..z8e..z8'e..z9e..z10e;
+
+z11=z1'; half_ring(11);
+penlabels(0,1,1',2,2',3,4,5,5',6,7,8,8',9,10,11); endchar;
+
+
+iff known eth_we:
+cmchar "The letter we";
+beginchar(eth_we,12u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(u#,4u#);
+
+pickup fine.nib; penpos0(stem,0); penpos1(stem,-5); penpos2(vair,90);
+penpos2'(vair,90); penpos3(stem,180); penpos3'(stem,180);
+penpos4(stem,180); penpos5(vair,270);
+penpos6(vair,270); penpos7(vair,270); penpos8(vair,270); penpos9(stem,0);
+penpos10(stem,0); penpos11(vair,90); penpos12(vair,90);
+
+x0l=w-6.3u; x1l=w-7.6u; x2=x0l; x2'l=x0l-u; x3'r=1.25u; x3r=.35u;
+x4r=.35u; x5=w-8u; x6=x1l; x7=x1r; x8=w-4.5u; x9l=w-3.5u; x10l=w-2.65u;
+x11=w-3.5u; x12=x0r;
+
+y0=.8h; y1=.175h; y2r=y0-o; y2'r=y0-oo; y3'=.65h; y3=.4h;
+y4=.275h; y5r=y6r=y7r=y1; y8r=y1; y9=.25h; y10=.675h; y11=.775h; y12=.775h;
+
+filldraw stroke z0e{down}--z1e;
+filldraw stroke z2e..z2'e..tension 1.1..z3'e..z3e..z4e...z5e..z6e;
+filldraw stroke z7e..z8e..z9e..tension 1.3..z10e..z11e..z12e;
+x13=x10r; y13=.5[y9,y11]; rt_half_ellipse(13,1.5u);
+penlabels(1,2,2',3,3',4,5,6,7,8,9,10,11,12); endchar;
+
+
+iff known eth_wO:
+cmchar "The letter wO";
+beginchar(eth_wO,10u#,.5[cap_height#,x_height#],paren_depth#);
+adjust_fit(1.5u#,1.5u#);
+
+pickup fine.nib;
+penpos0(vair,90); penpos0'(vair,90); penpos1(stem,180);
+penpos2(vair,270); penpos3(vair,270);
+x0=.5w; x0'=x0-fine; x1=x0-3.75u; x2=.5[x1,x0]; x3r=x0l;
+y0=.9h; y0'l=y0-o; y2=.5h; y1=.3(y0-y2)+y2; y3=y2-oo;
+filldraw stroke z0e{left}...pulled_arc.e(0',1)...pulled_arc.e(1,2)...{right}z3e;
+
+penpos4'(stem,0); penpos4(stem,0); penpos5(stem,0); penpos5'(stem,0);
+bot y4=00; y4'=y4+.15h; y5=.5h-o; y5'=.9h;
+x5=x0; x5'=x5+fine; x4r=x4'r=u;
+filldraw stroke z4e..controls z4'e..z5e---z5'e;
+
+penpos6(vair,270); penpos7(vair,270); penpos8(stem,360);
+penpos9(vair,90); penpos10(vair,90);
+x6=w-x3; lft x8=w-x1; x7=w-x2; lft x9=w-x0'+1.25u; x10=w-x0;
+y6=y3; y7=y3; y8=.5(y0-y3)+y2; y9=y10=y0+oo;
+filldraw stroke z6e...pulled_arc.e(7,8)...pulled_arc.e(8,9)..z10e;
+penlabels(1,2,3,4,5,5',6,7,8,9,10,11,12,13); endchar;